6: ------------------------------------------------------------------------------
7: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_XPRT_XRULE_VALUES_PVT';
8: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
9:
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_MODULE CONSTANT VARCHAR2(250) := 'okc.plsql.'||g_pkg_name||'.';
12: G_APPLICATION_ID CONSTANT NUMBER :=510; -- OKC Application
13:
14: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
53:
54: BEGIN
55:
56: -- start debug log
57: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
58: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
59: G_MODULE||l_api_name,
60: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
61: END IF;
54: BEGIN
55:
56: -- start debug log
57: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
58: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
59: G_MODULE||l_api_name,
60: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
61: END IF;
62:
81: END IF;
82:
83: -- Log all Variable values in the Pl/sql table
84:
85: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
86: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
87: G_MODULE||l_api_name,
88: '110: All System Variables before removing Null values and Not_null values');
89: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
82:
83: -- Log all Variable values in the Pl/sql table
84:
85: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
86: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
87: G_MODULE||l_api_name,
88: '110: All System Variables before removing Null values and Not_null values');
89: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
90: G_MODULE||l_api_name,
85: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
86: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
87: G_MODULE||l_api_name,
88: '110: All System Variables before removing Null values and Not_null values');
89: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
90: G_MODULE||l_api_name,
91: '110: Variable name '||' ' ||'Variable value');
92: FOR i IN l_sys_var_value_tbl.first..l_sys_var_value_tbl.last LOOP
93: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
89: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
90: G_MODULE||l_api_name,
91: '110: Variable name '||' ' ||'Variable value');
92: FOR i IN l_sys_var_value_tbl.first..l_sys_var_value_tbl.last LOOP
93: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
94: l_sys_var_value_tbl(i).variable_code ||' '||
95: l_sys_var_value_tbl(i).variable_value_id);
96: END LOOP;
97: END IF;*/
111: -- l_sys_var_value_tbl(i).variable_value_id will always be NULL if the
112: -- document type is 'REPOSITORY'
113:
114: -- Log all Variable values in the Pl/sql table
115: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
116: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
117: G_MODULE||l_api_name,
118: '140: All system variables ');
119: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
112: -- document type is 'REPOSITORY'
113:
114: -- Log all Variable values in the Pl/sql table
115: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
116: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
117: G_MODULE||l_api_name,
118: '140: All system variables ');
119: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
120: G_MODULE||l_api_name,
115: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
116: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
117: G_MODULE||l_api_name,
118: '140: All system variables ');
119: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
120: G_MODULE||l_api_name,
121: '140: Variable name '||' ' ||'Variable value');
122: IF (x_sys_var_value_tbl.count <> 0) THEN -- For Bug# 6833184
123: FOR i IN x_sys_var_value_tbl.first..x_sys_var_value_tbl.last LOOP
120: G_MODULE||l_api_name,
121: '140: Variable name '||' ' ||'Variable value');
122: IF (x_sys_var_value_tbl.count <> 0) THEN -- For Bug# 6833184
123: FOR i IN x_sys_var_value_tbl.first..x_sys_var_value_tbl.last LOOP
124: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
125: x_sys_var_value_tbl(i).variable_code ||' '||
126: substr(x_sys_var_value_tbl(i).variable_value_id,1,100));
127: END LOOP;
128: END IF; -- For Bug# 6833184
129: END IF;
130:
131:
132: -- end debug log
133: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
135: G_MODULE||l_api_name,
136: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
137: END IF;
130:
131:
132: -- end debug log
133: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
135: G_MODULE||l_api_name,
136: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
137: END IF;
138:
139:
140: EXCEPTION
141:
142: WHEN FND_API.G_EXC_ERROR THEN
143: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
144: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
145: G_MODULE||l_api_name,
146: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
147: END IF;
140: EXCEPTION
141:
142: WHEN FND_API.G_EXC_ERROR THEN
143: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
144: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
145: G_MODULE||l_api_name,
146: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
147: END IF;
148:
149: x_return_status := G_RET_STS_ERROR ;
150: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
151:
152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
153: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
154: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
155: G_MODULE||l_api_name,
156: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
157: END IF;
150: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
151:
152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
153: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
154: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
155: G_MODULE||l_api_name,
156: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
157: END IF;
158:
159: x_return_status := G_RET_STS_UNEXP_ERROR ;
160: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
161:
162: WHEN OTHERS THEN
163: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
164: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
165: G_MODULE||l_api_name,
166: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
167: END IF;
160: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
161:
162: WHEN OTHERS THEN
163: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
164: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
165: G_MODULE||l_api_name,
166: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
167: END IF;
168:
264:
265: BEGIN
266:
267: -- start debug log
268: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
269: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
270: G_MODULE||l_api_name,
271: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
272: END IF;
265: BEGIN
266:
267: -- start debug log
268: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
269: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
270: G_MODULE||l_api_name,
271: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
272: END IF;
273:
319: END IF;
320: END IF;
321:
322: -- Log all Variable values in the Pl/sql table
323: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
324: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
325: G_MODULE||l_api_name,
326: '110: No. of Lines: '|| x_line_count);
327:
320: END IF;
321:
322: -- Log all Variable values in the Pl/sql table
323: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
324: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
325: G_MODULE||l_api_name,
326: '110: No. of Lines: '|| x_line_count);
327:
328: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
324: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
325: G_MODULE||l_api_name,
326: '110: No. of Lines: '|| x_line_count);
327:
328: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
329: G_MODULE||l_api_name,
330: '120: Line Number'||' ' ||
331: 'Variable Name '||' ' ||
332: 'Variable Value '||' ' ||
333: 'Item Id'||' ' ||
334: 'Org Id');
335: IF x_line_sys_var_value_tbl.COUNT > 0 THEN
336: FOR i IN x_line_sys_var_value_tbl.FIRST..x_line_sys_var_value_tbl.LAST LOOP
337: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
338: x_line_sys_var_value_tbl(i).line_number ||' '||
339: x_line_sys_var_value_tbl(i).variable_code ||' '||
340: x_line_sys_var_value_tbl(i).variable_value ||' '||
341: x_line_sys_var_value_tbl(i).item_id ||' '||
344: END IF;
345: END IF;
346:
347: -- end debug log
348: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
349: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
350: G_MODULE||l_api_name,
351: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
352: END IF;
345: END IF;
346:
347: -- end debug log
348: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
349: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
350: G_MODULE||l_api_name,
351: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
352: END IF;
353:
354: EXCEPTION
355:
356:
357: WHEN FND_API.G_EXC_ERROR THEN
358: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
359: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
360: G_MODULE||l_api_name,
361: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
362: END IF;
355:
356:
357: WHEN FND_API.G_EXC_ERROR THEN
358: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
359: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
360: G_MODULE||l_api_name,
361: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
362: END IF;
363:
364: x_return_status := G_RET_STS_ERROR ;
365: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
366:
367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
368: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
369: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
370: G_MODULE||l_api_name,
371: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
372: END IF;
365: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
366:
367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
368: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
369: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
370: G_MODULE||l_api_name,
371: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
372: END IF;
373:
374: x_return_status := G_RET_STS_UNEXP_ERROR ;
375: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
376:
377: WHEN OTHERS THEN
378: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
379: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
380: G_MODULE||l_api_name,
381: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
382: END IF;
375: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
376:
377: WHEN OTHERS THEN
378: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
379: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
380: G_MODULE||l_api_name,
381: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
382: END IF;
383:
478:
479: BEGIN
480:
481: -- start debug log
482: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
483: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
484: G_MODULE||l_api_name,
485: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
486: END IF;
479: BEGIN
480:
481: -- start debug log
482: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
483: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
484: G_MODULE||l_api_name,
485: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
486: END IF;
487:
492: CLOSE csr_get_udf_variables;
493:
494:
495: -- Log all User Defined Variable values in the Pl/sql table
496: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
497: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
498: G_MODULE||l_api_name,
499: '110: User Defined Variable name '||' ' ||'User Defined Variable value');
500: FOR i IN x_udf_var_value_tbl.first..x_udf_var_value_tbl.last LOOP
493:
494:
495: -- Log all User Defined Variable values in the Pl/sql table
496: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
497: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
498: G_MODULE||l_api_name,
499: '110: User Defined Variable name '||' ' ||'User Defined Variable value');
500: FOR i IN x_udf_var_value_tbl.first..x_udf_var_value_tbl.last LOOP
501: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
497: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
498: G_MODULE||l_api_name,
499: '110: User Defined Variable name '||' ' ||'User Defined Variable value');
500: FOR i IN x_udf_var_value_tbl.first..x_udf_var_value_tbl.last LOOP
501: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
502: x_udf_var_value_tbl(i).variable_code ||' '||
503: x_udf_var_value_tbl(i).variable_value_id);
504: END LOOP;
505: END IF;*/
504: END LOOP;
505: END IF;*/
506:
507: -- end debug log
508: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
509: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
510: G_MODULE||l_api_name,
511: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
512: END IF;
505: END IF;*/
506:
507: -- end debug log
508: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
509: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
510: G_MODULE||l_api_name,
511: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
512: END IF;
513:
514: EXCEPTION
515:
516:
517: WHEN FND_API.G_EXC_ERROR THEN
518: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
519: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
520: G_MODULE||l_api_name,
521: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
522: END IF;
515:
516:
517: WHEN FND_API.G_EXC_ERROR THEN
518: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
519: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
520: G_MODULE||l_api_name,
521: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
522: END IF;
523:
524: x_return_status := G_RET_STS_ERROR ;
525: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
526:
527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
528: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
529: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
530: G_MODULE||l_api_name,
531: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
532: END IF;
525: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
526:
527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
528: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
529: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
530: G_MODULE||l_api_name,
531: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
532: END IF;
533:
534: x_return_status := G_RET_STS_UNEXP_ERROR ;
535: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
536:
537: WHEN OTHERS THEN
538: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
539: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
540: G_MODULE||l_api_name,
541: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
542: END IF;
535: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
536:
537: WHEN OTHERS THEN
538: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
539: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
540: G_MODULE||l_api_name,
541: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
542: END IF;
543:
585:
586: BEGIN
587:
588: -- start debug log
589: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
590: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
591: G_MODULE||l_api_name,
592: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
593: END IF;
586: BEGIN
587:
588: -- start debug log
589: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
590: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
591: G_MODULE||l_api_name,
592: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
593: END IF;
594:
599: FETCH csr_constants BULK COLLECT INTO x_constant_tbl;
600: CLOSE csr_constants;
601:
602: -- Log all Variable values in the Pl/sql table
603: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
604: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
605: G_MODULE||l_api_name,
606: '110: Constant name '||' ' ||'Constant value');
607: FOR i IN x_constant_tbl.first..x_constant_tbl.last LOOP
600: CLOSE csr_constants;
601:
602: -- Log all Variable values in the Pl/sql table
603: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
604: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
605: G_MODULE||l_api_name,
606: '110: Constant name '||' ' ||'Constant value');
607: FOR i IN x_constant_tbl.first..x_constant_tbl.last LOOP
608: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
604: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
605: G_MODULE||l_api_name,
606: '110: Constant name '||' ' ||'Constant value');
607: FOR i IN x_constant_tbl.first..x_constant_tbl.last LOOP
608: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
609: x_constant_tbl(i).constant_id ||' '||
610: x_constant_tbl(i).value);
611: END LOOP;
612: END IF;*/
611: END LOOP;
612: END IF;*/
613:
614: -- end debug log
615: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
616: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
617: G_MODULE||l_api_name,
618: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
619: END IF;
612: END IF;*/
613:
614: -- end debug log
615: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
616: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
617: G_MODULE||l_api_name,
618: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
619: END IF;
620:
620:
621: EXCEPTION
622:
623: WHEN FND_API.G_EXC_ERROR THEN
624: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
625: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
626: G_MODULE||l_api_name,
627: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
628: END IF;
621: EXCEPTION
622:
623: WHEN FND_API.G_EXC_ERROR THEN
624: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
625: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
626: G_MODULE||l_api_name,
627: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
628: END IF;
629:
630: x_return_status := G_RET_STS_ERROR ;
631: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
632:
633: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
634: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
636: G_MODULE||l_api_name,
637: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
638: END IF;
631: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
632:
633: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
634: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
636: G_MODULE||l_api_name,
637: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
638: END IF;
639:
640: x_return_status := G_RET_STS_UNEXP_ERROR ;
641: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
642:
643: WHEN OTHERS THEN
644: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
645: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
646: G_MODULE||l_api_name,
647: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
648: END IF;
641: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
642:
643: WHEN OTHERS THEN
644: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
645: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
646: G_MODULE||l_api_name,
647: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
648: END IF;
649:
759:
760: BEGIN
761:
762: -- start debug log
763: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
764: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
765: G_MODULE||l_api_name,
766: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
767: END IF;
760: BEGIN
761:
762: -- start debug log
763: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
764: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
765: G_MODULE||l_api_name,
766: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
767: END IF;
768:
819: '); END;';
820:
821: -- execute the dynamic sql
822: -- start debug log
823: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
824: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
825: G_MODULE||l_api_name,
826: '105: l_sql_stmt '|| l_sql_stmt);
827: END IF;
820:
821: -- execute the dynamic sql
822: -- start debug log
823: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
824: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
825: G_MODULE||l_api_name,
826: '105: l_sql_stmt '|| l_sql_stmt);
827: END IF;
828:
861: END LOOP;
862:
863:
864: -- Log all User Defined Variable values in the Pl/sql table
865: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
866: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
867: G_MODULE||l_api_name,
868: '110: User Defined Variable name '||' ' ||'User Defined Variable value');
869: FOR i IN x_udf_var_value_tbl.first..x_udf_var_value_tbl.last LOOP
862:
863:
864: -- Log all User Defined Variable values in the Pl/sql table
865: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
866: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
867: G_MODULE||l_api_name,
868: '110: User Defined Variable name '||' ' ||'User Defined Variable value');
869: FOR i IN x_udf_var_value_tbl.first..x_udf_var_value_tbl.last LOOP
870: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
866: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
867: G_MODULE||l_api_name,
868: '110: User Defined Variable name '||' ' ||'User Defined Variable value');
869: FOR i IN x_udf_var_value_tbl.first..x_udf_var_value_tbl.last LOOP
870: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
871: x_udf_var_value_tbl(i).variable_code ||' '||
872: x_udf_var_value_tbl(i).variable_value_id);
873: END LOOP;
874: END IF;*/
873: END LOOP;
874: END IF;*/
875:
876: -- end debug log
877: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
878: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
879: G_MODULE||l_api_name,
880: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
881: END IF;
874: END IF;*/
875:
876: -- end debug log
877: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
878: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
879: G_MODULE||l_api_name,
880: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
881: END IF;
882:
883: EXCEPTION
884:
885:
886: WHEN FND_API.G_EXC_ERROR THEN
887: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
888: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
889: G_MODULE||l_api_name,
890: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
891: END IF;
884:
885:
886: WHEN FND_API.G_EXC_ERROR THEN
887: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
888: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
889: G_MODULE||l_api_name,
890: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
891: END IF;
892:
893: x_return_status := G_RET_STS_ERROR ;
894: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
895:
896: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
897: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
898: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
899: G_MODULE||l_api_name,
900: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
901: END IF;
894: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
895:
896: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
897: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
898: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
899: G_MODULE||l_api_name,
900: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
901: END IF;
902:
903: x_return_status := G_RET_STS_UNEXP_ERROR ;
904: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
905:
906: WHEN OTHERS THEN
907: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
908: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
909: G_MODULE||l_api_name,
910: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
911: END IF;
904: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
905:
906: WHEN OTHERS THEN
907: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
908: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
909: G_MODULE||l_api_name,
910: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
911: END IF;
912:
970:
971:
972: BEGIN
973: -- start debug log
974: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
975: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
976: G_MODULE||l_api_name,
977: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
978: END IF;
971:
972: BEGIN
973: -- start debug log
974: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
975: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
976: G_MODULE||l_api_name,
977: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
978: END IF;
979:
1014: RAISE FND_API.G_EXC_ERROR;
1015: END IF;
1016:
1017: -- start debug log
1018: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1019: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1020: G_MODULE||l_api_name,
1021: '110: Finished Step1 - Get Header level document variabels');
1022: END IF;
1015: END IF;
1016:
1017: -- start debug log
1018: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1019: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1020: G_MODULE||l_api_name,
1021: '110: Finished Step1 - Get Header level document variabels');
1022: END IF;
1023:
1029: p_org_id => l_org_id);
1030:
1031:
1032: -- start debug log
1033: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1034: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1035: G_MODULE||l_api_name,
1036: '120: Finished Step2 - Check for Line level rules');
1037: END IF;
1030:
1031:
1032: -- start debug log
1033: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1034: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1035: G_MODULE||l_api_name,
1036: '120: Finished Step2 - Check for Line level rules');
1037: END IF;
1038:
1059: RAISE FND_API.G_EXC_ERROR;
1060: END IF;
1061:
1062: -- start debug log
1063: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1064: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1065: G_MODULE||l_api_name,
1066: '130: Finished Step3. Line level rules flag is Y. After calling get_line_system_variables');
1067: END IF;
1060: END IF;
1061:
1062: -- start debug log
1063: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1064: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1065: G_MODULE||l_api_name,
1066: '130: Finished Step3. Line level rules flag is Y. After calling get_line_system_variables');
1067: END IF;
1068:
1120: x_line_count := 1; -- Since no Lines, need to set line count to 1 for the CX Java code
1121: x_line_variables_count := 0; -- Since no Lines, need to set line variables count to 0 for the CX Java code
1122:
1123: -- start debug log
1124: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1125: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1126: G_MODULE||l_api_name,
1127: '140: Finished Step3. Line level rules flag is N. After calling OKC_TERMS_UTIL_GRP.get_item_dtl_for_expert');
1128: END IF;
1121: x_line_variables_count := 0; -- Since no Lines, need to set line variables count to 0 for the CX Java code
1122:
1123: -- start debug log
1124: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1125: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1126: G_MODULE||l_api_name,
1127: '140: Finished Step3. Line level rules flag is N. After calling OKC_TERMS_UTIL_GRP.get_item_dtl_for_expert');
1128: END IF;
1129:
1150: RAISE FND_API.G_EXC_ERROR;
1151: END IF;
1152:
1153: -- start debug log
1154: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1155: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1156: G_MODULE||l_api_name,
1157: '150: Finished Step4 - Get User Defined variabels');
1158: END IF;
1151: END IF;
1152:
1153: -- start debug log
1154: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1155: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1156: G_MODULE||l_api_name,
1157: '150: Finished Step4 - Get User Defined variabels');
1158: END IF;
1159:
1177: RAISE FND_API.G_EXC_ERROR;
1178: END IF;
1179:
1180: -- start debug log
1181: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1182: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1183: G_MODULE||l_api_name,
1184: '150: Finished Step4 - Get User Defined variabels');
1185: END IF;
1178: END IF;
1179:
1180: -- start debug log
1181: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1182: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1183: G_MODULE||l_api_name,
1184: '150: Finished Step4 - Get User Defined variabels');
1185: END IF;
1186:
1201: RAISE FND_API.G_EXC_ERROR;
1202: END IF;
1203:
1204: -- start debug log
1205: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1206: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1207: G_MODULE||l_api_name,
1208: '160: Finished Step5 - Get Constant values');
1209: END IF;
1202: END IF;
1203:
1204: -- start debug log
1205: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1206: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1207: G_MODULE||l_api_name,
1208: '160: Finished Step5 - Get Constant values');
1209: END IF;
1210:
1219: END LOOP;
1220: END IF;
1221:
1222: -- start debug log
1223: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1224: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1225: G_MODULE||l_api_name,
1226: '161: Finished adding system variable values');
1227: END IF;
1220: END IF;
1221:
1222: -- start debug log
1223: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1224: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1225: G_MODULE||l_api_name,
1226: '161: Finished adding system variable values');
1227: END IF;
1228:
1237: end loop;
1238: END IF;
1239:
1240: -- start debug log
1241: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1242: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1243: G_MODULE||l_api_name,
1244: '162: Finished adding constant values');
1245: END IF;
1238: END IF;
1239:
1240: -- start debug log
1241: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1242: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1243: G_MODULE||l_api_name,
1244: '162: Finished adding constant values');
1245: END IF;
1246:
1267: END IF;
1268: -- End: Added for UDV with Procedures enhancement
1269:
1270: -- start debug log
1271: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1272: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1273: G_MODULE||l_api_name,
1274: '163: Finished adding User defined variable values');
1275: END IF;
1268: -- End: Added for UDV with Procedures enhancement
1269:
1270: -- start debug log
1271: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1272: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1273: G_MODULE||l_api_name,
1274: '163: Finished adding User defined variable values');
1275: END IF;
1276:
1274: '163: Finished adding User defined variable values');
1275: END IF;
1276:
1277: -- Log all Variable values in the Pl/sql table
1278: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1279: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1280: G_MODULE||l_api_name,
1281: '170: Finished Step6 - Consolidate all variabels');
1282:
1275: END IF;
1276:
1277: -- Log all Variable values in the Pl/sql table
1278: /*IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1279: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1280: G_MODULE||l_api_name,
1281: '170: Finished Step6 - Consolidate all variabels');
1282:
1283: -- Print All Header Variables
1280: G_MODULE||l_api_name,
1281: '170: Finished Step6 - Consolidate all variabels');
1282:
1283: -- Print All Header Variables
1284: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1285: G_MODULE||l_api_name,
1286: '180: All Header variables ');
1287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1288: G_MODULE||l_api_name,
1283: -- Print All Header Variables
1284: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1285: G_MODULE||l_api_name,
1286: '180: All Header variables ');
1287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1288: G_MODULE||l_api_name,
1289: '190: Variable name '||' ' ||'Variable value');
1290: FOR i IN x_hdr_var_value_tbl.first..x_hdr_var_value_tbl.last LOOP
1291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
1287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1288: G_MODULE||l_api_name,
1289: '190: Variable name '||' ' ||'Variable value');
1290: FOR i IN x_hdr_var_value_tbl.first..x_hdr_var_value_tbl.last LOOP
1291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
1292: x_hdr_var_value_tbl(i).variable_code ||' '||
1293: x_hdr_var_value_tbl(i).variable_value_id);
1294: END LOOP;
1295:
1293: x_hdr_var_value_tbl(i).variable_value_id);
1294: END LOOP;
1295:
1296: -- Print All Line Variables
1297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1298: G_MODULE||l_api_name,
1299: '200: All Line variables ');
1300: IF (l_line_level_rules_flag = 'Y')
1301: FOR i IN x_line_sysvar_value_tbl.FIRST..x_line_sysvar_value_tbl.LAST LOOP
1299: '200: All Line variables ');
1300: IF (l_line_level_rules_flag = 'Y')
1301: FOR i IN x_line_sysvar_value_tbl.FIRST..x_line_sysvar_value_tbl.LAST LOOP
1302:
1303: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1304: G_MODULE||l_api_name,
1305: '210: Line Number'||' ' ||
1306: 'Variable Name '||' ' ||
1307: 'Variable Value '||' ' ||
1307: 'Variable Value '||' ' ||
1308: 'Item Id'||' ' ||
1309: 'Org Id');
1310:
1311: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
1312: x_line_sysvar_value_tbl(i).line_number ||' '||
1313: x_line_sysvar_value_tbl(i).variable_code ||' '||
1314: x_line_sysvar_value_tbl(i).variable_value ||' '||
1315: x_line_sysvar_value_tbl(i).item_id ||' '||
1317: END LOOP;
1318: END IF;
1319:
1320: -- Print Line count
1321: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1322: G_MODULE||l_api_name,
1323: '220: No. of Lines: '|| x_line_count);
1324:
1325:
1325:
1326: END IF;*/
1327:
1328: -- end debug log
1329: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1330: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1331: G_MODULE||l_api_name,
1332: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1333: END IF;
1326: END IF;*/
1327:
1328: -- end debug log
1329: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1330: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1331: G_MODULE||l_api_name,
1332: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1333: END IF;
1334:
1335: EXCEPTION
1336:
1337:
1338: WHEN FND_API.G_EXC_ERROR THEN
1339: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1340: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1341: G_MODULE||l_api_name,
1342: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1343: END IF;
1336:
1337:
1338: WHEN FND_API.G_EXC_ERROR THEN
1339: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1340: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1341: G_MODULE||l_api_name,
1342: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1343: END IF;
1344:
1345: x_return_status := G_RET_STS_ERROR ;
1346: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1347:
1348: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1349: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1350: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1351: G_MODULE||l_api_name,
1352: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1353: END IF;
1346: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1347:
1348: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1349: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1350: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1351: G_MODULE||l_api_name,
1352: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1353: END IF;
1354:
1355: x_return_status := G_RET_STS_UNEXP_ERROR ;
1356: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1357:
1358: WHEN OTHERS THEN
1359: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1360: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1361: G_MODULE||l_api_name,
1362: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1363: END IF;
1356: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1357:
1358: WHEN OTHERS THEN
1359: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1360: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1361: G_MODULE||l_api_name,
1362: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1363: END IF;
1364: