CPC-FP0710A.p

• Rotina utilizada para processar seleção do faturamento.
• 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.

...

Include das definições das tabelas temporárias

• cpc-fp0710a.i 

...

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-fp0710a-entrada

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

field in-evento-programa programa                       as as char format "x(10)"
field nm-ponto-chamada-cpc cpc   as char format "x(15)"
field cod-gr-cli                          as char format "x(15)"like contrat.cod-gr-cli initial ""
field cd-contratante                  as int
field cd-contratante-ini             as int
field cd-contratante-fim            as int
field nr-rowid-propost               as rowid.

Definição campo a campo da tabela de entrada

• in-evento-programa – - Evento do programa.
• nm-ponto-chamada-cpc – - Nome do ponto de chamada da cpc dentro do programa que a utiliza

...

• .
• cod-gr-cli - Código do grupo do cliente.
• cd-contratante - Código do contratante.
• cd-contratante-ini - Código do contratante inicial.
• cd-contratante-fim - Código do contratante final.
• nr-rowid-propos - RowID da tabela propost.
  
  

Tabela de saída tmp-cpc-fp0710a –saida-saida

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

field lg-undo-retry         retry                         as log
field ds-mensagem-retorno           retorno          as char format "x(75)"
field lg-next-contratante                as log
field cod-gr-cli                               like contrat.cod-gr-cli initial ""
field in-tipo-pessoa                       like contrat.in-tipo-pessoa
field lg-nao-chama-cpc-fp0711a   as log.

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

• lg-undo-retry – - Variável que controla se erros aconteceram dentro da CPC.
• ds-mensagem-retorno - Retorna a mensagem da CPC.
• lg-next-contratante - Indica se deve ignorar o registro atual.
• cod-gr-cli - Código do grupo do cliente.
• in-tipo-pessoa - Indicador do tipo de pessoa do contratante. F - Física; J - Jurídica.
• lg-nao-chama-cpc-fp0711a - Indica se deve ser acionada a CPC-fp0711a.

Tabela de saída tmp-cpc-fp0710a-contrat

def temp-table tmp-cpc-fp0710a-contrat no-undo

field lg-selecao          as log format "*/ "
field cd-contratante   as int
field nm-contratante  as char.

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

• lg-selecao - Indica se o contratante foi selecionado/ marcado.
• cd-contratante - Código do contratante.
• nm-contratante - Nome do contratante.