Histórico da Página
...
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 e , 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:
...
run pi_main_api_concil_cartao_cr_imp_4 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).
...
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 |
Atributo | Descrição | Formato | Descrição | Mandatório | Observação | |
tta_num_id_lancto_cartao_cr | integer | 999999999 | ID Lancto Cartão CR | Sim | ||
tta_num_id_concil_cartao_cr | integer | 999999999 | ID da Conciliação Cartão Crédito | Não | ||
tta_ind_tip_lancto_cartao_cr | character | X(25) | Tipo Lançamento | Não | Crédito, Venda ou | VendaAjuste |
tta_ind_sit_lancto_cartao_cr | character | X(25) | Situação Lancto | Não | Sempre será criado como Pendente. Não informar. | |
tta_ind_diverg_lancto_cartao_cr | character | X(25) | Divergência Lancto | Não | Sempre será criado como Não validado. Não informar. | |
tta_cod_empresa | character | X(03) | Empresa | Não | ||
tta_cod_estab | character | X(05) | Estabelecimento | Não | ||
tta_cod_estab_operdra | character | X(20) | Estabelec Operadora | Não | ||
tta_cod_nsu | character | X(30) | NSU | Não | ||
tta_cod_comprov | character | x(20) | Comprovante | Não | ||
tta_cod_autoriz | character | x(10) | Autorização | Não | ||
tta_dat_lancto | date | 99/99/9999 | Data Lançamento | Não | ||
tta_dat_vda | date | 99/99/9999 | Data Venda | Não | ||
tta_dat_credito | date | 99/99/9999 | Data Crédito | Não | ||
tta_cod_banco | character | x(08) | Banco | Não | ||
tta_cod_agenc_bcia | character | x(08) | Agência Bancária | Não | ||
tta_cod_cta_corren_bco | character | x(20) | Conta Corrente Banco | Não | ||
tta_num_parcela | integer | >>9 | Parcela | Não | ||
tta_val_brut_parc | decimal | ->>>,>>>,>>9.99 | Valor Bruto Parcela | Não | ||
tta_val_perc_comis | decimal | ">>9.9999 | Percentual Comissão | Não | decimals 4 | |
tta_val_comis_parc | decimal | >>>,>>>,>>9.99 | Valor Comissão Parc | Não | ||
tta_val_tax_serv_parc | decimal | >>>,>>>,>>9.99 | Valor Tx Serv Parc | Não | ||
tta_val_liq_parc | decimal | >>>,>>>,>>9.99 | Valor Líquido Parc | Não | ||
tta_val_lancto | decimal | ->>,>>>,>>>,>>9.99 | Valor Lançamento | Não | ||
tta_num_tot_parc | integer | >>9 | Total Parc | Não | ||
tta_val_brut_tot | decimal | ->>>,>>>,>>9.99 | Valor Bruto Total | Não | ||
tta_cod_resum_origin | character | x(20) | Resumo Origina | Não | ||
tta_cod_resum_unico | character | x(20) | Resumo único | Não | ||
tta_cod_resum | character | x(20) | Resumo | Não | ||
tta_des_motiv_rej | character | x(60) | Motivo Rejeição | Não | ||
tta_des_motiv_ajust | character | x(60) | Motivo Ajuste | Não | ||
tta_des_lin_import | character | x(2000) | Linha Importada | Não | ||
tta_num_lin_importa | integer | >>>>,>>9 | Linha Importação | Não | ||
tta_cod_admdra_cartao_cr | character | x(5) | Administradora | Não | ||
tta_cod_band | character | x(10) | Bandeira | Não | ||
tta_cod_admdra_operdra | character | x(30) | Admin Operadora | Não | ||
tta_cod_band_operdra | character | x(30) | Bandeira Operadora | Não | ||
tta_cod_motiv_ajust_cartao_cr | character | x(15) | Motivo Ajuste Cartão | Nã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 Cartão Cr"
field tta_num_id_concil_cartao_cr as integer format "999999999" initial 0 label "Id Concil Cartão CrConciliação CC" column-label "Id Concil Cartão CConciliação CC"
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Único" column-label "Resumo únicoÚ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"
field tta_cod_admdra_cartao_cr as character format "x(5)" label "Administradora" column-label "Administradora"
field tta_cod_band as character format "x(10)" label "Bandeira" column-label "Bandeira"
field tta_cod_admdra_operdra as character format "x(30)" label "Admin Operadora" column-label "Admin Operadora"
field tta_cod_band_operdra as character format "x(30)" label "Bandeira Operadora" column-label "Bandeira Operadora"
field tta_cod_motiv_ajust_cartao_cr as character format "x(15)" label "Motivo Ajuste Cartão" column-label "Motivo Ajuste Cartão"
index tt_cod_estab_operdra
tta_cod_estab_operdra ascending
.
...