DRHGFP-2718 - Sistêmico - Promotores

Tempo aproximado para leitura: 00 min

01. DADOS GERAIS

02. SITUAÇÃO/REQUISITO

1. Ao clicar em "Outras Ações - > Cargos de Promotores" o sistema exibe a mensagem "Apenas a operação de incluir registros pode ser feita em um arquivo vazio." mesmo com um cargo cadastrado no parâmetro MV_VDFCAPO.
2. Ao incluir um promotor o sistema gera o error.log abaixo:

 TOP Error -19 - Invalid Query Fields ( Syntax Error ).

Query : SELECT RA_FILIAL,RA_MAT,RA_NOME,RA_DEPTO,QB_COMARC,(RE_DATA FROM SRET10 SRE WHERE RE_FILIALP = RA_FILIAL AND RE_MATP = RA_MAT AND RE_DEPTOP = RA_DEPTO AND RE_DEPTOD <> RE_DEPTOP AND SRE.D_E_L_E_T = ' ' ORDER BY RE_DATA DESC ) AS RE_DATA,CASE WHEN (RE_DATA FROM SRET10 SRE WHERE RE_FILIALP = RA_FILIAL AND RE_MATP = RA_MAT AND RE_DEPTOP = RA_DEPTO AND RE_DEPTOD <> RE_DEPTOP AND SRE.D_E_L_E_T = ' ' ORDER BY RE_DATA DESC ) IS NULL THEN RA_ADMISSA ELSE (RE_DATA FROM SRET10 SRE WHERE RE_FILIALP = RA_FILIAL AND RE_MATP = RA_MAT AND RE_DEPTOP = RA_DEPTO AND RE_DEPTOD <> RE_DEPTOP AND SRE.D_E_L_E_T_ = ' ' ORDER BY RE_DATA DESC ) END,(RIM_COMARC FROM RIMT10 RIM WHERE RIM_FILIAL = RA_FILIAL AND RIM_MAT = RA_MAT AND RIM.D_E_L_E_T_ = ' ' ORDER BY RIM_DTFIM DESC ) AS RIM_COMARC,(RIM_DTINI FROM RIMT10 RIM WHERE RIM_FILIAL = RA_FILIAL AND RIM_MAT = RA_MAT AND RIM.D_E_L_E_T_ = ' ' ORDER BY RIM_DTFIM DESC ) AS RIM_DTINI,(CASE WHEN (RIM_DTFIM FROM RIMT10 RIM WHERE RIM_FILIAL = RA_FILIAL AND RIM_MAT = RA_MAT AND RIM.D_E_L_E_T_ = ' ' ORDER BY RIM_DTFIM DESC ) IS NULL THEN ' ' ELSE (RIM_DTFIM FROM RIMT10 RIM WHERE RIM_FILIAL = RA_FILIAL AND RIM_MAT = RA_MAT AND RIM.D_E_L_E_T_ = ' ' ORDER BY RIM_DTFIM DESC ) END ) AS RIM_DTFIM,RA_TABELA,RA_TABNIVE,RA_TABFAIX,(R3_DATA FROM SR3T10 SR3 WHERE R3_FILIAL = RA_FILIAL AND R3_MAT = RA_MAT AND R3_TABELA = RA_TABELA AND R3_TABNIVE = RA_TABNIVE AND R3_TABFAIX = RA_TABFAIX AND SR3.D_E_L_E_T_ = ' ' ORDER BY R3_DATA ) AS R3_DATA,CASE WHEN (R3_DATA FROM SR3T10 SR3 WHERE R3_FILIAL = RA_FILIAL AND R3_MAT = RA_MAT AND R3_TABELA = RA_TABELA AND R3_TABNIVE = RA_TABNIVE AND R3_TABFAIX = RA_TABFAIX AND SR3.D_E_L_E_T_ = ' ' ORDER BY R3_DATA ) IS NULL THEN RA_ADMISSA ELSE (R3_DATA FROM SR3T10 SR3 WHERE R3_FILIAL = RA_FILIAL AND R3_MAT = RA_MAT AND R3_TABELA = RA_TABELA AND R3_TABNIVE = RA_TABNIVE AND R3_TABFAIX = RA_TABFAIX AND SR3.D_E_L_E_T_ = ' ' ORDER BY R3_DATA ) END,RA_ADMISSA,RA_NA on FPROXELEIT(VDFA150.PRW) 05/12/2018 11:48:22 line : 242__

 ____ 

[TOTVS build: 7.00.170117A-20190109]

Called from VDFA150POS(VDFA150.PRW) 05/12/2018 11:48:22 line : 156

03. SOLUÇÃO