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.

...

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.	tit	Informações das Antecipações e Títulos que serão vinculados.	EntradaEntrada e Saída

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

ttattv_cod_estab_ant

character

x(3) / x(5)*

Estabelecimento

tta_cdn_fornecedor

Integer

>>>,>>>,>>9

Fornecedor

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

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

integer

999999999

Num-ID (Token) do Título

Sim

ttv_val_vincultta_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                    as estab_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_espec_docto             as estab_tit_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    .

Árvore de páginas

Versões comparadas

Versão antiga 7

Nova versão Atual

Chave