Árvore de páginas

Documento de API

Produto:

Datasul

Ocorrência:

Documentação de API

Nome Físicoprgfin/acr/acr567za

Objetivo

Gerar as Conciliações de Cartão de Crédito e os Lançamentos de Conciliação de Cartão de Crédito.

Funcionamento

1. No programa chamador da API  devem ser declaradas as temp-tables tt_lancto_concil_cartao_cr e tt_log_erros. Informar nos parâmetros de entrada os campos código da operadora do cartão de crédito, o tipo de conciliação do cartão de crédito, a faixa de datas e se deseja validar a conciliação após importar.

2. Executar o programa API conforme exemplo de código a seguir:

def var v_hdl_programa as handle no-undo.

run prgfin/acr/acr567za.py persistent set v_hdl_programa.

run pi_main_api_concil_cartao_cr_imp_2 in v_hdl_programa (input v_cod_operdra_cartao_cr, input v_ind_tip_concil_cartao_cr, input v_dat_inicial, input v_dat_final, input v_log_valid_concil_cartao_cr, input-output  table tt_lancto_concil_cartao_cr, output table tt_log_erros).

delete procedure v_hdl_programa.

3. Após a execução do programa, pode ser verificada se retornou algum erro durante o processo de importação através da temp-table tt_log_erros.

Parâmetros de entrada

v_cod_operdra_cartao_cr: Determina para qual Operadora será gerada a conciliação e seus lançamentos. (Consultar programa Cadastro Operadora).

v_ind_tip_concil_cartao_cr: Determina o tipo de conciliação (Crédito ou Venda) .

v_log_valid_concil_cartao_cr:  Parâmetro lógico que indica se a validação da conciliação deverá ser feita logo após a importação.

Tabelas Temporárias

Tabela Temporária

Descrição

Entrada/Saída

tt_lancto_concil_cartao_cr

Conterá as informações da conciliação do cartão de crédito que será gerada

Entrada/Saída

AtributoDescriçãoFormatoDescriçãoMandatórioObservação
tta_num_id_lancto_cartao_crinteger999999999ID Lancto Cartão CRSim
tta_num_id_concil_cartao_crinteger999999999ID da Conciliação Cartão CréditoNão
tta_ind_tip_lancto_cartao_crcharacterX(25)Tipo LançamentoNãoCrédito,  Venda ou Ajuste
tta_ind_sit_lancto_cartao_crcharacterX(25)Situação LanctoNãoSempre será criado como Pendente. Não informar.
tta_ind_diverg_lancto_cartao_crcharacterX(25)Divergência LanctoNãoSempre será criado como Não validado. Não informar.
tta_cod_empresacharacterX(03)EmpresaNão
tta_cod_estabcharacterX(05)EstabelecimentoNão
tta_cod_estab_operdracharacterX(20)Estabelec OperadoraNão
tta_cod_nsucharacterX(30)NSUNão
tta_cod_comprovcharacterx(20)ComprovanteNão
tta_cod_autorizcharacterx(10)AutorizaçãoNão
tta_dat_lanctodate99/99/9999Data LançamentoNão
tta_dat_vdadate99/99/9999Data VendaNão
tta_dat_creditodate99/99/9999Data CréditoNão
tta_cod_bancocharacterx(08)BancoNão
tta_cod_agenc_bciacharacterx(08)Agência BancáriaNão
tta_cod_cta_corren_bcocharacterx(20)Conta Corrente BancoNão
tta_num_parcelainteger>>9ParcelaNão
tta_val_brut_parcdecimal->>>,>>>,>>9.99Valor Bruto ParcelaNão
tta_val_perc_comisdecimal">>9.9999Percentual ComissãoNãodecimals 4
tta_val_comis_parcdecimal>>>,>>>,>>9.99Valor Comissão ParcNão
tta_val_tax_serv_parcdecimal>>>,>>>,>>9.99Valor Tx Serv ParcNão
tta_val_liq_parcdecimal>>>,>>>,>>9.99Valor Líquido ParcNão
tta_val_lanctodecimal->>,>>>,>>>,>>9.99Valor LançamentoNão
tta_num_tot_parcinteger>>9Total ParcNão
tta_val_brut_totdecimal->>>,>>>,>>9.99Valor Bruto TotalNão
tta_cod_resum_origincharacterx(20)Resumo OriginaNão
tta_cod_resum_unicocharacterx(20)Resumo únicoNão
tta_cod_resumcharacterx(20)ResumoNão
tta_des_motiv_rejcharacterx(60)Motivo RejeiçãoNão
tta_des_motiv_ajustcharacterx(60)Motivo AjusteNão
tta_des_lin_importcharacterx(2000)Linha ImportadaNão
tta_num_lin_importainteger>>>>,>>9Linha ImportaçãoNão


