Histórico da Página
...
Realizar a vinculação de Antecipações a Títulos do Contas a Pagar. A vinculação é "Vários para Vários", isto é, poderão ser vinculadas várias Antecipações a um Título ou vice-versa.
...
tt_erro_msg: Temp-Table com os erros ocorridos durante a operação.
Funcionamento
...
A sintaxe para executar a chamada da API/BO API em modo persistente é:
run prgfin/apb/
...
apb532za.py persisten set v_hdl_api.
run pi_main_code_api_vinc_an_x_tit_ap in v_hdl_api (input 1,
input p_dat_transacao,
input table tt_vinc_an_x_tit,
output table tt_erro_msg).
delete procedure v_hdl_api.
Tabelas Temporárias
Tabela Temporária | Descrição | Entrada/Saída |
tt_titvinc_apan_vlx_compdo | Conterá as informações necessárias para encontrar a provisão ou previsão dentro do APB e irá retornar o valor que está comprometido para aquela provisão ou previsão informada. | Entrada e Saída |
(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.
...
tit | Informações das Antecipações e Títulos que serão vinculados. | Entrada |
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. | |||||||||||||||||||||
ttattv_cod_estab_ant | 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 | da Antecipação | Sim | |
ttv_num_id_ant | integer | 999999999 | Num-ID (Token) do Título de Antecipação | Sim | ||||||||||||||||||||||
ttv_cod_estab_tit_ap | character | x(5) | Estabelecimento do Título | Sim | ||||||||||||||||||||||
ttv_num_id_tit_ap | integer | 999999999 | Num-ID (Token) do Título | Sim | ||||||||||||||||||||||
ttv_val_vincul | decimal | ->>, | tta_val_comprtdo_tit_ap | decimal | ->>>,>>>,>>9.99 | Valor a ser Vinculado | Sim | |||||||||||||||||||
ttv Comprometidotta_val_sdocotac_titindic_apecon | decimal | ->>,>>>,>>>,>>9.9999999999 | Cotação Informada | Não99Valor Saldo | ||||||||||||||||||||||
ttv_logdes_existe_tit | logical | text_histor | character | x(2000) | Histórico | Sim/Não |
def temp-table tt_titvinc_apan_vlx_compdo tit no-undo
field ttattv_cod_estab_estab as ant as character format "x(5)" label "Estabelecimento" column-label "Estab AN"
field tta_cdn_fornecedor as Integer format ">>>,>>>,>>9" initial 0 label "Fornecedor field ttv_num_id_ant as integer format "999999999" initial 0 label "Token Tít AN" column-label "FornecedorToken Tít AN"
field tta field ttv_cod_estab_espectit_docto as ap as character format "x(3)" label "Espécie Documento5)" column-label "Estab Tít"
field ttv_num_id_tit_ap as integer format "999999999" initial 0 label "Token Tít AP" column-label "EspécieToken Tít AP"
field tta_cod_ser_docto as character format "x(3)" label "Série Documento field ttv_val_vincul as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Valor Vinculado" column-label "SérieValor Vinculado"
field tta_cod_tit_ap as character format "x(10)" label "Título field ttv_val_cotac_indic_econ as decimal format "->>,>>>,>>>,>>9.9999999999" decimals 10 label "Cotação" column-label "TítuloCotação"
field tta_cod_parcela field ttv_des_text_histor as character format "x(022000)" label "ParcelaHistórico" column-label "Parc"
field tta_val_comprtdo_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Comprometido d" column-label "Valor Comprometido d"
field tta_val_sdo_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Saldo" column-label "Valor Saldo"
field ttv_log_existe_tit as logical format "Sim/NÆo" initial no
Histórico"
index tt_id is primary unique
ttv_cod_estab_ant ascending
ttv_num_id_ant ascending
ttv_cod_estab_tit_ap ascending
ttv_num_id_tit_ap ascending.
Tabela Temporária | Descrição | Entrada/Saída |
tt_erro_msg | Temp-Table com os erros ocorridos durante a operação. | Saída |
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_num_msg_erro | integer | >>>>>>9 | Número do Erro | Sim | |
ttv_des_msg_erro | character | x(60) | Mensagem de Erro | Sim | |
ttv_des_help_erro | character | x(200) | Texto de Ajuda do Erro | Sim |
def temp-table tt_erro_msg no-undo
field ttv_num_msg_erro as integer format ">>>>>>9" label "Mensagem" column-label "Mensagem"
field ttv_des_msg_erro as character format "x(60)" label "Mensagem Erro" column-label "Inconsistência"
field ttv_des_help_erro as character format "x(200)"
index tt_num_erro
ttv_num_msg_erro ascending .