Produto: | Datasul |
Versões: | 12.1.19 ou superior |
Ocorrência: | Documentação de API |
Nome Físico | prgfin/apb/apb532za |
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.
Parâmetros de entrada
p_num_vers_integr_api: Versão da API, será utilizado para determinar se o programa que está chamando está íntegro com as definições correntes da API;
p_dat_transacao: Data de Transação que será utilizada para realizar a operação;
tt_vinc_an_x_tit: Temp-Table com as informações das Antecipações e Títulos que devem ser vinculados.
Parâmetros de saída
tt_erro_msg: Temp-Table com os erros ocorridos durante a operação.
A sintaxe para executar a API/BO 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.
Tabela Temporária | Descrição | Entrada/Saída |
tt_vinc_an_x_tit | Informações das Antecipações e Títulos que serão vinculados. | Entrada |
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
tta_cod_parcela | character | x(02) | Parcela | ||
tta_val_comprtdo_tit_ap | decimal | ->>>,>>>,>>9.99 | Valor Comprometido | ||
tta_val_sdo_tit_ap | decimal | ->>>,>>>,>>9.99 | Valor Saldo | ||
ttv_log_existe_tit | logical | Sim/Não |
def temp-table tt_vinc_an_x_tit no-undo
field ttv_cod_estab_ant as character format "x(3)"
field ttv_num_id_ant as integer format ">>>>,>>9"
field ttv_cod_estab_tit_ap as character format "x(8)"
field ttv_num_id_tit_ap as integer format "999999999" initial 0 label "Token Tít AP" column-label "Token Tít AP"
field ttv_val_vincul as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Comissão Vinculada" column-label "Comissão Vinculada"
field ttv_val_cotac_indic_econ as decimal format "->>,>>>,>>>,>>9.9999999999" decimals 10 label "Cotação" column-label "Cotação"
field ttv_des_text_histor as character format "x(2000)" label "Histórico" column-label "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.