Rotina chamada no programa de geração dos dados dos beneficiários.
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.
Localização
Dentro do programa af0500c.p, no momento em que é verificado a ocorrência de erros para desconsiderar o beneficiário.
Ponto de Utilização
"CONS-CEP"
"GERA-EXCEL"
"VALIDA-BENEF"
"VALIDA-MODALID"
"CONS-CNPJ-CEI"
Include das definições das tabelas temporárias
cpc-af0500c.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-af0500c-entrada
def temp-table tmp-cpc-af0500c-entrada no-undo
field in-evento-programa as char format "x(06)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-erro as int
field cd-modalidade like modalid.cd-modalidade
field cd-reg-propost like propost.cd-registro-plano
field cd-mod-usuario like usuario.cd-modalidade
field cd-reg-usuario like usuario.cd-registro-plano
field in-registro-plano like propost.in-registro-plano
field nr-ter-adesao like propost.nr-ter-adesao
field cd-usuario like usuario.cd-usuario
field nm-usuario like usuario.nm-usuario
field nm-contratante like contrat.nm-contratante
field ds-erro as char format "x(81)"
field ds-status as char format "x(13)"
field ds-acao-registro as char format "x(14)".
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-af0500c.p.
nm-ponto-chamada-cpc – Nome do ponto de chamada.
cd-erro – Indica o código de erro a ser tratado na cpc.
cd-modalidade – Variável que armazena o código da modalidade da tabela modalid.
cd-reg-propost – Variável que armazena o código do registro de plano da tabela propost.
cd-mod-usuario – Variável que armazena o código da modalidade do usuário.
cd-reg-usuario – Variável que armazena o registro de plano da tabela usuário.
in-registro-plano – Variável que armazena o código do registro de planos da tabela propost.
nr-ter-adesao – Variável que armazena o código do termo de adesão.
cd-usuario – Variável que armazena o código do usuário.
nm-usuario – Variável que armazena o nome do usuário.
nm-contratante – Variável que armazena o nome do contratante.
ds-erro – Variável que armazena a descrição do erro.
ds-status – Variável que armazena a descrição do status.
ds-acao-registro – Variável que armazena a ação do registro.
Tabela de saída tmp-cpc-af0500c-saida
def temp-table tmp-cpc-af0500c-saida no-undo
field lg-undo-retry as log
field lg-erro as log
field ds-mensagem as char format "x(80)"
field lg-considera-erro as log
field lg-invalida-modalidade as log
field lg-invalida-proposta as log
field lg-invalida-usuario as log
field cd-cnpj like contrat.nr-cgc-cpf
field nr-cei like contrat.nr-cei.
Definição campo a campo da tabela de saída
lg-undo-retry – testa se o programa deve continuar o fluxo normal.
lg-rro - Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
ds-mensagem – Deve conter mensagem referente ao erro.
lg-considera-erro – Indica se o erro de entrada deverá ser considerado ou desconsiderado no programa chamador.
lg-invalida-modalidade – Testa se valida ou não a modalidade.
lg-invalida-proposta – Testa se valida ou não a proposta.
lg-invalida-usuario – Testa se valida ou não o usuário.
cd-cnpj – Retorna o valor do CNPJ do contratante que deve ser gerado no SIB XML.
nr-cei - Retorna o valor do CEI do contratante que deve ser gerado no SIB XML.