14: --
15: BEGIN
16: --
17:
18: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
19: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
20: MODULE => l_module,
21: MESSAGE => 'Entering ' || l_procedure);
22: END IF;
15: BEGIN
16: --
17:
18: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
19: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
20: MODULE => l_module,
21: MESSAGE => 'Entering ' || l_procedure);
22: END IF;
23:
26: 'wwctx_api.get_sso_schema'
27: || ' from dual'
28: INTO l_retval;
29:
30: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
31: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
32: MODULE => l_module,
33: MESSAGE => 'Exiting ' || l_procedure);
34: END IF;
27: || ' from dual'
28: INTO l_retval;
29:
30: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
31: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
32: MODULE => l_module,
33: MESSAGE => 'Exiting ' || l_procedure);
34: END IF;
35:
53: --
54: BEGIN
55: --
56:
57: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
58: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
59: MODULE => l_module,
60: MESSAGE => 'Entering ' || l_procedure);
61: END IF;
54: BEGIN
55: --
56:
57: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
58: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
59: MODULE => l_module,
60: MESSAGE => 'Entering ' || l_procedure);
61: END IF;
62:
63: EXECUTE IMMEDIATE
64: 'select wwctx_api.get_sso_query_path(:p_url,:p_schema) from dual'
65: INTO l_retval using p_url,p_schema;
66:
67: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
68: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
69: MODULE => l_module,
70: MESSAGE => 'Exiting ' || l_procedure);
71: END IF;
64: 'select wwctx_api.get_sso_query_path(:p_url,:p_schema) from dual'
65: INTO l_retval using p_url,p_schema;
66:
67: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
68: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
69: MODULE => l_module,
70: MESSAGE => 'Exiting ' || l_procedure);
71: END IF;
72:
88: --
89: BEGIN
90: --
91:
92: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
93: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
94: MODULE => l_module,
95: MESSAGE => 'Entering ' || l_procedure);
96: END IF;
89: BEGIN
90: --
91:
92: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
93: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
94: MODULE => l_module,
95: MESSAGE => 'Entering ' || l_procedure);
96: END IF;
97:
98: EXECUTE IMMEDIATE
99: 'select wwsso_utl.encrypt_ps_password(:p_password) from dual'
100: INTO l_retval using p_password;
101:
102: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
103: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
104: MODULE => l_module,
105: MESSAGE => 'Exiting ' || l_procedure);
106: END IF;
99: 'select wwsso_utl.encrypt_ps_password(:p_password) from dual'
100: INTO l_retval using p_password;
101:
102: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
103: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
104: MODULE => l_module,
105: MESSAGE => 'Exiting ' || l_procedure);
106: END IF;
107:
123: --
124: BEGIN
125: --
126:
127: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
128: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
129: MODULE => l_module,
130: MESSAGE => 'Entering ' || l_procedure);
131: END IF;
124: BEGIN
125: --
126:
127: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
128: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
129: MODULE => l_module,
130: MESSAGE => 'Entering ' || l_procedure);
131: END IF;
132:
133: EXECUTE IMMEDIATE
134: 'select wwsso_utl.decrypt_ps_password(:p_password) from dual'
135: INTO l_retval using p_password;
136:
137: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
138: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
139: MODULE => l_module,
140: MESSAGE => 'Exiting ' || l_procedure);
141: END IF;
134: 'select wwsso_utl.decrypt_ps_password(:p_password) from dual'
135: INTO l_retval using p_password;
136:
137: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
138: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
139: MODULE => l_module,
140: MESSAGE => 'Exiting ' || l_procedure);
141: END IF;
142:
158: --
159: BEGIN
160: --
161:
162: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
163: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
164: MODULE => l_module,
165: MESSAGE => 'Entering ' || l_procedure);
166: END IF;
159: BEGIN
160: --
161:
162: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
163: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
164: MODULE => l_module,
165: MESSAGE => 'Entering ' || l_procedure);
166: END IF;
167:
168: EXECUTE IMMEDIATE
169: 'select wwsso_utl.encrypt_ps_username(:p_username) from dual'
170: INTO l_retval using p_username;
171:
172: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
173: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
174: MODULE => l_module,
175: MESSAGE => 'Exiting ' || l_procedure);
176: END IF;
169: 'select wwsso_utl.encrypt_ps_username(:p_username) from dual'
170: INTO l_retval using p_username;
171:
172: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
173: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
174: MODULE => l_module,
175: MESSAGE => 'Exiting ' || l_procedure);
176: END IF;
177:
193: --
194: BEGIN
195: --
196:
197: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
198: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
199: MODULE => l_module,
200: MESSAGE => 'Entering ' || l_procedure);
201: END IF;
194: BEGIN
195: --
196:
197: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
198: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
199: MODULE => l_module,
200: MESSAGE => 'Entering ' || l_procedure);
201: END IF;
202:
203: EXECUTE IMMEDIATE
204: 'select wwsso_utl.decrypt_ps_username(:p_username) from dual'
205: INTO l_retval using p_username;
206:
207: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
208: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
209: MODULE => l_module,
210: MESSAGE => 'Exiting ' || l_procedure);
211: END IF;
204: 'select wwsso_utl.decrypt_ps_username(:p_username) from dual'
205: INTO l_retval using p_username;
206:
207: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
208: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
209: MODULE => l_module,
210: MESSAGE => 'Exiting ' || l_procedure);
211: END IF;
212:
225: --
226: BEGIN
227: --
228:
229: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
230: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
231: MODULE => l_module,
232: MESSAGE => 'Entering ' || l_procedure);
233: END IF;
226: BEGIN
227: --
228:
229: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
230: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
231: MODULE => l_module,
232: MESSAGE => 'Entering ' || l_procedure);
233: END IF;
234:
237: 'wwctx_api.get_user'
238: || ' from dual'
239: INTO l_retval;
240:
241: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
242: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
243: MODULE => l_module,
244: MESSAGE => 'Exiting ' || l_procedure);
245: END IF;
238: || ' from dual'
239: INTO l_retval;
240:
241: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
242: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
243: MODULE => l_module,
244: MESSAGE => 'Exiting ' || l_procedure);
245: END IF;
246:
286: --
287: BEGIN
288: --
289:
290: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
291: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
292: MODULE => l_module,
293: MESSAGE => 'Entering ' || l_procedure);
294: END IF;
287: BEGIN
288: --
289:
290: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
291: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
292: MODULE => l_module,
293: MESSAGE => 'Entering ' || l_procedure);
294: END IF;
295:
319: IN P_FNAME8, IN P_FVAL8,
320: IN P_FNAME9, IN P_FVAL9,
321: OUT P_APPID;
322:
323: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
324: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
325: MODULE => l_module,
326: MESSAGE => 'Exiting ' || l_procedure);
327: END IF;
320: IN P_FNAME9, IN P_FVAL9,
321: OUT P_APPID;
322:
323: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
324: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
325: MODULE => l_module,
326: MESSAGE => 'Exiting ' || l_procedure);
327: END IF;
328:
366: --
367: BEGIN
368: --
369:
370: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
371: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
372: MODULE => l_module,
373: MESSAGE => 'Entering ' || l_procedure);
374: END IF;
367: BEGIN
368: --
369:
370: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
371: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
372: MODULE => l_module,
373: MESSAGE => 'Entering ' || l_procedure);
374: END IF;
375:
397: IN P_FNAME7, IN P_FVAL7,
398: IN P_FNAME8, IN P_FVAL8,
399: IN P_FNAME9, IN P_FVAL9;
400:
401: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
402: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
403: MODULE => l_module,
404: MESSAGE => 'Exiting ' || l_procedure);
405: END IF;
398: IN P_FNAME8, IN P_FVAL8,
399: IN P_FNAME9, IN P_FVAL9;
400:
401: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
402: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
403: MODULE => l_module,
404: MESSAGE => 'Exiting ' || l_procedure);
405: END IF;
406:
444: --
445: BEGIN
446: --
447:
448: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
449: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
450: MODULE => l_module,
451: MESSAGE => 'Entering ' || l_procedure);
452: END IF;
445: BEGIN
446: --
447:
448: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
449: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
450: MODULE => l_module,
451: MESSAGE => 'Entering ' || l_procedure);
452: END IF;
453:
475: OUT P_FNAME7, OUT P_FVAL7,
476: OUT P_FNAME8, OUT P_FVAL8,
477: OUT P_FNAME9, OUT P_FVAL9;
478:
479: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
480: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
481: MODULE => l_module,
482: MESSAGE => 'Exiting ' || l_procedure);
483: END IF;
476: OUT P_FNAME8, OUT P_FVAL8,
477: OUT P_FNAME9, OUT P_FVAL9;
478:
479: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
480: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
481: MODULE => l_module,
482: MESSAGE => 'Exiting ' || l_procedure);
483: END IF;
484:
519: --
520: BEGIN
521: --
522:
523: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
524: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
525: MODULE => l_module,
526: MESSAGE => 'Entering ' || l_procedure);
527: END IF;
520: BEGIN
521: --
522:
523: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
524: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
525: MODULE => l_module,
526: MESSAGE => 'Entering ' || l_procedure);
527: END IF;
528:
541: 'end;'
542: using
543: IN P_SSOUSER, IN 'USER';
544:
545: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
546: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
547: MODULE => l_module,
548: MESSAGE => 'After config done ');
549: END IF;
542: using
543: IN P_SSOUSER, IN 'USER';
544:
545: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
546: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
547: MODULE => l_module,
548: MESSAGE => 'After config done ');
549: END IF;
550:
573: IN P_FNAME9, IN P_FVAL9,
574: IN P_USER_PREFS;
575:
576:
577: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
578: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
579: MODULE => l_module,
580: MESSAGE => 'Exiting ' || l_procedure);
581: END IF;
574: IN P_USER_PREFS;
575:
576:
577: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
578: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
579: MODULE => l_module,
580: MESSAGE => 'Exiting ' || l_procedure);
581: END IF;
582:
618: --
619: BEGIN
620: --
621:
622: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
623: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
624: MODULE => l_module,
625: MESSAGE => 'Entering ' || l_procedure);
626: END IF;
619: BEGIN
620: --
621:
622: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
623: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
624: MODULE => l_module,
625: MESSAGE => 'Entering ' || l_procedure);
626: END IF;
627:
648: IN P_FNAME8, IN P_FVAL8,
649: IN P_FNAME9, IN P_FVAL9,
650: IN P_USER_PREFS;
651:
652: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
653: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
654: MODULE => l_module,
655: MESSAGE => 'Exiting ' || l_procedure);
656: END IF;
649: IN P_FNAME9, IN P_FVAL9,
650: IN P_USER_PREFS;
651:
652: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
653: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
654: MODULE => l_module,
655: MESSAGE => 'Exiting ' || l_procedure);
656: END IF;
657:
692: --
693: BEGIN
694: --
695:
696: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
697: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
698: MODULE => l_module,
699: MESSAGE => 'Entering ' || l_procedure);
700: END IF;
693: BEGIN
694: --
695:
696: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
697: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
698: MODULE => l_module,
699: MESSAGE => 'Entering ' || l_procedure);
700: END IF;
701:
722: OUT P_FNAME8, OUT P_FVAL8,
723: OUT P_FNAME9, OUT P_FVAL9,
724: OUT P_USER_PREFS;
725:
726: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
727: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
728: MODULE => l_module,
729: MESSAGE => 'Exiting ' || l_procedure);
730: END IF;
723: OUT P_FNAME9, OUT P_FVAL9,
724: OUT P_USER_PREFS;
725:
726: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
727: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
728: MODULE => l_module,
729: MESSAGE => 'Exiting ' || l_procedure);
730: END IF;
731:
746: --
747: BEGIN
748: --
749:
750: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
751: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
752: MODULE => l_module,
753: MESSAGE => 'Entering ' || l_procedure);
754: END IF;
747: BEGIN
748: --
749:
750: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
751: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
752: MODULE => l_module,
753: MESSAGE => 'Entering ' || l_procedure);
754: END IF;
755:
761: IN p_appid,
762: OUT p_error;
763:
764:
765: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
766: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
767: MODULE => l_module,
768: MESSAGE => 'Exiting ' || l_procedure);
769: END IF;
762: OUT p_error;
763:
764:
765: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
766: FND_LOG.STRING (LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
767: MODULE => l_module,
768: MESSAGE => 'Exiting ' || l_procedure);
769: END IF;
770: