1: package body lns_terms_pub_w as
2: /* $Header: LNS_TERMS_PUBJ_B.pls 120.4.12010000.5 2008/12/19 16:07:01 gparuchu 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.4.12010000.5 2008/12/19 16:07:01 gparuchu ship $ */
3: procedure create_term(p_init_msg_list VARCHAR2
4: , p1_a0 NUMBER
5: , p1_a1 NUMBER
6: , p1_a2 VARCHAR2
64: , x_msg_data out nocopy VARCHAR2
65: )
66:
67: as
68: ddp_loan_term_rec lns_terms_pub.loan_term_rec_type;
69: ddindx binary_integer; indx binary_integer;
70: begin
71:
72: -- copy data to the local IN or IN-OUT args, if any
133:
134:
135:
136: -- here's the delegated call to the old PL/SQL routine
137: lns_terms_pub.create_term(p_init_msg_list,
138: ddp_loan_term_rec,
139: x_term_id,
140: x_return_status,
141: x_msg_count,
213: , x_msg_data out nocopy VARCHAR2
214: )
215:
216: as
217: ddp_loan_term_rec lns_terms_pub.loan_term_rec_type;
218: ddindx binary_integer; indx binary_integer;
219: begin
220:
221: -- copy data to the local IN or IN-OUT args, if any
282:
283:
284:
285: -- here's the delegated call to the old PL/SQL routine
286: lns_terms_pub.update_term(p_init_msg_list,
287: ddp_loan_term_rec,
288: p_object_version_number,
289: x_return_status,
290: x_msg_count,
361: , x_msg_data out nocopy VARCHAR2
362: )
363:
364: as
365: ddp_loan_term_rec lns_terms_pub.loan_term_rec_type;
366: ddindx binary_integer; indx binary_integer;
367: begin
368:
369: -- copy data to the local IN or IN-OUT args, if any
429:
430:
431:
432: -- here's the delegated call to the old PL/SQL routine
433: lns_terms_pub.validate_term(p_init_msg_list,
434: ddp_loan_term_rec,
435: x_return_status,
436: x_msg_count,
437: x_msg_data);
507: , x_msg_data out nocopy VARCHAR2
508: )
509:
510: as
511: ddx_loan_term_rec lns_terms_pub.loan_term_rec_type;
512: ddindx binary_integer; indx binary_integer;
513: begin
514:
515: -- copy data to the local IN or IN-OUT args, if any
519:
520:
521:
522: -- here's the delegated call to the old PL/SQL routine
523: lns_terms_pub.get_loan_term_rec(p_init_msg_list,
524: p_term_id,
525: ddx_loan_term_rec,
526: x_return_status,
527: x_msg_count,
591:
592:
593: end;
594:
595: end lns_terms_pub_w;