def temp-table tt_lancto_concil_cartao_cr no-undo
    field tta_num_id_lancto_cartao_cr      as integer format "999999999" initial 0 label "Id Lancto Cartão Cr" column-label "Id Lancto CartÆo Cr"
    field tta_num_id_concil_cartao_cr      as integer format "999999999" initial 0 label "Id Concil Cartão Cr" column-label "Id Concil Cartão C"
    field tta_ind_tip_lancto_cartao_cr     as character format "X(25)" label "Tipo Lançamento" column-label "Tipo Lançamento"
    field tta_ind_sit_lancto_cartao_cr     as character format "X(25)" label "Situação Lancto" column-label "Situação Lancto"
    field tta_ind_diverg_lancto_cartao_cr  as character format "X(25)" label "Divergência Lancto" column-label "Divergência Lancto"
    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_estab_operdra            as character format "x(20)" label "Estabelec Operadora" column-label "Estabelec Operadora"
    field tta_cod_nsu                      as character format "x(30)" label "NSU" column-label "NSU"
    field tta_cod_comprov                  as character format "x(20)" label "Comprovante" column-label "Comprovante"
    field tta_cod_autoriz                  as character format "x(10)" label "Autorização" column-label "Autorização"
    field tta_dat_lancto                   as date format "99/99/9999" initial ? label "Data Lançamento" column-label "Data Lançamento"
    field tta_dat_vda                      as date format "99/99/9999" initial ? label "Data Venda" column-label "Data Venda"
    field tta_dat_credito                  as date format "99/99/9999" initial ? label "Data Crédito" column-label "Data Crédito"
    field tta_cod_banco                    as character format "x(8)" label "Banco" column-label "Banco"
    field tta_cod_agenc_bcia               as character format "x(10)" label "Agência Bancária" column-label "Agência Bancária"
    field tta_cod_cta_corren_bco           as character format "x(20)" label "Conta Corrente Banco" column-label "Conta Corrente Banco"
    field tta_num_parcela                  as integer format ">>9" initial 0 label "Parcela" column-label "Parc"
    field tta_val_brut_parc                as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Bruto Parcela" column-label "Valor Bruto Parcela"
    field tta_val_perc_comis               as decimal format ">>9.9999" decimals 4 initial 0 label "Percentual Comissão" column-label "Perc Comis"
    field tta_val_comis_parc               as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Comissão Parc" column-label "Valor Comissão Parc"
    field tta_val_tax_serv_parc            as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Tx Serv Parc" column-label "Valor Tx Serv Parc"
    field tta_val_liq_parc                 as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Líquido Parc" column-label "Valor Líquido Parc"
    field tta_val_lancto                   as decimal format "->>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Lançamento" column-label "Valor Lançamento"
    field tta_num_tot_parc                 as integer format ">>9" initial 0 label "Total Parcelas" column-label "Total Parc"
    field tta_val_brut_tot                 as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Bruto Total" column-label "Valor Bruto Total"
    field tta_cod_resum_origin             as character format "x(20)" label "Resumo Original" column-label "Resumo Original"
    field tta_cod_resum_unico              as character format "x(20)" label "Resumo único" column-label "Resumo único"
    field tta_cod_resum                    as character format "x(20)" label "Resumo" column-label "Resumo"
    field tta_des_motiv_rej                as character format "x(60)" label "Motivo Rejeição" column-label "Motivo Rejeição"
    field tta_des_motiv_ajust              as character format "x(60)" label "Motivo Ajuste" column-label "Motivo Ajuste"
    field tta_des_lin_import               as character format "x(2000)" label "Linha Importada" column-label "Linha Importada"
    field tta_num_lin_importa              as integer format ">>>>,>>9" initial 0 label "Linha Importação" column-label "Linha Importação"
    index tt_cod_estab_operdra            
          tta_cod_estab_operdra            ascending
    .


Tabela Temporária

Descrição

Entrada/Saída

tt_log_erros

Conterá as informações de erros na integração dos movimentos

Saída

Atributo

Tipo

Formato

Descrição

ttv_num_seq

character

x(3)

Seq

ttv_num_cod_erro

Integer

>>>,>>9

Número Erro

ttv_des_erro

integer

>>>>,>>9

Incosistência

ttv_des_ajuda

character

x(50)

Ajuda

def temp-table tt_log_erros no-undo
    field ttv_num_seq                      as integer format ">>>,>>9" label "Seqˆncia" column-label "Seq"
    field ttv_num_cod_erro                 as integer format ">>>>,>>9" label "N£mero" column-label "N£mero"
    field ttv_des_erro                     as character format "x(50)" label "Inconsistˆncia" column-label "Inconsistˆncia"
    field ttv_des_ajuda                    as character format "x(50)" label "Ajuda" column-label "Ajuda"
    index tt_id                           
          ttv_num_seq                      ascending
          ttv_num_cod_erro                 ascending
    .