1: package body lns_terms_pub_w as
2: /* $Header: LNS_TERMS_PUBJ_B.pls 120.14.12020000.2 2012/07/19 20:59:41 scherkas ship $ */
3: procedure create_term(p_init_msg_list VARCHAR2
4: , p1_a0 NUMBER
5: , p1_a1 NUMBER
1: package body lns_terms_pub_w as
2: /* $Header: LNS_TERMS_PUBJ_B.pls 120.14.12020000.2 2012/07/19 20:59:41 scherkas ship $ */
3: procedure create_term(p_init_msg_list VARCHAR2
4: , p1_a0 NUMBER
5: , p1_a1 NUMBER
6: , p1_a2 VARCHAR2
72: , x_msg_data out nocopy VARCHAR2
73: )
74:
75: as
76: ddp_loan_term_rec lns_terms_pub.loan_term_rec_type;
77: ddindx binary_integer; indx binary_integer;
78: begin
79:
80: -- copy data to the local IN or IN-OUT args, if any
149:
150:
151:
152: -- here's the delegated call to the old PL/SQL routine
153: lns_terms_pub.create_term(p_init_msg_list,
154: ddp_loan_term_rec,
155: x_term_id,
156: x_return_status,
157: x_msg_count,
237: , x_msg_data out nocopy VARCHAR2
238: )
239:
240: as
241: ddp_loan_term_rec lns_terms_pub.loan_term_rec_type;
242: ddindx binary_integer; indx binary_integer;
243: begin
244:
245: -- copy data to the local IN or IN-OUT args, if any
314:
315:
316:
317: -- here's the delegated call to the old PL/SQL routine
318: lns_terms_pub.update_term(p_init_msg_list,
319: ddp_loan_term_rec,
320: p_object_version_number,
321: x_return_status,
322: x_msg_count,
401: , x_msg_data out nocopy VARCHAR2
402: )
403:
404: as
405: ddp_loan_term_rec lns_terms_pub.loan_term_rec_type;
406: ddindx binary_integer; indx binary_integer;
407: begin
408:
409: -- copy data to the local IN or IN-OUT args, if any
477:
478:
479:
480: -- here's the delegated call to the old PL/SQL routine
481: lns_terms_pub.validate_term(p_init_msg_list,
482: ddp_loan_term_rec,
483: x_return_status,
484: x_msg_count,
485: x_msg_data);
563: , x_msg_data out nocopy VARCHAR2
564: )
565:
566: as
567: ddx_loan_term_rec lns_terms_pub.loan_term_rec_type;
568: ddindx binary_integer; indx binary_integer;
569: begin
570:
571: -- copy data to the local IN or IN-OUT args, if any
575:
576:
577:
578: -- here's the delegated call to the old PL/SQL routine
579: lns_terms_pub.get_loan_term_rec(p_init_msg_list,
580: p_term_id,
581: ddx_loan_term_rec,
582: x_return_status,
583: x_msg_count,
655:
656:
657: end;
658:
659: end lns_terms_pub_w;