CPC-PR0110D.P

Rotina utilizada para:

• Ao consultar um Modulo de Cobertura no cadastro de Modulo da tabela mod-cob. 
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será utilizado para esta CPC apenas um registro na tabela temporária de saída.

Localização

• No programa pr0110d.p nas opções de Código e de Navegação, para o ponto de chamada "CAMPOS-ESPEC"".
• No programa pr0110d.p na opção Consulta para o ponto de chamada "APOS-CONSULTA".

Ponto de Utilização

• "CAMPOS-ESPEC"
• "APOS-CONSULTA"

Include das definições das tabelas temporárias

• cpc-pr0110d.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-pr0110d-entrada

def temp-table tmp-cpc-pr0110d-entrada no-undo

field in-evento-programa                    as char format "x(10)"
field nm-ponto-chamada-cpc             as char format "x(15)"
field r-mod-cob                                   as rowid.

Definição campo a campo da tabela de entrada

• in-evento-programa – Indica o evento de chamada da CPC. Poderá ser "C0NSULTA".
• nm-ponto-chamada-cpc – Indica o ponto de chamada da CPC. Poderá ser "CAMPOS-ESPEC";
• r-movipres - Ponteiro (rowid) da tabela de Modulos de Cobertura(mod-cob).

Tabela de saída tmp-cpc-pr0110d-saida

def temp-table tmp-cpc-pr0110d-saida no-undo

field lg-undo-retry                          as log
field ds-mensagem                       as char.

Definição campo a campo da tabela saída

• lg-undo-retry – Indica se ocorreu erro durante processamento da cpc.
• ds-mensagem – Descrição de mensagem de erro que sera mostrada caso o lg-undo-retry = yes.