cpc-api-set0007.p1

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 da api-set0007.p, com dois pontos de chamada.

Ponto de Utilização
"CHAMA-APIVP0002"
Antes da chamada da api-vp0002.p.
Rotina utilizada para mudar qualquer informação do registro da tabela tmp-vp0002-usuario após a criação da tabela.
"CONS-CONTR-ORIG"
Ao consistir o contratante origem de um arquivo de importação de produto quando a inscrição do contratante origem da proposta em que o beneficiário foi localizado possui valor zero.
Rotina utilizada para consistir conforme regra específica do cliente se o contratante origem recebido no arquivo está de acordo com a proposta na qual o beneficiário está cadastrado.

Include das definições das tabelas temporárias
cpc-api-set0007.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-api-set0007-entrada
def temp-table tmp-cpc-api-set0007-entrada no-undo
fields in-evento-programa as char format "x(06)"
fields nm-ponto-chamada-cpc as char format "x(15) "
fields lg-mensagem-na-tela as logical
fields nr-rowid-tmproben as rowid
fields nr-rowid-tmproctr as rowid
fields cd-modalidade like modalid.cd-modalidade
fields nr-proposta like propost.nr-proposta
fields cd-usuario like usuario.cd-usuario
fields nr-cgc-cpf-recebido as char
fields in-tipo-pessoa-recebido as char.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-api-set0007. Os valores desse campo podem ser:
"INCLUI".
"CONSIS".
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa api-set0007.p:
"CHAMA-APIVP0002"
CONS-CONTR-ORIG"
lg-mensagem-na-tela – Indica se as mensagens de erro devem ser dispostas na tela ou não. Caso o indicador for não o campo da tabela de saída ds-mensagem-relatorio deve ser preenchido. (não obrigatório).
nr-rowid-tmproben – Rowid da tabela tmproben – temporária de importação do beneficiário.
nr-rowid-tmproctr – Rowid da tabela tmproctr – temporária de importação do contratante – somente utilizado para o ponto "CONS-CONTR-ORIG".
cd-modalidade – código da modalidade da proposta acessada no momento – somente utilizado para o ponto "CONS-CONTR-ORIG".
Nr-proposta – número da proposta acessada no momento – somente utilizado para o ponto "CONS-CONTR-ORIG".
Cd-usuario – código do beneficiário acessado no momento – somente utilizado para o ponto "CONS-CONTR-ORIG".
Nr-cgc-cpf-recebido – código do cgc/cpf do contratante origem recebido no arquivo de importação – somente utilizado para o ponto "CONS-CONTR-ORIG".
In-tipo-pessoa-recebido – tipo de pessoa do contratante origem recebido no arquivo de importação (F,J) – somente utilizado para o ponto "CONS-CONTR-ORIG".

Tabela de entrada tmp-vp0002-usuario – somente utilizada para o ponto "CHAMA-APIVP0002"
Like a tabela tmp-vp0002-usuario que consta no include api/apivp0002.i.
Tabela de saída tmp-cpc-api-set0007-saida
def temp-table tmp-cpc-api-set0007-saida no-undo
fields lg-undo-retry as logical
fields ds-mensagem-relatorio as char format "x(75)".
Definição campo a campo da tabela de saída
lg-undo-retry – 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-relatorio – Deve conter mensagens de erro ou qualquer outro tipo de mensagem. Utilizado em conjunto com a entrada lg-mensagem-na-tela. Se lg-mensagem-na-tela for Não então esse campo deve ser preenchido.