Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Ponto de Utilização

  • " ALTERA-DATA "
  • "DEPOIS-TRANS"


Include das definições das tabelas temporárias

...

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

      field in-evento-

...

programa      

...

 as char format "x(10)"

...

         field nm-ponto-chamada-cpc

...

     as char format "x(15)"

...

         field dt-

...

realizacao            

...

as date format "99/99/9999"

...

         field cd-uni-

...

benef              as int
       

...

 field carteira-

...

benef            as dec
   

...

     field nr-carteira-

...

benef        

...

as int

...

         field r-tranrevi                as recid

...

         field cd-

...

clinica                as int
       

...

 field cd-

...

unidade              

...

 as int

...

         field r-preserv                 as recid
         field h-mensagens               as

...

handle
         field cd-tipo-consulta          as int.


Definição campo a campo da tabela de entrada

  • in-evento-programa – Evento do programa que chama a cpc-ac1001d.p.
  • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. 
  • dt-realizacao – Data de realização do movimento.
  • cd-uni-benef -  Código da Unidade do Beneficiário
  • carteira-benef -  Documento de Identificação do Beneficiário
  • nr-carteira-benef -  Via do Documento de Identificação do Beneficiário
  • r-tranrevi -  Transação
  • cd-clinica -  Código da Clínica
  • cd-unidade -  Código da Unidade da Clínica
  • r-preserv - Rowid do Prestador
  • h-mensagens - Tabela temporária referente as mensagens
  • cd-tipo-consulta - Tipo de consulta


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

...

field lg-undo-retry                as log
field ds-mensagem               as char format "x(50)"
field cd-erro-sistema            as char
field dt-atual                       as date format "99/99/9999"
field dt-antiga                     as date format "99/99/9999"
field cd-transacao              as int
field r-tranrevi                    as recid.

...

  • lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo;
  • ds-mensagem – Mensagem que deverá ser retornada ao usuário, quando indicação de ocorrência de erro;
  • cd-erro-sistema – Permite informar ERRO de retorno para apresentação em tela.
  • dt-atual – Retorna o Valor atual da Data.
  • dt-antiga – Retorna a data antiga de realização do movimento.
  • cd-transacao - Código da Transação
  • r-tranrevi -  Rowid da Transação