1: package body okl_setupcgrparameters_pub_w as
2: /* $Header: OKLUSCMB.pls 120.1 2005/07/18 16:13:22 viselvar noship $ */
3: rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4: rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5:
42: , p0_a8 NUMBER := 0-1962.0724
43: )
44:
45: as
46: ddp_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
47: ddx_no_data_found boolean;
48: ddx_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
49: ddindx binary_integer; indx binary_integer;
50: begin
44:
45: as
46: ddp_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
47: ddx_no_data_found boolean;
48: ddx_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
49: ddindx binary_integer; indx binary_integer;
50: begin
51:
52: -- copy data to the local IN or IN-OUT args, if any
64:
65:
66:
67: -- here's the delegated call to the old PL/SQL routine
68: okl_setupcgrparameters_pub.get_rec(ddp_cgmv_rec,
69: x_return_status,
70: x_msg_data,
71: ddx_no_data_found,
72: ddx_cgmv_rec);
118: , p5_a8 NUMBER := 0-1962.0724
119: )
120:
121: as
122: ddp_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
123: ddx_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
124: ddindx binary_integer; indx binary_integer;
125: begin
126:
119: )
120:
121: as
122: ddp_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
123: ddx_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
124: ddindx binary_integer; indx binary_integer;
125: begin
126:
127: -- copy data to the local IN or IN-OUT args, if any
141: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
142:
143:
144: -- here's the delegated call to the old PL/SQL routine
145: okl_setupcgrparameters_pub.insert_cgrparameters(p_api_version,
146: p_init_msg_list,
147: x_return_status,
148: x_msg_count,
149: x_msg_data,
193: , p5_a8 NUMBER := 0-1962.0724
194: )
195:
196: as
197: ddp_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
198: ddx_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
199: ddindx binary_integer; indx binary_integer;
200: begin
201:
194: )
195:
196: as
197: ddp_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
198: ddx_cgmv_rec okl_setupcgrparameters_pub.cgmv_rec_type;
199: ddindx binary_integer; indx binary_integer;
200: begin
201:
202: -- copy data to the local IN or IN-OUT args, if any
216: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
217:
218:
219: -- here's the delegated call to the old PL/SQL routine
220: okl_setupcgrparameters_pub.update_cgrparameters(p_api_version,
221: p_init_msg_list,
222: x_return_status,
223: x_msg_count,
224: x_msg_data,
259: , p5_a8 JTF_NUMBER_TABLE
260: )
261:
262: as
263: ddp_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
264: ddindx binary_integer; indx binary_integer;
265: begin
266:
267: -- copy data to the local IN or IN-OUT args, if any
281: , p5_a8
282: );
283:
284: -- here's the delegated call to the old PL/SQL routine
285: okl_setupcgrparameters_pub.delete_cgrparameters(p_api_version,
286: p_init_msg_list,
287: x_return_status,
288: x_msg_count,
289: x_msg_data,
322: , p6_a8 out nocopy JTF_NUMBER_TABLE
323: )
324:
325: as
326: ddp_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
327: ddx_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
328: ddindx binary_integer; indx binary_integer;
329: begin
330:
323: )
324:
325: as
326: ddp_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
327: ddx_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
328: ddindx binary_integer; indx binary_integer;
329: begin
330:
331: -- copy data to the local IN or IN-OUT args, if any
346: );
347:
348:
349: -- here's the delegated call to the old PL/SQL routine
350: okl_setupcgrparameters_pub.insert_cgrparameters(p_api_version,
351: p_init_msg_list,
352: x_return_status,
353: x_msg_count,
354: x_msg_data,
399: , p6_a8 out nocopy JTF_NUMBER_TABLE
400: )
401:
402: as
403: ddp_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
404: ddx_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
405: ddindx binary_integer; indx binary_integer;
406: begin
407:
400: )
401:
402: as
403: ddp_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
404: ddx_cgmv_tbl okl_setupcgrparameters_pub.cgmv_tbl_type;
405: ddindx binary_integer; indx binary_integer;
406: begin
407:
408: -- copy data to the local IN or IN-OUT args, if any
423: );
424:
425:
426: -- here's the delegated call to the old PL/SQL routine
427: okl_setupcgrparameters_pub.update_cgrparameters(p_api_version,
428: p_init_msg_list,
429: x_return_status,
430: x_msg_count,
431: x_msg_data,
450: , p6_a8
451: );
452: end;
453:
454: end okl_setupcgrparameters_pub_w;