Histórico da Página

...

Observações: Quando a API for executado por um programa externo, logo após a chamada da API, deverá ser criado um tratamento para impressão dos erros. E para a correta visualização dos erros, todos os campos desta tabela devem ser impressos.

Tabelas Temporárias

O programa que irá executar a api_movto_fluxo_cx_recebto (cfl724zb.py) deverá conter e criar as seguintes tabelas temporárias:

...

def temp-table tt_import_movto_fluxo_cx no-undo

    field tta_num_fluxo_cx                 cx                       as integer format ">>>>>,>>9" initial 0 label "Fluxo Caixa" column-label "Fluxo Caixa"

    field tta_dat_movto_fluxo_cx           as cx              as date format "99/99/9999" initial ? label "Data Movimento" column-label "Data Movimento"

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

    field tta_cod_unid_negoc               negoc                   as character format "x(3)" label "Unid Negócio" column-label "Un Neg"

    field tta_cod_tip_fluxo_financ         financ             as character format "x(12)" label "Tipo Fluxo Financ" column-label "Tipo Fluxo Financ"

    field tta_ind_fluxo_movto_cx           as cx              as character format "X(3)" initial "ENT" label "Fluxo Movimento" column-label "Fluxo Movimento"

    field tta_ind_tip_movto_fluxo_cx       cx         as character format "X(2)" initial "PR" label "Tipo Movimento" column-label "Tipo Movimento"

    field tta_cod_modul_dtsul              as dtsul                  as character format "x(3)" label "Módulo" column-label "Módulo"

    field tta_val_movto_fluxo_cx           as cx              as decimal format ">>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Movto" column-label "Valor Movto"

    field ttv_ind_erro_valid               as valid                      as character format "X(08)" initial "Não"

    field tta_cod_histor_padr              padr                   as character format "x(8)" label "Histórico Padrão" column-label "Histórico Padrão"

    field tta_des_histor_movto_fluxo_cx    as cx    as character format "x(2000)" label "Histórico Movimento" column-label "Histórico Movimento"

    field ttv_rec_movto_fluxo_cx           as cx              as recid format ">>>>>>9" initial ?

...

    field ttv_rec_movto_fluxo_cx           as recid format ">>>>>>9" initial ?

    field ttv_num_mensagem                 as mensagem                as integer format ">>>>,>>9" label "Número" column-label "Número Mensagem"

    field ttv_des_mensagem                 as character format "x(50)" label "Mensagem" column-label "Mensagem"

    field ttv_des_ajuda                    as ajuda                        as character format "x(50)" label "Ajuda" column-label "Ajuda"

...

Será verificado se a descrição do histórico não está em branco, salvo se o código do histórico padrão estiver informado, caso a descrição do histórico não estiver informada será pego a descrição do histórico padrão. 

Criação dos Registros

Exemplo de criação de movimentos de fluxo de caixa:

...