Árvore de páginas

Rotina que permite realizar uma consulta do cliente, no momento da consulta da nota de serviço.
Localização
Dentro do programa fp0910q.p.
Ponto de Utilização
"CONS-CLIENTE"
Include das definições das tabelas temporárias
cpc-fp0910q.i
Tabelas de entrada e saída
Tabela de entrada
def temp-table tmp-cpc-fp0910q-entrada no-undo
field nm-ponto-chamada as char format "x(15)"
field in-evento-programa as char format "x(15)"
field cd-modalidade like modalid.cd-modalidade
field nr-ter-adesao like ter-ade.nr-ter-adesao
field aa-referencia like notaserv.aa-referencia
field mm-referencia like notaserv.mm-referencia
field nr-sequencia like notaserv.nr-sequencia
field cd-contratante like fatueven.cd-contratante
field cd-contratante-origem like fatueven.cd-contratante-origem
field cd-evento like fatueven.cd-evento.
Definição campo a campo da tabela de entrada
nm-ponto-chmada-cpc – Ponto de chamada da CPC;
in-evento-programa – Nome do evento;
cd-modalidade – Código da modalidade;
nr-ter-adesao – Número do termo de adesão;
aa-referencia – Ano de referência;
mm-referencia – Mês de referência;
nr-sequencia – Número da sequência;
cd-contratante – Código do contratante;
cd-contratante-origem – Código do contratante origem;
cd-evento – Código do evento.
Tabela de saida
def temp-table tmp-cpc-fp0910q-saida no-undo
field lg-undo-retry as logical
field ds-mensagem as char format "x(75)".
Definição campo a campo da tabela de saída
lg-undo-retry – Indica que ocorreu algum erro durante o processamento na CPC.
ds-mensagem – Retorna a mensagem de erro da cpc.



  • Sem rótulos