Árvore de páginas

Versões comparadas

Chave

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

...

Tabela de entrada tmp-cpc-rc0210t-entrada

def temp-table ttmptmp-cpc-rc0210t-entrada no-undo

field in-evento-programa as char format "x(15)"
field nm-ponto-chamada-cpc                 as char format "x(2015)"
field u-log-1                                           like cliprova.u-log-1
field cliprova-rowid                                 rowid-qtmpgpre as rowid.

Definição campo a campo da tabela de entrada

  • in-evento-programa - Nome do evento do ponto de cpc.
  • nm-ponto-chamada-cpc - Nome do ponto de chamada da CPC dentro do programa que a utiliza. Para o programa rc0210q.p.
  • u-log-1 Campo lógico para verificar se deve considerar a especialidade.
  • rowid-qtmpgpre - Campo Cliprova-rowid - Campo que recebe a rowid da cliprovatabela qtmpgpre.


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

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

field lg-undo-retry                               as logical as log
field lg-erro as log
field ds-mensagem                            as as char format "x(75)"
field lg-retorna-inicio as log.

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

  • lg-undo-retry - Campo 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.
  • lg-erro - Campo que controla se erros aconteceram dentro da CPC.
  • ds-mesagem - Campo que retorna mensagem de erro, se ocorrido dentro da CPC.
  • lg-retorna-inicio - - Campo que retorna mensagem de erro, se ocorrido dentro da CPC quando o ponto for "IMPR-REL-ESPEC". 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.