Árvore de páginas

Documento de API

Produto:

Datasul

Ocorrência:

Documentação de API

Nome Físicoprgfin/apb/apb905zd


Objetivo

Efetuar a implantação das Antecipações ou PEF Pendentes no Contas a Pagar.


Parâmetros de Entrada

num_vers_integr_api: será utilizado para determinar se o programa que está chamando está íntegro com as definições correntes da API;

p_cod_matriz_trad_org_ext....: conterá o código da matriz de tradução organizacional externa.

tt_api_apb_antecip_pef_p1_3: conterá os dados das antecipações a serem importadas.

tt_api_apb_aprop_ctbl_pend_3: conterá os dados das apropriações contábeis a serem importadas para as antecipações.

tt_api_apb_impto_impl_pend_3: conterá os dados dos impostos a serem importados para as antecipações.

tt_api_apb_abat_prev_provis_3: conterá os dados das previsões que serão abatidas pelas antecipações.

tt_api_1099_3: conterá os dados referentes aos impostos do tipo 1099, utilizado somente pelos clientes Datasul dos EUA.

tt_ord_compra_tit_ap_pend_1: conterá os dados para importação de Ordem Compra.

tt_params_generic_api_3 Conterá campos novos das temp-tables passadas como parâmetro.

tt_docum_est_esoc_api: Conterá as informações do documento do ESocial.

tt_item_doc_est_esoc_api: Conterá as informações dos itens do documento do eSocial.

tt_natur_rendto_impto_pend: Conterá as informações das naturezas de rendimento para o REINF.

Funcionamento

A sintaxe para executar a API/BO em modo persistente é:

run prgfin/apb/apb905zd.py persistent set v_hdl_aux.

run pi_main_block_antecip_pef_pend_7 IN v_hdl_aux  (Input 7,
                                          Input p_cod_matriz_trad_org_ext,
                                          Input-output table tt_api_apb_antecip_pef_p1_3, 
                                          Input table tt_api_apb_aprop_ctbl_pend_3,       
                                          Input table tt_api_apb_impto_impl_pend_3,       
                                          Input table tt_api_apb_abat_prev_provis_3,      
                                          Output table tt_log_erros_atualiz,
                                          Input table tt_api_1099_3,                      
                                          Input table tt_ord_compra_tit_ap_pend_1,
                                          Input-output table tt_params_generic_api_3,     
                                          Input table tt_docum_est_esoc_api,
                                          Input table tt_item_doc_est_esoc_api,
                                          Input table tt_natur_rendto_impto_pend) /* pi_main_block_antecip_pef_pend_7*/.


A variável denominada v_hdl_aux irá receber o “handle” do programa, permitindo o acesso aos “métodos” internos da API.


Tabelas Temporárias


Tabela Temporária

Descrição

Entrada/Saída

tt_api_apb_antecip_pef_p1_3

Conterá as informações das antecipações ou PEFs a serem integradas com o APB.

Entrada


