1: package body okl_ecc_values_pvt_w as
2: /* $Header: OKLEECVB.pls 120.1 2005/10/30 04:58:25 appldev noship $ */
3: procedure remove_ec_line(p_api_version NUMBER
4: , p_init_msg_list VARCHAR2
5: , x_return_status out nocopy VARCHAR2
20: , p5_a12 NUMBER
21: )
22:
23: as
24: ddp_ecl_rec okl_ecc_values_pvt.okl_ecl_rec;
25: ddindx binary_integer; indx binary_integer;
26: begin
27:
28: -- copy data to the local IN or IN-OUT args, if any
45: ddp_ecl_rec.last_update_date := p5_a11;
46: ddp_ecl_rec.last_update_login := p5_a12;
47:
48: -- here's the delegated call to the old PL/SQL routine
49: okl_ecc_values_pvt.remove_ec_line(p_api_version,
50: p_init_msg_list,
51: x_return_status,
52: x_msg_count,
53: x_msg_data,
190: , p_source_eff_to DATE
191: )
192:
193: as
194: ddp_ech_rec okl_ecc_values_pvt.okl_ech_rec;
195: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
196: ddp_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
197: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
198: ddp_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
191: )
192:
193: as
194: ddp_ech_rec okl_ecc_values_pvt.okl_ech_rec;
195: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
196: ddp_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
197: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
198: ddp_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
199: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
192:
193: as
194: ddp_ech_rec okl_ecc_values_pvt.okl_ech_rec;
195: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
196: ddp_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
197: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
198: ddp_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
199: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
200: ddindx binary_integer; indx binary_integer;
193: as
194: ddp_ech_rec okl_ecc_values_pvt.okl_ech_rec;
195: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
196: ddp_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
197: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
198: ddp_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
199: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
200: ddindx binary_integer; indx binary_integer;
201: begin
194: ddp_ech_rec okl_ecc_values_pvt.okl_ech_rec;
195: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
196: ddp_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
197: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
198: ddp_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
199: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
200: ddindx binary_integer; indx binary_integer;
201: begin
202:
195: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
196: ddp_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
197: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
198: ddp_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
199: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
200: ddindx binary_integer; indx binary_integer;
201: begin
202:
203: -- copy data to the local IN or IN-OUT args, if any
276:
277:
278:
279: -- here's the delegated call to the old PL/SQL routine
280: okl_ecc_values_pvt.handle_eligibility_criteria(p_api_version,
281: p_init_msg_list,
282: x_return_status,
283: x_msg_count,
284: x_msg_data,
439: , p11_a35 out nocopy JTF_VARCHAR2_TABLE_500
440: )
441:
442: as
443: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
444: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
445: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
446: ddindx binary_integer; indx binary_integer;
447: begin
440: )
441:
442: as
443: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
444: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
445: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
446: ddindx binary_integer; indx binary_integer;
447: begin
448:
441:
442: as
443: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
444: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
445: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
446: ddindx binary_integer; indx binary_integer;
447: begin
448:
449: -- copy data to the local IN or IN-OUT args, if any
459:
460:
461:
462: -- here's the delegated call to the old PL/SQL routine
463: okl_ecc_values_pvt.get_eligibility_criteria(p_api_version,
464: p_init_msg_list,
465: x_return_status,
466: x_msg_count,
467: x_msg_data,
618: , p9_a35 out nocopy JTF_VARCHAR2_TABLE_500
619: )
620:
621: as
622: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
623: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
624: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
625: ddindx binary_integer; indx binary_integer;
626: begin
619: )
620:
621: as
622: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
623: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
624: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
625: ddindx binary_integer; indx binary_integer;
626: begin
627:
620:
621: as
622: ddx_ech_rec okl_ecc_values_pvt.okl_ech_rec;
623: ddx_ecl_tbl okl_ecc_values_pvt.okl_ecl_tbl;
624: ddx_ecv_tbl okl_ecc_values_pvt.okl_ecv_tbl;
625: ddindx binary_integer; indx binary_integer;
626: begin
627:
628: -- copy data to the local IN or IN-OUT args, if any
636:
637:
638:
639: -- here's the delegated call to the old PL/SQL routine
640: okl_ecc_values_pvt.get_eligibility_criteria(p_api_version,
641: p_init_msg_list,
642: x_return_status,
643: x_msg_count,
644: x_msg_data,
721: , p9_a35
722: );
723: end;
724:
725: end okl_ecc_values_pvt_w;