Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

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

characterx(5)Estabelecimento da Antecipação

Sim


ttv_num_id_ant

integer999999999Num-ID (Token) do Título de Antecipação

Sim


ttv_cod_estab_tit_aptta_cod_parcela

characterx(025)Estabelecimento do Título

ParcelaSim


ttattv_valnum_comprtdoid_tit_ap

integer999999999Num-ID (Token) do Título

Sim


ttv_val_vincul

decimal->>,>>>,>>>,>>9.99Valor a ser Vinculado

Sim


ttv Comprometidotta_val_sdocotac_titindic_apecon

decimal->>,>>>,>>>,>>9.9999999999Cotação Informada

Não99Valor Saldo


ttv_logdes_existe_tit

logical

text_histor

characterx(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>>>>>>9Número do ErroSim


ttv_des_msg_erro

characterx(60)Mensagem de ErroSim


ttv_des_help_erro

characterx(200)Texto de Ajuda do ErroSim



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.