Histórico da Página
Documento de API
Produto: | Datasul |
Ocorrência: | Documentação de API |
| Nome Físico | prgfin/apb/apb767zf |
Objetivo
Efetuar alteração dos títulos do Contas a Pagar.
Parâmetros de entrada
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. |
p_cod_modulo | Conterá o módulo, será utilizado para verificar se o módulo é “APB”. |
p_cod_matriz_trad_org_ext | Conterá o código da matriz de tradução da organização externa que tem por finalidade relacionar os códigos externos aos códigos presentes no Datasul-EMS5, caso a matriz de tradução não tiver sido informada, o parâmetro estará em branco. |
| p_log_estorn_comis |
|
| tt_tit_ap_alteracao_base_aux_3 | Conterá os dados dos títulos para alteração. |
| tt_tit_ap_alteracao_rateio | Conterá os dados dos rateios para alteração. |
| tt_params_generic_api | Conterá campos novos das temp-tables passadas como parâmetro. |
| tt_log_erros_tit_ap_alteracao | Conterá os dados dos erros apresentados na alteração |
Funcionamento
Na forma padrão, realiza-se a chamada através de um comando RUN normal, passando-se as temp-tables carregadas com as informações necessárias.
A sintaxe para executar a API/BO em modo persistente é:
run prgfin/apb/apb767zf.py persistent set v_hdl_aux.
run pi_main_code_api_integr_ap_alter_tit_ap_6 in v_hdl_aux (Input 1,
Input p_cod_modulo,
Input p_cod_matriz_trad_org_ext,
input p_log_estorn_comis,
input-output table tt_tit_ap_alteracao_base_aux_3,
input-output table tt_tit_ap_alteracao_rateio,
input-output table tt_params_generic_api,
output table tt_log_erros_tit_ap_alteracao).
A variável denominada h-handle irá receber o “handle” do programa, permitindo o acesso aos “métodos” internos da API.
Tabelas Temporárias
Nos atributos das tabelas temporárias de entrada e saída:
Tabela Temporária | Descrição | Entrada/Saída |
tt_tit_ap_alteracao_base_aux_3 | Conterá as informações dos títulos para alteração. | Entrada e Saída |
(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.
(**) Liberado o número de documento com 16 posições e série com5, apartir de maio/2011.
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_cod_usuar_corren | character | x(12) | Usuário Corrente |
|
|
tta_cod_empresa | character | x(3) | Empresa |
|
|
tta_cod_estab | character | x(3) / x(5)* | Estabelecimento |
|
|
tta_num_id_tit_ap | integer | 9999999999 | Token Tit AP |
|
|
ttv_rec_tit_ap | recid | >>>>>>9 | Recid Título |
|
|
tta_cdn_fornecedor | Integer | >>>,>>>,>>9 | Fornecedor |
|
|
tta_cod_espec_docto | character | x(3) | Espécie Documento |
|
|
tta_cod_ser_docto | character | x(3)/x(5)** | Série Documento |
|
|
tta_cod_tit_ap | character | x(10)/x(16)** | Título |
|
|
tta_cod_parcela | character | x(02) | Parcela |
|
|
ttv_dat_transacao | date | 99/99/9999 | Data Transação |
|
|
ttv_cod_refer | character | x(10) | Referência |
|
|
tta_val_sdo_tit_ap | decimal | ->>>,>>>,>>9.99 | Valor Saldo |
|
|
tta_dat_emis_docto | date | 99/99/9999 | Data Emissão |
|
|
tta_dat_vencto_tit_ap | date | 99/99/9999 | Data Vencimento |
|
|
tta_dat_prev_pagto | date | 99/99/9999 | Data Prevista Pgto |
|
|
tta_dat_ult_pagto | date | 99/99/9999 | Data último Pagto |
|
|
tta_num_dias_atraso | integer | >9 | Dias Atraso |
|
|
tta_val_perc_multa_atraso | decimal | >9.99 | Perc Multa Atraso |
|
|
tta_val_juros_dia_atraso | decimal | ->>>,>>>,>>9.99 | Valor Juro |
|
|
tta_val_perc_juros_dia_atraso | decimal | >9.999999 | Perc Jur Dia Atraso |
|
|
tta_dat_desconto | date | 99/99/9999 | Data Desconto |
|
|
tta_val_perc_desc | decimal | >9.9999 | Percentual Desconto |
|
|
tta_val_desconto | decimal | ->>>,>>>,>>9.99 | Valor Desconto |
|
|
tta_cod_portador | character | x(5) | Portador |
|
|
ttv_cod_portador_mov | character | x(5) | Portador Movto |
|
|
tta_log_pagto_bloqdo | logical | Sim/NÃo | Bloqueia Pagamento |
|
|
tta_cod_seguradora | character | x(8) | Seguradora |
|
|
tta_cod_apol_seguro | character | x(12) | Apólice Seguro |
|
|
tta_cod_arrendador | character | x(6) | Arrendador |
|
|
tta_cod_contrat_leas | character | x(12) | Contrato Leasing |
|
|
tta_ind_tip_espec_docto | character | X(17) | Tipo Espécie |
|
|
tta_cod_indic_econ | character | x(8) | Moeda |
|
|
tta_num_seq_refer | integer | >>>9 | Sequência |
|
|
ttv_ind_motiv_alter_val_tit_ap | character | X(09) | Motivo Alteração |
|
|
ttv_wgh_lista | widget-handle | >>>>>>9 |
|
|
|
ttv_log_gera_ocor_alter_valores | logical | Sim/NÃo |
|
|
|
tta_cb4_tit_ap_bco_cobdor | Character | x(50) | Titulo Bco Cobrador |
|
|
tta_cod_histor_padr | character | x(8) | Histórico Padrão |
|
|
tta_des_histor_padr | character | x(40) | Descrição |
|
|
tta_ind_sit_tit_ap | character | X(13) | Situação |
|
|
tta_cod_forma_pagto | character | x(3) | Forma Pagamento |
|
|
tta_cod_tit_ap_bco_cobdor | Character | x(20) | Título Banco Cobdor |
|
|
tta_cod_estab_ext | Character | x(8) | Estabelecimento Ext |
|
|
tta_num_ord_invest | Integer | >>>>,>>9 | Ordem Investimento |
|
|
ttv_num_ped_compra | Integer | >>>>>,>>9 | Ped Compra |
|
|
tta_num_ord_compra | integer | >>>>>9,99 | Ordem Compra |
|
|
ttv_num_event_invest | Integer | >,>>9 | Evento Investimento |
|
|
ttv_val_1099 | Decimal | ->>,>>>,>>>,>>9.99 | Valor 1099 |
|
|
tta_cod_tax_ident_number | Character | x(15) | Tax Id Number |
|
|
tta_ind_tip_trans_1099 | Character | X(50) | Tipo Transação 1099 |
|
|
ttv_log_atualiz_tit_impto_vinc | logical | Sim/Não | Atualiza Imposto Vinculado |
|
|
def temp-table tt_tit_ap_alteracao_base_aux_3 no-undo
field ttv_cod_usuar_corren as character format "x(12)" label "Usuário Corrente" column-label "Usuário Corrente"
field tta_cod_empresa as character format "x(3)" label "Empresa" column-label "Empresa"
field tta_cod_estab as character format "x(5)" label "Estabelecimento" column-label "Estab"
field tta_num_id_tit_ap as integer format "9999999999" initial 0 label "Token Tit AP" column-label "Token Tit AP"
field ttv_rec_tit_ap as recid format ">>>>>>9" initial ?
field tta_cdn_fornecedor as Integer format ">>>,>>>,>>9" initial 0 label "Fornecedor" column-label "Fornecedor"
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(3)" label "Série Documento" column-label "Série"
field tta_cod_tit_ap as character format "x(10)" label "Título" column-label "Título"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parc"
field ttv_dat_transacao as date format "99/99/9999" initial today label "Data Transação" column-label "Data Transação"
field ttv_cod_refer as character format "x(10)" label "Referência" column-label "Referência"
field tta_val_sdo_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Saldo" column-label "Valor Saldo"
field tta_dat_emis_docto as date format "99/99/9999" initial today label "Data Emissão" column-label "Dt Emissão"
field tta_dat_vencto_tit_ap as date format "99/99/9999" initial today label "Data Vencimento" column-label "Dt Vencto"
field tta_dat_prev_pagto as date format "99/99/9999" initial today label "Data Prevista Pgto" column-label "Dt Prev Pagto"
field tta_dat_ult_pagto as date format "99/99/9999" initial ? label "Data Último Pagto" column-label "Data Último Pagto"
field tta_num_dias_atraso as integer format ">9" initial 0 label "Dias Atraso" column-label "Dias Atr"
field tta_val_perc_multa_atraso as decimal format ">9.99" decimals 2 initial 00.00 label "Perc Multa Atraso" column-label "Multa Atr"
field tta_val_juros_dia_atraso as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Juro" column-label "Vl Juro"
field tta_val_perc_juros_dia_atraso as decimal format ">9.999999" decimals 6 initial 00.00 label "Perc Jur Dia Atraso" column-label "Perc Dia"
field tta_dat_desconto as date format "99/99/9999" initial ? label "Data Desconto" column-label "Dt Descto"
field tta_val_perc_desc as decimal format ">9.9999" decimals 4 initial 0 label "Percentual Desconto" column-label "Perc Descto"
field tta_val_desconto as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Desconto" column-label "Valor Desconto"
field tta_cod_portador as character format "x(5)" label "Portador" column-label "Portador"
field ttv_cod_portador_mov as character format "x(5)" label "Portador Movto" column-label "Portador Movto"
field tta_log_pagto_bloqdo as logical format "Sim/Não" initial no label "Bloqueia Pagamento" column-label "Pagto Bloqdo"
field tta_cod_seguradora as character format "x(8)" label "Seguradora" column-label "Seguradora"
field tta_cod_apol_seguro as character format "x(12)" label "Apólice Seguro" column-label "Apolice Seguro"
field tta_cod_arrendador as character format "x(6)" label "Arrendador" column-label "Arrendador"
field tta_cod_contrat_leas as character format "x(12)" label "Contrato Leasing" column-label "Contr Leas"
field tta_ind_tip_espec_docto as character format "X(17)" initial "Normal" label "Tipo Espécie" column-label "Tipo Espécie"
field tta_cod_indic_econ as character format "x(8)" label "Moeda" column-label "Moeda"
field tta_num_seq_refer as integer format ">>>9" initial 0 label "Sequência" column-label "Seq"
field ttv_ind_motiv_alter_val_tit_ap as character format "X(09)" initial "Alteração" label "Motivo Alteração" column-label "Motivo Alteração"
field ttv_wgh_lista as widget-handle extent 15 format ">>>>>>9"
field ttv_log_gera_ocor_alter_valores as logical format "Sim/Não" initial no
field tta_cb4_tit_ap_bco_cobdor as Character format "x(50)" label "Titulo Bco Cobrador" column-label "Titulo Bco Cobrador"
field tta_cod_histor_padr as character format "x(8)" label "Histórico Padrão" column-label "Histórico Padrão"
field tta_des_histor_padr as character format "x(40)" label "Descrição" column-label "Descrição Histórico Padrão"
field tta_ind_sit_tit_ap as character format "X(13)" label "Situação" column-label "Situação"
field tta_cod_forma_pagto as character format "x(3)" label "Forma Pagamento" column-label "F Pagto"
field tta_cod_tit_ap_bco_cobdor as character format "x(20)" label "Título Banco Cobdor" column-label "Título Banco Cobdor"
field tta_cod_estab_ext as character format "x(8)" label "Estabelecimento Exte" column-label "Estabelecimento Ext"
field tta_num_ord_invest as integer format ">>>>,>>9" initial 0 label "Ordem Investimento" column-label "Ordem Investimento"
field ttv_num_ped_compra as integer format ">>>>>,>>9" initial 0 label "Ped Compra" column-label "Ped Compra"
field tta_num_ord_compra as integer format ">>>>>9,99" initial 0 label "Ordem Compra" column-label "Ordem Compra"
field ttv_num_event_invest as integer format ">,>>9" label "Evento Investimento" column-label "Evento Investimento"
field ttv_val_1099 as decimal format "->>,>>>,>>>,>>9.99" decimals 2
field tta_cod_tax_ident_number as character format "x(15)" label "Tax Id Number" column-label "Tax Id Number"
field tta_ind_tip_trans_1099 as character format "X(50)" initial "Rents" label "Tipo Transacao 1099" column-label "Tipo Transacao 1099"
field ttv_log_atualiz_tit_impto_vinc as logical format "Sim/Não" initial no
index tt_titap_id
tta_cod_estab ascending
tta_cdn_fornecedor ascending
tta_cod_espec_docto ascending
tta_cod_ser_docto ascending
tta_cod_tit_ap ascending
tta_cod_parcela ascending
.
Tabela Temporária | Descrição | Entrada/Saída |
tt_tit_ap_alteracao_rateio | Conterá as informações dos rateios para os títulos alterados. | Entrada e Saída |
(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.
(**) Liberado o centro de custo com 20 posições, a partir de maio/2011.
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_rec_tit_ap | recid | >>>>>>9 | Recid Título |
|
|
tta_cod_estab | character | x(3) / x(5)* | Estabelecimento |
|
|
tta_cod_refer | character | x(10) | Referência |
|
|
tta_num_seq_refer | integer | >>>9 | Sequência |
|
|
tta_cod_tip_fluxo_financ | character | x(12) | Tipo Fluxo Financ |
|
|
tta_cod_plano_cta_ctbl | character | x(8) | Plano Contas |
|
|
tta_cod_cta_ctbl | character | x(20) | Conta Contábil |
|
|
tta_cod_unid_negoc | character | x(3) | Unid Negócio |
|
|
tta_cod_plano_ccusto | character | x(8) | Plano Centros Custo |
|
|
tta_cod_ccusto | Character | x(11)/x(20)** | Centro Custo |
|
|
tta_val_aprop_ctbl | decimal | ->>>,>>>,>>9.99 | Valor Aprop Ctbl |
|
|
ttv_ind_tip_rat | character | X(08) |
|
|
|
tta_num_id_tit_ap | integer | 1E+10 | Token Tit AP |
|
|
tta_num_id_aprop_ctbl_ap | integer | 1E+10 | Id Aprop Ctbl AP |
|
|
def temp-table tt_tit_ap_alteracao_rateio no-undo
field ttv_rec_tit_ap as recid format ">>>>>>9" initial ?
field tta_cod_estab as character format "x(5)" label "Estabelecimento" column-label "Estab"
field tta_cod_refer as character format "x(10)" label "Referência" column-label "Referência"
field tta_num_seq_refer as integer format ">>>9" initial 0 label "Sequência" column-label "Seq"
field tta_cod_tip_fluxo_financ as character format "x(12)" label "Tipo Fluxo Financ" column-label "Tipo Fluxo Financ"
field tta_cod_plano_cta_ctbl as character format "x(8)" label "Plano Contas" column-label "Plano Contas"
field tta_cod_cta_ctbl as character format "x(20)" label "Conta Cont bil" column-label "Conta Cont bil"
field tta_cod_unid_negoc as character format "x(3)" label "Unid Negócio" column-label "Un Neg"
field tta_cod_plano_ccusto as character format "x(8)" label "Plano Centros Custo" column-label "Plano Centros Custo"
field tta_cod_ccusto as Character format "x(11)" label "Centro Custo" column-label "Centro Custo"
field tta_val_aprop_ctbl as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Aprop Ctbl" column-label "Vl Aprop Ctbl"
field ttv_ind_tip_rat as character format "X(08)"
field tta_num_id_tit_ap as integer format "9999999999" initial 0 label "Token Tit AP" column-label "Token Tit AP"
field tta_num_id_aprop_ctbl_ap as integer format "9999999999" initial 0 label "Id Aprop Ctbl AP" column-label "Id Aprop Ctbl AP"
index tt_aprpctba_id is primary unique
tta_cod_estab ascending
tta_cod_refer ascending
tta_num_seq_refer ascending
tta_cod_plano_cta_ctbl ascending
tta_cod_cta_ctbl ascending
tta_cod_unid_negoc ascending
tta_cod_plano_ccusto ascending
tta_cod_ccusto ascending
tta_cod_tip_fluxo_financ ascending
ttv_rec_tit_ap ascending
.
Tabela Temporária | Descrição | Entrada/Saída |
tt_log_erros_tit_ap_alteracao | Conterá as informações dos erros apresentados na alteração. | Saída |
(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.
(**) Liberado o número de documento com 16 posições e série com5, apartir de maio/2011.
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
tta_cod_estab | character | x(3) / x(5)* | Estabelecimento |
|
|
tta_cdn_fornecedor | Integer | >>>,>>>,>>9 | Fornecedor |
|
|
tta_cod_espec_docto | character | x(3) | Espécie Documento |
|
|
tta_cod_ser_docto | character | x(3)/x(5)** | Série Documento |
|
|
tta_cod_tit_ap | character | x(10)/x(16)** | Título |
|
|
tta_cod_parcela | character | x(02) | Parcela |
|
|
tta_num_id_tit_ap | integer | 9999999999 | Token Tit AP |
|
|
ttv_num_mensagem | integer | >>>>,>>9 | Número |
|
|
ttv_cod_tip_msg_dwb | character | x(12) | Tipo Mensagem |
|
|
ttv_des_msg_erro | character | x(60) | Mensagem Erro |
|
|
ttv_des_msg_ajuda_1 | character | x(360) |
|
|
|
ttv_wgh_focus | widget-handle | >>>>>>9 |
|
|
|
def temp-table tt_log_erros_tit_ap_alteracao no-undo
field tta_cod_estab as character format "x(5)" label "Estabelecimento" column-label "Estab"
field tta_cdn_fornecedor as Integer format ">>>,>>>,>>9" initial 0 label "Fornecedor" column-label "Fornecedor"
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(3)" label "Série Documento" column-label "Série"
field tta_cod_tit_ap as character format "x(10)" label "Título" column-label "Título"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parc"
field tta_num_id_tit_ap as integer format "9999999999" initial 0 label "Token Tit AP" column-label "Token Tit AP"
field ttv_num_mensagem as integer format ">>>>,>>9" label "Número" column-label "Número Mensagem"
field ttv_cod_tip_msg_dwb as character format "x(12)" label "Tipo Mensagem" column-label "Tipo Mensagem"
field ttv_des_msg_erro as character format "x(60)" label "Mensagem Erro" column-label "Inconsistência"
field ttv_des_msg_ajuda_1 as character format "x(360)"
field ttv_wgh_focus as widget-handle format ">>>>>>9"
.
Tabela Temporária | Descrição | Entrada/Saída |
tt_params_generic_api | Conterá campos novos das temp-tables passadas como parâmetro. | Entrada / Saída |
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_rec_id | recid | >>>>>>9 |
|
|
|
ttv_cod_tabela | character | X(28) | Tabela |
|
|
ttv_cod_campo | character | X(25) | Campo |
|
|
ttv_cod_valor | character | X(8) | Valor |
|
|
def temp-table tt_params_generic_api no-undo
field ttv_rec_id as recid format ">>>>>>9"
field ttv_cod_tabela as character format "x(28)" label "Tabela" column-label "Tabela"
field ttv_cod_campo as character format "x(25)" label "Campo" column-label "Campo"
field ttv_cod_valor as character format "x(8)" label "Valor" column-label "Valor"
index tt_idx_param_generic is primary unique
ttv_cod_tabela ascending
ttv_rec_id ascending
ttv_cod_campo ascending
.
Exemplo Criação temp-table tt_params_generic_api:
create tt_params_generic_api.
assign tt_params_generic_api.ttv_rec_id = tt_tit_ap_alteracao_base_aux_3.ttv_rec_tit_ap
tt_params_generic_api.ttv_cod_tabela = "tt_tit_ap_alteracao_base_aux_3"
tt_params_generic_api.ttv_cod_campo = "log_prestac_serv_auton"
tt_params_generic_api.ttv_cod_valor = "no".
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas