Advertisement
Guest User

Untitled

a guest
Dec 22nd, 2014
159
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
SQL 1.73 KB | None | 0 0
  1.               BEGIN
  2.              SELECT a.cnr_cdgo_cargo
  3.                INTO v_cargo_bonificado
  4.                FROM pesp_cpto_a_fact c,
  5.                     ldd_cargos_no_recu a,
  6.                     pesp_trn_tarif b
  7.               WHERE a.cnr_cdgo_cargo = b.tvl_trans_code AND
  8.                     a.sol_nro_solic = c1.sol_nro_solic AND
  9.                     a.ren_nro_renglon = c1.ren_nro_renglon AND
  10.                     a.tra_nro_tram = c1.tra_nro_tram AND
  11.                     a.cnr_tipo_domi = c1.vex_tipo_domi AND
  12.                     b.tpe_codigo = c1.tpe_codigo AND
  13.                     b.tcr_gr_cargo = 'CARGO' AND
  14.                     b.tcr_recurrente = 'N' AND
  15.                     INSTR(x_cargos_no_dto, a.cnr_cdgo_cargo) = 0 AND
  16.                     c.tpe_codigo = b.tpe_codigo AND
  17.                     c.tcr_gr_cargo = b.tcr_gr_cargo AND
  18.                     c.tcr_recurrente = b.tcr_recurrente AND
  19.                     c.caf_concepto = b.caf_concepto AND
  20.                     rownum=1;
  21.                  exception
  22.                    WHEN NO_DATA_FOUND THEN
  23.                         b_existe_cdgo_conex := FALSE;
  24.                    WHEN others THEN
  25.                         ROLLBACK;
  26.                         v_error := 'ERROR AL RECUPERAR EL CARGO BONIFICADO EN PA_LDD_DESCUENTOS.CALCULAR_DTO_CONEX -
  27.                                   sqlcode: '||  to_char(sqlcode)||' - sqlerrm: '||sqlerrm;
  28.                         pa_pesp_error_batch.pesp_error_batch ('LDD',
  29.                                            'CALCULAR_DTO_CONEX',
  30.                                            v_fecha_proceso, c1.sol_nro_solic,
  31.                                            c1.ren_nro_renglon, c1.tra_nro_tram,
  32.                                            v_error);
  33.                         raise;
  34.                 END;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement