Histórico da Página
...
Importar movimentos de outros módulos referentes a Fluxo de Caixa para o módulo Fluxo de Caixa.
Funcionamento
Na forma padrão, realiza-se a chamada através de um comando "RUN" passando as informações necessárias através de temp-tables.
A sintaxe para a chamada da API é:
def var v_hdl_v_hdl_api as handle no-undo.
run prgfin\cfl\cfl724zd.py persistent set v_hdl_api.
run pi_main_code_movto_fluxo_cx_recebto in v_hdl_api (input p_num_vers_integr_api,
input-output
...
table tt_import_movto_fluxo_cx_new,
input-output
...
table tt_import_movto_valid_cfl_new ).
if valid-handle(v_hdl_api) then
delete object v_hdl_api.
Parâmetros
Parâmetro | Descrição |
p_num_vers_integr_api | Será utilizado para determinar se o programa que está chamando está íntegro com as definições correntes da API; |
tt_import_movto_fluxo_cx_new | Esta temp-table conterá todos os movimentos que devam ser importados para o Fluxo de Caixa. |
tt_import_movto_valid_cfl_new | Esta temp-table conterá os possíveis erros que poderão ocorrer na integração. |
...
A API retornará na tabela temporária tt_import_movto_valid_cfl_new todos os erros encontrados ou mensagens de alerta gerados durante o processo de validação dos movimentos.
...
O programa que irá executar a api_movto_fluxo_cx_recebto_2 (cfl724zbcfl724zd.py) deverá conter e criar as seguintes tabelas temporárias:
...
Tabela Temporária | Descrição | Entrada/Saída |
tt_import_movto_fluxo_cx_new | Conterá as informações dos movimentos a serem importados. | Entrada e Saída |
...
Atributo | Tipo | Formato | Descrição | Obrig. | Evolução | |
tta_num_fluxo_cx | integer | >>>>>,>>9 | Código da conta corrente. | Sim | ||
tta_dat_movto_fluxo_cx | date | 99/99/9999 | Data do movimento. | Sim | ||
tta_cod_estab | character | x(3) / x(5)* | Seqüência em que o movimento será gerado. | Sim | ||
tta_cod_unid_negoc | character | x(3) | Código da unidade de negócio. | Sim | ||
tta_cod_tip_fluxo_financ | character | x(12) | Código do tipo de fluxo financeiro. | Sim | ||
tta_ind_fluxo_movto_cx | character | x(3) | Indicador do fluxo do movimento Valores permitidos: ent e sai. Onde: ent = entrada sai = saída. | Sim | ||
tta_ind_tip_movto_fluxo_cx | character | x(2) | Indicador do tipo de movimento. Valores permitidos: re e pr. Onde: re = realizado pr = previsto. | Sim | ||
tta_cod_modul_dtsul | character | x(3) | Código do módulo. Normalmente utilizado “CFL” para movimentos do fluxo de caixa. | Sim | ||
tta_val_movto_fluxo_cx | decimal | >>,>>>,>>>,>>9.99 | Valor do movimento. | Sim | ||
ttv_ind_erro_valid | character | x(8) | Caso ocorra algum erro, este campo terá o valor “sim” e as respectivas mensagens de erro estarão na tt_import_movto_valid_cfl, onde a leitura deverá ser feita pelo atributo ttv_rec_movto_fluxo_cx. Exemplo: for each tt_import_movto_fluxo_cx no-lock where tt_import_movto_fluxo_cx.ttv_ind_erro_valid = “sim”: for each tt_import_movto_valid_cfl no-lock where tt_import_movto_valid_cfl.ttv_rec_movto_fluxo_cx = tt_import_movto_fluxo_cx. Ttv_rec_movto_fluxo_cx: disp tt_import_movto_valid_cfl. end. end. | Sim | ||
tta_cod_histor_padr | character | x(8) | Código do histórico padrão. | Não | ||
tta_des_histor_movto_fluxo_cx | character | x(2000) | Descrição do histórico padrão. | Não | ||
ttv_cod_recid_movto_fluxo_cx | recid | character | x(32)>>>>>>9 | Deverá conter o número a string do recid id da temp-table tt_import_movto_fluxo_cx_new . Exemplo: assign Ttassign tt_import_movto_fluxo_cx_new.ttv_cod_recid_movto_fluxo_cx = recidstring(rowid(tt_import_movto_fluxo_cx_new). | Sim |
def temp-table tt_import_movto_fluxo_cx_new no-undo
field tta_num_fluxo_cx as integer format ">>>>>,>>9" initial 0 label "Fluxo Caixa" column-label "Fluxo Caixa"
...
field tta_des_histor_movto_fluxo_cx as character format "x(2000)" label "Histórico Movimento" column-label "Histórico Movimento"
field ttv_cod_recid_movto_fluxo_cx as recid cx as character format ">>>>>>9" initial ?x(32)"
.
Observação: Os atributos “tta_cod_histor_padr e tta_des_histor_movto_fluxo_cx” estão informados como não obrigatório, pois um ou outro pode ser informado, é obrigatório que pelo menos um seja informado, podendo se necessário informar os dois.
...
Tabela Temporária | Descrição | Entrada/Saída |
tt_import_movto_valid_cfl_new | Conterá as informações dos movimentos que não foram importados com a respectiva mensagem de erro. | Entrada e Saída |
...
Atributo | Tipo | Formato | Descrição | Obrig. | Evolução | ||
ttv_cod_recid_movto_fluxo_cx | recid | >>>>>>9 | character | x(32) | A string do id O recid do movimento da tt_import_movto_fluxo_cx_new que apresentou o erro. | Sim | |
ttv_num_mensagem | integer | >>>>,>>9 | Número da mensagem de erro. | Sim | |||
ttv_des_mensagem | character | x(50) | Descrição da mensagem do erro. | Sim | |||
ttv_des_ajuda | character | x(50) | Descrição da ajuda do erro. | Sim |
...
def temp-table tt_import_movto_valid_cfl no-undo
field ttv_reccod_id_movto_fluxo_cx as recid cx as character format ">>>>>>9" initial ?x(32)"
field ttv_num_mensagem as integer format ">>>>,>>9" label "Número" column-label "Número Mensagem"
...
create tt_import_movto_fluxo_cx_new.
assign tt_import_movto_fluxo_cx_new.tta_num_fluxo_cx cx = 0
tt_import_movto_fluxo_cx_new.tta_dat_movto_fluxo_cx cx = 02/01/2001
tt_import_movto_fluxo_cx_new.tta_cod_estab = estab = "xxx"
"xxx" tt_import_movto_fluxo_cx_new.tta_cod_unid_negoc negoc = "xxx"
tt_import_movto_fluxo_cx_new.tta_cod_tip_fluxo_financ financ = "11111"
tt_import_movto_fluxo_cx_new.tta_ind_fluxo_movto_cx cx = "ENT"
tt_import_movto_fluxo_cx_new.tta_ind_tip_movto_fluxo_cx cx = "RE"
tt_import_movto_fluxo_cx_new.tta_cod_modul_dtsul dtsul = "CFL"
tt_import_movto_fluxo_cx_new.tta_val_movto_fluxo_cx cx = 10000
tt_import_movto_fluxo_cx_new.tta_cod_histor_padr _cod_histor_padr = "01"
tt_import_movto_fluxo_cx_new.tta_des_histor_movto_fluxo_cx = ""
tt_import_movto_fluxo_cx_new.ttv_ind_erro_valid valid = "não"
tt_import_movto_fluxo_cx_new.ttv_reccod_id_movto_cta_corren = recidfluxo_cx = string(rowid(tt_import_movto_fluxo_cx).
...
create tt_import_movto_fluxo_cx_new.
assign tt_import_movto_fluxo_cx_new.tta_num_fluxo_cx cx = 0
tt_import_movto_fluxo_cx_new.tta_dat_movto_fluxo_cx cx = 02/01/2001
tt_import_movto_fluxo_cx_new.tta_cod_estab estab = "xxx"
tt_import_movto_fluxo_cx_new.tta_cod_unid_negoc negoc = "xxx"
tt_import_movto_fluxo_cx_new.tta_cod_tip_fluxo_financ financ = "11111"
tt tt_import_movto_fluxo_cx_new.tta_ind_fluxo_movto_cx cx = "ENT"
tt_import_movto_fluxo_cx_new.tta_ind_tip_movto_fluxo_cx cx = "RE"
tt_import_movto_fluxo_cx_new.tta_cod_modul_dtsul dtsul = "CFL"
tt_import_movto_fluxo_cx_new.tta_val_movto_fluxo_cx cx = 10000
tt_import_movto_fluxo_cx_new.tta_cod_histor_padr padr = ""
tt tt_import_movto_fluxo_cx_new.tta_des_histor_movto_fluxo_cx = "Movimento de entrada"
tt tt_import_movto_fluxo_cx_new.ttv_ind_erro_valid valid = "não"
tt tt_import_movto_fluxo_cx_new.ttv_cod_recid_movto_cta_corren = recidfluxo_cx = string(rowid(tt_import_movto_fluxo_cx).
...