Á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-fp0512j-entrada

def temp-table tmp-cpc-fp0512j-entrada no-undo
            field in-evento-programa                 as  as char format "x(10)"
            field nm-ponto-chamada                 as  as char format "x(15)"
            field vl-total-nota                              like like notaserv.vl-total
            field nr-rowid-usuario                      as rowid
            field dt-emissao-aux  aux                    as date
            field nr-rowid-wk1                      as rowid
            field qt-valor                         as date as dec.

Definição campo a campo da tabela de entrada

  • nm-ponto-chamada-cpc – Ponto de chamada de cpc
  • in-evento-programa – Identifica qual evento deve ser executado no momento que está sendo chamada
  • vl-total-nota – Valor total da nota calculado até o momento
  • nr-rowid-usuario – número do registro no banco da tabela referente ao beneficiário
  • dt-emissao-aux – data de emissão da nota de serviço em questão
  • nr-rowid-wk1 - 
  • qt-valor - Valor do evento.

Tabela de entrada-saída wk-evento-imposto

def temp-table wk-evento-imposto no-undo
      field cd-evento                            like fatueven.cd-evento
      field cd-imposto                          like dzimposto.cd-imposto
      field vl-base                                as dec
      field pc-aliquota                          like evenimp.pc-aliquota
      field lg-desconsidera-registro     as log.

...

  • cd-evento– código do evento relacionado ao desconto
  • cd-imposto – Código do imposto considerado no cálculo
  • vl-base– valor a ser considerado para cálculo de imposto
  • pc-aliquota – percentual de alíquota relacionado ao evento
  • Obs: essa tabela é considerada apenas no ponto de chamada "CRIA-EVEN-PROG"


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

def temp-table tmp-cpc-fp0512j-saida no-undo
      field lg-undo-retry                                as logical
      field ds-mensagem-erro                       as char format "x(75)"
      field vl-total-nota                                  like notaserv.vl-total
      field lg-desconsidera-registro               as log
      field lg-desconsidera-benef-excluido   as log initial yes.

...