1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

[RESOLVIDO] API - Baixa títulos contas a receber

Discussão em 'EMS , HCM e Totvs 11' iniciado por HumbertoOrtiz, Abril 2, 2019.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. HumbertoOrtiz

    HumbertoOrtiz Membro Participativo

    Boa noite a todos.
    Preciso saber qual APi posso utilizar para efetuar a baixa de um título do ACR.
    Tenho uma integração que recebe a informação que o título foi pago, e tenho
    que baixar no Totvs.
    Para isso qual API eu posso usar? Seria a ACR702ZI?
  2. fgodoi

    fgodoi Sem Pontuação

    Boa tarde,
    A Api de liquidação é a acr901zb.

    Código:
    if  not can-find(first tt_integr_acr_liquidac_lote) then do:
                    create tt_integr_acr_liquidac_lote.
                    assign tt_integr_acr_liquidac_lote.tta_cod_empresa                 = if avail tit_acr then tit_acr.cod_empresa ELSE ""
                           tt_integr_acr_liquidac_lote.tta_cod_estab_refer             = tit_acr.cod_estab
                           tt_integr_acr_liquidac_lote.tta_cod_usuario                 = v_cod_usuar_corren
                           tt_integr_acr_liquidac_lote.tta_cod_portador                = "1"
                           tt_integr_acr_liquidac_lote.tta_cod_cart_bcia               = "DEP"
                           tt_integr_acr_liquidac_lote.tta_dat_gerac_lote_liquidac     = input frame {&frame-name} fi-dt-liquid
                           tt_integr_acr_liquidac_lote.tta_dat_transacao               = input frame {&frame-name} fi-dt-liquid
                           tt_integr_acr_liquidac_lote.tta_val_tot_lote_liquidac_infor = 0
                           tt_integr_acr_liquidac_lote.tta_val_tot_lote_liquidac_efetd = 0 
                           tt_integr_acr_liquidac_lote.tta_val_tot_despes_bcia         = 1
                           tt_integr_acr_liquidac_lote.tta_ind_tip_liquidac_acr        = "Lote"
                           tt_integr_acr_liquidac_lote.tta_nom_arq_movimen_bcia        = ""
                           tt_integr_acr_liquidac_lote.tta_cdn_cliente                 = 0
                           tt_integr_acr_liquidac_lote.tta_log_enctro_cta              = no  
                           tt_integr_acr_liquidac_lote.ttv_log_atualiz_refer           = input frame f-cad tg-atualiza /*yes*/
                           tt_integr_acr_liquidac_lote.ttv_log_gera_lote_parcial       = yes
                           tt_integr_acr_liquidac_lote.ttv_rec_lote_liquidac_acr       = recid(tt_integr_acr_liquidac_lote)
                           tt_integr_acr_liquidac_lote.tta_cod_refer                   = string(day(input frame {&frame-name} fi-dt-liquid)) + replace(string(time,"HH:MM:SS"),":","") + "CNV"
                           /*tt_integr_acr_liquidac_lote.tta_log_enctro_cta              = no
                           tt_integr_acr_liquidac_lote.tta_ind_sit_lote_liquidac_acr   = 'Em Digita‡Æo' */.
                end.
       
                create tt_integr_acr_liq_item_lote.
                assign tt_integr_acr_liq_item_lote.tta_cod_empresa                = tit_acr.cod_empresa
                       tt_integr_acr_liq_item_lote.tta_cod_estab                  = tit_acr.cod_estab      
                       tt_integr_acr_liq_item_lote.tta_cod_espec_docto            = tit_acr.cod_espec_docto
                       tt_integr_acr_liq_item_lote.tta_cod_ser_docto              = tit_acr.cod_ser_docto  
                       tt_integr_acr_liq_item_lote.tta_cod_tit_acr                = tit_acr.cod_tit_acr    
                       tt_integr_acr_liq_item_lote.tta_cod_parcela                = tit_acr.cod_parcela    
                       tt_integr_acr_liq_item_lote.tta_cdn_cliente                = tit_acr.cdn_cliente    
                       tt_integr_acr_liq_item_lote.tta_cod_portad_ext             = ""
                       tt_integr_acr_liq_item_lote.tta_cod_modalid_ext            = ""
                       tt_integr_acr_liq_item_lote.tta_cod_portador               = "1"
                       tt_integr_acr_liq_item_lote.tta_cod_cart_bcia              = "DEP"
                       tt_integr_acr_liq_item_lote.tta_cod_finalid_econ           = 'corrente'
                       tt_integr_acr_liq_item_lote.tta_cod_indic_econ             = tit_acr.cod_indic_econ
                       tt_integr_acr_liq_item_lote.tta_val_tit_acr                = tit_acr.val_liq_tit_acr
                       tt_integr_acr_liq_item_lote.tta_val_liquidac_tit_acr       = tit_acr.val_sdo_tit_acr
                       tt_integr_acr_liq_item_lote.tta_dat_cr_liquidac_tit_acr    = input frame {&frame-name} fi-dt-liquid 
                       tt_integr_acr_liq_item_lote.tta_dat_cr_liquidac_calc       = ?
                       tt_integr_acr_liq_item_lote.tta_dat_liquidac_tit_acr       = input frame {&frame-name} fi-dt-liquid
                       tt_integr_acr_liq_item_lote.tta_cod_autoriz_bco            = ""
                       tt_integr_acr_liq_item_lote.tta_val_abat_tit_acr           = 0
                       tt_integr_acr_liq_item_lote.tta_val_despes_bcia            = 0
                       tt_integr_acr_liq_item_lote.tta_val_multa_tit_acr          = 0
                       tt_integr_acr_liq_item_lote.tta_val_juros                  = tit_acr.val_juros
                       tt_integr_acr_liq_item_lote.tta_val_cm_tit_acr             = 0
                       tt_integr_acr_liq_item_lote.tta_val_liquidac_orig          = 0
                       tt_integr_acr_liq_item_lote.tta_val_desc_tit_acr_orig      = 0 
                       tt_integr_acr_liq_item_lote.tta_val_abat_tit_acr_orig      = 0
                       tt_integr_acr_liq_item_lote.tta_val_despes_bcia_orig       = 0
                       tt_integr_acr_liq_item_lote.tta_val_multa_tit_acr_origin   = 0
                       tt_integr_acr_liq_item_lote.tta_val_juros_tit_acr_orig     = 0
                       tt_integr_acr_liq_item_lote.tta_val_cm_tit_acr_orig        = 0
                       tt_integr_acr_liq_item_lote.tta_val_nota_db_orig           = 0
                       tt_integr_acr_liq_item_lote.tta_log_gera_antecip           = no
                       tt_integr_acr_liq_item_lote.tta_des_text_histor            = ""
                       tt_integr_acr_liq_item_lote.tta_ind_sit_item_lote_liquidac = ""
                       tt_integr_acr_liq_item_lote.tta_log_gera_avdeb             = no
                       tt_integr_acr_liq_item_lote.tta_cod_indic_econ_avdeb       = ""
                       tt_integr_acr_liq_item_lote.tta_cod_portad_avdeb           = ""
                       tt_integr_acr_liq_item_lote.tta_cod_cart_bcia_avdeb        = ""
                       tt_integr_acr_liq_item_lote.tta_dat_vencto_avdeb           = ?
                       tt_integr_acr_liq_item_lote.tta_val_perc_juros_avdeb       = 0
                       tt_integr_acr_liq_item_lote.tta_val_avdeb                  = 0
                       tt_integr_acr_liq_item_lote.tta_log_movto_comis_estordo    = no
                       tt_integr_acr_liq_item_lote.tta_ind_tip_item_liquidac_acr  = "Pagamento"
                       tt_integr_acr_liq_item_lote.ttv_rec_lote_liquidac_acr      = tt_integr_acr_liquidac_lote.ttv_rec_lote_liquidac_acr
                       tt_integr_acr_liq_item_lote.ttv_rec_item_lote_liquidac_acr = recid(tt_integr_acr_liq_item_lote)
                       tt_integr_acr_liq_item_lote.tta_val_desc_tit_acr           = 0 /*tt-titulos.vl_repasse*/
                    .
            end.
    
            run prgfin\acr\acr901zb.py(input 1,
                                       input table tt_integr_acr_liquidac_lote,
                                       input table tt_integr_acr_liq_item_lote,
                                       input table tt_integr_acr_abat_antecip,
                                       input table tt_integr_acr_abat_prev,
                                       input table tt_integr_acr_cheq,
                                       input table tt_integr_acr_liquidac_impto,
                                       input table tt_integr_acr_rel_pend_cheq,
                                       input table tt_integr_acr_liq_aprop_ctbl,
                                       input table tt_integr_acr_liq_desp_rec,
                                       input table tt_integr_acr_aprop_liq_antec,
                                       input '',
                                       output table tt_log_erros_import_liquidac).
  3. HumbertoOrtiz

    HumbertoOrtiz Membro Participativo

    Muito obrigado
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página