Histórico da Página

...

def temp-table tmp-cpc-at0111b1-entrada no-undo
    field in-evento-programa    programa              as char format "x(06)"
    field nm-ponto-chamada-cpc          as char format "x(15)"
    field cd-unidade  unidade                              like guiautor.cd-unidade          
    field cd-unidade-carteira  carteira                 like guiautor.cd-unidade-carteira carteira 
    field cd-carteira-usuario  usuario                  like like guiautor.cd-carteira-usuario usuario 
    field nr-via-carteira  carteira                          like like guiautor.nr-via-carteira       
    field cd-validacao          validacao                    like procguia.cd-validacao      
    field cd-user-validacao  validacao                    like like procguia.cd-user-validacao validacao 
    field cd-tipo-cobranca  cobranca                     like  like procguia.cd-tipo-cob         
    field cd-forma-pagto-cob            like procguia.cd-forma-pagto-cob
    field aa-guia-atendimento           like guiautor.aa-guia-atendimento
    field nr-guia-atendimento           like guiautor.nr-guia-atendimento
    field h-tmp-benefs                  as handle
    field id-pessoa    pessoa                     as int    
    field cdPacote  cd-tipo-proc                      as char    as int
    field cdPrestador  nr-processo                   as intlike procguia.nr-processo
    field statusPacote  nr-seq-digitacao                  as int like procguia.nr-seq-digitacao.

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama CPC-AT0111B1.P. O valor desse campo pode ser "CONSULTA;
    • nm-ponto-chamada-cpc – "FORMA-PAGTO-COB"; "CONS-CLIENTE"
    • cd-unidade – Código da unidade;
    • cd-unidade-carteira – Código da unidade da carteira do beneficiário;
    • cd-carteira-usuario – Código da carteira do beneficiário;
    • nr-via-carteira – Número da via da carteira do beneficiário;
    • cd-validacao – Código de validação do movimento;
    • cd-user-validacao – Código do usuário que validou o movimento;
    • cd-tipo-cobranca – Código do tipo de cobrança, definido quando da validação do movimento;
    • cd-forma-pagto-cob – Código da forma de pagamento da cobrança, definido quando da validação do movimento;
    • aa-guia-atendimento – Ano da emissão da guia;
    • nr-guia-atendimento – Número da guia de autorização;
    • h-tmp-benefs – Informações do usuário;
    • id-pessoa – Identificador da pessoa física;
    • cdPacote - Código identificador do pacote;
    • cdPrestador - Código do Prestador do pacote;
    • cd-tipo-proc - Identificador do tipo do movimento: "PROC" ou "INSU"
    • nr-processo - Número do processo do movimento
    • nr-seq-digitacao - Número da sequencia de digitação do movimentostatusPacote - Status do pacote informado pelo Sispac.

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

  def temp-table tmp-cpc-at0111b1-saida no-undo
    field cd-codigo-retorno            

...

as int

...

 format "99"
    field ds-mensagem-retorno        

...

  as char format "x(75)"
    field lg-undo-retry                

...

as log
   

...

field ds-mensagem-erro            

...

 as char format "x(75)"
    field ds-mensagem-tipo-

...

cob          as char.

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

...