Histórico da Página

...

Objetivo

Cancelar títulos e estornar títulos e/ou movimentos do Contas a Receber.

...

                                             output table tt_log_erros_estorn_cancel).

Tabelas Temporárias

def temp-table tt_input_estorno no-undo

    field ttv_cod_label                    as character format "x(8)" label "Label" column-label "Label"

    field ttv_des_conteudo                 as character format "x(40)" label "Texto" column-label "Texto"

    field ttv_num_seq                      as integer format ">>>,>>9" label "Seqˆncia" column-label "Seq"

    index tt_primario                      is primary

          ttv_num_seq                      ascending

    .

def temp-table tt_integr_acr_estorn_cancel no-undo

    field ttv_ind_niv_operac_acr           as character format "X(12)" label "N¡vel Opera‡Æo" column-label "N¡vel Opera‡Æo"

    field ttv_ind_tip_operac_acr           as character format "X(15)" label "Tipo Opera‡Æo" column-label "Tipo Opera‡Æo"

    field tta_cod_estab                    as character format "x(3)" label "Estabelecimento" column-label "Estab"

    field tta_num_id_tit_acr               as integer format "9999999999" initial 0 label "Token Cta Receber" column-label "Token Cta Receber"

    field tta_num_id_movto_tit_acr         as integer format "9999999999" initial 0 label "Token Movto Tit  ACR" column-label "Token Movto Tit  ACR"

    field tta_cod_refer                    as character format "x(10)" label "Referˆncia" column-label "Referˆncia"

    field tta_dat_transacao                as date format "99/99/9999" initial today label "Data Transa‡Æo" column-label "Dat Transac"

    field tta_des_text_histor              as character format "x(2000)" label "Hist¢rico" column-label "Hist¢rico"

    field ttv_cod_estab_reembol            as character format "x(8)"

    field ttv_cod_portad_reembol           as character format "x(5)"

    field ttv_cod_cart_bcia_reembol        as character format "x(3)"

    index tt_id                            is primary unique

          tta_cod_estab                    ascending

          tta_num_id_tit_acr               ascending

          tta_num_id_movto_tit_acr         ascending

    .