Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- SELECT cto.org_in_codigo,
- env.est_in_codigo CODIGO_UNIDADE,
- fis.agn_st_cpf,
- cto.cto_in_codigo CODIGO_CONTRATO,
- cto.cto_ch_status,
- seq.par_st_observacao Sequencia,
- cli.agn_in_codigo,
- cli.agn_st_nome,
- cto.cto_dt_cadastro,
- par.par_in_codigo CODIGO_PARCELA,
- par.par_dt_vencimento,
- par.par_ch_parcela,
- par.par_re_valormulta,
- par.par_re_valordesconto,
- par.par_ch_receita,
- emp.est_st_nome EmpNome,
- blo.est_st_codigo CodBloco,
- blo.est_st_nome NomBloco,
- un1.est_st_codigo CodUnidade,
- un1.est_st_nome NomUnidade,
- par.par_re_valororiginal,
- par.par_dt_baixa,
- TO_CHAR(par.par_dt_vencimento,'YYYY-MM-DD') par_dt_vencimento_format,
- TO_CHAR(par.par_dt_baixa,'YYYY-MM-DD') par_dt_baixa_format,
- par.par_ch_origem,
- par.par_re_residuocobranca,
- mgcli.pck_bld_app.F_Car_Correcao_Parcela(PAR.ORG_TAB_IN_CODIGO
- , PAR.ORG_PAD_IN_CODIGO
- , PAR.ORG_IN_CODIGO
- , PAR.ORG_TAU_ST_CODIGO
- , PAR.CTO_IN_CODIGO
- , PAR.PAR_IN_CODIGO
- , TRUNC(SYSDATE)) VALOR_CORRECAO, --> trocar para data base
- mgcli.pck_bld_app.F_Car_VlrJurCont_Parcela(PAR.ORG_TAB_IN_CODIGO
- , PAR.ORG_PAD_IN_CODIGO
- , PAR.ORG_IN_CODIGO
- , PAR.ORG_TAU_ST_CODIGO
- , PAR.CTO_IN_CODIGO
- , PAR.PAR_IN_CODIGO
- , TRUNC(SYSDATE)) VALOR_JUROS_CONT,
- mgcli.pck_bld_app.F_Car_VlrMulta_Parcela(PAR.ORG_TAB_IN_CODIGO
- , PAR.ORG_PAD_IN_CODIGO
- , PAR.ORG_IN_CODIGO
- , PAR.ORG_TAU_ST_CODIGO
- , PAR.CTO_IN_CODIGO
- , PAR.PAR_IN_CODIGO
- , TRUNC(SYSDATE)) VALOR_MULTA,
- mgcli.pck_bld_app.F_Car_VlrAtraso_Parcela(PAR.ORG_TAB_IN_CODIGO
- , PAR.ORG_PAD_IN_CODIGO
- , PAR.ORG_IN_CODIGO
- , PAR.ORG_TAU_ST_CODIGO
- , PAR.CTO_IN_CODIGO
- , PAR.PAR_IN_CODIGO
- , TRUNC(SYSDATE)) VALOR_ATRASO,
- DECODE(par.par_dt_baixa,NULL,(ROUND( NVL( mgcar.pck_car_fnc.fnc_car_corrige(par.org_tab_in_codigo
- , par.org_pad_in_codigo
- , par.org_in_codigo
- , par.org_tau_st_codigo
- , par.cto_in_codigo
- , par.par_in_codigo
- , TRUNC(SYSDATE)
- , 'RP'
- , 'A'
- , -1
- , 'N'), 0), 2))
- ,0) Valor_Devido,
- DECODE(par.par_dt_baixa,NULL,0
- ,(ROUND( NVL( PAR.PAR_RE_VALORPAGO , 0), 2)
- + ROUND( NVL( PAR.PAR_RE_CREDITO , 0), 2)
- + ROUND( NVL( PAR.PAR_RE_RESIDUOCOBRANCA , 0), 2)
- + ROUND( NVL( PAR.PAR_RE_VALORMULTA , 0), 2)
- + ROUND( NVL( PAR.PAR_RE_VALORATRASO , 0), 2)
- - ROUND( NVL( PAR.PAR_RE_VALORDESCONTO , 0), 2)
- + ROUND( NVL( PAR.PAR_RE_VALORCORRECAO_ATR, 0), 2)
- + ROUND( NVL( MGCAR.PCK_CAR_FNC.FNC_CAR_TOTAL_TAXASPARCELA( PAR.ORG_TAB_IN_CODIGO
- , PAR.ORG_PAD_IN_CODIGO
- , PAR.ORG_IN_CODIGO
- , PAR.ORG_TAU_ST_CODIGO
- , PAR.CTO_IN_CODIGO
- , PAR.PAR_IN_CODIGO), 0), 2))) Vlr_Pago
- FROM mgcar.car_contrato cto,
- mgcar.car_parcela par,
- mgcar.car_parcela_observacao seq,
- mgcar.car_contrato_envolvido env,
- mgcar.car_contrato_cliente ccl,
- mgglo.glo_agentes cli,
- mgglo.glo_pessoa_fisica fis,
- mgglo.glo_agentes fil,
- mgdbm.dbm_estrutura un1,
- mgdbm.dbm_estrutura emp,
- mgdbm.dbm_estrutura blo,
- mgdbm.dbm_unidade und
- WHERE par.par_ch_status <> 'I'
- AND (fis.agn_ch_tipo = 'P' OR cli.agn_ch_tipopessoafj = 'J')
- AND env.est_in_codigo = {$idUnidade}
- AND ( fis.agn_st_cpf = '{$cpfCliente}' OR cli.agn_st_cgc = '{$cpfCliente}' )
- AND cto.cto_in_codigo = par.cto_in_codigo
- AND cto.org_tau_st_codigo = par.org_tau_st_codigo
- AND cto.org_in_codigo = par.org_in_codigo
- AND cto.org_pad_in_codigo = par.org_pad_in_codigo
- AND cto.org_tab_in_codigo = par.org_tab_in_codigo
- AND par.par_in_codigo = seq.par_in_codigo
- AND par.cto_in_codigo = seq.cto_in_codigo
- AND par.org_tau_st_codigo = seq.org_tau_st_codigo
- AND par.org_in_codigo = seq.org_in_codigo
- AND par.org_pad_in_codigo = seq.org_pad_in_codigo
- AND par.org_tab_in_codigo = seq.org_tab_in_codigo
- AND cto.cto_in_codigo = ccl.cto_in_codigo
- AND cto.org_tau_st_codigo = ccl.org_tau_st_codigo
- AND cto.org_in_codigo = ccl.org_in_codigo
- AND cto.org_pad_in_codigo = ccl.org_pad_in_codigo
- AND cto.org_tab_in_codigo = ccl.org_tab_in_codigo
- AND ccl.agn_in_codigo = cli.agn_in_codigo
- AND ccl.agn_pad_in_codigo = cli.agn_pad_in_codigo
- AND ccl.agn_tab_in_codigo = cli.agn_tab_in_codigo
- AND ccl.agn_in_codigo = fis.agn_in_codigo (+)
- AND ccl.agn_pad_in_codigo = fis.agn_pad_in_codigo (+)
- AND ccl.agn_tab_in_codigo = fis.agn_tab_in_codigo (+)
- AND par.cto_in_codigo = cto.cto_in_codigo
- AND par.org_tau_st_codigo = cto.org_tau_st_codigo
- AND par.org_in_codigo = cto.org_in_codigo
- AND par.org_pad_in_codigo = cto.org_pad_in_codigo
- AND par.org_tab_in_codigo = cto.org_tab_in_codigo
- AND cto.cto_in_codigo = env.cto_in_codigo
- AND cto.org_tau_st_codigo = env.org_tau_st_codigo
- AND cto.org_in_codigo = env.org_in_codigo
- AND cto.org_pad_in_codigo = env.org_pad_in_codigo
- AND cto.org_tab_in_codigo = env.org_tab_in_codigo
- AND env.est_in_codigo = und.est_in_codigo
- AND env.est_org_tau_st_codigo = und.org_tau_st_codigo
- AND env.est_org_in_codigo = und.org_in_codigo
- AND env.org_pad_in_codigo = und.org_pad_in_codigo
- AND env.org_tab_in_codigo = und.org_tab_in_codigo
- AND env.est_in_codigo = un1.est_in_codigo
- AND env.est_org_tau_st_codigo = un1.org_tau_st_codigo
- AND env.est_org_in_codigo = un1.org_in_codigo
- AND env.org_pad_in_codigo = un1.org_pad_in_codigo
- AND env.org_tab_in_codigo = un1.org_tab_in_codigo
- AND und.emp_est_in_codigo = emp.est_in_codigo
- AND und.org_tau_st_codigo = emp.org_tau_st_codigo
- AND und.org_in_codigo = emp.org_in_codigo
- AND und.org_pad_in_codigo = emp.org_pad_in_codigo
- AND und.org_tab_in_codigo = emp.org_tab_in_codigo
- AND und.blo_est_in_codigo = blo.est_in_codigo
- AND und.org_tau_st_codigo = blo.org_tau_st_codigo
- AND und.org_in_codigo = blo.org_in_codigo
- AND und.org_pad_in_codigo = blo.org_pad_in_codigo
- AND und.org_tab_in_codigo = blo.org_tab_in_codigo
- AND cto.fil_in_codigo = fil.agn_in_codigo
- AND cto.org_pad_in_codigo = fil.agn_pad_in_codigo
- AND cto.org_tab_in_codigo = fil.agn_tab_in_codigo
- ORDER BY TO_NUMBER(SUBSTR(fil.agn_st_ordem,15,7)), emp.est_in_codigo,cto.cto_in_codigo,par.par_dt_vencimento
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement