cpc-api-set0005.p1

• Rotina utilizada para mudar qualquer informação do registro da tabela tmproben no momento da criação da tabela
• 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-set0005.p após a gravação da tabela tmproben.
Ponto de Utilização
"GRAVA-TMP"
Include das definições das tabelas temporárias
cpc-api-set0005.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-api-set0005-entrada
def temp-table tmp-cpc-api-set0005-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 dt-inclusao-plano as date
fields nr-rowid-tmproben as rowid.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-api-set0005. Os valores desse campo podem ser:
"INCLUI".
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa api-set0005.p:
"GRAVA-TMP"
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).
Dt-inclusao-plano – Data de inclusão no plano recebida no registro 304 do layout PTU.
nr-rowid-tmproben – Rowid da tabela tmproben

Tabela de saída tmp-cpc-api-set0005-saida
def temp-table tmp-cpc-api-set0005-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.