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.
...
A sintaxe para executar a API /BO em modo persistente é:
run prgfin/apb/apb532za.py persisten set v_hdl_api.
...
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. | ||
ttv_cod_estab_ant | character | x(5) | Estabelecimento da Antecipação | Sim | |||
ttv_num_id_ant | integer | 999999999 | Num-ID (Token) do Título de Antecipação | Sim | |||
ttv_cod_estab_tit_aptta_cod_parcela | character | x(025) | Estabelecimento do Título | ParcelaSim | |||
ttattv_valnum_comprtdoid_tit_ap | integer | 999999999 | Num-ID (Token) do Título | Sim | |||
ttv_val_vincul | 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_vinc_an_x_tit no-undo
field ttv_cod_estab_ant as character format "x(3)"
5)" column-label "Estab AN"
field ttv_num_id_ant as integer format ">>>>,>>9"
"999999999" initial 0 label "Token Tít AN" column-label "Token Tít AN"
field ttv_cod_estab_tit_ap as character format "x(85)"
column-label "Estab Tít"
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 VinculadaValor Vinculado" column-label "Comissão VinculadaValor Vinculado"
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
ttvttv_cod_estab_ant ascending
ttv ttv_num_id_ant ascending
ttv_cod_estab_tit_ap ascending
ttv_cod_estab 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
ttvttv_num_idmsg_tit_ap erro ascending.