Árvore de páginas

Versões comparadas

Chave

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

...

def temp-table tt_dwf_pagto_eletr_particip no-undo
    field ttv_cod_particip_instit_financ   as character format "x(30)" label "C¢dCód. Participante"
    field tta_nom_pessoa                   as character format "x(40)" label "Nome" column-label "Nome"
    field tta_cod_pais                     as character format "x(3)" label "Pa¡sPaís" column-label "Pa¡sPaís"
    field tta_nom_endereco                 as character format "x(40)" label "Endere‡oEndereço" column-label "Endere‡oEndereço"
    index tt_dwf_pagto_partic              is primary unique
          ttv_cod_particip_instit_financ   ascending
    .


Tabela Temporária

Descrição

Entrada/Saída

tt_dwf_pagto_eletr_movto

Conterá as informações dos movimentos de liquidação e antecipação extraídos.

Saída

Atributo

Tipo

Formato

Descrição

ttv_num_mensagem

integer

>>>>,>>9

Número

ttv_des_msg_erro

character

x(60)

Mensagem Erro

ttv_des_msg_ajuda 

character

x(40)

Mensagem Ajuda


def temp-table tt_dwf_pagto_eletr_movto no-undo
    field tta_cod_empresa                  as character format "x(3)" label "Empresa" column-label "Empresa"
    field tta_num_id_tit_acr               as integer format "999999999" initial 0 label "Token Cta Receber" column-label "Token Cta Receber"
    field tta_num_id_movto_tit_acr         as integer format "999999999" initial 0 label "Token Movto Tit  ACR" column-label "Token Movto Tit  ACR"
    field ttv_cod_estab_ems2               as character format "x(5)"
    field ttv_cod_ser_docto_fat            as character format "x(5)" label "S‚rie Série Faturamento" column-label "S‚rieSérie"
    field tta_cod_nota_fisc_faturam        as character format "x(16)" label "Nota Fiscal" column-label "Nota Fiscal"
    field tta_cod_parcela_faturam          as character format "x(2)" label "Parcela Nota" column-label "Parcela"
    field tta_cod_proces_export            as character format "x(12)" label "Processo Exporta‡Æo" column-label "Processo Exporta‡Æo"
    field ttv_cod_estab_ems5               as character format "x(5)" label "Estabelecimento" column-label "Estabelecimento"
    field tta_cod_espec_docto              as character format "x(3)" label "Esp‚cie Documento" column-label "Esp‚cie"
    field tta_cod_ser_docto                as character format "x(5)" label "S‚rie Documento" column-label "S‚rie"
    field tta_cod_tit_acr                  as character format "x(16)" label "T¡tulo" column-label "T¡tulo"
    field tta_cod_parcela                  as character format "x(02)" label "Parcela" column-label "Parcela"
    field tta_cdn_cliente                  as Integer format ">>>,>>>,>>9" initial 0 label "Cliente" column-label "Cliente"
    field tta_ind_trans_acr_abrev          as character format "X(04)" label "Trans Abrev" column-label "Trans Abrev"
    field ttv_dat_pagto_eletron_movto      as date format "99/99/9999"
    field tta_val_movto_tit_acr            as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Movimento" column-label "Vl Movimento"
    field tta_val_desconto                 as decimal format "->>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Desconto" column-label "Valor Desconto"
    field tta_val_abat_tit_acr             as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Abatimento" column-label "Vl Abatimento"
    field tta_val_juros                    as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Juros" column-label "Valor Juros"
    field tta_val_multa_tit_acr            as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Multa" column-label "Vl Multa"
    field tta_val_despes_bcia              as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Desp Banc" column-label "Vl Desp Banc"
    field tta_cod_portador                 as character format "x(5)" label "Portador" column-label "Portador"
    field tta_cod_cart_bcia                as character format "x(3)" label "Carteira" column-label "Carteira"
    field ttv_val_brut_icms                as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Valor ICMS"
    field ttv_val_brut_iss                 as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Bruto ISS"
    field ttv_val_brut_outros              as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Valor Bruto Outros"
    field ttv_cod_particip_instit_financ   as character format "x(30)" label "C¢d. Participante"
    field ttv_cod_particip_interm          as character format "x(20)"
    field tta_ind_orig_tit_acr             as character format "X(8)" initial "ACREMS50" label "Origem Tit Cta Rec" column-label "Origem Tit Cta Rec"
    field ttv_log_autom_acr                as logical format "Sim/NÆo" initial yes
    field ttv_num_id_movto_tit_acr_ren     as integer format "999999999" initial 0 label "Token Movto Tit  ACR" column-label "Token Movto Tit  ACR"
    index tt_dwf_pagto_eletr               is primary unique
          ttv_cod_estab_ems2               ascending
          ttv_cod_ser_docto_fat            ascending
          tta_cod_nota_fisc_faturam        ascending
          tta_cod_parcela_faturam          ascending
          tta_cod_proces_export            ascending
          ttv_dat_pagto_eletron_movto      ascending
          ttv_cod_particip_instit_financ   ascending
          ttv_cod_particip_interm          ascending
          ttv_cod_estab_ems5               ascending
          tta_cod_portador                 ascending
          tta_cod_cart_bcia                ascending
          tta_num_id_tit_acr               ascending
          tta_num_id_movto_tit_acr         ascending
          ttv_num_id_movto_tit_acr_ren     ascending
    index tt_dwf_particip                 
          ttv_cod_particip_instit_financ   ascending
          ttv_dat_pagto_eletron_movto      ascending
    index tt_dwf_titulo                   
          ttv_cod_estab_ems5               ascending
          tta_cod_espec_docto              ascending
          tta_cod_ser_docto                ascending
          tta_cod_tit_acr                  ascending
          tta_cod_parcela                  ascending
    .

...