(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.

(**) Liberado o número de documento com 16 posições e série com5, apartir de maio/2011.

Atributo

Tipo

Formato

Descrição

Obrig.

Valor

Evol.

tta_cod_empresa

character

x(3)

Empresa




tta_cod_estab

character

x(3) / x(5)*

Estabelecimento




tta_cod_refer

character

x(10)

Referˆncia




tta_cod_espec_docto

character

x(3)

Esp‚cie Documento




tta_cod_ser_docto

character

x(3)/x(5)**

S‚rie Documento




tta_cdn_fornecedor

Integer

>>>,>>>,>>9

Fornecedor




tta_cod_tit_ap

character

x(10)/x(16)**

T¡tulo




tta_cod_parcela

character

x(02)

Parcela




tta_cod_portador

character

x(5)

Portador




tta_cod_indic_econ

character

x(8)

Moeda




tta_num_talon_cheq

integer

>>>,>>>,>>9

Talon rio Cheques




tta_num_cheque

integer

>>>>,>>>,>>9

Num Cheque




tta_ind_favorec_cheq

character

X(15)

Favorecido




tta_nom_favorec_cheq

character

x(40)

Nome Favorecido




tta_val_tit_ap

decimal

->>>,>>>,>>9.99

Valor T¡tulo




tta_val_cotac_indic_econ

decimal

>>>>,>>9.9999999999

Cota‡Æo




tta_dat_emis_docto

date

99/99/9999

Data EmissÆo




tta_dat_vencto_tit_ap

date

99/99/9999

Data Vencimento




tta_ind_tip_refer

character

X(22)

Tipo Referˆncia




tta_cod_seguradora

character

x(8)

Seguradora




tta_cod_apol_seguro

character

x(12)

Ap¢lice Seguro




tta_cod_arrendador

character

x(6)

Arrendador




tta_cod_contrat_leas

character

x(12)

Contrato Leasing




tta_cod_histor_padr

character

x(8)

Hist¢rico PadrÆo




tta_des_text_histor

character

x(2000)

Hist¢rico




tta_ind_natur_cta_ctbl

character

X(08)

Natureza Cont bil




tta_cod_usuar_gerac_movto

character

x(12)

Usuario Gerac Movto




ttv_cod_empresa_ext

character

x(3)

C¢digo Empresa Ext




tta_cod_estab_ext

character

x(8)

Estabelecimento Exte




tta_cod_portad_ext

character

x(8)

Portador Externo




tta_cod_modalid_ext

character

x(8)

Modalidade Externa




ttv_cod_id_antecip_pef_pend

character

x(80)

Identificador  da Antecipação


string(rowid(tt_api_apb_antecip_pef_p1_3))


tta_ind_origin_tit_ap

character

X(03)

Origem




tta_cod_cart_bcia

character

x(3)

Carteira




ttv_ind_tip_cod_barra

character

X(01)





tta_cb4_tit_ap_bco_cobdor

Character

x(50)

Titulo Bco Cobrador




tta_cod_tit_ap_bco_cobdor

character

x(20)

T¡tulo Banco Cobdor





def temp-table tt_api_apb_antecip_pef_p1_3 no-undo
    field tta_cod_empresa                  as character format "x(3)" label "Empresa" column-label "Empresa"
    field tta_cod_estab                    as character format "x(5)" label "Estabelecimento" column-label "Estab"
    field tta_cod_refer                    as character format "x(10)" label "Referência" column-label "Referência"
    field tta_cod_espec_docto              as character format "x(3)" label "Espécie Documento" column-label "Espécie"
    field tta_cod_ser_docto                as character format "x(5)" label "Série Documento" column-label "Série"
    field tta_cdn_fornecedor               as Integer format ">>>,>>>,>>9" initial 0 label "Fornecedor" column-label "Fornecedor"
    field tta_cod_tit_ap                   as character format "x(16)" label "Título" column-label "Título"
    field tta_cod_parcela                  as character format "x(02)" label "Parcela" column-label "Parcela"
    field tta_cod_portador                 as character format "x(5)" label "Portador" column-label "Portador"
    field tta_cod_indic_econ               as character format "x(8)" label "Moeda" column-label "Moeda"
    field tta_num_talon_cheq               as integer format ">>>,>>>,>>9" initial 0 label "Talonário Cheques" column-label "Talonário Cheques"
    field tta_num_cheque                   as integer format ">>>>,>>>,>>9" initial ? label "Núm Cheque" column-label "Num Cheque"
    field tta_ind_favorec_cheq             as character format "X(15)" initial "Portador" label "Favorec" column-label "Favorec"
    field tta_nom_favorec_cheq             as character format "x(40)" label "Nome Favorecido" column-label "Nome Favorecido"
    field tta_val_tit_ap                   as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Título" column-label "Valor Título"
    field tta_val_cotac_indic_econ         as decimal format ">>>>,>>9.9999999999" decimals 10 initial 0 label "Cotação" column-label "Cotação"
    field tta_dat_emis_docto               as date format "99/99/9999" initial today label "Data  Emissão" column-label "Dt Emissão"
    field tta_dat_vencto_tit_ap            as date format "99/99/9999" initial today label "Data Vencimento" column-label "Dt Vencto"
    field tta_ind_tip_refer                as character format "X(22)" label "Tipo Referência" column-label "Tipo"
    field tta_cod_seguradora               as character format "x(8)" label "Seguradora" column-label "Seguradora"
    field tta_cod_apol_seguro              as character format "x(12)" label "Apólice Seguro" column-label "Apolice Seguro"
    field tta_cod_arrendador               as character format "x(6)" label "Arrendador" column-label "Arrendador"
    field tta_cod_contrat_leas             as character format "x(12)" label "Contrato Leasing" column-label "Contr Leas"
    field tta_cod_histor_padr              as character format "x(8)" label "Histórico Padrão" column-label "Histórico Padrão"
    field tta_des_text_histor              as character format "x(2000)" label "Histórico" column-label "Histórico"
    field tta_ind_natur_cta_ctbl           as character format "X(08)" initial "DB" label "Natureza Contábil" column-label "Natureza Contábil"
    field tta_cod_usuar_gerac_movto        as character format "x(12)" label "Usuario Gerac Movto" column-label "Usuario"
    field ttv_cod_empresa_ext              as character format "x(3)" label "Código Empresa Ext" column-label "Cód Emp Ext"
    field tta_cod_estab_ext                as character format "x(8)" label "Estabelecimento Exte" column-label "Estabelecimento Ext"
    field tta_cod_portad_ext               as character format "x(8)" label "Portador Externo" column-label "Portador Externo"
    field tta_cod_modalid_ext              as character format "x(8)" label "Modalidade Externa" column-label "Modalidade Externa"
    field ttv_cod_id_antecip_pef_pend      as character format "x(80)"
    field tta_ind_origin_tit_ap            as character format "X(03)" initial "APB" label "Origem" column-label "Origem"
    field tta_cod_cart_bcia                as character format "x(3)" label "Carteira" column-label "Carteira"
    field ttv_ind_tip_cod_barra            as character format "X(01)"
    field tta_cb4_tit_ap_bco_cobdor        as Character format "x(50)" label "Titulo Bco Cobrador" column-label "Titulo Bco Cobrador"
    field tta_cod_tit_ap_bco_cobdor        as character format "x(20)" label "Título Banco Cobdor" column-label "Título Banco Cobdor"
    index tt_antcppfp_id                   is primary unique
          tta_cod_estab                    ascending
          tta_cod_refer                    ascending
    index tt_antcppfp_tip_refer           
          tta_cod_empresa                  ascending
          tta_ind_tip_refer                ascending
          tta_cod_estab                    ascending
          tta_cod_refer                    ascending
    index tt_recid                        
          ttv_cod_id_antecip_pef_pend      ascending
    .


Tabela Temporária

Descrição

Entrada/Saída

tt_api_apb_abat_prev_provis_3

Conterá as informações das previsões a serem abatidas.

Entrada



(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.

(**) Liberado o número de documento com 16 posições e série com5, apartir de maio/2011.

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

ttv_cod_id_integr_apb_item_lote

character

x(80)




ttv_cod_id_antecip_pef_pend

character

x(80)

Utilizado para o relacionamento com a temp table Antecipação



tta_cod_estab

character

x(3) / x(5)*

Estabelecimento



tta_cod_espec_docto

character

x(3)

Esp‚cie Documento



tta_cod_ser_docto

character

x(3)/x(5)**

S‚rie Documento



tta_cdn_fornecedor

Integer

>>>,>>>,>>9

Fornecedor



tta_cod_tit_ap

character

x(10)/x(16)**

T¡tulo



tta_cod_parcela

character

x(02)

Parcela



tta_val_abat_tit_ap

decimal

->>>,>>>,>>9.99

Valor Abatimento



tta_cod_estab

character

x(3) / x(5)*

Estabelecimento



tta_cod_espec_docto

character

x(3)

Esp‚cie Documento



tta_cod_ser_docto

character

x(3)/x(5)**

S‚rie Documento



tta_cdn_fornecedor

Integer

>>>,>>>,>>9

Fornecedor



tta_cod_tit_ap

character

x(10)/x(16)**

T¡tulo



tta_cod_parcela

character

x(02)

Parcela



tta_val_abat_tit_ap

decimal

->>>,>>>,>>9.99

Valor Abatimento




def temp-table tt_api_apb_abat_prev_provis_3 no-undo
    field ttv_cod_id_integr_apb_item_lote  as character format "x(80)"
    field ttv_cod_id_antecip_pef_pend      as character format "x(80)"
    field tta_cod_estab                    as character format "x(5)" label "Estabelecimento" column-label "Estab"
    field tta_cod_espec_docto              as character format "x(3)" label "Espécie Documento" column-label "Espécie"
    field tta_cod_ser_docto                as character format "x(5)" label "Série Documento" column-label "Série"
    field tta_cdn_fornecedor               as Integer format ">>>,>>>,>>9" initial 0 label "Fornecedor" column-label "Fornecedor"
    field tta_cod_tit_ap                   as character format "x(16)" label "Título" column-label "Título"
    field tta_cod_parcela                  as character format "x(02)" label "Parcela" column-label "Parcela"
    field tta_val_abat_tit_ap              as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Abatimento" column-label "Vl Abatimento"
    index tt_integr_apb_abat_prev          is unique
          ttv_cod_id_antecip_pef_pend      ascending
          tta_cod_estab                    ascending
          tta_cod_espec_docto              ascending
          tta_cod_ser_docto                ascending
          tta_cdn_fornecedor               ascending
          tta_cod_tit_ap                   ascending
          tta_cod_parcela                  ascending
    index tt_integr_apb_abat_prev_provis   is primary unique
          ttv_cod_id_integr_apb_item_lote  ascending
          tta_cod_estab                    ascending
          tta_cod_espec_docto              ascending
          tta_cod_ser_docto                ascending
          tta_cdn_fornecedor               ascending
          tta_cod_tit_ap                   ascending
          tta_cod_parcela                  ascending
    


Tabela Temporária

Descrição

Entrada/Saída

tt_api_apb_impto_impl_pend_3

Conterá as informações dos impostos utilizados pelas Antecipações ou PEF.

Entrada


(**) Liberado o número de documento com 16 posições e série com5, apartir de maio/2011.

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

ttv_cod_id_integr_apb_item_lote

character

x(80)




ttv_cod_id_antecip_pef_pend

character

x(80)

Utilizado para o relacionamento com a temp table Antecipação



tta_cod_pais

character

x(3)

Pa¡s



tta_cod_unid_federac

character

x(3)

Unidade Federa‡Æo



tta_cod_imposto

character

x(5)

Imposto



tta_cod_classif_impto

character

x(05)

Class Imposto



tta_ind_clas_impto

character

X(14)

Classe Imposto



tta_cod_plano_cta_ctbl

character

x(8)

Plano Contas



tta_cod_cta_ctbl

character

x(20)

Conta Cont bil



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



tta_val_rendto_tribut

decimal

>,>>>,>>>,>>9.99

Rendto Tribut vel



tta_val_deduc_inss

decimal

>,>>>,>>>,>>9.99

Dedu‡Æo Inss



tta_val_deduc_depend

decimal

>,>>>,>>>,>>9.99

Dedu‡Æo Dependentes



tta_val_deduc_pensao

decimal

>,>>>,>>>,>>9.99

Deducao PensÆo



tta_val_outras_deduc_impto

decimal

>,>>>,>>>,>>9.99

Outras Dedu‡äes



tta_val_base_liq_impto

decimal

>,>>>,>>>,>>9.99

Base L¡quida Imposto



tta_val_aliq_impto

decimal

>9.99

Al¡quota



tta_val_impto_ja_recolhid

decimal

>,>>>,>>>,>>9.99

Imposto J  Recolhido



tta_val_imposto

decimal

>,>>>,>>>,>>9.99

Valor Imposto



tta_dat_vencto_tit_ap

date

99/99/9999

Data Vencimento



tta_cod_indic_econ

character

x(8)

Moeda



tta_val_impto_indic_econ_impto

decimal

->>>,>>>,>>9.99

Val Finalid Impto



tta_des_text_histor

character

x(2000)

Hist¢rico



tta_cdn_fornec_favorec

Integer

>>>,>>>,>>9

Fornec Favorecido



tta_val_deduc_faixa_impto

decimal

>,>>>,>>>,>>9.99

Valor Deducao



tta_num_id_tit_ap

integer

1E+10

Token Tit AP



tta_num_id_movto_tit_ap

integer

1E+10

Token Movto Tit AP



tta_num_id_movto_cta_corren

integer

1E+10

ID Movto Conta



tta_cod_pais_ext

character

x(20)

Pa¡s Externo



tta_cod_cta_ctbl_ext

character

x(20)

Conta Contab Extern



tta_cod_sub_cta_ctbl_ext

character

x(15)

Sub Conta Externa



ttv_cod_tip_fluxo_financ_ext

character

x(12)

Tipo Fluxo Financ



tta_val_base_liq_impto

decimal

>,>>>,>>>,>>9.99

Base L¡quida Imposto



def temp-table tt_api_apb_impto_impl_pend_3 no-undo
    field ttv_cod_id_integr_apb_item_lote  as character format "x(80)"
    field ttv_cod_id_antecip_pef_pend      as character format "x(80)"
    field tta_cod_pais                     as character format "x(3)" label "País" column-label "País"
    field tta_cod_unid_federac             as character format "x(3)" label "Estado" column-label "UF"
    field tta_cod_imposto                  as character format "x(5)" label "Imposto" column-label "Imp"
    field tta_cod_classif_impto            as character format "x(05)" initial "00000" label "Classificação Imposto" column-label "Classif Imposto"
    field tta_ind_clas_impto               as character format "X(14)" initial "Retido" label "Classe Imposto" column-label "Classe Imposto"
    field tta_cod_plano_cta_ctbl           as character format "x(8)" label "Plano Contas" column-label "Plano Contas"
    field tta_cod_cta_ctbl                 as character format "x(20)" label "Conta Contábil" column-label "Conta Contábil"
    field tta_cod_espec_docto              as character format "x(3)" label "Espécie Documento" column-label "Espécie"
    field tta_cod_ser_docto                as character format "x(5)" label "Série Documento" column-label "Série"
    field tta_cod_tit_ap                   as character format "x(16)" label "Título" column-label "Título"
    field tta_cod_parcela                  as character format "x(02)" label "Parcela" column-label "Parcela"
    field tta_val_rendto_tribut            as decimal format ">>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Rendto Tributável" column-label "Vl Rendto Tribut"
    field tta_val_deduc_inss               as decimal format ">,>>>,>>>,>>9.99" decimals 2 initial 0 label "Dedução Inss" column-label "Dedução Inss"
    field tta_val_deduc_depend             as decimal format ">,>>>,>>>,>>9.99" decimals 2 initial 0 label "Dedução Dependentes" column-label "Dedução Dependentes"
    field tta_val_deduc_pensao             as decimal format ">,>>>,>>>,>>9.99" decimals 2 initial 0 label "Dedução Pensão" column-label "Dedução Pensão"
    field tta_val_outras_deduc_impto       as decimal format ">,>>>,>>>,>>9.99" decimals 2 initial 0 label "Desc Simplif/Out Ded" column-label "Desc Simplif/Out Ded"
    field tta_val_base_liq_impto           as decimal format ">,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base Liquidação" column-label "Base Liquidação Impo"
    field tta_val_aliq_impto               as decimal format ">9.9999" decimals 4 initial 0.00 label "Alíquota" column-label "Aliq"
    field tta_val_impto_ja_recolhid        as decimal format ">,>>>,>>>,>>9.99" decimals 2 initial 0 label "Imposto Já Recolhido" column-label "Imposto Já Recolhido"
    field tta_val_imposto                  as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Imposto" column-label "Vl Imposto"
    field tta_dat_vencto_tit_ap            as date format "99/99/9999" initial today label "Data Vencimento" column-label "Dt Vencto"
    field tta_cod_indic_econ               as character format "x(8)" label "Moeda" column-label "Moeda"
    field tta_val_impto_indic_econ_impto   as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Val Finalid Impto" column-label "Val Finalid Impto"
    field tta_des_text_histor              as character format "x(2000)" label "Histórico" column-label "Histórico"
    field tta_cdn_fornec_favorec           as Integer format ">>>,>>>,>>9" initial 0 label "Fornec Favorecido" column-label "Fornec Favorecido"
    field tta_val_deduc_faixa_impto        as decimal format ">,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Deducao" column-label "Valor Dedução"
    field tta_num_id_tit_ap                as integer format "999999999" initial 0 label "Token Tít AP" column-label "Token Tít AP"
    field tta_num_id_movto_tit_ap          as integer format "9999999999" initial 0 label "Token Movto Tít AP" column-label "Id Tít AP"
    field tta_num_id_movto_cta_corren      as integer format "999999999" initial 0 label "ID Movto Conta" column-label "ID Movto Conta"
    field tta_cod_pais_ext                 as character format "x(20)" label "País Externo" column-label "País Externo"
    field tta_cod_cta_ctbl_ext             as character format "x(20)" label "Conta Contab Extern" column-label "Conta Contab Extern"
    field tta_cod_sub_cta_ctbl_ext         as character format "x(15)" label "Sub Conta Externa" column-label "Sub Conta Externa"
    field ttv_cod_tip_fluxo_financ_ext     as character format "x(12)" label "Tipo Fluxo Financ" column-label "Tipo Fluxo Financ"
    index tt_impto_impl_pend_ap_integr     is primary unique
          ttv_cod_id_integr_apb_item_lote  ascending
          tta_cod_pais                     ascending
          tta_cod_unid_federac             ascending
          tta_cod_imposto                  ascending
          tta_cod_classif_impto            ascending
    index tt_impto_impl_pend_ap_integr_ant is unique
          ttv_cod_id_antecip_pef_pend      ascending
          tta_cod_pais                     ascending
          tta_cod_unid_federac             ascending
          tta_cod_imposto                  ascending
          tta_cod_classif_impto            ascending
    .



Tabela Temporária

Descrição

Entrada/Saída

tt_api_apb_aprop_ctbl_pend_3

Conterá as informações das Apropriações Contábeis utilizadas pelas Antecipações ou PEF.

Entrada


(*) Liberado o centro de custo com 20 posições, a partir de maio/2011.

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

ttv_cod_id_integr_apb_item_lote

character

x(80)




 ttv_cod_id_antecip_pef_pend

character

x(80)




ttv_cod_id_integr_apb_impto_pend

character

x(80)




tta_cod_plano_cta_ctbl

character

x(8)

Plano Contas



tta_cod_cta_ctbl

character

x(20)

Conta Cont bil



tta_cod_unid_negoc

character

x(3)

Unid Neg¢cio



tta_cod_plano_ccusto

character

x(8)

Plano Centros Custo



tta_cod_ccusto

Character

x(11)/x(20)*

Centro Custo



tta_cod_tip_fluxo_financ

character

x(12)

Tipo Fluxo Financ



tta_val_aprop_ctbl

decimal

->>>,>>>,>>9.99

Valor Aprop Ctbl



tta_cod_pais

character

x(3)

Pa¡s



tta_cod_unid_federac

character

x(3)

Unidade Federa‡Æo



tta_cod_imposto

character

x(5)

Imposto



tta_cod_classif_impto

character

x(05)

Class Imposto



ttv_cod_tip_fluxo_financ_ext

character

x(12)

Tipo Fluxo Financ



tta_cod_cta_ctbl_ext

character

x(20)

Conta Contab Extern



tta_cod_sub_cta_ctbl_ext

character

x(15)

Sub Conta Externa



tta_cod_ccusto_ext

character

x(8)/x(20)*

Centro Custo Externo



tta_cod_unid_negoc_ext

character

x(8)

Unid Neg¢cio Externa




def temp-table tt_api_apb_aprop_ctbl_pend_3 no-undo
    field ttv_cod_id_integr_apb_item_lote  as character format "x(80)"
    field ttv_cod_id_antecip_pef_pend      as character format "x(80)"
    field ttv_cod_id_integr_apb_impto_pend as character format "x(80)"
    field tta_cod_plano_cta_ctbl           as character format "x(8)" label "Plano Contas" column-label "Plano Contas"
    field tta_cod_cta_ctbl                 as character format "x(20)" label "Conta Contábil" column-label "Conta Contábil"
    field tta_cod_unid_negoc               as character format "x(3)" label "Unid Negócio" column-label "Un Neg"
    field tta_cod_plano_ccusto             as character format "x(8)" label "Plano Centros Custo" column-label "Plano Centros Custo"
    field tta_cod_ccusto                   as Character format "x(20)" label "Centro Custo" column-label "Centro Custo"
    field tta_cod_tip_fluxo_financ         as character format "x(12)" label "Tipo Fluxo Financ" column-label "Tipo Fluxo Financ"
    field tta_val_aprop_ctbl               as decimal format "->>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Aprop Ctbl" column-label "Vl Aprop Ctbl"
    field tta_cod_pais                     as character format "x(3)" label "País" column-label "País"
    field tta_cod_unid_federac             as character format "x(3)" label "Estado" column-label "UF"
    field tta_cod_imposto                  as character format "x(5)" label "Imposto" column-label "Imp"
    field tta_cod_classif_impto            as character format "x(05)" initial "00000" label "Classificação Imposto" column-label "Classif Imposto"
    field ttv_cod_tip_fluxo_financ_ext     as character format "x(12)" label "Tipo Fluxo Financ" column-label "Tipo Fluxo Financ"
    field tta_cod_cta_ctbl_ext             as character format "x(20)" label "Conta Contab Extern" column-label "Conta Contab Extern"
    field tta_cod_sub_cta_ctbl_ext         as character format "x(15)" label "Sub Conta Externa" column-label "Sub Conta Externa"
    field tta_cod_ccusto_ext               as character format "x(8)" label "Centro Custo Externo" column-label "CCusto Externo"
    field tta_cod_unid_negoc_ext           as character format "x(8)" label "Unid Negócio Externa" column-label "Unid Negócio Externa"
    index tt_aprop_ctbl_pend_ap_integr_ant
          ttv_cod_id_antecip_pef_pend      ascending
          ttv_cod_id_integr_apb_impto_pend ascending
          tta_cod_plano_cta_ctbl           ascending
          tta_cod_cta_ctbl                 ascending
          tta_cod_unid_negoc               ascending
          tta_cod_plano_ccusto             ascending
          tta_cod_ccusto                   ascending
          tta_cod_tip_fluxo_financ         ascending
    index tt_aprop_ctbl_pend_ap_integr_id 
          ttv_cod_id_integr_apb_item_lote  ascending
          ttv_cod_id_integr_apb_impto_pend ascending
          tta_cod_plano_cta_ctbl           ascending
          tta_cod_cta_ctbl                 ascending
          tta_cod_unid_negoc               ascending
          tta_cod_plano_ccusto             ascending
          tta_cod_ccusto                   ascending
          tta_cod_tip_fluxo_financ         ascending
    .


Tabela Temporária

Descrição

Entrada/Saída

tt_log_erros_atualiz

Conterá as informações referentes aos erros encontrados durante as validações para a criação dos títulos.

Entrada


(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

tta_cod_estab

character

x(3) / x(5)*

Estabelecimento



tta_cod_refer

character

x(10)

Referˆncia



tta_num_seq_refer

integer

>>>9

Sequˆncia



ttv_num_mensagem

integer

>>>>,>>9

N£mero



ttv_des_msg_erro

character

x(60)

Mensagem Erro



ttv_des_msg_ajuda

character

x(40)

Mensagem Ajuda



ttv_ind_tip_relacto

character

X(15)

Tipo Relacionamento



ttv_num_relacto

integer

>>>>,>>9

Relacionamento




def shared temp-table tt_log_erros_atualiz no-undo

    field tta_cod_estab                    as character format "x(5)" label "Estabelecimento" column-label "Estab"

    field tta_cod_refer                    as character format "x(10)" label "Referˆncia" column-label "Referˆncia"

    field tta_num_seq_refer                as integer format ">>>9" initial 0 label "Sequˆncia" column-label "Seq"

    field ttv_num_mensagem                 as integer format ">>>>,>>9" label "N£mero" column-label "N£mero Mensagem"

    field ttv_des_msg_erro                 as character format "x(60)" label "Mensagem Erro" column-label "Inconsistˆncia"

    field ttv_des_msg_ajuda                as character format "x(40)" label "Mensagem Ajuda" column-label "Mensagem Ajuda"

    field ttv_ind_tip_relacto              as character format "X(15)" label "Tipo Relacionamento" column-label "Tipo Relac"

    field ttv_num_relacto                  as integer format ">>>>,>>9" label "Relacionamento" column-label "Relacionamento"

    .


Tabela Temporária

Descrição

Entrada/Saída

tt_api_1099_3

Conterá os dados referentes aos impostos do tipo 1099, utilizado somente pelos clientes Datasul dos EUA.

Entrada

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

ttv_cod_id_table_parent          

character

x(80)




ttv_val_1099                    

decimal

->>,>>>,>>>,>>9.99

Valor



tta_cod_tax_ident_number        

character

x(15)

Tax Id Number



tta_ind_tip_trans_1099

character

x(50)

Tipo Transacao 1099



def temp-table tt_api_1099_3 no-undo
    field ttv_cod_id_table_parent          as character format "x(80)"
    field ttv_val_1099                     as decimal format "->>,>>>,>>>,>>9.99" decimals 2
    field tta_cod_tax_ident_number         as character format "x(15)" label "Tax Id Number" column-label "Tax Id Number"
    field tta_ind_tip_trans_1099           as character format "X(50)" initial "Rendas" label "Tipo Transacao 1099" column-label "Tipo Transacao 1099"
    index tt_rec_index                     is primary unique
          ttv_cod_id_table_parent          ascending
    .


Tabela Temporária

Descrição

Entrada/Saída

tt_ord_compra_tit_ap_pend_1

O dado para importação de Ordem Compra serão gravados nesta tabela

Entrada


(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

tta_cod_estab

character

x(3) / x(5)*

Estabelecimento



tta_cod_refer

character

x(10)

Referência



tta_num_seq_refer

integer

>>>9

Sequência



tta_cod_ord_compra

character

x(8)

Ordem Compra



tta_val_perc_ord_compra

decimal

>>9.99

Perc Ordem Compra



tta_val_origin_ord_compra

decimal

->>,>>>,>>>,>>9.99

Original Ordem Compr



tta_val_sdo_ord_compra

decimal

->>,>>>,>>>,>>9.99

Saldo Ordem Compra




def temp-table tt_ord_compra_tit_ap_pend_1 no-undo

    field tta_cod_estab              as character format "x(5)" label "Estabelecimento" column-label "Estab"

    field tta_cod_refer                as character format "x(10)" label " Referência " column-label "Referência"

    field tta_num_seq_refer        as integer format ">>>9" initial 0 label "Sequência" column-label "Seq"

    field tta_cod_ord_compra     as character format "x(8)" label "Ordem Compra" column-label "Ordem Compra"

    field tta_val_perc_ord_compra          as decimal format ">>9.99" decimals 2 initial 0 label "Perc Ordem Compra" column-label "Perc Ordem Compra"

    field tta_val_origin_ord_compra        as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Original Ordem Compr" column-label "Original Ordem Compr"

    field tta_val_sdo_ord_compra          as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Saldo Ordem Compra" column-label "Saldo Ordem Compra"

    index tt_codigo     is primary unique

 tta_cod_estab               ascending

 tta_cod_refer                ascending

 tta_num_seq_refer       ascending

             tta_cod_ord_compra   ascending

    .


Tabela Temporária

Descrição

Entrada/Saída

tt_params_generic_api_3

Conterá campos novos das temp-tables passadas como parâmetro.

Entrada / Saída

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

ttv_cod_id_param

character

X(80)




ttv_cod_tabela

character

X(28)

Tabela



ttv_cod_campo

character

X(25)

Campo



ttv_cod_valor

character

X(8)

Valor



def temp-table tt_params_generic_api_3 no-undo
    field ttv_cod_id_param                 as character format "x(80)"
    field ttv_cod_tabela                   as character format "x(28)" label "Tabela" column-label "Tabela"
    field ttv_cod_campo                    as character format "x(35)" label "Campo" column-label "Campo"
    field ttv_cod_valor                    as character format "x(8)" label "Valor" column-label "Valor"
    index tt_idx_param_generic             is primary unique
          ttv_cod_tabela                   ascending
          ttv_cod_id_param                 ascending
          ttv_cod_campo                    ascending
    .

Exemplo Criação temp-table tt_params_generic_api_3:

create tt_params_generic_api_3.

assign tt_params_generic_api_3.ttv_cod_id_param     = (Campo identificador da temp-table) tt_api_apb_antecip_pef_p1_3.ttv_cod_id_antecip_pef_pend

       tt_params_generic_api_3.ttv_cod_campo  = 'Safra':U

       tt_params_generic_api_3.ttv_cod_tabela = 'tt_integr_apb_antecip_pef':U

       tt_params_generic_api_3.ttv_cod_valor  = (Valor Da Safra).


create tt_params_generic_api_3.

assign tt_params_generic_api_3.ttv_cod_id_param         = (Campo identificador da temp-table) tt_api_apb_antecip_pef_p1_3.ttv_cod_id_antecip_pef_pend

            tt_params_generic_api_3.ttv_cod_campo = 'cod_contrato':U

            tt_params_generic_api_3.ttv_cod_tabela   = 'tt_integr_apb_antecip_pef':U

            tt_params_generic_api_3.ttv_cod_valor     = (Valor Do Contrato).


create tt_params_generic_api_3.

assign tt_params_generic_api_3.ttv_cod_id_param     = (Campo identificador da temp-table)  tt_api_apb_antecip_pef_p1_3.ttv_cod_id_antecip_pef_pend       tt_params_generic_api_3.ttv_cod_campo  = ' Zera Saldo Prev/Prov':U

       tt_params_generic_api_3.ttv_cod_tabela = ' tt_integr_apb_abat_prev_provis':U

       tt_params_generic_api_3.ttv_cod_valor  = (Valor Do Zera Saldo).


Tabela Temporária

Descrição

Entrada/Saída

tt_natur_rendto_impto_pend

Conterá campos novos das temp-tables passadas como parâmetro.

Entrada 

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

tta_cod_estabcharacterx(5)Estabelecimento



tta_num_id_tit_apinteger999999999Token Tít AP



tta_num_id_movto_tit_apinteger9999999999Token Movto Tit AP

tta_cod_refercharacterx(10)Referência

tta_num_seq_referinteger>>>9Sequencia

tta_cod_paischaracterx(3)País

tta_cod_unid_federaccharacterx(3)Estado

tta_cod_impostocharacterx(5)Imposto

tta_cod_classifcharacterX(8)Classificação

tta_num_seq_natur_rendtointeger>>>>,>>9Sequencia da Natureza de rendimento

tta_cod_natur_rendtocharacterx(9)Natureza Rendimento

ttv_val_impto_rendto_brutdecimal->>,>>>,>>>,>>9.99Rendimento Bruto

ttv_val_impto_base_irfdecimal->>,>>>,>>>,>>9.99Base IR

ttv_val_impto_rendto_suspendecimal->>,>>>,>>>,>>9.99Rendimento Suspenso

ttv_val_impto_irfdecimal->>,>>>,>>>,>>9.99Imposto IR

ttv_val_impto_nao_retid_irfdecimal->>,>>>,>>>,>>9.99Valor não Retido IR

ttv_val_impto_depos_judic_irfdecimal->>,>>>,>>>,>>9.99Depósito Judiciário IR

ttv_val_impto_base_cslldecimal->>,>>>,>>>,>>9.99Base CSLL

ttv_val_impto_cslldecimal->>,>>>,>>>,>>9.99Imposto CSLL

ttv_val_impto_nao_retid_cslldecimal->>,>>>,>>>,>>9.99Valor não Retido CSLL

ttv_val_impto_depos_cslldecimal->>,>>>,>>>,>>9.99Depósito Judiciário CSLL

ttv_val_impto_base_cofinsdecimal->>,>>>,>>>,>>9.99Base COFINS

ttv_val_impto_cofinsdecimal->>,>>>,>>>,>>9.99Imposto COFINS

ttv_val_impto_cofinsdecimal->>,>>>,>>>,>>9.99Valor não Retido COFINS

ttv_val_impto_depos_cofinsdecimal->>,>>>,>>>,>>9.99Depósito Judiciário COFINS

ttv_val_impto_base_pisdecimal->>,>>>,>>>,>>9.99Base PIS

ttv_val_impto_pisdecimal->>,>>>,>>>,>>9.99Imposto PIS

ttv_val_impto_nao_retid_pisdecimal->>,>>>,>>>,>>9.99Valor não Retido PIS

ttv_val_impto_depos_pisdecimal->>,>>>,>>>,>>9.99Depósito Judiciário PIS

ttv_cod_process_judiccharacterx(21)Nr. Processo

ttv_cod_suspenscharacterx(14)Código da Suspensão



tta_val_brutdecimal->>,>>>,>>>,>>9.99Valor Bruto



tta_cod_livre_1characterx(100)Livre

tta_cod_livre_2characterx(100)Livre

tta_log_livre_1logicalSim/NãoLivre

tta_log_livre_2logicalSim/NãoLivre

tta_dat_livre_1date99/99/9999Livre

tta_dat_livre_2date99/99/9999Livre

tta_val_livre_1decimal->>,>>>,>>>,>>9.9999999999Livre

tta_val_livre_2decimal->>,>>>,>>>,>>9.9999999999Livre

ttv_val_base_nao_retid_cofinsdecimal->>,>>>,>>>,>>9.99Base não Retido COFINS

ttv_val_base_nao_retid_cslldecimal->>,>>>,>>>,>>9.99Base não Retido CSLL

ttv_val_base_nao_retid_irfdecimal->>,>>>,>>>,>>9.99Base não Retido IRF

ttv_val_base_nao_retid_pisdecimal->>,>>>,>>>,>>9.99Base não Retido PIS

ttv_log_deletelogicalSim/NãoIndicador de registro excluído

tta_val_perc_natur_rendtodecimal>>9.999999Percentual Natureza de Rendimento

tta_val_impto_base_agregdecimal->>,>>>,>>>,>>9.99Base Imposto Agregado

tta_val_impto_agregdecimal->>,>>>,>>>,>>9.99Imposto Agregado

tta_dat_referdate99/99/9999Data de Referência


def temp-table tt_natur_rendto_impto_pend no-undo
    field tta_cod_estab                    as character format "x(5)" label "Estabelecimento" column-label "Estab"
    field tta_num_id_tit_ap                as integer format "999999999" initial 0 label "Token T¡t AP" column-label "Token T¡t AP"
    field tta_num_id_movto_tit_ap          as integer format "9999999999" initial 0 label "Token Movto T¡t AP" column-label "Id T¡t AP"
    field tta_cod_refer                    as character format "x(10)" label "Referˆncia" column-label "Referˆncia"
    field tta_num_seq_refer                as integer format ">>>9" initial 0 label "Sequˆncia" column-label "Seq"
    field tta_cod_pais                     as character format "x(3)" label "Pa¡s" column-label "Pa¡s"
    field tta_cod_unid_federac             as character format "x(3)" label "Estado" column-label "UF"
    field tta_cod_imposto                  as character format "x(5)" label "Imposto" column-label "Imp"
    field tta_cod_classif                  as character format "x(8)" label "Classificacao" column-label "Classificacao"
    field tta_num_seq_natur_rendto         as integer format ">>>>,>>9" initial 0 label "Sequencia Natureza R" column-label "Sequencia Natureza R"
    field tta_cod_natur_rendto             as character format "x(9)" label "Natureza Rendimento" column-label "Natureza Rendimento"
    field ttv_val_impto_rendto_brut        as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Rendimento Bruto" column-label "Rendimento Bruto"
    field ttv_val_impto_base_irf           as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base IR" column-label "Base IR"
    field ttv_val_impto_rendto_suspen      as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Rendimento Suspenso" column-label "Rendimento Suspenso"
    field ttv_val_impto_irf                as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Imposto IR" column-label "Imposto IR"
    field ttv_val_impto_nao_retid_irf      as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl N Retid IR" column-label "Vl N Retid IR"
    field ttv_val_impto_depos_judic_irf    as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Deposito Judic IR" column-label "Deposito Judic IR"
    field ttv_val_impto_base_csll          as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base CSLL" column-label "Base CSLL"
    field ttv_val_impto_csll               as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Imposto CSLL" column-label "Imposto CSLL"
    field ttv_val_impto_nao_retid_csll     as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl N Retid CSLL" column-label "Vl N Retid CSLL"
    field ttv_val_impto_depos_csll         as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Depos Judic CSLL" column-label "Depos Judic CSLL"
    field ttv_val_impto_base_cofins        as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base Cofins" column-label "Base Cofins"
    field ttv_val_impto_cofins             as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Imposto Cofins" column-label "Imposto Cofins"
    field ttv_val_impto_nao_retid_cofins   as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl N Retid Cofins" column-label "Vl N Retid Cofins"
    field ttv_val_impto_depos_cofins       as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Depos Judic Cofins" column-label "Depos Judic Cofins"
    field ttv_val_impto_base_pis           as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base PIS" column-label "Base PIS"
    field ttv_val_impto_pis                as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Imposto PIS" column-label "Imposto PIS"
    field ttv_val_impto_nao_retid_pis      as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl N Retid PIS" column-label "Vl N Retid PIS"
    field ttv_val_impto_depos_pis          as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Depos Judic PIS" column-label "Depos Judic PIS"
    field ttv_cod_process_judic            as character format "x(21)" label "Nr. Processo" column-label "Nr. Processo"
    field ttv_cod_suspens                  as character format "x(14)" label "SuspensÆo" column-label "SuspensÆo"
    field tta_val_brut                     as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Bruto" column-label "Valor Bruto"
    field tta_cod_livre_1                  as character format "x(100)" label "Livre 1" column-label "Livre 1"
    field tta_cod_livre_2                  as character format "x(100)" label "Livre 2" column-label "Livre 2"
    field tta_log_livre_1                  as logical format "Sim/NÆo" initial no label "Livre 1" column-label "Livre 1"
    field tta_log_livre_2                  as logical format "Sim/NÆo" initial no label "Livre 2" column-label "Livre 2"
    field tta_dat_livre_1                  as date format "99/99/9999" initial ? label "Livre 1" column-label "Livre 1"
    field tta_dat_livre_2                  as date format "99/99/9999" initial ? label "Livre 2" column-label "Livre 2"
    field tta_val_livre_1                  as decimal format "->>,>>>,>>>,>>9.9999999999" decimals 10 initial 0 label "Livre 1" column-label "Livre 1"
    field tta_val_livre_2                  as decimal format "->>,>>>,>>>,>>9.9999999999" decimals 10 initial 0 label "Livre 2" column-label "Livre 2"
    field ttv_val_base_nao_retid_cofins    as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base N Retid Cofins" column-label "Base N Retid Cofins"
    field ttv_val_base_nao_retid_csll      as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base N Retid CSLL" column-label "Base N Retid CSLL"
    field ttv_val_base_nao_retid_irf       as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base Nao Retido IR" column-label "Base Nao Retido IR"
    field ttv_val_base_nao_retid_pis       as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Base Nao Retido PIS" column-label "Base Nao Retido PIS"
    field ttv_log_delete                   as logical format "Sim/NÆo" initial no
    field tta_val_perc_natur_rendto        as decimal format ">>9.999999" decimals 6 initial 0 label "Perc Natur Rendto" column-label "Perc Natur Rendto"
    field tta_val_impto_base_agreg         as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Impto Base Agregado" column-label "Impto Base Agregado"
    field tta_val_impto_agreg              as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Imposto Agregado" column-label "Imposto Agregado"
    field tta_dat_refer                    as date format "99/99/9999" initial ? label "Data Referˆncia" column-label "Data Referˆncia"
    index tt_idx_id                        is primary unique
          tta_cod_estab                    ascending
          tta_cod_refer                    ascending
          tta_num_seq_refer                ascending
          tta_cod_pais                     ascending
          tta_cod_unid_federac             ascending
          tta_cod_imposto                  ascending
          tta_cod_classif                  ascending
          tta_num_seq_natur_rendto         ascending
          tta_num_id_tit_ap                ascending
          tta_num_id_movto_tit_ap          ascending.

Tratativa para permitir criar a pendência APF na execução da API

A rotina API de Antecipações/Pagamentos Extra-fornecedor Pendentes foi alterada para permitir criar a pendência APF quando o módulo APF ativo e estiver parametrizado com a opção "Geral' juntamente com a tabela de parâmetros tt_params_generic_api utilizando os campos 'Pendencia_APF' e valor 'SIM'. A pendência será criada conforme as demais regras de negócio do produto.

Deverá utilizar um novo parâmetro na tabela tt_params_generic_api para gerar a pendência para cada antecipação.

CREATE tt_params_generic_api_3.
ASSIGN tt_params_generic_api_3.ttv_cod_id_param = tt_api_apb_antecip_pef_p1_3.ttv_cod_id_antecip_pef_pend /* (Campo identificador da temp-table) */
              tt_params_generic_api_3.ttv_cod_campo = 'Pendencia_APF':U
              tt_params_generic_api_3.ttv_cod_tabela  = 'tt_integr_apb_antecip_pef_p1':U
              tt_params_generic_api_3.ttv_cod_valor    = 'SIM':U. /* Valor para criar a pendência */

Observação: O novo parâmetro será utilizado somente para o documento do tipo Antecipação, o módulo APF ativo e estiver parametrizada a Aprovação do Documento igual a "Geral".

A regra do negócio do produto com o parâmetro "Aprovação do Documento" igual a "Por Espécie" não foi alterado.


PIX Datasul

O PIX é um novo modo de Pagamento disponibilizado pelo Banco Central que poderá ser utilizado no pagamento de títulos através de Transferências bancária ou liquidação de Boletos. 

Para o pagamentos de Boletos poderão ser utilizado o QR-Code, dessa forma serão disponibilizados dois campos para guardar os dados do QR-Code e o TXID.

Esses campos serão necessários em pagamentos cuja a forma de pagamento forem:

  • PIX Qr-code mesmo banco
  • PIX QrCode outro banco

QR CODE: Chave/URL endereçamento capturada a partir da leitura do QR CODE. 

TXID:  Código de identificação da transação é opcional e poderá ser informada no pagamento escritural conforme o leitaute CNAB 240 de cada banco. 

create tt_params_generic_api_3.
assign tt_params_generic_api_3.ttv_cod_tabela = "tt_integr_apb_antecip_pef"
            tt_params_generic_api_3.ttv_cod_id_param = tt_api_apb_antecip_pef_p1_3.ttv_cod_id_antecip_pef_pend
            tt_params_generic_api_3.ttv_cod_campo = "cod_txid"
            tt_params_generic_api_3.ttv_cod_valor = "12544". (Exemplo código TXID)

create tt_params_generic_api_3.
assign tt_params_generic_api_3.ttv_cod_tabela = "tt_integr_apb_antecip_pef"
            tt_params_generic_api_3.ttv_cod_id_param = tt_api_apb_antecip_pef_p1_3.ttv_cod_id_antecip_pef_pend
            tt_params_generic_api_3.ttv_cod_campo = "dsl_qrcode"
            tt_params_generic_api_3.ttv_cod_valor = "00020126580014br.gov.bcb.pix0136123e4567-e12b-12d1-a456-426655440000 5204000053039865802BR5913Fulano de Tal6008BRASILIA62070503***63041D3D " . (Exemplo código QR-CODE)


Tabela Temporária

Descrição

Entrada/Saída

tt_docum_est_esoc_api

Conterá as informações do documento do ESocial.

Entrada


Opções válidas para o campo “tta_cod_layout”: 1310, 1330, 1350 e 1370.

Os campos abaixo devem ser informados para todos os layouts:

- ttv_num_origem (2 = Título)

- tta_cod_empresa

- ttv_cod_estab

- tta_dat_transacao

- tta_cod_tit_ap

- ttv_cod_emitente

- tta_cod_ser_docto

- tta_cod_espec_docto

- tta_cod_parcela

- tta_val_brut

- ttv_val_base_retenc


Quando o Layout for 1310 devem ser informados os valores para os campos abaixo:

- tta_ind_tip_obra

- tta_cdd_num_cno

- tta_val_apurad

- tta_val_ret_subempr

- tta_val_retid

- tta_val_adic

- tta_val_serv_15

- tta_val_serv_20

- tta_val_serv_25

- tta_cod_num_proces_judic

- tta_val_nao_retid

- tta_ind_tip_inscr_cno

- tta_cod_num_inscr_cno


Quando o Layout for 1330 devem ser informados os valores para os campos abaixo:

- tta_ind_tip_obra

- tta_cdd_num_cno

- tta_val_mater_eqpto

- tta_val_serv

- tta_val_deduc

- tta_val_base_cooperat

- tta_val_serv_15

- tta_val_serv_20

- tta_val_serv_25

- tta_val_base_cooperat_15

- tta_val_base_cooperat_20

- tta_val_base_cooperat_25

- tta_ind_tip_inscr_cno

- tta_cod_num_inscr_cno

- tta_ind_tip_inciden


Quando o Layout for 1350 devem ser informados os valores para os campos abaixo:

- tta_num_contrat_gfe

- tta_num_roman

- tta_num_seq

- tta_ind_tip_aquis

- tta_val_contrib_prev

- tta_val_contrib_financ

- tta_val_contrib_senar

- tta_cod_num_proces_judic


Quando o Layout for 1370 devem ser informados os valores para os campos abaixo:

- tta_ind_tip_repas

- tta_dat_repas

- tta_val_repas


Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

tta_cdd_num_docto_esoc

Decimal

>>>,>>>,>>>,>>>,>>9

Documento eSocial



ttv_num_origem

Integer

>9

Origem Documento



tta_cod_layout

Character

x(8)

Layout eSocial



tta_cod_id_xml

Character

x(30)

Id Arquivo



tta_cod_empresa

Integer

>>> 

Código Empresa



ttv_cod_estab

Character

x(5)

Código Estabelecimento



tta_dat_transacao

Date

99/99/9999

Data Transação



tta_cod_tit_ap

Character

x(16)

Código Título



ttv_cod_emitente

Character

x(12)

Fornecedor



tta_cod_ser_docto

Character

x(5)

Série documento



tta_cod_docto

Character

x(16)

Nro Docto



tta_cod_espec_docto

Character

!!

Espécie Documento



tta_cod_natur_operac

Character

x(6)

Natureza de Operação



tta_cod_parcela

Character

x(2)

Parcela



tta_num_contrat_gfe

Integer

>>>>>>>>9

Nr Contrato



tta_num_roman

Integer

>,>>>,>>9

Nr Romaneio



tta_num_seq

Integer

>>>>9

Nr Sequência



tta_ind_tip_obra

Integer

9

Indicativo Obra



tta_val_brut

Decimal

>>>,>>>,>>>,>>9.99

Valor Bruto



ttv_val_base_retenc

Decimal

>>>,>>>,>>>,>>9.99

Valor Base Retenção



tta_val_apurad

Decimal

>>>,>>>,>>>,>>9.99

Valor Apurado



tta_val_ret_subempr

Decimal

>>>,>>>,>>>,>>9.99

Valor Retenção Subempreitada



tta_val_retid

Decimal

>>>,>>>,>>>,>>9.99

Valor Retenção



tta_val_adic

Decimal

>>>,>>>,>>>,>>9.99

Valor Adicional



tta_val_tot_retid

Decimal

>>>,>>>,>>>,>>9.99

Valor Total Retido



tta_cdd_num_cno

Decimal

>>>>>>>>>>>9

Nr Cadastro Nac Obras



tta_ind_tip_inscr_cno

Integer

9

Tipo Proprietário



tta_cod_num_inscr_cno

Character

X(19)

Proprietário CNO



tta_val_serv_15

Decimal

>>>,>>>,>>>,>>9.99

Vlr Serviço 15



tta_val_serv_20

Decimal

>>>,>>>,>>>,>>9.99

Vlr Serviço 20



tta_val_serv_25

Decimal

>>>,>>>,>>>,>>9.99

Vlr Serviço 25



tta_cod_num_proces_judic

Character

x(20)

Nr Processo Judicial



tta_val_nao_retid

Decimal

>>>,>>>,>>>,>>9.99

Valor não Retido



tta_val_mater_eqpto

Decimal

>>>,>>>,>>>,>>9.99

Valor Materiais e Equipamentos



tta_val_serv

Decimal

>>>,>>>,>>>,>>9.99

Valor dos Servi‡os



tta_val_deduc

Decimal

>>>,>>>,>>>,>>9.99

Valor Dedução



tta_val_base_cooperat

Decimal

>>>,>>>,>>>,>>9.99

Valor Base Cooperativa



tta_val_base_calc

Decimal

>>>,>>>,>>>,>>9.99

Valor Base Cálculo



tta_val_base_cooperat_15

Decimal

>>>,>>>,>>>,>>9.99

Valor Base Cooperativa 15



tta_val_base_cooperat_20

Decimal

>>>,>>>,>>>,>>9.99

Valor Base Cooperativa 20



tta_val_base_cooperat_25

Decimal

>>>,>>>,>>>,>>9.99

Valor Base Cooperativa 25



tta_ind_tip_inciden

Integer

9

Tipo Incidência



tta_ind_tip_aquis

Integer

9

Tipo Aquisição



tta_val_contrib_prev

Decimal

>>>,>>>,>>>,>>9.99

Contribuição Prev



tta_val_contrib_financ

Decimal

>>>,>>>,>>>,>>9.99

Contribuição Financ



tta_val_contrib_senar

Decimal

>>>,>>>,>>>,>>9.99

Contribuicao Serviço Nac



tta_ind_tip_repas

Integer

9

Tipo Repasse



tta_dat_repas

Date

99/99/9999

Data Repasse



tta_val_repas

Decimal

>>>,>>>,>>>,>>9.99

Valor Repasse




def temp-table tt_docum_est_esoc_api no-undo

    field tta_cdd_num_docto_esoc           as Decimal format ">>>,>>>,>>>,>>>,>>9" decimals 0 initial 0 label "Documento eSocial" column-label "Docto eSoc"

    field ttv_num_origem                   as integer format "9" label "Origem" column-label "Origem"

    field tta_cod_layout                   as character format "x(8)" label "Layout" column-label "Layout"

    field tta_cod_id_xml                   as character format "x(30)" label "C¢digo ID" column-label "ID XML"

    field tta_cod_empresa                  as character format "x(3)" label "Empresa" column-label "Empresa"

    field ttv_cod_estab                    as character format "x(3)" label "Estabelecimento" column-label "Estabelecimento"

    field tta_dat_transacao                as date format "99/99/9999" initial today label "Data Transa‡Æo" column-label "Dat Transac"

    field tta_cod_tit_ap                   as character format "x(10)" label "T¡tulo" column-label "T¡tulo"

    field ttv_cod_emitente                 as character format "x(8)" label "Cliente"

    field tta_cod_ser_docto                as character format "x(3)" label "S‚rie Documento" column-label "S‚rie"

    field tta_cod_docto                    as character format "x(19)" label "Nro. Documento" column-label "Nro. Documento"

    field tta_cod_espec_docto              as character format "x(3)" label "Esp‚cie Documento" column-label "Esp‚cie"

    field tta_cod_natur_operac             as character format "x(6)" label "Natureza Opera‡Æo" column-label "Natureza Opera‡Æo"

    field tta_cod_parcela                  as character format "x(02)" label "Parcela" column-label "Parc"

    field tta_num_contrat_gfe              as integer format ">>>>>>>>9" initial 0 label "Nr Contrato" column-label "Nr Contrato"

    field tta_num_roman                    as integer format ">,>>>,>>9" initial 0 label "Romaneio" column-label "Romaneio"

    field tta_num_seq                      as integer format ">>>,>>9" initial 0 label "Sequˆncia" column-label "NumSeq"

    field tta_ind_tip_obra                 as character format "X(65)" initial "Obra de Constru‡Æo Civil - Empreitada Total" label "Indicativo Obra" column-label "Indic Obra"

    field tta_val_brut                     as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Bruto" column-label "Bruto"

    field ttv_val_base_retenc              as decimal format "->>,>>>,>>>,>>9.99" decimals 2

    field tta_val_apurad                   as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Apurado" column-label "Vl Apurado"

    field tta_val_ret_subempr              as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Ret Subempreitada" column-label "Vl Rt Subemp"

    field tta_val_retid                    as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Reten‡Æo" column-label "Vl Reten‡Æo"

    field tta_val_adic                     as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Adicional" column-label "Vl Adicional"

    field tta_val_tot_retid                as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Total Retido" column-label "Vl Tot Retid"

    field tta_cdd_num_cno                  as Decimal format ">>>>>>>>>>>9" decimals 0 initial 0 label "Nr Cadastro Nac Obra" column-label "Nr Cad Nac Obr"

    field tta_ind_tip_inscr_cno            as character format "X(10)" initial "CNPJ" label "Tipo Propriet rio" column-label "Tp Propr"

    field tta_cod_num_inscr_cno            as character format "x(19)" label "Propriet rio CNO" column-label "Prop CNO"

    field tta_val_serv_15                  as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Servi‡o 15" column-label "Vl Serv 15"

    field tta_val_serv_20                  as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Servi‡o 20" column-label "Vl Serv 20"

    field tta_val_serv_25                  as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Servi‡o 25" column-label "Vl Serv 25"

    field tta_cod_num_proces_judic         as character format "x(20)" label "Nr Processo Judicial" column-label "Nr Proc Jud"

    field tta_val_nao_retid                as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor NÆo Retido" column-label "Vl NÆo Retid"

    field tta_val_mater_eqpto              as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Mat e Equipto" column-label "Vl Mat Eqpto"

    field tta_val_serv                     as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Servi‡o" column-label "Vl Servi‡o"

    field tta_val_deduc                    as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Dedu‡Æo" column-label "Vl Dedu‡Æo"

    field tta_val_base_cooperat            as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Base Cooperativa" column-label "Vl Base Coop"

    field tta_val_base_calc                as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Base C lculo" column-label "Vl Base Calc"

    field tta_val_base_cooperat_15         as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Base Cooper 15" column-label "Vl Bs Cp 15"

    field tta_val_base_cooperat_20         as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Base Cooper 20" column-label "Vl Bs Cp 20"

    field tta_val_base_cooperat_25         as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Base Cooper 25" column-label "Vl Bs Cp 25"

    field tta_ind_tip_inciden              as character format "X(25)" initial "Normal" label "Tipo Incidˆncia" column-label "Tp Incid"

    field tta_ind_tip_aquis                as character format "X(65)" initial "Pessoa F¡sica ou Segurado Especial em Geral" label "Tipo Aquisi‡Æo" column-label "Tp Aquis"

    field tta_val_contrib_prev             as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Contrib Prev" column-label "Vl Contr Prv"

    field tta_val_contrib_financ           as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Contrib Financ" column-label "Vl Contr Fin"

    field tta_val_contrib_senar            as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Contrib Senar" column-label "Vl Ctr Senar"

    field tta_ind_tip_repas                as character format "X(40)" initial "Patroc¡nio" label "Tipo Repasse" column-label "Tp Repasse"

    field tta_dat_repas                    as date format "99/99/9999" initial ? label "Dt Repasse" column-label "Dt Repasse"

    field tta_val_repas                    as decimal format ">>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Repasse" column-label "Vl Repasse"

    .


Tabela Temporária

Descrição

Entrada/Saída

tt_item_doc_est_esoc_api

Conterá as informações dos itens do documento do eSocial.

Entrada

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

tta_cdd_num_docto_esoc

Decimal

>>>,>>>,>>>,>>>,>>9

Documento eSocial



tta_num_seq_item                

Integer

>>>>,>>9

Seq Item



tta_cdn_serv_inss               

Integer

>9

Cod Serv INSS



tta_val_brut                    

Decimal

>>,>>>,>>>,>>>,>>9.99

Valor Bruto



ttv_val_base_retenc             

Decimal

>>,>>>,>>>,>>>,>>9.99

Valor Base Retenção




def temp-table tt_item_doc_est_esoc_api no-undo

    field tta_cdd_num_docto_esoc           as Decimal format ">>>,>>>,>>>,>>>,>>9" decimals 0 initial 0 label "Documento eSocial" column-label "Docto eSoc"

    field tta_num_seq_item                 as integer format ">>>>,>>9" initial 0 label "Nr Seq Item" column-label "Seq Item"

    field tta_cdn_serv_inss                as Integer format ">9" initial 0 label "Servi‡o INSS" column-label "Cod Serv INSS"

    field tta_val_brut                     as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Bruto" column-label "Bruto"

    field ttv_val_base_retenc              as decimal format "->>,>>>,>>>,>>9.99" decimals 2

    .