[Home] [Help]
PACKAGE BODY: APPS.IBE_MSITE_GRP_W
Source
1 package body ibe_msite_grp_w as
2 /* $Header: IBEGRMSB.pls 120.1 2005/06/13 11:24 appldev $ */
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
6 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure rosetta_table_copy_in_p7(t out nocopy ibe_msite_grp.msite_currencies_tbl_type, a0 JTF_VARCHAR2_TABLE_100
23 , a1 JTF_NUMBER_TABLE
24 , a2 JTF_NUMBER_TABLE
25 , a3 JTF_NUMBER_TABLE
26 , a4 JTF_NUMBER_TABLE
27 , a5 JTF_VARCHAR2_TABLE_100
28 , a6 JTF_NUMBER_TABLE
29 , a7 JTF_NUMBER_TABLE
30 ) as
31 ddindx binary_integer; indx binary_integer;
32 begin
33 if a0 is not null and a0.count > 0 then
34 if a0.count > 0 then
35 indx := a0.first;
36 ddindx := 1;
37 while true loop
38 t(ddindx).currency_code := a0(indx);
39 t(ddindx).walkin_prc_lst_id := rosetta_g_miss_num_map(a1(indx));
40 t(ddindx).registered_prc_lst_id := rosetta_g_miss_num_map(a2(indx));
41 t(ddindx).biz_partner_prc_lst_id := rosetta_g_miss_num_map(a3(indx));
42 t(ddindx).orderable_limit := rosetta_g_miss_num_map(a4(indx));
43 t(ddindx).default_flag := a5(indx);
44 t(ddindx).payment_threshold := rosetta_g_miss_num_map(a6(indx));
45 t(ddindx).partner_prc_lst_id := rosetta_g_miss_num_map(a7(indx));
46 ddindx := ddindx+1;
47 if a0.last =indx
48 then exit;
49 end if;
50 indx := a0.next(indx);
51 end loop;
52 end if;
53 end if;
54 end rosetta_table_copy_in_p7;
55 procedure rosetta_table_copy_out_p7(t ibe_msite_grp.msite_currencies_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
56 , a1 out nocopy JTF_NUMBER_TABLE
57 , a2 out nocopy JTF_NUMBER_TABLE
58 , a3 out nocopy JTF_NUMBER_TABLE
59 , a4 out nocopy JTF_NUMBER_TABLE
60 , a5 out nocopy JTF_VARCHAR2_TABLE_100
61 , a6 out nocopy JTF_NUMBER_TABLE
62 , a7 out nocopy JTF_NUMBER_TABLE
63 ) as
64 ddindx binary_integer; indx binary_integer;
65 begin
66 if t is null or t.count = 0 then
67 a0 := JTF_VARCHAR2_TABLE_100();
68 a1 := JTF_NUMBER_TABLE();
69 a2 := JTF_NUMBER_TABLE();
70 a3 := JTF_NUMBER_TABLE();
71 a4 := JTF_NUMBER_TABLE();
72 a5 := JTF_VARCHAR2_TABLE_100();
73 a6 := JTF_NUMBER_TABLE();
74 a7 := JTF_NUMBER_TABLE();
75 else
76 a0 := JTF_VARCHAR2_TABLE_100();
77 a1 := JTF_NUMBER_TABLE();
78 a2 := JTF_NUMBER_TABLE();
79 a3 := JTF_NUMBER_TABLE();
80 a4 := JTF_NUMBER_TABLE();
81 a5 := JTF_VARCHAR2_TABLE_100();
82 a6 := JTF_NUMBER_TABLE();
83 a7 := JTF_NUMBER_TABLE();
84 if t.count > 0 then
85 a0.extend(t.count);
86 a1.extend(t.count);
87 a2.extend(t.count);
88 a3.extend(t.count);
89 a4.extend(t.count);
90 a5.extend(t.count);
91 a6.extend(t.count);
92 a7.extend(t.count);
93 ddindx := t.first;
94 indx := 1;
95 while true loop
96 a0(indx) := t(ddindx).currency_code;
97 a1(indx) := rosetta_g_miss_num_map(t(ddindx).walkin_prc_lst_id);
98 a2(indx) := rosetta_g_miss_num_map(t(ddindx).registered_prc_lst_id);
99 a3(indx) := rosetta_g_miss_num_map(t(ddindx).biz_partner_prc_lst_id);
100 a4(indx) := rosetta_g_miss_num_map(t(ddindx).orderable_limit);
101 a5(indx) := t(ddindx).default_flag;
102 a6(indx) := rosetta_g_miss_num_map(t(ddindx).payment_threshold);
103 a7(indx) := rosetta_g_miss_num_map(t(ddindx).partner_prc_lst_id);
104 indx := indx+1;
105 if t.last =ddindx
106 then exit;
107 end if;
108 ddindx := t.next(ddindx);
109 end loop;
110 end if;
111 end if;
112 end rosetta_table_copy_out_p7;
113
114 procedure rosetta_table_copy_in_p8(t out nocopy ibe_msite_grp.msite_languages_tbl_type, a0 JTF_VARCHAR2_TABLE_100
115 , a1 JTF_VARCHAR2_TABLE_100
116 , a2 JTF_VARCHAR2_TABLE_100
117 ) as
118 ddindx binary_integer; indx binary_integer;
119 begin
120 if a0 is not null and a0.count > 0 then
121 if a0.count > 0 then
122 indx := a0.first;
123 ddindx := 1;
124 while true loop
125 t(ddindx).language_code := a0(indx);
126 t(ddindx).default_flag := a1(indx);
127 t(ddindx).enable_flag := a2(indx);
128 ddindx := ddindx+1;
129 if a0.last =indx
130 then exit;
131 end if;
132 indx := a0.next(indx);
133 end loop;
134 end if;
135 end if;
136 end rosetta_table_copy_in_p8;
137 procedure rosetta_table_copy_out_p8(t ibe_msite_grp.msite_languages_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
138 , a1 out nocopy JTF_VARCHAR2_TABLE_100
139 , a2 out nocopy JTF_VARCHAR2_TABLE_100
140 ) as
141 ddindx binary_integer; indx binary_integer;
142 begin
143 if t is null or t.count = 0 then
144 a0 := JTF_VARCHAR2_TABLE_100();
145 a1 := JTF_VARCHAR2_TABLE_100();
146 a2 := JTF_VARCHAR2_TABLE_100();
147 else
148 a0 := JTF_VARCHAR2_TABLE_100();
149 a1 := JTF_VARCHAR2_TABLE_100();
150 a2 := JTF_VARCHAR2_TABLE_100();
151 if t.count > 0 then
152 a0.extend(t.count);
153 a1.extend(t.count);
154 a2.extend(t.count);
155 ddindx := t.first;
156 indx := 1;
157 while true loop
158 a0(indx) := t(ddindx).language_code;
159 a1(indx) := t(ddindx).default_flag;
160 a2(indx) := t(ddindx).enable_flag;
161 indx := indx+1;
162 if t.last =ddindx
163 then exit;
164 end if;
165 ddindx := t.next(ddindx);
166 end loop;
167 end if;
168 end if;
169 end rosetta_table_copy_out_p8;
170
171 procedure rosetta_table_copy_in_p9(t out nocopy ibe_msite_grp.msite_orgids_tbl_type, a0 JTF_NUMBER_TABLE
172 , a1 JTF_VARCHAR2_TABLE_100
173 ) as
174 ddindx binary_integer; indx binary_integer;
175 begin
176 if a0 is not null and a0.count > 0 then
177 if a0.count > 0 then
178 indx := a0.first;
179 ddindx := 1;
180 while true loop
181 t(ddindx).orgid := rosetta_g_miss_num_map(a0(indx));
182 t(ddindx).default_flag := a1(indx);
183 ddindx := ddindx+1;
184 if a0.last =indx
185 then exit;
186 end if;
187 indx := a0.next(indx);
188 end loop;
189 end if;
190 end if;
191 end rosetta_table_copy_in_p9;
192 procedure rosetta_table_copy_out_p9(t ibe_msite_grp.msite_orgids_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
193 , a1 out nocopy JTF_VARCHAR2_TABLE_100
194 ) as
195 ddindx binary_integer; indx binary_integer;
196 begin
197 if t is null or t.count = 0 then
198 a0 := JTF_NUMBER_TABLE();
199 a1 := JTF_VARCHAR2_TABLE_100();
200 else
201 a0 := JTF_NUMBER_TABLE();
202 a1 := JTF_VARCHAR2_TABLE_100();
203 if t.count > 0 then
204 a0.extend(t.count);
205 a1.extend(t.count);
206 ddindx := t.first;
207 indx := 1;
208 while true loop
209 a0(indx) := rosetta_g_miss_num_map(t(ddindx).orgid);
210 a1(indx) := t(ddindx).default_flag;
211 indx := indx+1;
212 if t.last =ddindx
213 then exit;
214 end if;
215 ddindx := t.next(ddindx);
216 end loop;
217 end if;
218 end if;
219 end rosetta_table_copy_out_p9;
220
221 procedure rosetta_table_copy_in_p10(t out nocopy ibe_msite_grp.msite_delete_tbl_type, a0 JTF_NUMBER_TABLE
222 , a1 JTF_NUMBER_TABLE
223 ) as
224 ddindx binary_integer; indx binary_integer;
225 begin
226 if a0 is not null and a0.count > 0 then
227 if a0.count > 0 then
228 indx := a0.first;
229 ddindx := 1;
230 while true loop
231 t(ddindx).msite_id := rosetta_g_miss_num_map(a0(indx));
232 t(ddindx).object_version_number := rosetta_g_miss_num_map(a1(indx));
233 ddindx := ddindx+1;
234 if a0.last =indx
235 then exit;
236 end if;
237 indx := a0.next(indx);
238 end loop;
239 end if;
240 end if;
241 end rosetta_table_copy_in_p10;
242 procedure rosetta_table_copy_out_p10(t ibe_msite_grp.msite_delete_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
243 , a1 out nocopy JTF_NUMBER_TABLE
244 ) as
245 ddindx binary_integer; indx binary_integer;
246 begin
247 if t is null or t.count = 0 then
248 a0 := JTF_NUMBER_TABLE();
249 a1 := JTF_NUMBER_TABLE();
250 else
251 a0 := JTF_NUMBER_TABLE();
252 a1 := JTF_NUMBER_TABLE();
253 if t.count > 0 then
254 a0.extend(t.count);
255 a1.extend(t.count);
256 ddindx := t.first;
257 indx := 1;
258 while true loop
259 a0(indx) := rosetta_g_miss_num_map(t(ddindx).msite_id);
260 a1(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
261 indx := indx+1;
262 if t.last =ddindx
263 then exit;
264 end if;
265 ddindx := t.next(ddindx);
266 end loop;
267 end if;
268 end if;
269 end rosetta_table_copy_out_p10;
270
271 procedure rosetta_table_copy_in_p11(t out nocopy ibe_msite_grp.msite_prtyids_tbl_type, a0 JTF_NUMBER_TABLE) as
272 ddindx binary_integer; indx binary_integer;
273 begin
274 if a0 is not null and a0.count > 0 then
275 if a0.count > 0 then
276 indx := a0.first;
277 ddindx := 1;
278 while true loop
279 t(ddindx) := rosetta_g_miss_num_map(a0(indx));
280 ddindx := ddindx+1;
281 if a0.last =indx
282 then exit;
283 end if;
284 indx := a0.next(indx);
285 end loop;
286 end if;
287 end if;
288 end rosetta_table_copy_in_p11;
289 procedure rosetta_table_copy_out_p11(t ibe_msite_grp.msite_prtyids_tbl_type, a0 out nocopy JTF_NUMBER_TABLE) as
290 ddindx binary_integer; indx binary_integer;
291 begin
292 if t is null or t.count = 0 then
293 a0 := JTF_NUMBER_TABLE();
294 else
295 a0 := JTF_NUMBER_TABLE();
296 if t.count > 0 then
297 a0.extend(t.count);
298 ddindx := t.first;
299 indx := 1;
300 while true loop
301 a0(indx) := rosetta_g_miss_num_map(t(ddindx));
302 indx := indx+1;
303 if t.last =ddindx
304 then exit;
305 end if;
306 ddindx := t.next(ddindx);
307 end loop;
308 end if;
309 end if;
310 end rosetta_table_copy_out_p11;
311
312 procedure delete_msite(p_api_version NUMBER
313 , p_init_msg_list VARCHAR2
314 , p_commit VARCHAR2
315 , x_return_status out nocopy VARCHAR2
316 , x_msg_count out nocopy NUMBER
317 , x_msg_data out nocopy VARCHAR2
318 , p6_a0 JTF_NUMBER_TABLE
319 , p6_a1 JTF_NUMBER_TABLE
320 )
321
322 as
323 ddp_msite_id_tbl ibe_msite_grp.msite_delete_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
328
329
330
331
332
333
334 ibe_msite_grp_w.rosetta_table_copy_in_p10(ddp_msite_id_tbl, p6_a0
335 , p6_a1
336 );
337
338 -- here's the delegated call to the old PL/SQL routine
339 ibe_msite_grp.delete_msite(p_api_version,
340 p_init_msg_list,
341 p_commit,
342 x_return_status,
343 x_msg_count,
344 x_msg_data,
345 ddp_msite_id_tbl);
346
347 -- copy data back from the local variables to OUT or IN-OUT args, if any
348
349
350
351
352
353
354 end;
355
356 procedure save_msite(p_api_version NUMBER
357 , p_init_msg_list VARCHAR2
358 , p_commit VARCHAR2
359 , x_return_status out nocopy VARCHAR2
360 , x_msg_count out nocopy NUMBER
361 , x_msg_data out nocopy VARCHAR2
362 , p6_a0 in out nocopy NUMBER
363 , p6_a1 in out nocopy NUMBER
364 , p6_a2 in out nocopy VARCHAR2
365 , p6_a3 in out nocopy VARCHAR2
366 , p6_a4 in out nocopy NUMBER
367 , p6_a5 in out nocopy VARCHAR2
368 , p6_a6 in out nocopy VARCHAR2
369 , p6_a7 in out nocopy VARCHAR2
370 , p6_a8 in out nocopy VARCHAR2
371 , p6_a9 in out nocopy NUMBER
372 , p6_a10 in out nocopy VARCHAR2
373 , p6_a11 in out nocopy VARCHAR2
374 , p6_a12 in out nocopy VARCHAR2
375 , p6_a13 in out nocopy VARCHAR2
376 , p6_a14 in out nocopy DATE
377 , p6_a15 in out nocopy DATE
378 , p6_a16 in out nocopy VARCHAR2
379 , p6_a17 in out nocopy NUMBER
380 , p6_a18 in out nocopy VARCHAR2
381 , p6_a19 in out nocopy VARCHAR2
382 , p6_a20 in out nocopy VARCHAR2
383 , p6_a21 in out nocopy VARCHAR2
384 , p6_a22 in out nocopy VARCHAR2
385 )
386
387 as
388 ddp_msite_rec ibe_msite_grp.msite_rec_type;
389 ddindx binary_integer; indx binary_integer;
390 begin
391
392 -- copy data to the local IN or IN-OUT args, if any
393
394
395
396
397
398
399 ddp_msite_rec.msite_id := rosetta_g_miss_num_map(p6_a0);
400 ddp_msite_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
401 ddp_msite_rec.display_name := p6_a2;
402 ddp_msite_rec.description := p6_a3;
403 ddp_msite_rec.profile_id := rosetta_g_miss_num_map(p6_a4);
404 ddp_msite_rec.date_format := p6_a5;
405 ddp_msite_rec.walkin_allowed_code := p6_a6;
406 ddp_msite_rec.atp_check_flag := p6_a7;
407 ddp_msite_rec.msite_master_flag := p6_a8;
408 ddp_msite_rec.msite_root_section_id := rosetta_g_miss_num_map(p6_a9);
409 ddp_msite_rec.enable_for_store := p6_a10;
410 ddp_msite_rec.resp_access_flag := p6_a11;
411 ddp_msite_rec.party_access_code := p6_a12;
412 ddp_msite_rec.access_name := p6_a13;
413 ddp_msite_rec.start_date_active := rosetta_g_miss_date_in_map(p6_a14);
414 ddp_msite_rec.end_date_active := rosetta_g_miss_date_in_map(p6_a15);
415 ddp_msite_rec.url := p6_a16;
416 ddp_msite_rec.theme_id := rosetta_g_miss_num_map(p6_a17);
417 ddp_msite_rec.payment_threshold_enable_flag := p6_a18;
418 ddp_msite_rec.domain_name := p6_a19;
419 ddp_msite_rec.enable_traffic_filter := p6_a20;
420 ddp_msite_rec.reporting_status := p6_a21;
421 ddp_msite_rec.site_type := p6_a22;
422
423 -- here's the delegated call to the old PL/SQL routine
424 ibe_msite_grp.save_msite(p_api_version,
425 p_init_msg_list,
426 p_commit,
427 x_return_status,
428 x_msg_count,
429 x_msg_data,
430 ddp_msite_rec);
431
432 -- copy data back from the local variables to OUT or IN-OUT args, if any
433
434
435
436
437
438
439 p6_a0 := rosetta_g_miss_num_map(ddp_msite_rec.msite_id);
440 p6_a1 := rosetta_g_miss_num_map(ddp_msite_rec.object_version_number);
441 p6_a2 := ddp_msite_rec.display_name;
442 p6_a3 := ddp_msite_rec.description;
443 p6_a4 := rosetta_g_miss_num_map(ddp_msite_rec.profile_id);
444 p6_a5 := ddp_msite_rec.date_format;
445 p6_a6 := ddp_msite_rec.walkin_allowed_code;
446 p6_a7 := ddp_msite_rec.atp_check_flag;
447 p6_a8 := ddp_msite_rec.msite_master_flag;
448 p6_a9 := rosetta_g_miss_num_map(ddp_msite_rec.msite_root_section_id);
449 p6_a10 := ddp_msite_rec.enable_for_store;
450 p6_a11 := ddp_msite_rec.resp_access_flag;
451 p6_a12 := ddp_msite_rec.party_access_code;
452 p6_a13 := ddp_msite_rec.access_name;
453 p6_a14 := ddp_msite_rec.start_date_active;
454 p6_a15 := ddp_msite_rec.end_date_active;
455 p6_a16 := ddp_msite_rec.url;
456 p6_a17 := rosetta_g_miss_num_map(ddp_msite_rec.theme_id);
457 p6_a18 := ddp_msite_rec.payment_threshold_enable_flag;
458 p6_a19 := ddp_msite_rec.domain_name;
459 p6_a20 := ddp_msite_rec.enable_traffic_filter;
460 p6_a21 := ddp_msite_rec.reporting_status;
461 p6_a22 := ddp_msite_rec.site_type;
462 end;
463
464 procedure duplicate_msite(p_api_version NUMBER
465 , p_init_msg_list VARCHAR2
466 , p_commit VARCHAR2
467 , p_default_language_code VARCHAR2
468 , p_default_currency_code VARCHAR2
469 , p_walkin_pricing_id NUMBER
470 , x_minisite_id out nocopy NUMBER
471 , x_version_number out nocopy NUMBER
472 , x_return_status out nocopy VARCHAR2
473 , x_msg_count out nocopy NUMBER
474 , x_msg_data out nocopy VARCHAR2
475 , p11_a0 in out nocopy NUMBER
476 , p11_a1 in out nocopy NUMBER
477 , p11_a2 in out nocopy VARCHAR2
478 , p11_a3 in out nocopy VARCHAR2
479 , p11_a4 in out nocopy NUMBER
480 , p11_a5 in out nocopy VARCHAR2
481 , p11_a6 in out nocopy VARCHAR2
482 , p11_a7 in out nocopy VARCHAR2
483 , p11_a8 in out nocopy VARCHAR2
484 , p11_a9 in out nocopy NUMBER
485 , p11_a10 in out nocopy VARCHAR2
486 , p11_a11 in out nocopy VARCHAR2
487 , p11_a12 in out nocopy VARCHAR2
488 , p11_a13 in out nocopy VARCHAR2
489 , p11_a14 in out nocopy DATE
490 , p11_a15 in out nocopy DATE
491 , p11_a16 in out nocopy VARCHAR2
492 , p11_a17 in out nocopy NUMBER
493 , p11_a18 in out nocopy VARCHAR2
494 , p11_a19 in out nocopy VARCHAR2
495 , p11_a20 in out nocopy VARCHAR2
496 , p11_a21 in out nocopy VARCHAR2
497 , p11_a22 in out nocopy VARCHAR2
498 )
499
500 as
501 ddp_msite_rec ibe_msite_grp.msite_rec_type;
502 ddindx binary_integer; indx binary_integer;
503 begin
504
505 -- copy data to the local IN or IN-OUT args, if any
506
507
508
509
510
511
512
513
514
515
516
517 ddp_msite_rec.msite_id := rosetta_g_miss_num_map(p11_a0);
518 ddp_msite_rec.object_version_number := rosetta_g_miss_num_map(p11_a1);
519 ddp_msite_rec.display_name := p11_a2;
520 ddp_msite_rec.description := p11_a3;
521 ddp_msite_rec.profile_id := rosetta_g_miss_num_map(p11_a4);
522 ddp_msite_rec.date_format := p11_a5;
523 ddp_msite_rec.walkin_allowed_code := p11_a6;
524 ddp_msite_rec.atp_check_flag := p11_a7;
525 ddp_msite_rec.msite_master_flag := p11_a8;
526 ddp_msite_rec.msite_root_section_id := rosetta_g_miss_num_map(p11_a9);
527 ddp_msite_rec.enable_for_store := p11_a10;
528 ddp_msite_rec.resp_access_flag := p11_a11;
529 ddp_msite_rec.party_access_code := p11_a12;
530 ddp_msite_rec.access_name := p11_a13;
531 ddp_msite_rec.start_date_active := rosetta_g_miss_date_in_map(p11_a14);
532 ddp_msite_rec.end_date_active := rosetta_g_miss_date_in_map(p11_a15);
533 ddp_msite_rec.url := p11_a16;
534 ddp_msite_rec.theme_id := rosetta_g_miss_num_map(p11_a17);
535 ddp_msite_rec.payment_threshold_enable_flag := p11_a18;
536 ddp_msite_rec.domain_name := p11_a19;
537 ddp_msite_rec.enable_traffic_filter := p11_a20;
538 ddp_msite_rec.reporting_status := p11_a21;
539 ddp_msite_rec.site_type := p11_a22;
540
541 -- here's the delegated call to the old PL/SQL routine
542 ibe_msite_grp.duplicate_msite(p_api_version,
543 p_init_msg_list,
544 p_commit,
545 p_default_language_code,
546 p_default_currency_code,
547 p_walkin_pricing_id,
548 x_minisite_id,
549 x_version_number,
550 x_return_status,
551 x_msg_count,
552 x_msg_data,
553 ddp_msite_rec);
554
555 -- copy data back from the local variables to OUT or IN-OUT args, if any
556
557
558
559
560
561
562
563
564
565
566
567 p11_a0 := rosetta_g_miss_num_map(ddp_msite_rec.msite_id);
568 p11_a1 := rosetta_g_miss_num_map(ddp_msite_rec.object_version_number);
569 p11_a2 := ddp_msite_rec.display_name;
570 p11_a3 := ddp_msite_rec.description;
571 p11_a4 := rosetta_g_miss_num_map(ddp_msite_rec.profile_id);
572 p11_a5 := ddp_msite_rec.date_format;
573 p11_a6 := ddp_msite_rec.walkin_allowed_code;
574 p11_a7 := ddp_msite_rec.atp_check_flag;
575 p11_a8 := ddp_msite_rec.msite_master_flag;
576 p11_a9 := rosetta_g_miss_num_map(ddp_msite_rec.msite_root_section_id);
577 p11_a10 := ddp_msite_rec.enable_for_store;
578 p11_a11 := ddp_msite_rec.resp_access_flag;
579 p11_a12 := ddp_msite_rec.party_access_code;
580 p11_a13 := ddp_msite_rec.access_name;
581 p11_a14 := ddp_msite_rec.start_date_active;
582 p11_a15 := ddp_msite_rec.end_date_active;
583 p11_a16 := ddp_msite_rec.url;
584 p11_a17 := rosetta_g_miss_num_map(ddp_msite_rec.theme_id);
585 p11_a18 := ddp_msite_rec.payment_threshold_enable_flag;
586 p11_a19 := ddp_msite_rec.domain_name;
587 p11_a20 := ddp_msite_rec.enable_traffic_filter;
588 p11_a21 := ddp_msite_rec.reporting_status;
589 p11_a22 := ddp_msite_rec.site_type;
590 end;
591
592 procedure save_msite_languages(p_api_version NUMBER
593 , p_init_msg_list VARCHAR2
594 , p_commit VARCHAR2
595 , x_return_status out nocopy VARCHAR2
596 , x_msg_count out nocopy NUMBER
597 , x_msg_data out nocopy VARCHAR2
598 , p_msite_id NUMBER
599 , p7_a0 JTF_VARCHAR2_TABLE_100
600 , p7_a1 JTF_VARCHAR2_TABLE_100
601 , p7_a2 JTF_VARCHAR2_TABLE_100
602 )
603
604 as
605 ddp_msite_languages_tbl ibe_msite_grp.msite_languages_tbl_type;
606 ddindx binary_integer; indx binary_integer;
607 begin
608
609 -- copy data to the local IN or IN-OUT args, if any
610
611
612
613
614
615
616
617 ibe_msite_grp_w.rosetta_table_copy_in_p8(ddp_msite_languages_tbl, p7_a0
618 , p7_a1
619 , p7_a2
620 );
621
622 -- here's the delegated call to the old PL/SQL routine
623 ibe_msite_grp.save_msite_languages(p_api_version,
624 p_init_msg_list,
625 p_commit,
626 x_return_status,
627 x_msg_count,
628 x_msg_data,
629 p_msite_id,
630 ddp_msite_languages_tbl);
631
632 -- copy data back from the local variables to OUT or IN-OUT args, if any
633
634
635
636
637
638
639
640 end;
641
642 procedure save_msite_currencies(p_api_version NUMBER
643 , p_init_msg_list VARCHAR2
644 , p_commit VARCHAR2
645 , x_return_status out nocopy VARCHAR2
646 , x_msg_count out nocopy NUMBER
647 , x_msg_data out nocopy VARCHAR2
648 , p_msite_id NUMBER
649 , p7_a0 JTF_VARCHAR2_TABLE_100
650 , p7_a1 JTF_NUMBER_TABLE
651 , p7_a2 JTF_NUMBER_TABLE
652 , p7_a3 JTF_NUMBER_TABLE
653 , p7_a4 JTF_NUMBER_TABLE
654 , p7_a5 JTF_VARCHAR2_TABLE_100
655 , p7_a6 JTF_NUMBER_TABLE
656 , p7_a7 JTF_NUMBER_TABLE
657 )
658
659 as
660 ddp_msite_currencies_tbl ibe_msite_grp.msite_currencies_tbl_type;
661 ddindx binary_integer; indx binary_integer;
662 begin
663
664 -- copy data to the local IN or IN-OUT args, if any
665
666
667
668
669
670
671
672 ibe_msite_grp_w.rosetta_table_copy_in_p7(ddp_msite_currencies_tbl, p7_a0
673 , p7_a1
674 , p7_a2
675 , p7_a3
676 , p7_a4
677 , p7_a5
678 , p7_a6
679 , p7_a7
680 );
681
682 -- here's the delegated call to the old PL/SQL routine
683 ibe_msite_grp.save_msite_currencies(p_api_version,
684 p_init_msg_list,
685 p_commit,
686 x_return_status,
687 x_msg_count,
688 x_msg_data,
689 p_msite_id,
690 ddp_msite_currencies_tbl);
691
692 -- copy data back from the local variables to OUT or IN-OUT args, if any
693
694
695
696
697
698
699
700 end;
701
702 procedure save_msite_orgids(p_api_version NUMBER
703 , p_init_msg_list VARCHAR2
704 , p_commit VARCHAR2
705 , x_return_status out nocopy VARCHAR2
706 , x_msg_count out nocopy NUMBER
707 , x_msg_data out nocopy VARCHAR2
708 , p_msite_id NUMBER
709 , p7_a0 JTF_NUMBER_TABLE
710 , p7_a1 JTF_VARCHAR2_TABLE_100
711 )
712
713 as
714 ddp_msite_orgids_tbl ibe_msite_grp.msite_orgids_tbl_type;
715 ddindx binary_integer; indx binary_integer;
716 begin
717
718 -- copy data to the local IN or IN-OUT args, if any
719
720
721
722
723
724
725
726 ibe_msite_grp_w.rosetta_table_copy_in_p9(ddp_msite_orgids_tbl, p7_a0
727 , p7_a1
728 );
729
730 -- here's the delegated call to the old PL/SQL routine
731 ibe_msite_grp.save_msite_orgids(p_api_version,
732 p_init_msg_list,
733 p_commit,
734 x_return_status,
735 x_msg_count,
736 x_msg_data,
737 p_msite_id,
738 ddp_msite_orgids_tbl);
739
740 -- copy data back from the local variables to OUT or IN-OUT args, if any
741
742
743
744
745
746
747
748 end;
749
750 procedure insert_row(x_rowid in out nocopy VARCHAR2
751 , x_msite_id NUMBER
752 , x_attribute_category VARCHAR2
753 , x_attribute1 VARCHAR2
754 , x_attribute2 VARCHAR2
755 , x_attribute3 VARCHAR2
756 , x_attribute4 VARCHAR2
757 , x_attribute5 VARCHAR2
758 , x_attribute6 VARCHAR2
759 , x_attribute7 VARCHAR2
760 , x_attribute8 VARCHAR2
761 , x_attribute9 VARCHAR2
762 , x_attribute11 VARCHAR2
763 , x_attribute10 VARCHAR2
764 , x_attribute12 VARCHAR2
765 , x_attribute13 VARCHAR2
766 , x_attribute14 VARCHAR2
767 , x_attribute15 VARCHAR2
768 , x_object_version_number NUMBER
769 , x_store_id NUMBER
770 , x_start_date_active date
771 , x_end_date_active date
772 , x_default_language_code VARCHAR2
773 , x_default_currency_code VARCHAR2
774 , x_default_date_format VARCHAR2
775 , x_default_org_id NUMBER
776 , x_atp_check_flag VARCHAR2
777 , x_walkin_allowed_flag VARCHAR2
778 , x_msite_root_section_id NUMBER
779 , x_profile_id NUMBER
780 , x_master_msite_flag VARCHAR2
781 , x_msite_name VARCHAR2
782 , x_msite_description VARCHAR2
783 , x_creation_date date
784 , x_created_by NUMBER
785 , x_last_update_date date
786 , x_last_updated_by NUMBER
787 , x_last_update_login NUMBER
788 , x_resp_access_flag VARCHAR2
789 , x_party_access_code VARCHAR2
790 , x_access_name VARCHAR2
791 , x_url VARCHAR2
792 , x_theme_id NUMBER
793 , x_payment_thresh_enable_flag VARCHAR2
794 , x_domain_name VARCHAR2
795 , x_enable_traffic_filter VARCHAR2
796 , x_reporting_status VARCHAR2
797 , x_site_type VARCHAR2
798 )
799
800 as
801 ddx_start_date_active date;
802 ddx_end_date_active date;
803 ddx_creation_date date;
804 ddx_last_update_date date;
805 ddindx binary_integer; indx binary_integer;
806 begin
807
808 -- copy data to the local IN or IN-OUT args, if any
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829 ddx_start_date_active := rosetta_g_miss_date_in_map(x_start_date_active);
830
831 ddx_end_date_active := rosetta_g_miss_date_in_map(x_end_date_active);
832
833
834
835
836
837
838
839
840
841
842
843
844 ddx_creation_date := rosetta_g_miss_date_in_map(x_creation_date);
845
846
847 ddx_last_update_date := rosetta_g_miss_date_in_map(x_last_update_date);
848
849
850
851
852
853
854
855
856
857
858
859
860
861 -- here's the delegated call to the old PL/SQL routine
862 ibe_msite_grp.insert_row(x_rowid,
863 x_msite_id,
864 x_attribute_category,
865 x_attribute1,
866 x_attribute2,
867 x_attribute3,
868 x_attribute4,
869 x_attribute5,
870 x_attribute6,
871 x_attribute7,
872 x_attribute8,
873 x_attribute9,
874 x_attribute11,
875 x_attribute10,
876 x_attribute12,
877 x_attribute13,
878 x_attribute14,
879 x_attribute15,
880 x_object_version_number,
881 x_store_id,
882 ddx_start_date_active,
883 ddx_end_date_active,
884 x_default_language_code,
885 x_default_currency_code,
886 x_default_date_format,
887 x_default_org_id,
888 x_atp_check_flag,
889 x_walkin_allowed_flag,
890 x_msite_root_section_id,
891 x_profile_id,
892 x_master_msite_flag,
893 x_msite_name,
894 x_msite_description,
895 ddx_creation_date,
896 x_created_by,
897 ddx_last_update_date,
898 x_last_updated_by,
899 x_last_update_login,
900 x_resp_access_flag,
901 x_party_access_code,
902 x_access_name,
903 x_url,
904 x_theme_id,
905 x_payment_thresh_enable_flag,
906 x_domain_name,
907 x_enable_traffic_filter,
908 x_reporting_status,
909 x_site_type);
910
911 -- copy data back from the local variables to OUT or IN-OUT args, if any
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959 end;
960
961 procedure lock_row(x_msite_id NUMBER
962 , x_attribute_category VARCHAR2
963 , x_attribute1 VARCHAR2
964 , x_attribute2 VARCHAR2
965 , x_attribute3 VARCHAR2
966 , x_attribute4 VARCHAR2
967 , x_attribute5 VARCHAR2
968 , x_attribute6 VARCHAR2
969 , x_attribute7 VARCHAR2
970 , x_attribute8 VARCHAR2
971 , x_attribute9 VARCHAR2
972 , x_attribute11 VARCHAR2
973 , x_attribute10 VARCHAR2
974 , x_attribute12 VARCHAR2
975 , x_attribute13 VARCHAR2
976 , x_attribute14 VARCHAR2
977 , x_attribute15 VARCHAR2
978 , x_object_version_number NUMBER
979 , x_store_id NUMBER
980 , x_start_date_active date
981 , x_end_date_active date
982 , x_default_language_code VARCHAR2
983 , x_default_currency_code VARCHAR2
984 , x_default_date_format VARCHAR2
985 , x_default_org_id NUMBER
986 , x_atp_check_flag VARCHAR2
987 , x_walkin_allowed_flag VARCHAR2
988 , x_msite_root_section_id NUMBER
989 , x_profile_id NUMBER
990 , x_master_msite_flag VARCHAR2
991 , x_msite_name VARCHAR2
992 , x_msite_description VARCHAR2
993 , x_resp_access_flag VARCHAR2
994 , x_party_access_code VARCHAR2
995 , x_access_name VARCHAR2
996 , x_url VARCHAR2
997 , x_theme_id NUMBER
998 , x_payment_thresh_enable_flag VARCHAR2
999 , x_domain_name VARCHAR2
1000 , x_enable_traffic_filter VARCHAR2
1001 , x_reporting_status VARCHAR2
1002 , x_site_type VARCHAR2
1003 )
1004
1005 as
1006 ddx_start_date_active date;
1007 ddx_end_date_active date;
1008 ddindx binary_integer; indx binary_integer;
1009 begin
1010
1011 -- copy data to the local IN or IN-OUT args, if any
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031 ddx_start_date_active := rosetta_g_miss_date_in_map(x_start_date_active);
1032
1033 ddx_end_date_active := rosetta_g_miss_date_in_map(x_end_date_active);
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056 -- here's the delegated call to the old PL/SQL routine
1057 ibe_msite_grp.lock_row(x_msite_id,
1058 x_attribute_category,
1059 x_attribute1,
1060 x_attribute2,
1061 x_attribute3,
1062 x_attribute4,
1063 x_attribute5,
1064 x_attribute6,
1065 x_attribute7,
1066 x_attribute8,
1067 x_attribute9,
1068 x_attribute11,
1069 x_attribute10,
1070 x_attribute12,
1071 x_attribute13,
1072 x_attribute14,
1073 x_attribute15,
1074 x_object_version_number,
1075 x_store_id,
1076 ddx_start_date_active,
1077 ddx_end_date_active,
1078 x_default_language_code,
1079 x_default_currency_code,
1080 x_default_date_format,
1081 x_default_org_id,
1082 x_atp_check_flag,
1083 x_walkin_allowed_flag,
1084 x_msite_root_section_id,
1085 x_profile_id,
1086 x_master_msite_flag,
1087 x_msite_name,
1088 x_msite_description,
1089 x_resp_access_flag,
1090 x_party_access_code,
1091 x_access_name,
1092 x_url,
1093 x_theme_id,
1094 x_payment_thresh_enable_flag,
1095 x_domain_name,
1096 x_enable_traffic_filter,
1097 x_reporting_status,
1098 x_site_type);
1099
1100 -- copy data back from the local variables to OUT or IN-OUT args, if any
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142 end;
1143
1144 procedure update_row(x_msite_id NUMBER
1145 , x_attribute_category VARCHAR2
1146 , x_attribute1 VARCHAR2
1147 , x_attribute2 VARCHAR2
1148 , x_attribute3 VARCHAR2
1149 , x_attribute4 VARCHAR2
1150 , x_attribute5 VARCHAR2
1151 , x_attribute6 VARCHAR2
1152 , x_attribute7 VARCHAR2
1153 , x_attribute8 VARCHAR2
1154 , x_attribute9 VARCHAR2
1155 , x_attribute11 VARCHAR2
1156 , x_attribute10 VARCHAR2
1157 , x_attribute12 VARCHAR2
1158 , x_attribute13 VARCHAR2
1159 , x_attribute14 VARCHAR2
1160 , x_attribute15 VARCHAR2
1161 , x_object_version_number NUMBER
1162 , x_store_id NUMBER
1163 , x_start_date_active date
1164 , x_end_date_active date
1165 , x_default_language_code VARCHAR2
1166 , x_default_currency_code VARCHAR2
1167 , x_default_date_format VARCHAR2
1168 , x_default_org_id NUMBER
1169 , x_atp_check_flag VARCHAR2
1170 , x_walkin_allowed_flag VARCHAR2
1171 , x_msite_root_section_id NUMBER
1172 , x_profile_id NUMBER
1173 , x_master_msite_flag VARCHAR2
1174 , x_msite_name VARCHAR2
1175 , x_msite_description VARCHAR2
1176 , x_last_update_date date
1177 , x_last_updated_by NUMBER
1178 , x_last_update_login NUMBER
1179 , x_resp_access_flag VARCHAR2
1180 , x_party_access_code VARCHAR2
1181 , x_access_name VARCHAR2
1182 , x_url VARCHAR2
1183 , x_theme_id NUMBER
1184 , x_payment_thresh_enable_flag VARCHAR2
1185 , x_domain_name VARCHAR2
1186 , x_enable_traffic_filter VARCHAR2
1187 , x_reporting_status VARCHAR2
1188 , x_site_type VARCHAR2
1189 )
1190
1191 as
1192 ddx_start_date_active date;
1193 ddx_end_date_active date;
1194 ddx_last_update_date date;
1195 ddindx binary_integer; indx binary_integer;
1196 begin
1197
1198 -- copy data to the local IN or IN-OUT args, if any
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218 ddx_start_date_active := rosetta_g_miss_date_in_map(x_start_date_active);
1219
1220 ddx_end_date_active := rosetta_g_miss_date_in_map(x_end_date_active);
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233 ddx_last_update_date := rosetta_g_miss_date_in_map(x_last_update_date);
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247 -- here's the delegated call to the old PL/SQL routine
1248 ibe_msite_grp.update_row(x_msite_id,
1249 x_attribute_category,
1250 x_attribute1,
1251 x_attribute2,
1252 x_attribute3,
1253 x_attribute4,
1254 x_attribute5,
1255 x_attribute6,
1256 x_attribute7,
1257 x_attribute8,
1258 x_attribute9,
1259 x_attribute11,
1260 x_attribute10,
1261 x_attribute12,
1262 x_attribute13,
1263 x_attribute14,
1264 x_attribute15,
1265 x_object_version_number,
1266 x_store_id,
1267 ddx_start_date_active,
1268 ddx_end_date_active,
1269 x_default_language_code,
1270 x_default_currency_code,
1271 x_default_date_format,
1272 x_default_org_id,
1273 x_atp_check_flag,
1274 x_walkin_allowed_flag,
1275 x_msite_root_section_id,
1276 x_profile_id,
1277 x_master_msite_flag,
1278 x_msite_name,
1279 x_msite_description,
1280 ddx_last_update_date,
1281 x_last_updated_by,
1282 x_last_update_login,
1283 x_resp_access_flag,
1284 x_party_access_code,
1285 x_access_name,
1286 x_url,
1287 x_theme_id,
1288 x_payment_thresh_enable_flag,
1289 x_domain_name,
1290 x_enable_traffic_filter,
1291 x_reporting_status,
1292 x_site_type);
1293
1294 -- copy data back from the local variables to OUT or IN-OUT args, if any
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339 end;
1340
1341 procedure load_row(x_msite_id NUMBER
1342 , x_owner VARCHAR2
1343 , x_attribute_category VARCHAR2
1344 , x_attribute1 VARCHAR2
1345 , x_attribute2 VARCHAR2
1346 , x_attribute3 VARCHAR2
1347 , x_attribute4 VARCHAR2
1348 , x_attribute5 VARCHAR2
1349 , x_attribute6 VARCHAR2
1350 , x_attribute7 VARCHAR2
1351 , x_attribute8 VARCHAR2
1352 , x_attribute9 VARCHAR2
1353 , x_attribute11 VARCHAR2
1354 , x_attribute10 VARCHAR2
1355 , x_attribute12 VARCHAR2
1356 , x_attribute13 VARCHAR2
1357 , x_attribute14 VARCHAR2
1358 , x_attribute15 VARCHAR2
1359 , x_object_version_number NUMBER
1360 , x_store_id NUMBER
1361 , x_start_date_active date
1362 , x_end_date_active date
1363 , x_default_language_code VARCHAR2
1364 , x_default_currency_code VARCHAR2
1365 , x_default_date_format VARCHAR2
1366 , x_default_org_id NUMBER
1367 , x_atp_check_flag VARCHAR2
1368 , x_walkin_allowed_flag VARCHAR2
1369 , x_msite_root_section_id NUMBER
1370 , x_profile_id NUMBER
1371 , x_master_msite_flag VARCHAR2
1372 , x_msite_name VARCHAR2
1373 , x_msite_description VARCHAR2
1374 , x_resp_access_flag VARCHAR2
1375 , x_party_access_code VARCHAR2
1376 , x_access_name VARCHAR2
1377 , x_url VARCHAR2
1378 , x_theme_id NUMBER
1379 , x_payment_thresh_enable_flag VARCHAR2
1380 , x_domain_name VARCHAR2
1381 , x_enable_traffic_filter VARCHAR2
1382 , x_reporting_status VARCHAR2
1383 , x_site_type VARCHAR2
1384 , x_last_update_date VARCHAR2
1385 , x_custom_mode VARCHAR2
1386 )
1387
1388 as
1389 ddx_start_date_active date;
1390 ddx_end_date_active date;
1391 ddindx binary_integer; indx binary_integer;
1392 begin
1393
1394 -- copy data to the local IN or IN-OUT args, if any
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415 ddx_start_date_active := rosetta_g_miss_date_in_map(x_start_date_active);
1416
1417 ddx_end_date_active := rosetta_g_miss_date_in_map(x_end_date_active);
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442 -- here's the delegated call to the old PL/SQL routine
1443 ibe_msite_grp.load_row(x_msite_id,
1444 x_owner,
1445 x_attribute_category,
1446 x_attribute1,
1447 x_attribute2,
1448 x_attribute3,
1449 x_attribute4,
1450 x_attribute5,
1451 x_attribute6,
1452 x_attribute7,
1453 x_attribute8,
1454 x_attribute9,
1455 x_attribute11,
1456 x_attribute10,
1457 x_attribute12,
1458 x_attribute13,
1459 x_attribute14,
1460 x_attribute15,
1461 x_object_version_number,
1462 x_store_id,
1463 ddx_start_date_active,
1464 ddx_end_date_active,
1465 x_default_language_code,
1466 x_default_currency_code,
1467 x_default_date_format,
1468 x_default_org_id,
1469 x_atp_check_flag,
1470 x_walkin_allowed_flag,
1471 x_msite_root_section_id,
1472 x_profile_id,
1473 x_master_msite_flag,
1474 x_msite_name,
1475 x_msite_description,
1476 x_resp_access_flag,
1477 x_party_access_code,
1478 x_access_name,
1479 x_url,
1480 x_theme_id,
1481 x_payment_thresh_enable_flag,
1482 x_domain_name,
1483 x_enable_traffic_filter,
1484 x_reporting_status,
1485 x_site_type,
1486 x_last_update_date,
1487 x_custom_mode);
1488
1489 -- copy data back from the local variables to OUT or IN-OUT args, if any
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534 end;
1535
1536 procedure load_seed_row(x_msite_id NUMBER
1537 , x_owner VARCHAR2
1538 , x_msite_name VARCHAR2
1539 , x_msite_description VARCHAR2
1540 , x_attribute_category VARCHAR2
1541 , x_attribute1 VARCHAR2
1542 , x_attribute2 VARCHAR2
1543 , x_attribute3 VARCHAR2
1544 , x_attribute4 VARCHAR2
1545 , x_attribute5 VARCHAR2
1546 , x_attribute6 VARCHAR2
1547 , x_attribute7 VARCHAR2
1548 , x_attribute8 VARCHAR2
1549 , x_attribute9 VARCHAR2
1550 , x_attribute10 VARCHAR2
1551 , x_attribute11 VARCHAR2
1552 , x_attribute12 VARCHAR2
1553 , x_attribute13 VARCHAR2
1554 , x_attribute14 VARCHAR2
1555 , x_attribute15 VARCHAR2
1556 , x_object_version_number NUMBER
1557 , x_store_id NUMBER
1558 , x_start_date_active date
1559 , x_end_date_active date
1560 , x_default_language_code VARCHAR2
1561 , x_default_currency_code VARCHAR2
1562 , x_default_date_format VARCHAR2
1563 , x_default_org_id NUMBER
1564 , x_atp_check_flag VARCHAR2
1565 , x_walkin_allowed_flag VARCHAR2
1566 , x_msite_root_section_id NUMBER
1567 , x_profile_id NUMBER
1568 , x_master_msite_flag VARCHAR2
1569 , x_resp_access_flag VARCHAR2
1570 , x_party_access_code VARCHAR2
1571 , x_access_name VARCHAR2
1572 , x_url VARCHAR2
1573 , x_theme_id VARCHAR2
1574 , x_payment_thresh_enable_flag VARCHAR2
1575 , x_domain_name VARCHAR2
1576 , x_enable_traffic_filter VARCHAR2
1577 , x_reporting_status VARCHAR2
1578 , x_site_type VARCHAR2
1579 , x_last_update_date VARCHAR2
1580 , x_custom_mode VARCHAR2
1581 , x_upload_mode VARCHAR2
1582 )
1583
1584 as
1585 ddx_start_date_active date;
1586 ddx_end_date_active date;
1587 ddindx binary_integer; indx binary_integer;
1588 begin
1589
1590 -- copy data to the local IN or IN-OUT args, if any
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613 ddx_start_date_active := rosetta_g_miss_date_in_map(x_start_date_active);
1614
1615 ddx_end_date_active := rosetta_g_miss_date_in_map(x_end_date_active);
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639 -- here's the delegated call to the old PL/SQL routine
1640 ibe_msite_grp.load_seed_row(x_msite_id,
1641 x_owner,
1642 x_msite_name,
1643 x_msite_description,
1644 x_attribute_category,
1645 x_attribute1,
1646 x_attribute2,
1647 x_attribute3,
1648 x_attribute4,
1649 x_attribute5,
1650 x_attribute6,
1651 x_attribute7,
1652 x_attribute8,
1653 x_attribute9,
1654 x_attribute10,
1655 x_attribute11,
1656 x_attribute12,
1657 x_attribute13,
1658 x_attribute14,
1659 x_attribute15,
1660 x_object_version_number,
1661 x_store_id,
1662 ddx_start_date_active,
1663 ddx_end_date_active,
1664 x_default_language_code,
1665 x_default_currency_code,
1666 x_default_date_format,
1667 x_default_org_id,
1668 x_atp_check_flag,
1669 x_walkin_allowed_flag,
1670 x_msite_root_section_id,
1671 x_profile_id,
1672 x_master_msite_flag,
1673 x_resp_access_flag,
1674 x_party_access_code,
1675 x_access_name,
1676 x_url,
1677 x_theme_id,
1678 x_payment_thresh_enable_flag,
1679 x_domain_name,
1680 x_enable_traffic_filter,
1681 x_reporting_status,
1682 x_site_type,
1683 x_last_update_date,
1684 x_custom_mode,
1685 x_upload_mode);
1686
1687 -- copy data back from the local variables to OUT or IN-OUT args, if any
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733 end;
1734
1735 end ibe_msite_grp_w;