1: package body okl_setupcgrparameters_pvt_w as
2: /* $Header: OKLESCMB.pls 120.1 2005/07/12 09:08:48 dkagrawa 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:
41: , p0_a8 NUMBER := 0-1962.0724
42: )
43:
44: as
45: ddp_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
46: ddx_no_data_found boolean;
47: ddx_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
48: ddindx binary_integer; indx binary_integer;
49: begin
43:
44: as
45: ddp_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
46: ddx_no_data_found boolean;
47: ddx_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
48: ddindx binary_integer; indx binary_integer;
49: begin
50:
51: -- copy data to the local IN or IN-OUT args, if any
62:
63:
64:
65: -- here's the delegated call to the old PL/SQL routine
66: okl_setupcgrparameters_pvt.get_rec(ddp_cgmv_rec,
67: x_return_status,
68: ddx_no_data_found,
69: ddx_cgmv_rec);
70:
114: , p5_a8 NUMBER := 0-1962.0724
115: )
116:
117: as
118: ddp_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
119: ddx_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
120: ddindx binary_integer; indx binary_integer;
121: begin
122:
115: )
116:
117: as
118: ddp_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
119: ddx_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
120: ddindx binary_integer; indx binary_integer;
121: begin
122:
123: -- copy data to the local IN or IN-OUT args, if any
137: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
138:
139:
140: -- here's the delegated call to the old PL/SQL routine
141: okl_setupcgrparameters_pvt.insert_cgrparameters(p_api_version,
142: p_init_msg_list,
143: x_return_status,
144: x_msg_count,
145: x_msg_data,
189: , p5_a8 NUMBER := 0-1962.0724
190: )
191:
192: as
193: ddp_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
194: ddx_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
195: ddindx binary_integer; indx binary_integer;
196: begin
197:
190: )
191:
192: as
193: ddp_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
194: ddx_cgmv_rec okl_setupcgrparameters_pvt.cgmv_rec_type;
195: ddindx binary_integer; indx binary_integer;
196: begin
197:
198: -- copy data to the local IN or IN-OUT args, if any
212: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
213:
214:
215: -- here's the delegated call to the old PL/SQL routine
216: okl_setupcgrparameters_pvt.update_cgrparameters(p_api_version,
217: p_init_msg_list,
218: x_return_status,
219: x_msg_count,
220: x_msg_data,
255: , p5_a8 JTF_NUMBER_TABLE
256: )
257:
258: as
259: ddp_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
260: ddindx binary_integer; indx binary_integer;
261: begin
262:
263: -- copy data to the local IN or IN-OUT args, if any
277: , p5_a8
278: );
279:
280: -- here's the delegated call to the old PL/SQL routine
281: okl_setupcgrparameters_pvt.delete_cgrparameters(p_api_version,
282: p_init_msg_list,
283: x_return_status,
284: x_msg_count,
285: x_msg_data,
318: , p6_a8 out nocopy JTF_NUMBER_TABLE
319: )
320:
321: as
322: ddp_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
323: ddx_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
324: ddindx binary_integer; indx binary_integer;
325: begin
326:
319: )
320:
321: as
322: ddp_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
323: ddx_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
324: ddindx binary_integer; indx binary_integer;
325: begin
326:
327: -- copy data to the local IN or IN-OUT args, if any
342: );
343:
344:
345: -- here's the delegated call to the old PL/SQL routine
346: okl_setupcgrparameters_pvt.insert_cgrparameters(p_api_version,
347: p_init_msg_list,
348: x_return_status,
349: x_msg_count,
350: x_msg_data,
395: , p6_a8 out nocopy JTF_NUMBER_TABLE
396: )
397:
398: as
399: ddp_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
400: ddx_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
401: ddindx binary_integer; indx binary_integer;
402: begin
403:
396: )
397:
398: as
399: ddp_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
400: ddx_cgmv_tbl okl_setupcgrparameters_pvt.cgmv_tbl_type;
401: ddindx binary_integer; indx binary_integer;
402: begin
403:
404: -- copy data to the local IN or IN-OUT args, if any
419: );
420:
421:
422: -- here's the delegated call to the old PL/SQL routine
423: okl_setupcgrparameters_pvt.update_cgrparameters(p_api_version,
424: p_init_msg_list,
425: x_return_status,
426: x_msg_count,
427: x_msg_data,
446: , p6_a8
447: );
448: end;
449:
450: end okl_setupcgrparameters_pvt_w;