[Home] [Help]
6: ------------------------------------------------------------------------------
7: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_XPRT_UTIL_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;
163:
164: BEGIN
165:
166: -- start debug log
167: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
168: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
169: G_MODULE||l_api_name,
170: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
171: END IF;
164: BEGIN
165:
166: -- start debug log
167: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
168: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
169: G_MODULE||l_api_name,
170: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
171: END IF;
172:
189: fnd_file.put_line(FND_FILE.LOG,' ');
190:
191:
192: -- write to debug log file
193: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
194: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
195: G_MODULE||l_api_name,
196: '110:Import Status ');
197: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
190:
191:
192: -- write to debug log file
193: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
194: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
195: G_MODULE||l_api_name,
196: '110:Import Status ');
197: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
198: G_MODULE||l_api_name,
193: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
194: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
195: G_MODULE||l_api_name,
196: '110:Import Status ');
197: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
198: G_MODULE||l_api_name,
199: '110:Imported : '||l_model);
200: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
201: G_MODULE||l_api_name,
196: '110:Import Status ');
197: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
198: G_MODULE||l_api_name,
199: '110:Imported : '||l_model);
200: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
201: G_MODULE||l_api_name,
202: '110: Run Id : '||p_run_id);
203: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
204: G_MODULE||l_api_name,
199: '110:Imported : '||l_model);
200: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
201: G_MODULE||l_api_name,
202: '110: Run Id : '||p_run_id);
203: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
204: G_MODULE||l_api_name,
205: '110:---------- CZ_DB_LOGS ----------------------------- ');
206: fnd_file.put_line(FND_FILE.LOG,'---------- CZ_DB_LOGS ----------------------------- ');
207:
216: fnd_file.put_line(FND_FILE.LOG,' ');
217: fnd_file.put_line(FND_FILE.LOG,' ');
218:
219: -- write to debug log file
220: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
221: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
222: G_MODULE||l_api_name,
223: '110: Logtime : '||csr_db_logs_rec.logtime);
224: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
217: fnd_file.put_line(FND_FILE.LOG,' ');
218:
219: -- write to debug log file
220: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
221: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
222: G_MODULE||l_api_name,
223: '110: Logtime : '||csr_db_logs_rec.logtime);
224: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
225: G_MODULE||l_api_name,
220: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
221: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
222: G_MODULE||l_api_name,
223: '110: Logtime : '||csr_db_logs_rec.logtime);
224: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
225: G_MODULE||l_api_name,
226: '110: Caller : '||csr_db_logs_rec.caller);
227: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
228: G_MODULE||l_api_name,
223: '110: Logtime : '||csr_db_logs_rec.logtime);
224: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
225: G_MODULE||l_api_name,
226: '110: Caller : '||csr_db_logs_rec.caller);
227: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
228: G_MODULE||l_api_name,
229: '110: Message : '||csr_db_logs_rec.message);
230: END IF;
231:
256: );
257: fnd_file.put_line(FND_FILE.LOG,'----------------------------------------------------------------');
258:
259: -- write to debug log file
260: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
261: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
262: G_MODULE||l_api_name,
263: '120:********** CZ_XFR_RUN_RESULTS ***************************** ');
264: END IF;
257: fnd_file.put_line(FND_FILE.LOG,'----------------------------------------------------------------');
258:
259: -- write to debug log file
260: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
261: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
262: G_MODULE||l_api_name,
263: '120:********** CZ_XFR_RUN_RESULTS ***************************** ');
264: END IF;
265:
287: */
288:
289:
290: -- write to debug log file
291: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
292: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
293: G_MODULE||l_api_name,
294: '120: *************** Record : '||l_rec_number||' **************');
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
288:
289:
290: -- write to debug log file
291: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
292: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
293: G_MODULE||l_api_name,
294: '120: *************** Record : '||l_rec_number||' **************');
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
296: G_MODULE||l_api_name,
291: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
292: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
293: G_MODULE||l_api_name,
294: '120: *************** Record : '||l_rec_number||' **************');
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
296: G_MODULE||l_api_name,
297: '120: Import Table : '||csr_xfr_run_results_rec.imp_table);
298: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
299: G_MODULE||l_api_name,
294: '120: *************** Record : '||l_rec_number||' **************');
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
296: G_MODULE||l_api_name,
297: '120: Import Table : '||csr_xfr_run_results_rec.imp_table);
298: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
299: G_MODULE||l_api_name,
300: '120: Disposition : '||csr_xfr_run_results_rec.disposition);
301: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
302: G_MODULE||l_api_name,
297: '120: Import Table : '||csr_xfr_run_results_rec.imp_table);
298: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
299: G_MODULE||l_api_name,
300: '120: Disposition : '||csr_xfr_run_results_rec.disposition);
301: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
302: G_MODULE||l_api_name,
303: '120: Record Status : '||csr_xfr_run_results_rec.rec_status);
304: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
305: G_MODULE||l_api_name,
300: '120: Disposition : '||csr_xfr_run_results_rec.disposition);
301: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
302: G_MODULE||l_api_name,
303: '120: Record Status : '||csr_xfr_run_results_rec.rec_status);
304: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
305: G_MODULE||l_api_name,
306: '120: Total Records : '||csr_xfr_run_results_rec.records);
307: END IF;
308:
348:
349: END IF; -- for Rule Import only
350:
351: -- end debug log
352: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
353: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
354: G_MODULE||l_api_name,
355: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
356: END IF;
349: END IF; -- for Rule Import only
350:
351: -- end debug log
352: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
353: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
354: G_MODULE||l_api_name,
355: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
356: END IF;
357:
356: END IF;
357:
358: EXCEPTION
359: WHEN FND_API.G_EXC_ERROR THEN
360: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
361: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
362: G_MODULE||l_api_name,
363: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
364: END IF;
357:
358: EXCEPTION
359: WHEN FND_API.G_EXC_ERROR THEN
360: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
361: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
362: G_MODULE||l_api_name,
363: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
364: END IF;
365:
366: x_return_status := G_RET_STS_ERROR ;
367: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
368:
369: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
370: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
371: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
372: G_MODULE||l_api_name,
373: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
374: END IF;
367: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
368:
369: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
370: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
371: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
372: G_MODULE||l_api_name,
373: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
374: END IF;
375:
376: x_return_status := G_RET_STS_UNEXP_ERROR ;
377: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
378:
379: WHEN OTHERS THEN
380: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
381: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
382: G_MODULE||l_api_name,
383: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
384: END IF;
377: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
378:
379: WHEN OTHERS THEN
380: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
381: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
382: G_MODULE||l_api_name,
383: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
384: END IF;
385:
583:
584: BEGIN
585:
586: -- start debug log
587: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
588: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
589: G_MODULE||l_api_name,
590: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
591: END IF;
584: BEGIN
585:
586: -- start debug log
587: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
588: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
589: G_MODULE||l_api_name,
590: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
591: END IF;
592:
615: END LOOP; -- all test publications
616:
617:
618: -- end debug log
619: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
620: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
621: G_MODULE||l_api_name,
622: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
623: END IF;
616:
617:
618: -- end debug log
619: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
620: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
621: G_MODULE||l_api_name,
622: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
623: END IF;
624:
624:
625:
626: EXCEPTION
627: WHEN FND_API.G_EXC_ERROR THEN
628: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
629: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
630: G_MODULE||l_api_name,
631: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
632: END IF;
625:
626: EXCEPTION
627: WHEN FND_API.G_EXC_ERROR THEN
628: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
629: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
630: G_MODULE||l_api_name,
631: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
632: END IF;
633:
634: x_return_status := G_RET_STS_ERROR ;
635: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
636:
637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
638: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
639: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
640: G_MODULE||l_api_name,
641: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
642: END IF;
635: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
636:
637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
638: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
639: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
640: G_MODULE||l_api_name,
641: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
642: END IF;
643:
644: x_return_status := G_RET_STS_UNEXP_ERROR ;
645: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
646:
647: WHEN OTHERS THEN
648: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
649: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
650: G_MODULE||l_api_name,
651: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
652: END IF;
645: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
646:
647: WHEN OTHERS THEN
648: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
649: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
650: G_MODULE||l_api_name,
651: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
652: END IF;
653:
730:
731: BEGIN
732:
733: -- start debug log
734: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
735: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
736: G_MODULE||l_api_name,
737: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
738: END IF;
731: BEGIN
732:
733: -- start debug log
734: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
735: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
736: G_MODULE||l_api_name,
737: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
738: END IF;
739:
875: CLOSE csr_templates;
876:
877:
878: -- end debug log
879: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
880: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
881: G_MODULE||l_api_name,
882: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
883: END IF;
876:
877:
878: -- end debug log
879: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
880: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
881: G_MODULE||l_api_name,
882: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
883: END IF;
884:
884:
885:
886: EXCEPTION
887: WHEN FND_API.G_EXC_ERROR THEN
888: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
889: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
890: G_MODULE||l_api_name,
891: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
892: END IF;
885:
886: EXCEPTION
887: WHEN FND_API.G_EXC_ERROR THEN
888: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
889: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
890: G_MODULE||l_api_name,
891: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
892: END IF;
893:
894: x_return_status := G_RET_STS_ERROR ;
895: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
896:
897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
898: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
899: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
900: G_MODULE||l_api_name,
901: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
902: END IF;
895: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
896:
897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
898: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
899: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
900: G_MODULE||l_api_name,
901: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
902: END IF;
903:
904: x_return_status := G_RET_STS_UNEXP_ERROR ;
905: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
906:
907: WHEN OTHERS THEN
908: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
909: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
910: G_MODULE||l_api_name,
911: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
912: END IF;
905: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
906:
907: WHEN OTHERS THEN
908: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
909: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
910: G_MODULE||l_api_name,
911: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
912: END IF;
913:
971: */
972: BEGIN
973:
974: -- start debug log
975: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
976: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
977: g_Module || l_Api_Name,
978: '100: Entered ' || g_Pkg_Name || '.' || l_Api_Name);
979: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
972: BEGIN
973:
974: -- start debug log
975: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
976: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
977: g_Module || l_Api_Name,
978: '100: Entered ' || g_Pkg_Name || '.' || l_Api_Name);
979: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
980: g_Module || l_Api_Name,
975: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
976: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
977: g_Module || l_Api_Name,
978: '100: Entered ' || g_Pkg_Name || '.' || l_Api_Name);
979: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
980: g_Module || l_Api_Name,
981: '100: Parameters passed: -----------------------');
982: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
983: g_Module || l_Api_Name,
978: '100: Entered ' || g_Pkg_Name || '.' || l_Api_Name);
979: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
980: g_Module || l_Api_Name,
981: '100: Parameters passed: -----------------------');
982: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
983: g_Module || l_Api_Name,
984: '100: p_Template_Id:' || p_Template_Id);
985: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
986: g_Module || l_Api_Name,
981: '100: Parameters passed: -----------------------');
982: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
983: g_Module || l_Api_Name,
984: '100: p_Template_Id:' || p_Template_Id);
985: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
986: g_Module || l_Api_Name,
987: '100: p_Commit_Flag:' || p_Commit_Flag);
988: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
989: g_Module || l_Api_Name,
984: '100: p_Template_Id:' || p_Template_Id);
985: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
986: g_Module || l_Api_Name,
987: '100: p_Commit_Flag:' || p_Commit_Flag);
988: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
989: g_Module || l_Api_Name,
990: '100: p_Mode:' || p_Mode);
991: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
992: g_Module || l_Api_Name,
987: '100: p_Commit_Flag:' || p_Commit_Flag);
988: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
989: g_Module || l_Api_Name,
990: '100: p_Mode:' || p_Mode);
991: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
992: g_Module || l_Api_Name,
993: '100: Parameters passed: -----------------------');
994: END IF;
995:
1007: with ORG_WIDE_FLAG='Y' and status in ('ACTIVE', 'DRAFT', 'REVISION', 'PENDINGPUB')
1008: */
1009:
1010: -- write to debug log file
1011: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1012: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1013: g_Module || l_Api_Name,
1014: '110: Deleting invalid questions from the table Okc_Xprt_Question_Orders');
1015: END IF;
1008: */
1009:
1010: -- write to debug log file
1011: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1012: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1013: g_Module || l_Api_Name,
1014: '110: Deleting invalid questions from the table Okc_Xprt_Question_Orders');
1015: END IF;
1016:
1077: AND Rules.Status_Code IN ('ACTIVE', 'DRAFT', 'REVISION', 'PENDINGDISABLE','PENDINGPUB')
1078: );
1079:
1080: -- write to debug log file
1081: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1082: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1083: g_Module || l_Api_Name,
1084: '120: Deleted invalid questions from the table Okc_Xprt_Question_Orders');
1085: END IF;
1078: );
1079:
1080: -- write to debug log file
1081: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1082: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1083: g_Module || l_Api_Name,
1084: '120: Deleted invalid questions from the table Okc_Xprt_Question_Orders');
1085: END IF;
1086: /*
1089:
1090:
1091:
1092: -- write to debug log file
1093: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1094: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1095: g_Module || l_Api_Name,
1096: '130: Initialize the status for the questions for the template.');
1097: END IF;
1090:
1091:
1092: -- write to debug log file
1093: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1094: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1095: g_Module || l_Api_Name,
1096: '130: Initialize the status for the questions for the template.');
1097: END IF;
1098: UPDATE Okc_Xprt_Question_Orders
1110: the left and right hand side of OKC_XPRT_RULE_CONDITIONS or in OKC_XPRT_RULE_OUTCOMES
1111: for all rules associated to the template in table OKC_XPRT_TEMPLATE_RULES or rules with ORG_WIDE_FLAG='Y' and status = 'ACTIVE'
1112: */
1113:
1114: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1115: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1116: g_Module || l_Api_Name,
1117: '140: Start inserting/updating the Active rule questions.');
1118: END IF;
1111: for all rules associated to the template in table OKC_XPRT_TEMPLATE_RULES or rules with ORG_WIDE_FLAG='Y' and status = 'ACTIVE'
1112: */
1113:
1114: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1115: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1116: g_Module || l_Api_Name,
1117: '140: Start inserting/updating the Active rule questions.');
1118: END IF;
1119:
1236: /*
1237: 4. Do similar processing for rules in Pending Publication status
1238: */
1239:
1240: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1241: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1242: g_Module || l_Api_Name,
1243: '150: End inserting/updating the Active rule questions.');
1244:
1237: 4. Do similar processing for rules in Pending Publication status
1238: */
1239:
1240: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1241: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1242: g_Module || l_Api_Name,
1243: '150: End inserting/updating the Active rule questions.');
1244:
1245: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1241: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1242: g_Module || l_Api_Name,
1243: '150: End inserting/updating the Active rule questions.');
1244:
1245: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1246: g_Module || l_Api_Name,
1247: '160: Start inserting/updating the Pending Publication rule questions.');
1248: END IF;
1249:
1382: WHERE Template_Id = p_Template_Id;
1383:
1384: IF p_Mode = 'U' THEN
1385:
1386: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1387: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1388: g_Module || l_Api_Name,
1389: '210: Process the "U" mode.');
1390: END IF;
1383:
1384: IF p_Mode = 'U' THEN
1385:
1386: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1387: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1388: g_Module || l_Api_Name,
1389: '210: Process the "U" mode.');
1390: END IF;
1391:
1477: AND Outs.Object_Type = 'QUESTION'
1478: );
1479: ELSE --IF p_Mode = 'U'
1480:
1481: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1482: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1483: g_Module || l_Api_Name,
1484: '210: Process modes other than "U".');
1485: END IF;
1478: );
1479: ELSE --IF p_Mode = 'U'
1480:
1481: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1482: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1483: g_Module || l_Api_Name,
1484: '210: Process modes other than "U".');
1485: END IF;
1486: --Fix for perf Bug#5030086.Breaking big Update stmt into 4 small Update stmts
1642: select a cursor for new records and
1643: set sequence_no with sequence_no+1 for each new record,
1644: where the intial sequence_no is max of existing sequence_no for the template .
1645: */
1646: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1647: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1648: g_Module || l_Api_Name,
1649: '220: End setting the mandatory flag.');
1650: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1643: set sequence_no with sequence_no+1 for each new record,
1644: where the intial sequence_no is max of existing sequence_no for the template .
1645: */
1646: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1647: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1648: g_Module || l_Api_Name,
1649: '220: End setting the mandatory flag.');
1650: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1651: g_Module || l_Api_Name,
1646: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1647: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1648: g_Module || l_Api_Name,
1649: '220: End setting the mandatory flag.');
1650: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1651: g_Module || l_Api_Name,
1652: '230: Start populating sequence for newly inserted questions.');
1653:
1654: END IF;
1686: AND Question_Id = l_Question_Id;
1687:
1688: END LOOP;
1689: END;
1690: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1691: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1692: g_Module || l_Api_Name,
1693: '240: End populating sequence for newly inserted questions.');
1694:
1687:
1688: END LOOP;
1689: END;
1690: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1691: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1692: g_Module || l_Api_Name,
1693: '240: End populating sequence for newly inserted questions.');
1694:
1695: END IF;
1696:
1697: IF p_Commit_Flag = 'Y' THEN
1698:
1699:
1700: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1701: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1702: g_Module || l_Api_Name,
1703: '250: Commiting the transaction');
1704:
1697: IF p_Commit_Flag = 'Y' THEN
1698:
1699:
1700: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1701: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1702: g_Module || l_Api_Name,
1703: '250: Commiting the transaction');
1704:
1705: END IF;
1705: END IF;
1706: COMMIT;
1707: END IF;
1708:
1709: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1710: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1711: g_Module || l_Api_Name,
1712: '1000: Leaving ' || g_Pkg_Name || '.' || l_Api_Name);
1713: END IF;
1706: COMMIT;
1707: END IF;
1708:
1709: IF (Fnd_Log.Level_Procedure >= Fnd_Log.g_Current_Runtime_Level) THEN
1710: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1711: g_Module || l_Api_Name,
1712: '1000: Leaving ' || g_Pkg_Name || '.' || l_Api_Name);
1713: END IF;
1714:
1715:
1716: EXCEPTION
1717:
1718: WHEN OTHERS THEN
1719: IF (Fnd_Log.LEVEL_PROCEDURE >= Fnd_Log.g_Current_Runtime_Level) THEN
1720: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1721: g_Module || l_Api_Name,
1722: '4000: Leaving ' || g_Pkg_Name || '.' || l_Api_Name);
1723: END IF;
1716: EXCEPTION
1717:
1718: WHEN OTHERS THEN
1719: IF (Fnd_Log.LEVEL_PROCEDURE >= Fnd_Log.g_Current_Runtime_Level) THEN
1720: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
1721: g_Module || l_Api_Name,
1722: '4000: Leaving ' || g_Pkg_Name || '.' || l_Api_Name);
1723: END IF;
1724:
1843:
1844: BEGIN
1845:
1846: -- start debug log
1847: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1848: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1849: G_MODULE||l_api_name,
1850: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
1851: END IF;
1844: BEGIN
1845:
1846: -- start debug log
1847: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1848: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1849: G_MODULE||l_api_name,
1850: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
1851: END IF;
1852:
1869: FROM okc_terms_templates_all
1870: WHERE xprt_request_id = DECODE('''||p_calling_mode||''',
1871: ''TEMPLATE_APPROVAL'',xprt_request_id,'||FND_GLOBAL.CONC_REQUEST_ID||')';
1872: END IF;
1873: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1874: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1875: G_MODULE||l_api_name,
1876: 'l_sql_stmt = '||l_sql_stmt );
1877: END IF;
1870: WHERE xprt_request_id = DECODE('''||p_calling_mode||''',
1871: ''TEMPLATE_APPROVAL'',xprt_request_id,'||FND_GLOBAL.CONC_REQUEST_ID||')';
1872: END IF;
1873: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1874: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1875: G_MODULE||l_api_name,
1876: 'l_sql_stmt = '||l_sql_stmt );
1877: END IF;
1878: --END:Bug 5032199
1887: LOOP
1888: FETCH csr_get_publication_id INTO l_publication_id,l_ui_def_id;
1889: EXIT WHEN csr_get_publication_id%NOTFOUND;
1890: -- debug log
1891: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1892: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1893: G_MODULE||l_api_name,
1894: ' ********************************************************');
1895: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1888: FETCH csr_get_publication_id INTO l_publication_id,l_ui_def_id;
1889: EXIT WHEN csr_get_publication_id%NOTFOUND;
1890: -- debug log
1891: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1892: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1893: G_MODULE||l_api_name,
1894: ' ********************************************************');
1895: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1896: G_MODULE||l_api_name,
1891: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1892: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1893: G_MODULE||l_api_name,
1894: ' ********************************************************');
1895: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1896: G_MODULE||l_api_name,
1897: 'Calling OKC_XPRT_CZ_INT_PVT.delete_publication with parameters');
1898: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1899: G_MODULE||l_api_name,
1894: ' ********************************************************');
1895: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1896: G_MODULE||l_api_name,
1897: 'Calling OKC_XPRT_CZ_INT_PVT.delete_publication with parameters');
1898: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1899: G_MODULE||l_api_name,
1900: 'p_api_version : '||l_api_version);
1901: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1902: G_MODULE||l_api_name,
1897: 'Calling OKC_XPRT_CZ_INT_PVT.delete_publication with parameters');
1898: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1899: G_MODULE||l_api_name,
1900: 'p_api_version : '||l_api_version);
1901: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1902: G_MODULE||l_api_name,
1903: 'p_publication_id : '||l_publication_id);
1904: END IF;
1905:
1916: ) ;
1917:
1918:
1919: -- debug log
1920: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1921: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1922: G_MODULE||l_api_name,
1923: ' ********************************************************');
1924: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1917:
1918:
1919: -- debug log
1920: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1921: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1922: G_MODULE||l_api_name,
1923: ' ********************************************************');
1924: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1925: G_MODULE||l_api_name,
1920: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1921: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1922: G_MODULE||l_api_name,
1923: ' ********************************************************');
1924: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1925: G_MODULE||l_api_name,
1926: 'After Calling OKC_XPRT_CZ_INT_PVT.delete_publication');
1927: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1928: G_MODULE||l_api_name,
1923: ' ********************************************************');
1924: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1925: G_MODULE||l_api_name,
1926: 'After Calling OKC_XPRT_CZ_INT_PVT.delete_publication');
1927: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1928: G_MODULE||l_api_name,
1929: 'x_return_status : '||x_return_status);
1930: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1931: G_MODULE||l_api_name,
1926: 'After Calling OKC_XPRT_CZ_INT_PVT.delete_publication');
1927: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1928: G_MODULE||l_api_name,
1929: 'x_return_status : '||x_return_status);
1930: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1931: G_MODULE||l_api_name,
1932: ' ********************************************************');
1933: END IF;
1934:
1968: FETCH csr_get_publication_id INTO l_publication_id,l_ui_def_id;
1969: EXIT WHEN csr_get_publication_id%NOTFOUND;
1970:
1971: -- debug log
1972: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1973: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1974: G_MODULE||l_api_name,
1975: ' ********************************************************');
1976: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1969: EXIT WHEN csr_get_publication_id%NOTFOUND;
1970:
1971: -- debug log
1972: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1973: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1974: G_MODULE||l_api_name,
1975: ' ********************************************************');
1976: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1977: G_MODULE||l_api_name,
1972: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1973: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1974: G_MODULE||l_api_name,
1975: ' ********************************************************');
1976: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1977: G_MODULE||l_api_name,
1978: 'Calling OKC_XPRT_CZ_INT_PVT.delete_publication with parameters');
1979: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1980: G_MODULE||l_api_name,
1975: ' ********************************************************');
1976: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1977: G_MODULE||l_api_name,
1978: 'Calling OKC_XPRT_CZ_INT_PVT.delete_publication with parameters');
1979: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1980: G_MODULE||l_api_name,
1981: 'p_api_version : '||l_api_version);
1982: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1983: G_MODULE||l_api_name,
1978: 'Calling OKC_XPRT_CZ_INT_PVT.delete_publication with parameters');
1979: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1980: G_MODULE||l_api_name,
1981: 'p_api_version : '||l_api_version);
1982: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1983: G_MODULE||l_api_name,
1984: 'p_publication_id : '||l_publication_id);
1985: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1986: G_MODULE||l_api_name,
1981: 'p_api_version : '||l_api_version);
1982: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1983: G_MODULE||l_api_name,
1984: 'p_publication_id : '||l_publication_id);
1985: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1986: G_MODULE||l_api_name,
1987: 'p_publication_mode : '||G_TEST_MODE);
1988: END IF;
1989:
1999: x_msg_count => x_msg_count
2000: ) ;
2001:
2002: -- debug log
2003: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2004: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2005: G_MODULE||l_api_name,
2006: ' ********************************************************');
2007: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2000: ) ;
2001:
2002: -- debug log
2003: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2004: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2005: G_MODULE||l_api_name,
2006: ' ********************************************************');
2007: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2008: G_MODULE||l_api_name,
2003: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2004: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2005: G_MODULE||l_api_name,
2006: ' ********************************************************');
2007: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2008: G_MODULE||l_api_name,
2009: 'After Calling OKC_XPRT_CZ_INT_PVT.delete_publication');
2010: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2011: G_MODULE||l_api_name,
2006: ' ********************************************************');
2007: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2008: G_MODULE||l_api_name,
2009: 'After Calling OKC_XPRT_CZ_INT_PVT.delete_publication');
2010: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2011: G_MODULE||l_api_name,
2012: 'x_return_status : '||x_return_status);
2013: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2014: G_MODULE||l_api_name,
2009: 'After Calling OKC_XPRT_CZ_INT_PVT.delete_publication');
2010: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2011: G_MODULE||l_api_name,
2012: 'x_return_status : '||x_return_status);
2013: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2014: G_MODULE||l_api_name,
2015: ' ********************************************************');
2016: END IF;
2017:
2122: COMMIT WORK;
2123: END IF;
2124:
2125: -- end debug log
2126: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2127: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2128: G_MODULE||l_api_name,
2129: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2130: END IF;
2123: END IF;
2124:
2125: -- end debug log
2126: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2127: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2128: G_MODULE||l_api_name,
2129: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2130: END IF;
2131:
2131:
2132:
2133: EXCEPTION
2134: WHEN FND_API.G_EXC_ERROR THEN
2135: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2136: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2137: G_MODULE||l_api_name,
2138: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2139: END IF;
2132:
2133: EXCEPTION
2134: WHEN FND_API.G_EXC_ERROR THEN
2135: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2136: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2137: G_MODULE||l_api_name,
2138: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2139: END IF;
2140:
2145: x_return_status := G_RET_STS_ERROR ;
2146: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2147:
2148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2149: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2150: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2151: G_MODULE||l_api_name,
2152: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2153: END IF;
2146: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2147:
2148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2149: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2150: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2151: G_MODULE||l_api_name,
2152: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2153: END IF;
2154:
2159: x_return_status := G_RET_STS_UNEXP_ERROR ;
2160: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2161:
2162: WHEN OTHERS THEN
2163: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2164: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2165: G_MODULE||l_api_name,
2166: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2167: END IF;
2160: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2161:
2162: WHEN OTHERS THEN
2163: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2164: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2165: G_MODULE||l_api_name,
2166: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2167: END IF;
2168:
2280: BEGIN
2281:
2282:
2283: -- start debug log
2284: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2286: G_MODULE||l_api_name,
2287: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2281:
2282:
2283: -- start debug log
2284: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2286: G_MODULE||l_api_name,
2287: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2289: G_MODULE||l_api_name,
2284: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2286: G_MODULE||l_api_name,
2287: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2289: G_MODULE||l_api_name,
2290: 'p_template_id : '||p_template_id);
2291: END IF;
2292:
2476:
2477: END IF; -- l_perf_template_no_rule
2478:
2479: -- end debug log
2480: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2481: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2482: G_MODULE||l_api_name,
2483: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2484: END IF;
2477: END IF; -- l_perf_template_no_rule
2478:
2479: -- end debug log
2480: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2481: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2482: G_MODULE||l_api_name,
2483: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2484: END IF;
2485:
2596: BEGIN
2597:
2598:
2599: -- start debug log
2600: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2601: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2602: G_MODULE||l_api_name,
2603: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2604: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2597:
2598:
2599: -- start debug log
2600: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2601: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2602: G_MODULE||l_api_name,
2603: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2604: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2605: G_MODULE||l_api_name,
2600: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2601: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2602: G_MODULE||l_api_name,
2603: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2604: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2605: G_MODULE||l_api_name,
2606: 'Parameters : ');
2607: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2608: G_MODULE||l_api_name,
2603: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2604: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2605: G_MODULE||l_api_name,
2606: 'Parameters : ');
2607: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2608: G_MODULE||l_api_name,
2609: 'p_document_id : '||p_document_id);
2610: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2611: G_MODULE||l_api_name,
2606: 'Parameters : ');
2607: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2608: G_MODULE||l_api_name,
2609: 'p_document_id : '||p_document_id);
2610: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2611: G_MODULE||l_api_name,
2612: 'p_document_type : '||p_document_type);
2613: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2614: G_MODULE||l_api_name,
2609: 'p_document_id : '||p_document_id);
2610: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2611: G_MODULE||l_api_name,
2612: 'p_document_type : '||p_document_type);
2613: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2614: G_MODULE||l_api_name,
2615: 'p_config_header_id : '||p_config_header_id);
2616: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2617: G_MODULE||l_api_name,
2612: 'p_document_type : '||p_document_type);
2613: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2614: G_MODULE||l_api_name,
2615: 'p_config_header_id : '||p_config_header_id);
2616: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2617: G_MODULE||l_api_name,
2618: 'p_config_rev_nbr : '||p_config_rev_nbr);
2619: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2620: G_MODULE||l_api_name,
2615: 'p_config_header_id : '||p_config_header_id);
2616: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2617: G_MODULE||l_api_name,
2618: 'p_config_rev_nbr : '||p_config_rev_nbr);
2619: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2620: G_MODULE||l_api_name,
2621: 'p_template_id : '||p_template_id);
2622: END IF;
2623:
2736: '';
2737: l_xml_init_msg := l_xml_init_msg || l_dummy;
2738:
2739: -- debug log
2740: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2741: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2742: G_MODULE||l_api_name,
2743: l_rec_index||' : '||l_dummy);
2744: END IF; -- debug log
2737: l_xml_init_msg := l_xml_init_msg || l_dummy;
2738:
2739: -- debug log
2740: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2741: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2742: G_MODULE||l_api_name,
2743: l_rec_index||' : '||l_dummy);
2744: END IF; -- debug log
2745:
2756:
2757: x_cz_xml_init_msg := l_xml_init_msg;
2758:
2759: -- end debug log
2760: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2761: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2762: G_MODULE||l_api_name,
2763: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2764: END IF;
2757: x_cz_xml_init_msg := l_xml_init_msg;
2758:
2759: -- end debug log
2760: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2761: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2762: G_MODULE||l_api_name,
2763: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2764: END IF;
2765:
2873: BEGIN
2874:
2875:
2876: -- start debug log
2877: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2878: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2879: G_MODULE||l_api_name,
2880: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2881: END IF;
2874:
2875:
2876: -- start debug log
2877: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2878: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2879: G_MODULE||l_api_name,
2880: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2881: END IF;
2882:
2901: l_exit := SUBSTR (p_cz_xml_terminate_msg, l_exit_start_pos,
2902: l_exit_end_pos - l_exit_start_pos + 1);
2903:
2904: -- debug log
2905: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2906: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2907: G_MODULE||l_api_name,
2908: 'l_exit_start_pos : '||l_exit_start_pos);
2909: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2902: l_exit_end_pos - l_exit_start_pos + 1);
2903:
2904: -- debug log
2905: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2906: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2907: G_MODULE||l_api_name,
2908: 'l_exit_start_pos : '||l_exit_start_pos);
2909: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2910: G_MODULE||l_api_name,
2905: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2906: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2907: G_MODULE||l_api_name,
2908: 'l_exit_start_pos : '||l_exit_start_pos);
2909: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2910: G_MODULE||l_api_name,
2911: 'l_exit_end_pos : '||l_exit_end_pos);
2912: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2913: G_MODULE||l_api_name,
2908: 'l_exit_start_pos : '||l_exit_start_pos);
2909: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2910: G_MODULE||l_api_name,
2911: 'l_exit_end_pos : '||l_exit_end_pos);
2912: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2913: G_MODULE||l_api_name,
2914: 'l_exit : '||l_exit);
2915: END IF;
2916:
2945: l_complete_config_end_pos -
2946: l_complete_config_start_pos + 1);
2947:
2948: -- debug log
2949: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2950: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2951: G_MODULE||l_api_name,
2952: 'l_valid_config_start_pos : '||l_valid_config_start_pos);
2953: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2946: l_complete_config_start_pos + 1);
2947:
2948: -- debug log
2949: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2950: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2951: G_MODULE||l_api_name,
2952: 'l_valid_config_start_pos : '||l_valid_config_start_pos);
2953: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2954: G_MODULE||l_api_name,
2949: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2950: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2951: G_MODULE||l_api_name,
2952: 'l_valid_config_start_pos : '||l_valid_config_start_pos);
2953: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2954: G_MODULE||l_api_name,
2955: 'l_valid_config_end_pos : '||l_valid_config_end_pos);
2956: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2957: G_MODULE||l_api_name,
2952: 'l_valid_config_start_pos : '||l_valid_config_start_pos);
2953: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2954: G_MODULE||l_api_name,
2955: 'l_valid_config_end_pos : '||l_valid_config_end_pos);
2956: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2957: G_MODULE||l_api_name,
2958: 'l_valid_config : '||l_valid_config);
2959: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2960: G_MODULE||l_api_name,
2955: 'l_valid_config_end_pos : '||l_valid_config_end_pos);
2956: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2957: G_MODULE||l_api_name,
2958: 'l_valid_config : '||l_valid_config);
2959: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2960: G_MODULE||l_api_name,
2961: 'l_complete_config_start_pos : '||l_complete_config_start_pos);
2962: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2963: G_MODULE||l_api_name,
2958: 'l_valid_config : '||l_valid_config);
2959: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2960: G_MODULE||l_api_name,
2961: 'l_complete_config_start_pos : '||l_complete_config_start_pos);
2962: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2963: G_MODULE||l_api_name,
2964: 'l_complete_config_end_pos : '||l_complete_config_end_pos);
2965: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2966: G_MODULE||l_api_name,
2961: 'l_complete_config_start_pos : '||l_complete_config_start_pos);
2962: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2963: G_MODULE||l_api_name,
2964: 'l_complete_config_end_pos : '||l_complete_config_end_pos);
2965: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2966: G_MODULE||l_api_name,
2967: 'l_complete_config : '||l_complete_config);
2968: END IF;
2969:
3074: l_config_rev_nbr_end_pos -
3075: l_config_rev_nbr_start_pos + 1));
3076:
3077: -- debug log
3078: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3079: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3080: G_MODULE||l_api_name,
3081: 'l_config_header_id_start_pos : '||l_config_header_id_start_pos);
3082: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3075: l_config_rev_nbr_start_pos + 1));
3076:
3077: -- debug log
3078: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3079: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3080: G_MODULE||l_api_name,
3081: 'l_config_header_id_start_pos : '||l_config_header_id_start_pos);
3082: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3083: G_MODULE||l_api_name,
3078: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3079: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3080: G_MODULE||l_api_name,
3081: 'l_config_header_id_start_pos : '||l_config_header_id_start_pos);
3082: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3083: G_MODULE||l_api_name,
3084: 'l_config_header_id_end_pos : '||l_config_header_id_end_pos);
3085: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3086: G_MODULE||l_api_name,
3081: 'l_config_header_id_start_pos : '||l_config_header_id_start_pos);
3082: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3083: G_MODULE||l_api_name,
3084: 'l_config_header_id_end_pos : '||l_config_header_id_end_pos);
3085: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3086: G_MODULE||l_api_name,
3087: 'l_config_header_id : '||l_config_header_id);
3088: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3089: G_MODULE||l_api_name,
3084: 'l_config_header_id_end_pos : '||l_config_header_id_end_pos);
3085: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3086: G_MODULE||l_api_name,
3087: 'l_config_header_id : '||l_config_header_id);
3088: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3089: G_MODULE||l_api_name,
3090: 'l_config_rev_nbr_start_pos : '||l_config_rev_nbr_start_pos);
3091: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3092: G_MODULE||l_api_name,
3087: 'l_config_header_id : '||l_config_header_id);
3088: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3089: G_MODULE||l_api_name,
3090: 'l_config_rev_nbr_start_pos : '||l_config_rev_nbr_start_pos);
3091: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3092: G_MODULE||l_api_name,
3093: 'l_config_rev_nbr_end_pos : '||l_config_rev_nbr_end_pos);
3094: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3095: G_MODULE||l_api_name,
3090: 'l_config_rev_nbr_start_pos : '||l_config_rev_nbr_start_pos);
3091: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3092: G_MODULE||l_api_name,
3093: 'l_config_rev_nbr_end_pos : '||l_config_rev_nbr_end_pos);
3094: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3095: G_MODULE||l_api_name,
3096: 'l_config_rev_nbr : '||l_config_rev_nbr);
3097: END IF;
3098:
3102: x_complete_config := NVL(l_complete_config, 'FALSE');
3103: x_valid_config := NVL(l_valid_config, 'FALSE');
3104:
3105: -- end debug log
3106: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3107: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3108: G_MODULE||l_api_name,
3109: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3110: END IF;
3103: x_valid_config := NVL(l_valid_config, 'FALSE');
3104:
3105: -- end debug log
3106: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3107: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3108: G_MODULE||l_api_name,
3109: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3110: END IF;
3111:
3280: BEGIN
3281:
3282:
3283: -- start debug log
3284: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3286: G_MODULE||l_api_name,
3287: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
3288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3281:
3282:
3283: -- start debug log
3284: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3286: G_MODULE||l_api_name,
3287: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
3288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3289: G_MODULE||l_api_name,
3284: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3286: G_MODULE||l_api_name,
3287: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
3288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3289: G_MODULE||l_api_name,
3290: 'Parameters : ');
3291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3292: G_MODULE||l_api_name,
3287: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
3288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3289: G_MODULE||l_api_name,
3290: 'Parameters : ');
3291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3292: G_MODULE||l_api_name,
3293: 'p_document_id : '||p_document_id);
3294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3295: G_MODULE||l_api_name,
3290: 'Parameters : ');
3291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3292: G_MODULE||l_api_name,
3293: 'p_document_id : '||p_document_id);
3294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3295: G_MODULE||l_api_name,
3296: 'p_document_type : '||p_document_type);
3297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3298: G_MODULE||l_api_name,
3293: 'p_document_id : '||p_document_id);
3294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3295: G_MODULE||l_api_name,
3296: 'p_document_type : '||p_document_type);
3297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3298: G_MODULE||l_api_name,
3299: 'p_config_header_id : '||p_config_header_id);
3300: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3301: G_MODULE||l_api_name,
3296: 'p_document_type : '||p_document_type);
3297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3298: G_MODULE||l_api_name,
3299: 'p_config_header_id : '||p_config_header_id);
3300: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3301: G_MODULE||l_api_name,
3302: 'p_config_rev_nbr : '||p_config_rev_nbr);
3303:
3304: END IF;
3431: IF (l_article_in_doc%NOTFOUND)
3432: THEN
3433:
3434: -- debug log
3435: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3436: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3437: G_MODULE||l_api_name,
3438: 'Article id not in document : '||l_expert_articles_tbl(l_article_tbl_index));
3439: END IF;
3432: THEN
3433:
3434: -- debug log
3435: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3436: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3437: G_MODULE||l_api_name,
3438: 'Article id not in document : '||l_expert_articles_tbl(l_article_tbl_index));
3439: END IF;
3440:
3472:
3473: END IF; -- l_article_version_id
3474:
3475: -- debug log
3476: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3477: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3478: G_MODULE||l_api_name,
3479: 'l_article_version_id : '||l_article_version_id);
3480: END IF;
3473: END IF; -- l_article_version_id
3474:
3475: -- debug log
3476: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3477: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3478: G_MODULE||l_api_name,
3479: 'l_article_version_id : '||l_article_version_id);
3480: END IF;
3481:
3532:
3533: ELSE -- %NOTFOUND
3534:
3535: -- debug log
3536: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3537: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3538: G_MODULE||l_api_name,
3539: ' Article id is in the document: '||l_article_id);
3540: END IF;
3533: ELSE -- %NOTFOUND
3534:
3535: -- debug log
3536: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3537: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3538: G_MODULE||l_api_name,
3539: ' Article id is in the document: '||l_article_id);
3540: END IF;
3541:
3603:
3604: CLOSE l_articles_only_in_doc;
3605:
3606: -- end debug log
3607: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3608: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3609: G_MODULE||l_api_name,
3610: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3611: END IF;
3604: CLOSE l_articles_only_in_doc;
3605:
3606: -- end debug log
3607: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3608: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3609: G_MODULE||l_api_name,
3610: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3611: END IF;
3612:
3779: BEGIN
3780:
3781:
3782: -- start debug log
3783: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3784: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3785: G_MODULE||l_api_name,
3786: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
3787: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3780:
3781:
3782: -- start debug log
3783: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3784: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3785: G_MODULE||l_api_name,
3786: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
3787: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3788: G_MODULE||l_api_name,
3783: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3784: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3785: G_MODULE||l_api_name,
3786: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
3787: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3788: G_MODULE||l_api_name,
3789: 'Parameters : ');
3790: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3791: G_MODULE||l_api_name,
3786: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
3787: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3788: G_MODULE||l_api_name,
3789: 'Parameters : ');
3790: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3791: G_MODULE||l_api_name,
3792: 'p_config_header_id : '||p_config_header_id);
3793: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3794: G_MODULE||l_api_name,
3789: 'Parameters : ');
3790: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3791: G_MODULE||l_api_name,
3792: 'p_config_header_id : '||p_config_header_id);
3793: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3794: G_MODULE||l_api_name,
3795: 'p_config_rev_nbr : '||p_config_rev_nbr);
3796:
3797: END IF;
3884: END IF; -- l_prov_allowed = 'Y'
3885:
3886:
3887: -- end debug log
3888: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3889: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3890: G_MODULE||l_api_name,
3891: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3892: END IF;
3885:
3886:
3887: -- end debug log
3888: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3889: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3890: G_MODULE||l_api_name,
3891: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3892: END IF;
3893:
5054: l_variable_value varchar2(1000) := null;
5055: l_variable_translated_value varchar2(1000) := null;
5056:
5057: BEGIN
5058: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5059: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5060: G_MODULE||l_api_name,
5061: '960: Entered '||G_PKG_NAME ||'.'||l_api_name);
5062: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5055: l_variable_translated_value varchar2(1000) := null;
5056:
5057: BEGIN
5058: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5059: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5060: G_MODULE||l_api_name,
5061: '960: Entered '||G_PKG_NAME ||'.'||l_api_name);
5062: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5063: g_Module || l_Api_Name,
5058: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5059: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5060: G_MODULE||l_api_name,
5061: '960: Entered '||G_PKG_NAME ||'.'||l_api_name);
5062: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5063: g_Module || l_Api_Name,
5064: '960: Parameters passed: -----------------------');
5065: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5066: G_MODULE||l_api_name,
5061: '960: Entered '||G_PKG_NAME ||'.'||l_api_name);
5062: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5063: g_Module || l_Api_Name,
5064: '960: Parameters passed: -----------------------');
5065: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5066: G_MODULE||l_api_name,
5067: '960:Object Type = '||p_object_code);
5068: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5069: G_MODULE||l_api_name,
5064: '960: Parameters passed: -----------------------');
5065: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5066: G_MODULE||l_api_name,
5067: '960:Object Type = '||p_object_code);
5068: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5069: G_MODULE||l_api_name,
5070: '960:sequence id = '||p_sequence_id );
5071: END IF;
5072: FOR rec_variable_value in csr_variable_value
5089: l_final_document_value := l_final_document_value || ','||l_variable_value;
5090: END IF;
5091: END IF;
5092:
5093: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5094: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5095: G_MODULE||l_api_name,
5096: '961: l_variable_value = ' || l_variable_value);
5097: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5090: END IF;
5091: END IF;
5092:
5093: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5094: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5095: G_MODULE||l_api_name,
5096: '961: l_variable_value = ' || l_variable_value);
5097: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5098: G_MODULE||l_api_name,
5093: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5094: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5095: G_MODULE||l_api_name,
5096: '961: l_variable_value = ' || l_variable_value);
5097: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5098: G_MODULE||l_api_name,
5099: '961: l_variable_translated_value = ' || l_variable_translated_value);
5100: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5101: G_MODULE||l_api_name,
5096: '961: l_variable_value = ' || l_variable_value);
5097: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5098: G_MODULE||l_api_name,
5099: '961: l_variable_translated_value = ' || l_variable_translated_value);
5100: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5101: G_MODULE||l_api_name,
5102: '961: l_final_document_value = ' || l_final_document_value);
5103: END IF;
5104: END LOOP;
5110: END IF;
5111: IF csr_translated_value%ISOPEN THEN
5112: CLOSE csr_translated_value;
5113: END IF;
5114: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5115: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5116: G_MODULE||l_api_name,
5117: '990: Leaving From Exception Block'||G_PKG_NAME ||'.'||l_api_name);
5118: END IF;
5111: IF csr_translated_value%ISOPEN THEN
5112: CLOSE csr_translated_value;
5113: END IF;
5114: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5115: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5116: G_MODULE||l_api_name,
5117: '990: Leaving From Exception Block'||G_PKG_NAME ||'.'||l_api_name);
5118: END IF;
5119: RETURN null;
5217: c_cursor cur_typ;
5218:
5219: BEGIN
5220: -- start debug log
5221: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5222: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5223: G_MODULE||l_api_name,
5224: '900: Entered '||G_PKG_NAME ||'.'||l_api_name);
5225: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5218:
5219: BEGIN
5220: -- start debug log
5221: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5222: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5223: G_MODULE||l_api_name,
5224: '900: Entered '||G_PKG_NAME ||'.'||l_api_name);
5225: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5226: g_Module || l_Api_Name,
5221: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5222: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5223: G_MODULE||l_api_name,
5224: '900: Entered '||G_PKG_NAME ||'.'||l_api_name);
5225: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5226: g_Module || l_Api_Name,
5227: '910: Parameters passed: -----------------------');
5228: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5229: G_MODULE||l_api_name,
5224: '900: Entered '||G_PKG_NAME ||'.'||l_api_name);
5225: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5226: g_Module || l_Api_Name,
5227: '910: Parameters passed: -----------------------');
5228: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5229: G_MODULE||l_api_name,
5230: '910:p_rule_id = '||p_rule_id);
5231: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5232: G_MODULE||l_api_name,
5227: '910: Parameters passed: -----------------------');
5228: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5229: G_MODULE||l_api_name,
5230: '910:p_rule_id = '||p_rule_id);
5231: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5232: G_MODULE||l_api_name,
5233: '910:Object Type = '||p_object_type);
5234: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5235: g_Module || l_Api_Name,
5230: '910:p_rule_id = '||p_rule_id);
5231: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5232: G_MODULE||l_api_name,
5233: '910:Object Type = '||p_object_type);
5234: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5235: g_Module || l_Api_Name,
5236: '910:Object Code = '||p_object_code);
5237: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5238: g_Module || l_Api_Name,
5233: '910:Object Type = '||p_object_type);
5234: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5235: g_Module || l_Api_Name,
5236: '910:Object Code = '||p_object_code);
5237: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5238: g_Module || l_Api_Name,
5239: '910:Sequence Id = '||p_sequence_id);
5240: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5241: g_Module || l_Api_Name,
5236: '910:Object Code = '||p_object_code);
5237: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5238: g_Module || l_Api_Name,
5239: '910:Sequence Id = '||p_sequence_id);
5240: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5241: g_Module || l_Api_Name,
5242: '910:p_value_set_id = '||p_value_set_id);
5243: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5244: g_Module || l_Api_Name,
5239: '910:Sequence Id = '||p_sequence_id);
5240: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5241: g_Module || l_Api_Name,
5242: '910:p_value_set_id = '||p_value_set_id);
5243: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5244: g_Module || l_Api_Name,
5245: '910:p_object_value_type = '||p_object_value_type);
5246: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5247: g_Module || l_Api_Name,
5242: '910:p_value_set_id = '||p_value_set_id);
5243: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5244: g_Module || l_Api_Name,
5245: '910:p_object_value_type = '||p_object_value_type);
5246: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5247: g_Module || l_Api_Name,
5248: '910:p_object_value_code = '||p_object_value_code);
5249: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5250: g_Module || l_Api_Name,
5245: '910:p_object_value_type = '||p_object_value_type);
5246: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5247: g_Module || l_Api_Name,
5248: '910:p_object_value_code = '||p_object_value_code);
5249: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5250: g_Module || l_Api_Name,
5251: '910:p_line_number = '||p_line_number);
5252:
5253: END IF;
5273: CLOSE csr_get_rule_qst_values;
5274: l_final_document_value := l_question_value;
5275: end if;
5276:
5277: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5278: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5279: G_MODULE||l_api_name,
5280: '920:l_config_header_id = '||l_config_header_id);
5281: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5274: l_final_document_value := l_question_value;
5275: end if;
5276:
5277: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5278: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5279: G_MODULE||l_api_name,
5280: '920:l_config_header_id = '||l_config_header_id);
5281: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5282: g_Module || l_Api_Name,
5277: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5278: Fnd_Log.STRING(FND_LOG.LEVEL_PROCEDURE ,
5279: G_MODULE||l_api_name,
5280: '920:l_config_header_id = '||l_config_header_id);
5281: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5282: g_Module || l_Api_Name,
5283: '920:l_config_rev_nbr = '||l_config_rev_nbr);
5284: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5285: g_Module || l_Api_Name,
5280: '920:l_config_header_id = '||l_config_header_id);
5281: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5282: g_Module || l_Api_Name,
5283: '920:l_config_rev_nbr = '||l_config_rev_nbr);
5284: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5285: g_Module || l_Api_Name,
5286: '920:Question DataType = '||l_question_datatype);
5287: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5288: g_Module || l_Api_Name,
5283: '920:l_config_rev_nbr = '||l_config_rev_nbr);
5284: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5285: g_Module || l_Api_Name,
5286: '920:Question DataType = '||l_question_datatype);
5287: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
5288: g_Module || l_Api_Name,
5289: '920:l_final_document_value = '||l_final_document_value);
5290: END IF;
5291:
5293: Elsif (p_object_type = 'VARIABLE') THEN
5294: --get the document value from OKC_XPRT_DEVIATIONS_T
5295: --Find whether rule is at Header level or Line Level
5296: l_is_rule_line_level := is_rule_line_level(p_rule_id);
5297: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5298: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5299: G_MODULE||l_api_name,
5300: '920: l_is_rule_line_level = '||l_is_rule_line_level);
5301: END IF;
5294: --get the document value from OKC_XPRT_DEVIATIONS_T
5295: --Find whether rule is at Header level or Line Level
5296: l_is_rule_line_level := is_rule_line_level(p_rule_id);
5297: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5298: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5299: G_MODULE||l_api_name,
5300: '920: l_is_rule_line_level = '||l_is_rule_line_level);
5301: END IF;
5302: --If rule is at header level and variable code is Item or Item Category then get
5308: ELSE
5309: OPEN csr_variable_value(p_object_code);
5310: FETCH csr_variable_value INTO l_variable_value;
5311: CLOSE csr_variable_value;
5312: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5313: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5314: G_MODULE||l_api_name,
5315: '920: Varialbe Value from xprt_deviations_T table = '||l_variable_value);
5316: END IF;
5309: OPEN csr_variable_value(p_object_code);
5310: FETCH csr_variable_value INTO l_variable_value;
5311: CLOSE csr_variable_value;
5312: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5313: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5314: G_MODULE||l_api_name,
5315: '920: Varialbe Value from xprt_deviations_T table = '||l_variable_value);
5316: END IF;
5317: --Bug#5148503 If l_variable_value is null then check whether we can find variable_value
5322: IF(l_variable_value is NUll) THEN
5323: OPEN csr_variable_value('USER$'||p_object_code);
5324: FETCH csr_variable_value INTO l_variable_value;
5325: CLOSE csr_variable_value;
5326: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5327: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5328: '922: Varialbe Value for USER$'||p_object_code||'='||l_variable_value);
5329: END IF;
5330: if(l_variable_value is not null) then
5323: OPEN csr_variable_value('USER$'||p_object_code);
5324: FETCH csr_variable_value INTO l_variable_value;
5325: CLOSE csr_variable_value;
5326: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5327: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5328: '922: Varialbe Value for USER$'||p_object_code||'='||l_variable_value);
5329: END IF;
5330: if(l_variable_value is not null) then
5331: l_user_defined_var := 'Y';
5346: CLOSE csr_translated_value;
5347: END IF;
5348: l_final_document_value := l_variable_translated_value;
5349: END IF; --IF(l_is_rule_line_level
5350: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5351: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5352: G_MODULE||l_api_name,
5353: '920: Translated Document Value = '||l_variable_translated_value);
5354: END IF;
5347: END IF;
5348: l_final_document_value := l_variable_translated_value;
5349: END IF; --IF(l_is_rule_line_level
5350: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5351: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5352: G_MODULE||l_api_name,
5353: '920: Translated Document Value = '||l_variable_translated_value);
5354: END IF;
5355:
5365: l_sql_stmt := 'SELECT '||l_name_col||' , '||l_id_col||
5366: ' FROM '||l_table_name||' '||
5367: l_additional_where_clause ;
5368:
5369: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5370: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5371: G_MODULE||l_api_name,
5372: '930: l_table_name '||l_table_name);
5373: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5366: ' FROM '||l_table_name||' '||
5367: l_additional_where_clause ;
5368:
5369: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5370: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5371: G_MODULE||l_api_name,
5372: '930: l_table_name '||l_table_name);
5373: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5374: G_MODULE||l_api_name,
5369: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5370: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5371: G_MODULE||l_api_name,
5372: '930: l_table_name '||l_table_name);
5373: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5374: G_MODULE||l_api_name,
5375: '930: l_name_col '||l_name_col);
5376: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5377: G_MODULE||l_api_name,
5372: '930: l_table_name '||l_table_name);
5373: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5374: G_MODULE||l_api_name,
5375: '930: l_name_col '||l_name_col);
5376: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5377: G_MODULE||l_api_name,
5378: '930: l_id_col '||l_id_col);
5379: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5380: G_MODULE||l_api_name,
5375: '930: l_name_col '||l_name_col);
5376: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5377: G_MODULE||l_api_name,
5378: '930: l_id_col '||l_id_col);
5379: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5380: G_MODULE||l_api_name,
5381: '930: l_additional_where_clause '||l_additional_where_clause);
5382: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5383: G_MODULE||l_api_name,
5378: '930: l_id_col '||l_id_col);
5379: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5380: G_MODULE||l_api_name,
5381: '930: l_additional_where_clause '||l_additional_where_clause);
5382: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5383: G_MODULE||l_api_name,
5384: '930: SQL STMT '||l_sql_stmt);
5385: END IF;
5386:
5389: OPEN c_cursor FOR l_sql_stmt;
5390: LOOP
5391: FETCH c_cursor INTO tempName, tempId;
5392: EXIT WHEN c_cursor%NOTFOUND;
5393: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5394: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5395: G_MODULE||l_api_name,
5396: '931: tempName = '||tempName || ',tempId = '||tempId);
5397: END IF;
5390: LOOP
5391: FETCH c_cursor INTO tempName, tempId;
5392: EXIT WHEN c_cursor%NOTFOUND;
5393: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5394: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5395: G_MODULE||l_api_name,
5396: '931: tempName = '||tempName || ',tempId = '||tempId);
5397: END IF;
5398: if(tempId = l_variable_value) then
5401: end if;
5402: END LOOP;
5403: CLOSE c_cursor;
5404: ELSE --Bug 5255911 added else block
5405: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5406: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5407: G_MODULE||l_api_name,
5408: '932: l_table_name is null');
5409: END IF;
5402: END LOOP;
5403: CLOSE c_cursor;
5404: ELSE --Bug 5255911 added else block
5405: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5406: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5407: G_MODULE||l_api_name,
5408: '932: l_table_name is null');
5409: END IF;
5410: --could not find translated value.So make final value as is as variable value
5415: END IF; --end IF(l_variable_value is not
5416: END IF; --IF(p_object_type = 'QUESTION'
5417:
5418: -- end debug log
5419: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5420: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5421: G_MODULE||l_api_name,
5422: '940: final document Value = '||l_final_document_value);
5423: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5416: END IF; --IF(p_object_type = 'QUESTION'
5417:
5418: -- end debug log
5419: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5420: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5421: G_MODULE||l_api_name,
5422: '940: final document Value = '||l_final_document_value);
5423: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5424: G_MODULE||l_api_name,
5419: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5420: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5421: G_MODULE||l_api_name,
5422: '940: final document Value = '||l_final_document_value);
5423: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5424: G_MODULE||l_api_name,
5425: '940: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5426: END IF;
5427:
5452: END IF;
5453: IF c_cursor%ISOPEN THEN
5454: CLOSE c_cursor;
5455: END IF;
5456: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5457: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5458: G_MODULE||l_api_name,
5459: '950: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5460: END IF;
5453: IF c_cursor%ISOPEN THEN
5454: CLOSE c_cursor;
5455: END IF;
5456: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5457: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5458: G_MODULE||l_api_name,
5459: '950: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5460: END IF;
5461: RETURN NULL;
5885:
5886:
5887: BEGIN
5888: -- start debug log
5889: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5890: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5891: G_MODULE||l_api_name,
5892: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
5893: END IF;
5886:
5887: BEGIN
5888: -- start debug log
5889: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5890: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5891: G_MODULE||l_api_name,
5892: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
5893: END IF;
5894:
5907: -- commit work
5908: commit work;
5909:
5910: -- end debug log
5911: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5912: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5913: G_MODULE||l_api_name,
5914: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5915: END IF;
5908: commit work;
5909:
5910: -- end debug log
5911: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5912: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5913: G_MODULE||l_api_name,
5914: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5915: END IF;
5916:
5915: END IF;
5916:
5917: EXCEPTION
5918: WHEN FND_API.G_EXC_ERROR THEN
5919: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5920: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5921: G_MODULE||l_api_name,
5922: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5923: END IF;
5916:
5917: EXCEPTION
5918: WHEN FND_API.G_EXC_ERROR THEN
5919: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5920: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5921: G_MODULE||l_api_name,
5922: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5923: END IF;
5924:
5926: x_msg_data := SQLERRM;
5927: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
5928:
5929: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5930: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5931: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5932: G_MODULE||l_api_name,
5933: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5934: END IF;
5927: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
5928:
5929: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5930: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5931: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5932: G_MODULE||l_api_name,
5933: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5934: END IF;
5935:
5937: x_msg_data := SQLERRM;
5938: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
5939:
5940: WHEN OTHERS THEN
5941: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5942: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5943: G_MODULE||l_api_name,
5944: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5945: END IF;
5938: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
5939:
5940: WHEN OTHERS THEN
5941: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5942: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
5943: G_MODULE||l_api_name,
5944: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
5945: END IF;
5946:
6014:
6015: BEGIN
6016:
6017: -- start debug log
6018: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6019: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6020: G_MODULE||l_api_name,
6021: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6022: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6015: BEGIN
6016:
6017: -- start debug log
6018: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6019: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6020: G_MODULE||l_api_name,
6021: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6022: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6023: G_MODULE||l_api_name,
6018: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6019: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6020: G_MODULE||l_api_name,
6021: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6022: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6023: G_MODULE||l_api_name,
6024: 'Parameter : '||p_qa_mode);
6025: END IF;
6026:
6090: END IF; -- qa had errors
6091:
6092:
6093: -- end debug log
6094: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6095: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6096: G_MODULE||l_api_name,
6097: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6098: END IF;
6091:
6092:
6093: -- end debug log
6094: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6095: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6096: G_MODULE||l_api_name,
6097: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6098: END IF;
6099:
6098: END IF;
6099:
6100: EXCEPTION
6101: WHEN FND_API.G_EXC_ERROR THEN
6102: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6103: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6104: G_MODULE||l_api_name,
6105: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6106: END IF;
6099:
6100: EXCEPTION
6101: WHEN FND_API.G_EXC_ERROR THEN
6102: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6103: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6104: G_MODULE||l_api_name,
6105: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6106: END IF;
6107:
6108: x_return_status := G_RET_STS_ERROR ;
6109: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
6110:
6111: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6112: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6114: G_MODULE||l_api_name,
6115: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6116: END IF;
6109: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
6110:
6111: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6112: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6114: G_MODULE||l_api_name,
6115: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6116: END IF;
6117:
6118: x_return_status := G_RET_STS_UNEXP_ERROR ;
6119: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
6120:
6121: WHEN OTHERS THEN
6122: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6123: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6124: G_MODULE||l_api_name,
6125: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6126: END IF;
6119: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
6120:
6121: WHEN OTHERS THEN
6122: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6123: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6124: G_MODULE||l_api_name,
6125: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6126: END IF;
6127:
6218: l_ret_value VARCHAR2(1) := 'N';
6219: l_api_name CONSTANT VARCHAR2(30) := 'is_value_set_changed';
6220: BEGIN
6221: -- start debug log
6222: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6223: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6224: G_MODULE||l_api_name,
6225: '900: Entered '||G_PKG_NAME ||'.'||l_api_name);
6226: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
6219: l_api_name CONSTANT VARCHAR2(30) := 'is_value_set_changed';
6220: BEGIN
6221: -- start debug log
6222: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6223: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6224: G_MODULE||l_api_name,
6225: '900: Entered '||G_PKG_NAME ||'.'||l_api_name);
6226: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
6227: g_Module || l_Api_Name,
6222: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6223: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6224: G_MODULE||l_api_name,
6225: '900: Entered '||G_PKG_NAME ||'.'||l_api_name);
6226: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
6227: g_Module || l_Api_Name,
6228: '910: Parameters passed: -----------------------');
6229: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6230: G_MODULE||l_api_name,
6225: '900: Entered '||G_PKG_NAME ||'.'||l_api_name);
6226: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
6227: g_Module || l_Api_Name,
6228: '910: Parameters passed: -----------------------');
6229: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6230: G_MODULE||l_api_name,
6231: '910:p_object_code = '||p_object_code);
6232: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
6233: g_Module || l_Api_Name,
6228: '910: Parameters passed: -----------------------');
6229: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6230: G_MODULE||l_api_name,
6231: '910:p_object_code = '||p_object_code);
6232: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
6233: g_Module || l_Api_Name,
6234: '910:p_object_value_set_id = '||p_object_value_set_id);
6235: END IF;
6236: --end log
6235: END IF;
6236: --end log
6237: OPEN c1;
6238: FETCH c1 INTO l_value_set_id;
6239: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6240: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6241: G_MODULE||l_api_name,
6242: '920: l_value_set_id '||l_value_set_id);
6243: END IF;
6236: --end log
6237: OPEN c1;
6238: FETCH c1 INTO l_value_set_id;
6239: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6240: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6241: G_MODULE||l_api_name,
6242: '920: l_value_set_id '||l_value_set_id);
6243: END IF;
6244: IF l_value_set_id <> p_object_value_set_id THEN
6244: IF l_value_set_id <> p_object_value_set_id THEN
6245: l_ret_value := 'Y';
6246: END IF;
6247: CLOSE c1;
6248: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6249: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6250: G_MODULE||l_api_name,
6251: '930: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6252: END IF;
6245: l_ret_value := 'Y';
6246: END IF;
6247: CLOSE c1;
6248: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6249: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6250: G_MODULE||l_api_name,
6251: '930: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6252: END IF;
6253: RETURN l_ret_value;
6256: WHEN OTHERS THEN
6257: IF c1%ISOPEN THEN
6258: CLOSE c1;
6259: END IF;
6260: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6261: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6262: G_MODULE||l_api_name,
6263: '940: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6264: END IF;
6257: IF c1%ISOPEN THEN
6258: CLOSE c1;
6259: END IF;
6260: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6261: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6262: G_MODULE||l_api_name,
6263: '940: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6264: END IF;
6265: RETURN 'N';
6360:
6361: BEGIN
6362:
6363: -- start debug log
6364: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6365: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6366: G_MODULE||l_api_name,
6367: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6368: END IF;
6361: BEGIN
6362:
6363: -- start debug log
6364: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6365: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6366: G_MODULE||l_api_name,
6367: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6368: END IF;
6369:
6420: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
6421:
6422:
6423: -- end debug log
6424: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6425: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6426: G_MODULE||l_api_name,
6427: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6428: END IF;
6421:
6422:
6423: -- end debug log
6424: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6425: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6426: G_MODULE||l_api_name,
6427: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6428: END IF;
6429:
6429:
6430:
6431: EXCEPTION
6432: WHEN OTHERS THEN
6433: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6434: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6435: G_MODULE||l_api_name,
6436: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6437: END IF;
6430:
6431: EXCEPTION
6432: WHEN OTHERS THEN
6433: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6434: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6435: G_MODULE||l_api_name,
6436: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6437: END IF;
6438: x_return_status := G_RET_STS_UNEXP_ERROR ;
6516: l_api_name CONSTANT VARCHAR2(30) := 'get_qa_code_detail';
6517:
6518: BEGIN
6519: -- start debug log
6520: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6521: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6522: G_MODULE||l_api_name,
6523: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6524: END IF;
6517:
6518: BEGIN
6519: -- start debug log
6520: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6521: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6522: G_MODULE||l_api_name,
6523: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6524: END IF;
6525:
6541: END IF;
6542: CLOSE l_get_qa_detail_csr;
6543:
6544: -- end debug log
6545: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6546: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6547: G_MODULE||l_api_name,
6548: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6549: END IF;
6542: CLOSE l_get_qa_detail_csr;
6543:
6544: -- end debug log
6545: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6546: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6547: G_MODULE||l_api_name,
6548: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6549: END IF;
6550:
6550:
6551:
6552: EXCEPTION
6553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6554: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6555: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6556: G_MODULE||l_api_name,
6557: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6558: END IF;
6551:
6552: EXCEPTION
6553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6554: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6555: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6556: G_MODULE||l_api_name,
6557: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6558: END IF;
6559:
6563: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
6564: END IF;
6565:
6566: WHEN OTHERS THEN
6567: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6568: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6569: G_MODULE||l_api_name,
6570: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6571: END IF;
6564: END IF;
6565:
6566: WHEN OTHERS THEN
6567: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6568: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6569: G_MODULE||l_api_name,
6570: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6571: END IF;
6572: x_return_status := G_RET_STS_UNEXP_ERROR ;
6632:
6633: BEGIN
6634:
6635: -- start debug log
6636: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6637: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6638: G_MODULE||l_api_name,
6639: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6640: END IF;
6633: BEGIN
6634:
6635: -- start debug log
6636: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6637: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6638: G_MODULE||l_api_name,
6639: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6640: END IF;
6641:
6731: END IF; -- l_config_header_id is not null
6732:
6733:
6734: -- end debug log
6735: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6736: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6737: G_MODULE||l_api_name,
6738: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6739: END IF;
6732:
6733:
6734: -- end debug log
6735: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6736: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6737: G_MODULE||l_api_name,
6738: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6739: END IF;
6740:
6740:
6741: EXCEPTION
6742:
6743: WHEN FND_API.G_EXC_ERROR THEN
6744: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6745: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6746: G_MODULE||l_api_name,
6747: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6748: END IF;
6741: EXCEPTION
6742:
6743: WHEN FND_API.G_EXC_ERROR THEN
6744: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6745: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6746: G_MODULE||l_api_name,
6747: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6748: END IF;
6749:
6753: p_data => x_msg_data
6754: );
6755:
6756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6757: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6758: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6759: G_MODULE||l_api_name,
6760: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6761: END IF;
6754: );
6755:
6756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6757: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6758: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6759: G_MODULE||l_api_name,
6760: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6761: END IF;
6762:
6766: p_data => x_msg_data
6767: );
6768:
6769: WHEN OTHERS THEN
6770: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6771: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6772: G_MODULE||l_api_name,
6773: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6774: END IF;
6767: );
6768:
6769: WHEN OTHERS THEN
6770: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6771: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6772: G_MODULE||l_api_name,
6773: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6774: END IF;
6775:
6869: BEGIN
6870:
6871:
6872: -- start debug log
6873: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6874: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6875: G_MODULE||l_api_name,
6876: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6877: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6870:
6871:
6872: -- start debug log
6873: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6874: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6875: G_MODULE||l_api_name,
6876: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6877: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6878: G_MODULE||l_api_name,
6873: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6874: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6875: G_MODULE||l_api_name,
6876: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6877: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6878: G_MODULE||l_api_name,
6879: 'Parameters : ');
6880: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6881: G_MODULE||l_api_name,
6876: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
6877: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6878: G_MODULE||l_api_name,
6879: 'Parameters : ');
6880: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6881: G_MODULE||l_api_name,
6882: 'p_document_id : '||p_document_id);
6883: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6884: G_MODULE||l_api_name,
6879: 'Parameters : ');
6880: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6881: G_MODULE||l_api_name,
6882: 'p_document_id : '||p_document_id);
6883: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6884: G_MODULE||l_api_name,
6885: 'p_document_type : '||p_document_type);
6886: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6887: G_MODULE||l_api_name,
6882: 'p_document_id : '||p_document_id);
6883: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6884: G_MODULE||l_api_name,
6885: 'p_document_type : '||p_document_type);
6886: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6887: G_MODULE||l_api_name,
6888: 'p_config_header_id : '||p_config_header_id);
6889: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6890: G_MODULE||l_api_name,
6885: 'p_document_type : '||p_document_type);
6886: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6887: G_MODULE||l_api_name,
6888: 'p_config_header_id : '||p_config_header_id);
6889: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6890: G_MODULE||l_api_name,
6891: 'p_config_rev_nbr : '||p_config_rev_nbr);
6892:
6893: END IF;
6978:
6979: END LOOP;
6980:
6981: -- end debug log
6982: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6983: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6984: G_MODULE||l_api_name,
6985: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6986: END IF;
6979: END LOOP;
6980:
6981: -- end debug log
6982: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6983: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
6984: G_MODULE||l_api_name,
6985: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
6986: END IF;
6987:
7062: BEGIN
7063:
7064:
7065: -- start debug log
7066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7068: G_MODULE||l_api_name,
7069: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7070: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7063:
7064:
7065: -- start debug log
7066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7068: G_MODULE||l_api_name,
7069: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7070: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7071: G_MODULE||l_api_name,
7066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7068: G_MODULE||l_api_name,
7069: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7070: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7071: G_MODULE||l_api_name,
7072: 'Parameters : ');
7073: -- Add Logs for printing deviations rule tbl
7074: IF p_dev_rule_tbl IS NOT NULL THEN
7073: -- Add Logs for printing deviations rule tbl
7074: IF p_dev_rule_tbl IS NOT NULL THEN
7075: IF p_dev_rule_tbl.count > 0 THEN
7076: FOR i IN p_dev_rule_tbl.first..p_dev_rule_tbl.last LOOP
7077: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7078: G_MODULE||l_api_name,
7079: 'p_dev_rule_tbl.(' || i || ').line_number : ' || to_char(p_dev_rule_tbl(i).line_number));
7080: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7081: G_MODULE||l_api_name,
7076: FOR i IN p_dev_rule_tbl.first..p_dev_rule_tbl.last LOOP
7077: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7078: G_MODULE||l_api_name,
7079: 'p_dev_rule_tbl.(' || i || ').line_number : ' || to_char(p_dev_rule_tbl(i).line_number));
7080: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7081: G_MODULE||l_api_name,
7082: 'p_dev_rule_tbl.(' || i || ').rule_id : ' || to_char(p_dev_rule_tbl(i).rule_id));
7083: END LOOP;
7084: END IF;
7129: END LOOP;
7130: END LOOP;
7131:
7132: -- end debug log
7133: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7134: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7135: G_MODULE||l_api_name,
7136: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
7137: END IF;
7130: END LOOP;
7131:
7132: -- end debug log
7133: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7134: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7135: G_MODULE||l_api_name,
7136: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
7137: END IF;
7138:
7211: BEGIN
7212:
7213:
7214: -- start debug log
7215: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7216: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7217: G_MODULE||l_api_name,
7218: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7219: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7212:
7213:
7214: -- start debug log
7215: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7216: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7217: G_MODULE||l_api_name,
7218: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7219: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7220: G_MODULE||l_api_name,
7215: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7216: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7217: G_MODULE||l_api_name,
7218: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7219: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7220: G_MODULE||l_api_name,
7221: 'Parameters : ');
7222: -- Add Logs for printing deviations rule variables tbl
7223: IF p_dev_rule_variables_tbl IS NOT NULL THEN
7223: IF p_dev_rule_variables_tbl IS NOT NULL THEN
7224: IF p_dev_rule_variables_tbl.count > 0 THEN
7225: FOR i IN p_dev_rule_variables_tbl.first..p_dev_rule_variables_tbl.last LOOP
7226: IF p_dev_rule_variables_tbl.EXISTS(i) THEN
7227: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7228: G_MODULE||l_api_name,
7229: 'p_dev_rule_variables_tbl.(' || i || ').line_number : ' || to_char(p_dev_rule_variables_tbl(i).line_number));
7230: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7231: G_MODULE||l_api_name,
7226: IF p_dev_rule_variables_tbl.EXISTS(i) THEN
7227: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7228: G_MODULE||l_api_name,
7229: 'p_dev_rule_variables_tbl.(' || i || ').line_number : ' || to_char(p_dev_rule_variables_tbl(i).line_number));
7230: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7231: G_MODULE||l_api_name,
7232: 'p_dev_rule_variables_tbl.(' || i || ').rule_id : ' || to_char(p_dev_rule_variables_tbl(i).rule_id));
7233: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7234: G_MODULE||l_api_name,
7229: 'p_dev_rule_variables_tbl.(' || i || ').line_number : ' || to_char(p_dev_rule_variables_tbl(i).line_number));
7230: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7231: G_MODULE||l_api_name,
7232: 'p_dev_rule_variables_tbl.(' || i || ').rule_id : ' || to_char(p_dev_rule_variables_tbl(i).rule_id));
7233: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7234: G_MODULE||l_api_name,
7235: 'p_dev_rule_variables_tbl.(' || i || ').variable_id : ' || to_char(p_dev_rule_variables_tbl(i).variable_id));
7236: END IF;
7237: END LOOP;
7296: END LOOP;
7297:
7298:
7299: -- end debug log
7300: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7301: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7302: G_MODULE||l_api_name,
7303: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
7304: END IF;
7297:
7298:
7299: -- end debug log
7300: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7301: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7302: G_MODULE||l_api_name,
7303: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
7304: END IF;
7305:
7388: BEGIN
7389:
7390:
7391: -- start debug log
7392: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7393: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7394: G_MODULE||l_api_name,
7395: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7396: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7389:
7390:
7391: -- start debug log
7392: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7393: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7394: G_MODULE||l_api_name,
7395: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7396: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7397: G_MODULE||l_api_name,
7392: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7393: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7394: G_MODULE||l_api_name,
7395: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7396: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7397: G_MODULE||l_api_name,
7398: 'Parameters : ');
7399: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7400: G_MODULE||l_api_name,
7395: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7396: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7397: G_MODULE||l_api_name,
7398: 'Parameters : ');
7399: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7400: G_MODULE||l_api_name,
7401: '101: p_config_header_id : '||p_config_header_id);
7402: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7403: G_MODULE||l_api_name,
7398: 'Parameters : ');
7399: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7400: G_MODULE||l_api_name,
7401: '101: p_config_header_id : '||p_config_header_id);
7402: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7403: G_MODULE||l_api_name,
7404: '101: p_config_rev_nbr : '||p_config_rev_nbr);
7405: -- Add Logs for printing deviations rule tbl
7406: IF p_dev_rule_questions_tbl IS NOT NULL THEN
7406: IF p_dev_rule_questions_tbl IS NOT NULL THEN
7407: IF p_dev_rule_questions_tbl.count > 0 THEN
7408: FOR i IN p_dev_rule_questions_tbl.first..p_dev_rule_questions_tbl.last LOOP
7409: IF p_dev_rule_questions_tbl.EXISTS(i) THEN
7410: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7411: G_MODULE||l_api_name,
7412: 'p_dev_rule_questions_tbl.(' || i || ').rule_id : ' || to_char(p_dev_rule_questions_tbl(i).rule_id));
7413: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7414: G_MODULE||l_api_name,
7409: IF p_dev_rule_questions_tbl.EXISTS(i) THEN
7410: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7411: G_MODULE||l_api_name,
7412: 'p_dev_rule_questions_tbl.(' || i || ').rule_id : ' || to_char(p_dev_rule_questions_tbl(i).rule_id));
7413: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7414: G_MODULE||l_api_name,
7415: 'p_dev_rule_questions_tbl.(' || i || ').question_id : ' || to_char(p_dev_rule_questions_tbl(i).question_id));
7416: END IF;
7417: END LOOP;
7472: END LOOP;
7473:
7474:
7475: -- end debug log
7476: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7477: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7478: G_MODULE||l_api_name,
7479: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
7480: END IF;
7473:
7474:
7475: -- end debug log
7476: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7477: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7478: G_MODULE||l_api_name,
7479: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
7480: END IF;
7481:
7595:
7596: BEGIN
7597:
7598: -- start debug log
7599: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7600: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7601: G_MODULE||l_api_name,
7602: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7603: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7596: BEGIN
7597:
7598: -- start debug log
7599: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7600: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7601: G_MODULE||l_api_name,
7602: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7603: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7604: G_MODULE||l_api_name,
7599: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7600: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7601: G_MODULE||l_api_name,
7602: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7603: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7604: G_MODULE||l_api_name,
7605: 'Parameters : ');
7606: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7607: G_MODULE||l_api_name,
7602: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7603: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7604: G_MODULE||l_api_name,
7605: 'Parameters : ');
7606: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7607: G_MODULE||l_api_name,
7608: '101: p_document_id : '||p_document_id);
7609: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7610: G_MODULE||l_api_name,
7605: 'Parameters : ');
7606: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7607: G_MODULE||l_api_name,
7608: '101: p_document_id : '||p_document_id);
7609: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7610: G_MODULE||l_api_name,
7611: '101: p_document_type : '||p_document_type);
7612: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7613: G_MODULE||l_api_name,
7608: '101: p_document_id : '||p_document_id);
7609: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7610: G_MODULE||l_api_name,
7611: '101: p_document_type : '||p_document_type);
7612: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7613: G_MODULE||l_api_name,
7614: '101: p_article_id : '||p_article_id);
7615: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7616: G_MODULE||l_api_name,
7611: '101: p_document_type : '||p_document_type);
7612: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7613: G_MODULE||l_api_name,
7614: '101: p_article_id : '||p_article_id);
7615: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7616: G_MODULE||l_api_name,
7617: '101: p_effectivity_date : '||to_char(p_effectivity_date));
7618: END IF;
7619:
7670: OPEN csr_clause_details(p_article_id,l_article_version_id);
7671: FETCH csr_clause_details into x_article_title,x_article_description;
7672: CLOSE csr_clause_details;
7673:
7674: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7675:
7676: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7677: '102: x_article_id : '||l_article_id);
7678: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7672: CLOSE csr_clause_details;
7673:
7674: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7675:
7676: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7677: '102: x_article_id : '||l_article_id);
7678: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7679: '102: x_article_version_id : '||l_article_version_id);
7680: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7674: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7675:
7676: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7677: '102: x_article_id : '||l_article_id);
7678: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7679: '102: x_article_version_id : '||l_article_version_id);
7680: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7681: '102: x_doc_lib : '||l_doc_lib );
7682: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7676: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7677: '102: x_article_id : '||l_article_id);
7678: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7679: '102: x_article_version_id : '||l_article_version_id);
7680: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7681: '102: x_doc_lib : '||l_doc_lib );
7682: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7683: '102: x_article_title : '||x_article_title);
7684: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7678: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7679: '102: x_article_version_id : '||l_article_version_id);
7680: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7681: '102: x_doc_lib : '||l_doc_lib );
7682: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7683: '102: x_article_title : '||x_article_title);
7684: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7685: '102: x_article_description : '||x_article_description );
7686:
7680: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7681: '102: x_doc_lib : '||l_doc_lib );
7682: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7683: '102: x_article_title : '||x_article_title);
7684: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7685: '102: x_article_description : '||x_article_description );
7686:
7687: END IF;
7688:
7695: OPEN csr_clause_details(l_article_id,l_article_version_id);
7696: FETCH csr_clause_details into x_article_title,x_article_description;
7697: CLOSE csr_clause_details;
7698:
7699: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7700: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7701: '103: l_article_id : '||l_article_id);
7702: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7703: '103: l_article_version_id : '||l_article_version_id);
7696: FETCH csr_clause_details into x_article_title,x_article_description;
7697: CLOSE csr_clause_details;
7698:
7699: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7700: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7701: '103: l_article_id : '||l_article_id);
7702: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7703: '103: l_article_version_id : '||l_article_version_id);
7704: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7698:
7699: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7700: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7701: '103: l_article_id : '||l_article_id);
7702: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7703: '103: l_article_version_id : '||l_article_version_id);
7704: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7705: '103: x_article_title : '||x_article_title);
7706: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7700: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7701: '103: l_article_id : '||l_article_id);
7702: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7703: '103: l_article_version_id : '||l_article_version_id);
7704: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7705: '103: x_article_title : '||x_article_title);
7706: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7707: '103: x_article_description : '||x_article_description );
7708:
7702: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7703: '103: l_article_version_id : '||l_article_version_id);
7704: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7705: '103: x_article_title : '||x_article_title);
7706: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7707: '103: x_article_description : '||x_article_description );
7708:
7709: END IF;
7710:
7726: IF l_def_scn_code = 'UNASSIGNED' THEN
7727: l_scn_code := l_xprt_scn_code;
7728: END IF;
7729:
7730: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7731: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7732: '104: l_def_scn_code : '||l_def_scn_code);
7733: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7734: '104: l_xprt_scn_code : '||l_xprt_scn_code);
7727: l_scn_code := l_xprt_scn_code;
7728: END IF;
7729:
7730: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7731: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7732: '104: l_def_scn_code : '||l_def_scn_code);
7733: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7734: '104: l_xprt_scn_code : '||l_xprt_scn_code);
7735: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7729:
7730: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7731: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7732: '104: l_def_scn_code : '||l_def_scn_code);
7733: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7734: '104: l_xprt_scn_code : '||l_xprt_scn_code);
7735: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7736: '104: l_scn_code : '|| l_scn_code);
7737: END IF;
7731: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7732: '104: l_def_scn_code : '||l_def_scn_code);
7733: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7734: '104: l_xprt_scn_code : '||l_xprt_scn_code);
7735: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7736: '104: l_scn_code : '|| l_scn_code);
7737: END IF;
7738:
7739: --Bug#4865126 Need to pass l_scn_code.Not l_xprt_scn_code
7749: END IF;
7750:
7751:
7752: -- end debug log
7753: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7754: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7755: G_MODULE||l_api_name,
7756: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
7757: END IF;
7750:
7751:
7752: -- end debug log
7753: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7754: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7755: G_MODULE||l_api_name,
7756: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
7757: END IF;
7758:
7863: BEGIN
7864:
7865:
7866: -- start debug log
7867: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7868: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7869: G_MODULE||l_api_name,
7870: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7871: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7864:
7865:
7866: -- start debug log
7867: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7868: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7869: G_MODULE||l_api_name,
7870: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7871: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7872: G_MODULE||l_api_name,
7867: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7868: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7869: G_MODULE||l_api_name,
7870: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
7871: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7872: G_MODULE||l_api_name,
7873: 'Parameters : ');
7874: -- Add Logs for printing deviations rule tbl
7875: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7871: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7872: G_MODULE||l_api_name,
7873: 'Parameters : ');
7874: -- Add Logs for printing deviations rule tbl
7875: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7876: G_MODULE||l_api_name,
7877: '101: p_document_id : '||p_document_id);
7878: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7879: G_MODULE||l_api_name,
7874: -- Add Logs for printing deviations rule tbl
7875: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7876: G_MODULE||l_api_name,
7877: '101: p_document_id : '||p_document_id);
7878: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7879: G_MODULE||l_api_name,
7880: '101: p_document_type : '||p_document_type);
7881: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7882: G_MODULE||l_api_name,
7877: '101: p_document_id : '||p_document_id);
7878: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7879: G_MODULE||l_api_name,
7880: '101: p_document_type : '||p_document_type);
7881: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7882: G_MODULE||l_api_name,
7883: '101: p_sequence_id : '||p_sequence_id);
7884: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7885: G_MODULE||l_api_name,
7880: '101: p_document_type : '||p_document_type);
7881: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7882: G_MODULE||l_api_name,
7883: '101: p_sequence_id : '||p_sequence_id);
7884: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7885: G_MODULE||l_api_name,
7886: '101: p_config_header_id : '||p_config_header_id);
7887: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7888: G_MODULE||l_api_name,
7883: '101: p_sequence_id : '||p_sequence_id);
7884: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7885: G_MODULE||l_api_name,
7886: '101: p_config_header_id : '||p_config_header_id);
7887: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7888: G_MODULE||l_api_name,
7889: '101: p_config_rev_nbr : '||p_config_rev_nbr);
7890: IF p_rule_qst_values_tbl IS NOT NULL THEN
7891: IF p_rule_qst_values_tbl.count > 0 THEN
7890: IF p_rule_qst_values_tbl IS NOT NULL THEN
7891: IF p_rule_qst_values_tbl.count > 0 THEN
7892: FOR i IN p_rule_qst_values_tbl.first..p_rule_qst_values_tbl.last LOOP
7893: IF p_rule_qst_values_tbl.EXISTS(i) THEN
7894: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7895: G_MODULE||l_api_name,
7896: 'p_rule_qst_values_tbl.(' || i || ').rule_id : ' || to_char(p_rule_qst_values_tbl(i).rule_id));
7897: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7898: G_MODULE||l_api_name,
7893: IF p_rule_qst_values_tbl.EXISTS(i) THEN
7894: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7895: G_MODULE||l_api_name,
7896: 'p_rule_qst_values_tbl.(' || i || ').rule_id : ' || to_char(p_rule_qst_values_tbl(i).rule_id));
7897: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7898: G_MODULE||l_api_name,
7899: 'p_rule_qst_values_tbl.(' || i || ').question_id : ' || to_char(p_rule_qst_values_tbl(i).question_id));
7900: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7901: G_MODULE||l_api_name,
7896: 'p_rule_qst_values_tbl.(' || i || ').rule_id : ' || to_char(p_rule_qst_values_tbl(i).rule_id));
7897: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7898: G_MODULE||l_api_name,
7899: 'p_rule_qst_values_tbl.(' || i || ').question_id : ' || to_char(p_rule_qst_values_tbl(i).question_id));
7900: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7901: G_MODULE||l_api_name,
7902: 'p_rule_qst_values_tbl.(' || i || ').question_value : ' || to_char(p_rule_qst_values_tbl(i).question_value));
7903: END IF;
7904: END LOOP;
7907: IF p_rule_var_values_tbl IS NOT NULL THEN
7908: IF p_rule_var_values_tbl.count > 0 THEN
7909: FOR i IN p_rule_var_values_tbl.first..p_rule_var_values_tbl.last LOOP
7910: IF p_rule_var_values_tbl.EXISTS(i) THEN
7911: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7912: G_MODULE||l_api_name,
7913: 'p_rule_var_values_tbl.(' || i || ').line_number : ' || to_char(p_rule_var_values_tbl(i).line_number));
7914: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7915: G_MODULE||l_api_name,
7910: IF p_rule_var_values_tbl.EXISTS(i) THEN
7911: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7912: G_MODULE||l_api_name,
7913: 'p_rule_var_values_tbl.(' || i || ').line_number : ' || to_char(p_rule_var_values_tbl(i).line_number));
7914: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7915: G_MODULE||l_api_name,
7916: 'p_rule_var_values_tbl.(' || i || ').rule_id : ' || to_char(p_rule_var_values_tbl(i).rule_id));
7917: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7918: G_MODULE||l_api_name,
7913: 'p_rule_var_values_tbl.(' || i || ').line_number : ' || to_char(p_rule_var_values_tbl(i).line_number));
7914: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7915: G_MODULE||l_api_name,
7916: 'p_rule_var_values_tbl.(' || i || ').rule_id : ' || to_char(p_rule_var_values_tbl(i).rule_id));
7917: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7918: G_MODULE||l_api_name,
7919: 'p_rule_var_values_tbl.(' || i || ').variable_id : ' || to_char(p_rule_var_values_tbl(i).variable_id));
7920: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7921: G_MODULE||l_api_name,
7916: 'p_rule_var_values_tbl.(' || i || ').rule_id : ' || to_char(p_rule_var_values_tbl(i).rule_id));
7917: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7918: G_MODULE||l_api_name,
7919: 'p_rule_var_values_tbl.(' || i || ').variable_id : ' || to_char(p_rule_var_values_tbl(i).variable_id));
7920: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7921: G_MODULE||l_api_name,
7922: 'p_rule_var_values_tbl.(' || i || ').variable_value : ' || p_rule_var_values_tbl(i).variable_value);
7923: END IF;
7924: END LOOP;
7927: IF p_clause_tbl IS NOT NULL THEN
7928: IF p_clause_tbl.count > 0 THEN
7929: FOR i IN p_clause_tbl.first..p_clause_tbl.last LOOP
7930: IF p_clause_tbl.EXISTS(i) THEN
7931: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
7932: G_MODULE||l_api_name,
7933: 'p_clause_tbl.(' || i || ') : ' || to_char(p_clause_tbl(i)));
7934: END IF;
7935: END LOOP;
8199: END LOOP;
8200: END IF;
8201:
8202: -- end debug log
8203: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8204: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8205: G_MODULE||l_api_name,
8206: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
8207: END IF;
8200: END IF;
8201:
8202: -- end debug log
8203: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8204: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8205: G_MODULE||l_api_name,
8206: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
8207: END IF;
8208:
8279: BEGIN
8280:
8281:
8282: -- start debug log
8283: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8284: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8285: G_MODULE||l_api_name,
8286: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
8287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8280:
8281:
8282: -- start debug log
8283: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8284: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8285: G_MODULE||l_api_name,
8286: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
8287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8288: G_MODULE||l_api_name,
8283: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8284: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8285: G_MODULE||l_api_name,
8286: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
8287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8288: G_MODULE||l_api_name,
8289: 'Parameters : ');
8290: -- Add Logs for printing deviations rule tbl
8291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8288: G_MODULE||l_api_name,
8289: 'Parameters : ');
8290: -- Add Logs for printing deviations rule tbl
8291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8292: G_MODULE||l_api_name,
8293: '101: p_document_id : '||p_document_id);
8294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8295: G_MODULE||l_api_name,
8290: -- Add Logs for printing deviations rule tbl
8291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8292: G_MODULE||l_api_name,
8293: '101: p_document_id : '||p_document_id);
8294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8295: G_MODULE||l_api_name,
8296: '101: p_document_type : '||p_document_type);
8297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8298: G_MODULE||l_api_name,
8293: '101: p_document_id : '||p_document_id);
8294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8295: G_MODULE||l_api_name,
8296: '101: p_document_type : '||p_document_type);
8297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8298: G_MODULE||l_api_name,
8299: '101: p_config_header_id : '||p_config_header_id);
8300: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8301: G_MODULE||l_api_name,
8296: '101: p_document_type : '||p_document_type);
8297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8298: G_MODULE||l_api_name,
8299: '101: p_config_header_id : '||p_config_header_id);
8300: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8301: G_MODULE||l_api_name,
8302: '101: p_config_rev_nbr : '||p_config_rev_nbr);
8303: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8304: G_MODULE||l_api_name,
8299: '101: p_config_header_id : '||p_config_header_id);
8300: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8301: G_MODULE||l_api_name,
8302: '101: p_config_rev_nbr : '||p_config_rev_nbr);
8303: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8304: G_MODULE||l_api_name,
8305: '101: p_mode : '||p_mode);
8306: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8307: G_MODULE||l_api_name,
8302: '101: p_config_rev_nbr : '||p_config_rev_nbr);
8303: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8304: G_MODULE||l_api_name,
8305: '101: p_mode : '||p_mode);
8306: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8307: G_MODULE||l_api_name,
8308: '101: p_sequence_id : '||p_sequence_id);
8309:
8310: END IF;
8342: x_return_status := FND_API.G_RET_STS_SUCCESS;
8343:
8344: -- Step 1: Get Document values from the Extension rule api
8345:
8346: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8347: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8348: G_MODULE||l_api_name,
8349: '110: Step 1: Get Document values from the Extension rule api');
8350: END IF;
8343:
8344: -- Step 1: Get Document values from the Extension rule api
8345:
8346: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8347: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8348: G_MODULE||l_api_name,
8349: '110: Step 1: Get Document values from the Extension rule api');
8350: END IF;
8351:
8371:
8372:
8373: -- Step 2: Insert values into okc_xprt_deviations_gt
8374:
8375: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8376: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8377: G_MODULE||l_api_name,
8378: '120: Step 2: Insert values into okc_xprt_deviations_gt');
8379: END IF;
8372:
8373: -- Step 2: Insert values into okc_xprt_deviations_gt
8374:
8375: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8376: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8377: G_MODULE||l_api_name,
8378: '120: Step 2: Insert values into okc_xprt_deviations_gt');
8379: END IF;
8380:
8377: G_MODULE||l_api_name,
8378: '120: Step 2: Insert values into okc_xprt_deviations_gt');
8379: END IF;
8380:
8381: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8382: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8383: G_MODULE||l_api_name,
8384: '121: l_hdr_var_value_tbl.COUNT :' || TO_CHAR(l_hdr_var_value_tbl.COUNT));
8385: END IF;
8378: '120: Step 2: Insert values into okc_xprt_deviations_gt');
8379: END IF;
8380:
8381: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8382: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8383: G_MODULE||l_api_name,
8384: '121: l_hdr_var_value_tbl.COUNT :' || TO_CHAR(l_hdr_var_value_tbl.COUNT));
8385: END IF;
8386:
8387: IF l_hdr_var_value_tbl.COUNT > 0 THEN
8388:
8389: FOR i IN l_hdr_var_value_tbl.FIRST..l_hdr_var_value_tbl.LAST
8390: LOOP
8391: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8392: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8393: G_MODULE||l_api_name,
8394: '122: l_hdr_var_value_tbl( '|| i || ').variable_code :' || l_hdr_var_value_tbl(i).variable_code);
8395: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8388:
8389: FOR i IN l_hdr_var_value_tbl.FIRST..l_hdr_var_value_tbl.LAST
8390: LOOP
8391: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8392: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8393: G_MODULE||l_api_name,
8394: '122: l_hdr_var_value_tbl( '|| i || ').variable_code :' || l_hdr_var_value_tbl(i).variable_code);
8395: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8396: G_MODULE||l_api_name,
8391: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8392: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8393: G_MODULE||l_api_name,
8394: '122: l_hdr_var_value_tbl( '|| i || ').variable_code :' || l_hdr_var_value_tbl(i).variable_code);
8395: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8396: G_MODULE||l_api_name,
8397: '123: l_hdr_var_value_tbl( '|| i || ').variable_value_id :' || l_hdr_var_value_tbl(i).variable_value_id);
8398: END IF;
8399:
8423: END LOOP;
8424: END IF;
8425:
8426:
8427: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8428: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8429: G_MODULE||l_api_name,
8430: '124: l_line_sysvar_value_tbl.COUNT :' || TO_CHAR(l_line_sysvar_value_tbl.COUNT));
8431: END IF;
8424: END IF;
8425:
8426:
8427: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8428: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8429: G_MODULE||l_api_name,
8430: '124: l_line_sysvar_value_tbl.COUNT :' || TO_CHAR(l_line_sysvar_value_tbl.COUNT));
8431: END IF;
8432:
8434:
8435: FOR i IN l_line_sysvar_value_tbl.FIRST..l_line_sysvar_value_tbl.LAST
8436: LOOP
8437:
8438: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8439: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8440: G_MODULE||l_api_name,
8441: '125: l_line_sysvar_value_tbl( '|| i || ').line_number :' || l_line_sysvar_value_tbl(i).line_number);
8442: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8435: FOR i IN l_line_sysvar_value_tbl.FIRST..l_line_sysvar_value_tbl.LAST
8436: LOOP
8437:
8438: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8439: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8440: G_MODULE||l_api_name,
8441: '125: l_line_sysvar_value_tbl( '|| i || ').line_number :' || l_line_sysvar_value_tbl(i).line_number);
8442: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8443: G_MODULE||l_api_name,
8438: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8439: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8440: G_MODULE||l_api_name,
8441: '125: l_line_sysvar_value_tbl( '|| i || ').line_number :' || l_line_sysvar_value_tbl(i).line_number);
8442: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8443: G_MODULE||l_api_name,
8444: '126: l_line_sysvar_value_tbl( '|| i || ').variable_code :' || l_line_sysvar_value_tbl(i).variable_code);
8445: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8446: G_MODULE||l_api_name,
8441: '125: l_line_sysvar_value_tbl( '|| i || ').line_number :' || l_line_sysvar_value_tbl(i).line_number);
8442: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8443: G_MODULE||l_api_name,
8444: '126: l_line_sysvar_value_tbl( '|| i || ').variable_code :' || l_line_sysvar_value_tbl(i).variable_code);
8445: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8446: G_MODULE||l_api_name,
8447: '127: l_line_sysvar_value_tbl( '|| i || ').variable_value :' || l_line_sysvar_value_tbl(i).variable_value);
8448: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8449: G_MODULE||l_api_name,
8444: '126: l_line_sysvar_value_tbl( '|| i || ').variable_code :' || l_line_sysvar_value_tbl(i).variable_code);
8445: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8446: G_MODULE||l_api_name,
8447: '127: l_line_sysvar_value_tbl( '|| i || ').variable_value :' || l_line_sysvar_value_tbl(i).variable_value);
8448: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8449: G_MODULE||l_api_name,
8450: '128: l_line_sysvar_value_tbl( '|| i || ').item_id :' || l_line_sysvar_value_tbl(i).item_id);
8451: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8452: G_MODULE||l_api_name,
8447: '127: l_line_sysvar_value_tbl( '|| i || ').variable_value :' || l_line_sysvar_value_tbl(i).variable_value);
8448: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8449: G_MODULE||l_api_name,
8450: '128: l_line_sysvar_value_tbl( '|| i || ').item_id :' || l_line_sysvar_value_tbl(i).item_id);
8451: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8452: G_MODULE||l_api_name,
8453: '129: l_line_sysvar_value_tbl( '|| i || ').org_id :' || l_line_sysvar_value_tbl(i).org_id);
8454: END IF;
8455:
8480:
8481:
8482: -- Step 3: Get Clauses and Deviations from cz_config_items_v
8483:
8484: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8485: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8486: G_MODULE||l_api_name,
8487: '130: Step 3: Get Clauses and Deviations from cz_config_items_v');
8488: END IF;
8481:
8482: -- Step 3: Get Clauses and Deviations from cz_config_items_v
8483:
8484: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8485: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8486: G_MODULE||l_api_name,
8487: '130: Step 3: Get Clauses and Deviations from cz_config_items_v');
8488: END IF;
8489:
8508:
8509:
8510: -- Step 4: For each Deviation rule get unique list of variables and Questions
8511:
8512: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8513: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8514: G_MODULE||l_api_name,
8515: '140: Step 4: For each Deviation rule get unique list of variables and Questions');
8516: END IF;
8509:
8510: -- Step 4: For each Deviation rule get unique list of variables and Questions
8511:
8512: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8513: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8514: G_MODULE||l_api_name,
8515: '140: Step 4: For each Deviation rule get unique list of variables and Questions');
8516: END IF;
8517:
8535:
8536: -- Step 5: For variables in rule get value from okc_xprt_deviations_gt
8537:
8538: IF l_rule_variables_tbl.COUNT > 0 THEN
8539: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8540: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8541: G_MODULE||l_api_name,
8542: '150: Step 5: For variables in rule get value from okc_xprt_deviations_gt');
8543: END IF;
8536: -- Step 5: For variables in rule get value from okc_xprt_deviations_gt
8537:
8538: IF l_rule_variables_tbl.COUNT > 0 THEN
8539: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8540: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8541: G_MODULE||l_api_name,
8542: '150: Step 5: For variables in rule get value from okc_xprt_deviations_gt');
8543: END IF;
8544:
8561:
8562: -- Step 6: For questions in rule get value from cz_config_items_v
8563:
8564: IF l_rule_questions_tbl.COUNT > 0 THEN
8565: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8566: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8567: G_MODULE||l_api_name,
8568: '160: Step 6: For questions in rule get value from cz_config_items_v');
8569: END IF;
8562: -- Step 6: For questions in rule get value from cz_config_items_v
8563:
8564: IF l_rule_questions_tbl.COUNT > 0 THEN
8565: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8566: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8567: G_MODULE||l_api_name,
8568: '160: Step 6: For questions in rule get value from cz_config_items_v');
8569: END IF;
8570:
8589: END IF;
8590:
8591: -- Step 7: Insert Clauses and Terms deviations into okc_terms_deviations_t
8592:
8593: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8594: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8595: G_MODULE||l_api_name,
8596: '170: Step 7: Insert Clauses and Terms deviations into okc_terms_deviations_t');
8597: END IF;
8590:
8591: -- Step 7: Insert Clauses and Terms deviations into okc_terms_deviations_t
8592:
8593: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8594: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8595: G_MODULE||l_api_name,
8596: '170: Step 7: Insert Clauses and Terms deviations into okc_terms_deviations_t');
8597: END IF;
8598:
8619: END IF;
8620:
8621:
8622: -- end debug log
8623: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8624: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8625: G_MODULE||l_api_name,
8626: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
8627: END IF;
8620:
8621:
8622: -- end debug log
8623: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8624: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8625: G_MODULE||l_api_name,
8626: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
8627: END IF;
8628:
8808: l_expert_not_applied_sev_e := 'E';
8809: l_expert_not_applied_sev_w := 'W';
8810:
8811: -- start debug log
8812: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8813: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8814: G_MODULE||l_api_name,
8815: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
8816: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8809: l_expert_not_applied_sev_w := 'W';
8810:
8811: -- start debug log
8812: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8813: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8814: G_MODULE||l_api_name,
8815: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
8816: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8817: G_MODULE||l_api_name,
8812: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8813: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8814: G_MODULE||l_api_name,
8815: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
8816: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8817: G_MODULE||l_api_name,
8818: 'Parameters : ');
8819: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8820: G_MODULE||l_api_name,
8815: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
8816: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8817: G_MODULE||l_api_name,
8818: 'Parameters : ');
8819: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8820: G_MODULE||l_api_name,
8821: 'p_document_id : '||p_document_id);
8822: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8823: G_MODULE||l_api_name,
8818: 'Parameters : ');
8819: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8820: G_MODULE||l_api_name,
8821: 'p_document_id : '||p_document_id);
8822: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8823: G_MODULE||l_api_name,
8824: 'p_document_type : '||p_document_type);
8825: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8826: G_MODULE||l_api_name,
8821: 'p_document_id : '||p_document_id);
8822: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8823: G_MODULE||l_api_name,
8824: 'p_document_type : '||p_document_type);
8825: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8826: G_MODULE||l_api_name,
8827: 'p_bv_mode : '||p_bv_mode);
8828: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8829: G_MODULE||l_api_name,
8824: 'p_document_type : '||p_document_type);
8825: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8826: G_MODULE||l_api_name,
8827: 'p_bv_mode : '||p_bv_mode);
8828: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
8829: G_MODULE||l_api_name,
8830: 'p_sequence_id : '||p_sequence_id);
8831:
8832: END IF;
9034: l_template_id,l_template_ce_enabled;
9035: CLOSE l_get_template_info_csr;
9036:
9037: -- debug log
9038: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9039: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9040: G_MODULE||l_api_name,
9041: 'l_config_header_id : '||l_config_header_id);
9042: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9035: CLOSE l_get_template_info_csr;
9036:
9037: -- debug log
9038: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9039: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9040: G_MODULE||l_api_name,
9041: 'l_config_header_id : '||l_config_header_id);
9042: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9043: G_MODULE||l_api_name,
9038: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9039: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9040: G_MODULE||l_api_name,
9041: 'l_config_header_id : '||l_config_header_id);
9042: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9043: G_MODULE||l_api_name,
9044: 'l_config_rev_nbr : '||l_config_rev_nbr);
9045: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9046: G_MODULE||l_api_name,
9041: 'l_config_header_id : '||l_config_header_id);
9042: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9043: G_MODULE||l_api_name,
9044: 'l_config_rev_nbr : '||l_config_rev_nbr);
9045: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9046: G_MODULE||l_api_name,
9047: 'l_template_id : '||l_template_id);
9048: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9049: G_MODULE||l_api_name,
9044: 'l_config_rev_nbr : '||l_config_rev_nbr);
9045: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9046: G_MODULE||l_api_name,
9047: 'l_template_id : '||l_template_id);
9048: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9049: G_MODULE||l_api_name,
9050: 'l_template_ce_enabled : '||l_template_ce_enabled);
9051: END IF;
9052:
9642: p_data => x_msg_data
9643: );
9644:
9645: -- end debug log
9646: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9647: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9648: G_MODULE||l_api_name,
9649: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9650: END IF;
9643: );
9644:
9645: -- end debug log
9646: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9647: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9648: G_MODULE||l_api_name,
9649: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9650: END IF;
9651:
9724: AND template_id = p_template_id;
9725:
9726: BEGIN
9727: -- start debug log
9728: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9729: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9730: G_MODULE||l_api_name,
9731: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
9732: END IF;
9725:
9726: BEGIN
9727: -- start debug log
9728: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9729: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9730: G_MODULE||l_api_name,
9731: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
9732: END IF;
9733:
9767: END IF;
9768: CLOSE csr_tmpl_applied_yn;
9769:
9770: -- end debug log
9771: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9772: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9773: G_MODULE||l_api_name,
9774: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9775: END IF;
9768: CLOSE csr_tmpl_applied_yn;
9769:
9770: -- end debug log
9771: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9772: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9773: G_MODULE||l_api_name,
9774: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9775: END IF;
9776:
9776:
9777: EXCEPTION
9778:
9779: WHEN FND_API.G_EXC_ERROR THEN
9780: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9781: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9782: G_MODULE||l_api_name,
9783: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9784: END IF;
9777: EXCEPTION
9778:
9779: WHEN FND_API.G_EXC_ERROR THEN
9780: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9781: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9782: G_MODULE||l_api_name,
9783: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9784: END IF;
9785:
9789: p_data => x_msg_data
9790: );
9791:
9792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9793: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9794: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9795: G_MODULE||l_api_name,
9796: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9797: END IF;
9790: );
9791:
9792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9793: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9794: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9795: G_MODULE||l_api_name,
9796: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9797: END IF;
9798:
9802: p_data => x_msg_data
9803: );
9804:
9805: WHEN OTHERS THEN
9806: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9807: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9808: G_MODULE||l_api_name,
9809: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9810: END IF;
9803: );
9804:
9805: WHEN OTHERS THEN
9806: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9807: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9808: G_MODULE||l_api_name,
9809: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9810: END IF;
9811:
9871: AND t.template_id = p_template_id;
9872:
9873: BEGIN
9874: -- start debug log
9875: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9876: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9877: G_MODULE||l_api_name,
9878: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
9879: END IF;
9872:
9873: BEGIN
9874: -- start debug log
9875: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9876: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9877: G_MODULE||l_api_name,
9878: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
9879: END IF;
9880:
9905: FETCH l_get_template_info_csr INTO x_config_header_id, x_config_rev_nbr, l_template_id, x_expert_enabled_yn;
9906: CLOSE l_get_template_info_csr;
9907:
9908: -- end debug log
9909: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9910: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9911: G_MODULE||l_api_name,
9912: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9913: END IF;
9906: CLOSE l_get_template_info_csr;
9907:
9908: -- end debug log
9909: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9910: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9911: G_MODULE||l_api_name,
9912: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9913: END IF;
9914:
9914:
9915: EXCEPTION
9916:
9917: WHEN FND_API.G_EXC_ERROR THEN
9918: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9919: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9920: G_MODULE||l_api_name,
9921: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9922: END IF;
9915: EXCEPTION
9916:
9917: WHEN FND_API.G_EXC_ERROR THEN
9918: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9919: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9920: G_MODULE||l_api_name,
9921: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9922: END IF;
9923:
9927: p_data => x_msg_data
9928: );
9929:
9930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9931: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9932: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9933: G_MODULE||l_api_name,
9934: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9935: END IF;
9928: );
9929:
9930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9931: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9932: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9933: G_MODULE||l_api_name,
9934: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9935: END IF;
9936:
9940: p_data => x_msg_data
9941: );
9942:
9943: WHEN OTHERS THEN
9944: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9945: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9946: G_MODULE||l_api_name,
9947: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9948: END IF;
9941: );
9942:
9943: WHEN OTHERS THEN
9944: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9945: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
9946: G_MODULE||l_api_name,
9947: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
9948: END IF;
9949:
10121:
10122: BEGIN
10123: l_result := 0;
10124:
10125: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1100: Entering is_config_complete ');
10127: END IF;
10128:
10129: OPEN doc_config_details_csr ;
10122: BEGIN
10123: l_result := 0;
10124:
10125: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1100: Entering is_config_complete ');
10127: END IF;
10128:
10129: OPEN doc_config_details_csr ;
10130: FETCH doc_config_details_csr into l_result;
10132: l_result := 0;
10133: END IF;
10134: CLOSE doc_config_details_csr ;
10135:
10136: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10137: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2000: Result is_config_complete : ['||l_result||']');
10138: END IF;
10139:
10140: IF l_result = 2 THEN
10133: END IF;
10134: CLOSE doc_config_details_csr ;
10135:
10136: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10137: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2000: Result is_config_complete : ['||l_result||']');
10138: END IF;
10139:
10140: IF l_result = 2 THEN
10141: RETURN 'Y';
10144: END IF;
10145:
10146: EXCEPTION
10147: WHEN OTHERS THEN
10148: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10149: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2000: Leaving is_config_complete of EXCEPTION: '||sqlerrm);
10150: END IF;
10151: RETURN 'E';
10152: END is_config_complete;
10145:
10146: EXCEPTION
10147: WHEN OTHERS THEN
10148: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10149: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2000: Leaving is_config_complete of EXCEPTION: '||sqlerrm);
10150: END IF;
10151: RETURN 'E';
10152: END is_config_complete;
10153:
10175:
10176: BEGIN
10177: l_return_val := 'N';
10178:
10179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1100: Entering has_unanswered_questions ');
10181: END IF;
10182:
10183: OPEN doc_template_dtls_csr ;
10176: BEGIN
10177: l_return_val := 'N';
10178:
10179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1100: Entering has_unanswered_questions ');
10181: END IF;
10182:
10183: OPEN doc_template_dtls_csr ;
10184: FETCH doc_template_dtls_csr into l_template_id, l_expert_enabled, l_contract_source;
10205: END IF;
10206:
10207: END IF;
10208:
10209: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10210: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2000: Result has_unanswered_questions : ['||l_return_val||']');
10211: END IF;
10212:
10213: RETURN l_return_val;
10206:
10207: END IF;
10208:
10209: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10210: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2000: Result has_unanswered_questions : ['||l_return_val||']');
10211: END IF;
10212:
10213: RETURN l_return_val;
10214:
10213: RETURN l_return_val;
10214:
10215: EXCEPTION
10216: WHEN OTHERS THEN
10217: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10218: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2000: Leaving has_unanswered_questions of EXCEPTION: '||sqlerrm);
10219: END IF;
10220: RETURN 'E';
10221: END has_unanswered_questions;
10214:
10215: EXCEPTION
10216: WHEN OTHERS THEN
10217: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
10218: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'2000: Leaving has_unanswered_questions of EXCEPTION: '||sqlerrm);
10219: END IF;
10220: RETURN 'E';
10221: END has_unanswered_questions;
10222: