DBA Data[Home] [Help]

APPS.OKC_XPRT_IMPORT_PVT dependencies on FND_LOG

Line 16: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

12: ------------------------------------------------------------------------------
13: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_XPRT_IMPORT_PVT';
14: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
15:
16: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
17: G_MODULE CONSTANT VARCHAR2(250) := 'okc.plsql.'||g_pkg_name||'.';
18: G_APPLICATION_ID CONSTANT NUMBER :=510; -- OKC Application
19:
20: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;

Line 128: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

124:
125: BEGIN
126:
127: -- start debug log
128: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
129: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
130: G_MODULE||l_api_name,
131: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
132: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

Line 129: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

125: BEGIN
126:
127: -- start debug log
128: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
129: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
130: G_MODULE||l_api_name,
131: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
132: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
133: G_MODULE||l_api_name,

Line 132: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

128: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
129: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
130: G_MODULE||l_api_name,
131: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
132: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
133: G_MODULE||l_api_name,
134: '100: Parameters ');
135: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
136: G_MODULE||l_api_name,

Line 135: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

131: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
132: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
133: G_MODULE||l_api_name,
134: '100: Parameters ');
135: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
136: G_MODULE||l_api_name,
137: '100: p_template_id '||p_template_id);
138: END IF;
139:

Line 163: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

159: l_org_id;
160:
161: IF csr_template_dtls%NOTFOUND THEN
162: -- Log Error
163: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
164: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
165: G_MODULE||l_api_name,
166: '110: Invalid Template Id: '||p_template_id);
167: END IF;

Line 164: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

160:
161: IF csr_template_dtls%NOTFOUND THEN
162: -- Log Error
163: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
164: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
165: G_MODULE||l_api_name,
166: '110: Invalid Template Id: '||p_template_id);
167: END IF;
168: FND_MESSAGE.set_name('OKC','OKC_XPRT_INVALID_TEMPLATE');

Line 186: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

182: last_updated_by = FND_GLOBAL.USER_ID
183: WHERE template_id = p_template_id;
184:
185: -- debug log
186: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
187: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
188: G_MODULE||l_api_name,
189: '110: Calling populate_questions_order');
190: END IF;

Line 187: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

183: WHERE template_id = p_template_id;
184:
185: -- debug log
186: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
187: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
188: G_MODULE||l_api_name,
189: '110: Calling populate_questions_order');
190: END IF;
191:

Line 206: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

202: x_msg_count => x_msg_count
203: );
204:
205: -- debug log
206: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
207: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
208: G_MODULE||l_api_name,
209: '111: After Calling populate_questions_order x_return_status : '||x_return_status);
210: END IF;

Line 207: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

203: );
204:
205: -- debug log
206: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
207: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
208: G_MODULE||l_api_name,
209: '111: After Calling populate_questions_order x_return_status : '||x_return_status);
210: END IF;
211:

Line 228: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

224: -- Standard call to get message count and if count is 1, get message info.
225: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
226:
227: -- end debug log
228: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
229: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
230: G_MODULE||l_api_name,
231: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
232: END IF;

Line 229: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

225: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
226:
227: -- end debug log
228: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
229: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
230: G_MODULE||l_api_name,
231: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
232: END IF;
233:

Line 236: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

232: END IF;
233:
234: EXCEPTION
235: WHEN FND_API.G_EXC_ERROR THEN
236: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
237: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
238: G_MODULE||l_api_name,
239: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
240: END IF;

Line 237: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

233:
234: EXCEPTION
235: WHEN FND_API.G_EXC_ERROR THEN
236: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
237: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
238: G_MODULE||l_api_name,
239: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
240: END IF;
241:

Line 246: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

242: x_return_status := G_RET_STS_ERROR ;
243: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
244:
245: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
246: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
247: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
248: G_MODULE||l_api_name,
249: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
250: END IF;

Line 247: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

243: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
244:
245: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
246: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
247: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
248: G_MODULE||l_api_name,
249: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
250: END IF;
251:

Line 256: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

252: x_return_status := G_RET_STS_UNEXP_ERROR ;
253: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
254:
255: WHEN OTHERS THEN
256: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
257: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
258: G_MODULE||l_api_name,
259: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
260: END IF;

Line 257: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

253: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
254:
255: WHEN OTHERS THEN
256: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
257: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
258: G_MODULE||l_api_name,
259: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
260: END IF;
261:

Line 327: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

323: l_org_id okc_xprt_rule_hdrs_all.org_id%TYPE;
324:
325: BEGIN
326: -- start debug log
327: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
328: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
329: G_MODULE||l_api_name,
330: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
331: END IF;

Line 328: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

324:
325: BEGIN
326: -- start debug log
327: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
328: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
329: G_MODULE||l_api_name,
330: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
331: END IF;
332:

Line 348: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

344: FETCH csr_rule_org_id INTO l_org_id;
345: CLOSE csr_rule_org_id;
346:
347: -- debug log
348: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
349: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
350: G_MODULE||l_api_name,
351: '110: l_org_rules_yn '||l_org_rules_yn);
352: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

Line 349: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

345: CLOSE csr_rule_org_id;
346:
347: -- debug log
348: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
349: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
350: G_MODULE||l_api_name,
351: '110: l_org_rules_yn '||l_org_rules_yn);
352: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
353: G_MODULE||l_api_name,

Line 352: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

348: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
349: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
350: G_MODULE||l_api_name,
351: '110: l_org_rules_yn '||l_org_rules_yn);
352: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
353: G_MODULE||l_api_name,
354: '110: l_org_id '||l_org_id);
355: END IF;
356:

Line 423: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

419: -- Standard call to get message count and if count is 1, get message info
420: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
421:
422: -- end debug log
423: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
424: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
425: G_MODULE||l_api_name,
426: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
427: END IF;

Line 424: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

420: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
421:
422: -- end debug log
423: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
424: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
425: G_MODULE||l_api_name,
426: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
427: END IF;
428:

Line 431: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

427: END IF;
428:
429: EXCEPTION
430: WHEN FND_API.G_EXC_ERROR THEN
431: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
432: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
433: G_MODULE||l_api_name,
434: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
435: END IF;

Line 432: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

428:
429: EXCEPTION
430: WHEN FND_API.G_EXC_ERROR THEN
431: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
432: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
433: G_MODULE||l_api_name,
434: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
435: END IF;
436:

Line 441: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

437: x_return_status := G_RET_STS_ERROR ;
438: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
439:
440: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
441: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
442: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
443: G_MODULE||l_api_name,
444: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
445: END IF;

Line 442: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

438: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
439:
440: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
441: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
442: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
443: G_MODULE||l_api_name,
444: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
445: END IF;
446:

Line 451: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

447: x_return_status := G_RET_STS_UNEXP_ERROR ;
448: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
449:
450: WHEN OTHERS THEN
451: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
452: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
453: G_MODULE||l_api_name,
454: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
455: END IF;

Line 452: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

448: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
449:
450: WHEN OTHERS THEN
451: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
452: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
453: G_MODULE||l_api_name,
454: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
455: END IF;
456:

Line 550: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

546: -- Calling the parent concurrent prorgam for the first time
547: -- Execute Steps 1 to 7
548:
549: -- start debug log
550: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
551: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
552: G_MODULE||l_api_name,
553: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
554: END IF;

Line 551: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

547: -- Execute Steps 1 to 7
548:
549: -- start debug log
550: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
551: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
552: G_MODULE||l_api_name,
553: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
554: END IF;
555:

Line 1294: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1290: -- Standard call to get message count and if count is 1, get message info.
1291: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1292:
1293: -- end debug log
1294: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1296: G_MODULE||l_api_name,
1297: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1298: END IF;

Line 1295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

1291: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1292:
1293: -- end debug log
1294: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1296: G_MODULE||l_api_name,
1297: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1298: END IF;
1299:

Line 1306: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1302: ELSE
1303:
1304: -- Code for the OKC Rules Engine
1305: -- start debug log
1306: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1307: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1308: G_MODULE||l_api_name,
1309: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
1310: END IF;

Line 1307: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

1303:
1304: -- Code for the OKC Rules Engine
1305: -- start debug log
1306: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1307: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1308: G_MODULE||l_api_name,
1309: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
1310: END IF;
1311:

Line 1509: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1505: END IF;
1506:
1507: EXCEPTION
1508: WHEN FND_API.G_EXC_ERROR THEN
1509: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1510: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1511: G_MODULE||l_api_name,
1512: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1513: END IF;

Line 1510: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

1506:
1507: EXCEPTION
1508: WHEN FND_API.G_EXC_ERROR THEN
1509: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1510: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1511: G_MODULE||l_api_name,
1512: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1513: END IF;
1514:

Line 1523: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1519: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1520: fnd_file.put_line(FND_FILE.LOG,' ');
1521:
1522: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1523: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1524: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1525: G_MODULE||l_api_name,
1526: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1527: END IF;

Line 1524: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

1520: fnd_file.put_line(FND_FILE.LOG,' ');
1521:
1522: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1523: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1524: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1525: G_MODULE||l_api_name,
1526: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1527: END IF;
1528:

Line 1537: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1533: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1534: fnd_file.put_line(FND_FILE.LOG,' ');
1535:
1536: WHEN OTHERS THEN
1537: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1539: G_MODULE||l_api_name,
1540: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1541: END IF;

Line 1538: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

1534: fnd_file.put_line(FND_FILE.LOG,' ');
1535:
1536: WHEN OTHERS THEN
1537: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1539: G_MODULE||l_api_name,
1540: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1541: END IF;
1542:

Line 1629: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1625: -- Calling the parent concurrent prorgam for the first time
1626: -- Execute Steps 1 to 4
1627:
1628: -- start debug log
1629: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1630: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1631: G_MODULE||l_api_name,
1632: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
1633: END IF;

Line 1630: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

1626: -- Execute Steps 1 to 4
1627:
1628: -- start debug log
1629: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1630: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1631: G_MODULE||l_api_name,
1632: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
1633: END IF;
1634:

Line 2175: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2171: -- Standard call to get message count and if count is 1, get message info.
2172: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2173:
2174: -- end debug log
2175: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2176: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2177: G_MODULE||l_api_name,
2178: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2179: END IF;

Line 2176: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2172: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2173:
2174: -- end debug log
2175: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2176: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2177: G_MODULE||l_api_name,
2178: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2179: END IF;
2180:

Line 2186: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2182:
2183: ELSE
2184: -- New OKC Rules Engine
2185:
2186: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2187: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2188: G_MODULE||l_api_name,
2189: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2190: END IF;

Line 2187: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2183: ELSE
2184: -- New OKC Rules Engine
2185:
2186: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2187: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2188: G_MODULE||l_api_name,
2189: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2190: END IF;
2191:

Line 2293: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2289: END IF;
2290:
2291: EXCEPTION
2292: WHEN FND_API.G_EXC_ERROR THEN
2293: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2295: G_MODULE||l_api_name,
2296: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2297: END IF;

Line 2294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2290:
2291: EXCEPTION
2292: WHEN FND_API.G_EXC_ERROR THEN
2293: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2294: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2295: G_MODULE||l_api_name,
2296: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2297: END IF;
2298:

Line 2307: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2303: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2304: fnd_file.put_line(FND_FILE.LOG,' ');
2305:
2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2307: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2308: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2309: G_MODULE||l_api_name,
2310: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2311: END IF;

Line 2308: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2304: fnd_file.put_line(FND_FILE.LOG,' ');
2305:
2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2307: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2308: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2309: G_MODULE||l_api_name,
2310: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2311: END IF;
2312:

Line 2321: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2317: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2318: fnd_file.put_line(FND_FILE.LOG,' ');
2319:
2320: WHEN OTHERS THEN
2321: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2322: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2323: G_MODULE||l_api_name,
2324: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2325: END IF;

Line 2322: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2318: fnd_file.put_line(FND_FILE.LOG,' ');
2319:
2320: WHEN OTHERS THEN
2321: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2322: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2323: G_MODULE||l_api_name,
2324: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2325: END IF;
2326:

Line 2373: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2369:
2370: BEGIN
2371:
2372: -- start debug log
2373: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2374: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2375: G_MODULE||l_api_name,
2376: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2377: END IF;

Line 2374: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2370: BEGIN
2371:
2372: -- start debug log
2373: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2374: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2375: G_MODULE||l_api_name,
2376: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2377: END IF;
2378:

Line 2532: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2528: -- Standard call to get message count and if count is 1, get message info.
2529: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2530:
2531: -- end debug log
2532: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2533: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2534: G_MODULE||l_api_name,
2535: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2536: END IF;

Line 2533: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2529: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2530:
2531: -- end debug log
2532: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2533: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2534: G_MODULE||l_api_name,
2535: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2536: END IF;
2537:

Line 2541: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2537:
2538:
2539: EXCEPTION
2540: WHEN FND_API.G_EXC_ERROR THEN
2541: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2542: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2543: G_MODULE||l_api_name,
2544: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2545: END IF;

Line 2542: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2538:
2539: EXCEPTION
2540: WHEN FND_API.G_EXC_ERROR THEN
2541: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2542: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2543: G_MODULE||l_api_name,
2544: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2545: END IF;
2546:

Line 2555: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2551: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2552: fnd_file.put_line(FND_FILE.LOG,' ');
2553:
2554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2555: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2556: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2557: G_MODULE||l_api_name,
2558: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2559: END IF;

Line 2556: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2552: fnd_file.put_line(FND_FILE.LOG,' ');
2553:
2554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2555: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2556: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2557: G_MODULE||l_api_name,
2558: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2559: END IF;
2560:

Line 2569: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2565: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2566: fnd_file.put_line(FND_FILE.LOG,' ');
2567:
2568: WHEN OTHERS THEN
2569: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2570: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2571: G_MODULE||l_api_name,
2572: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2573: END IF;

Line 2570: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2566: fnd_file.put_line(FND_FILE.LOG,' ');
2567:
2568: WHEN OTHERS THEN
2569: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2570: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2571: G_MODULE||l_api_name,
2572: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2573: END IF;
2574:

Line 2649: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2645: -- Calling the parent concurrent prorgam for the first time
2646: -- Execute Steps 1 to 3
2647:
2648: -- start debug log
2649: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2650: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2651: G_MODULE||l_api_name,
2652: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2653: END IF;

Line 2650: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2646: -- Execute Steps 1 to 3
2647:
2648: -- start debug log
2649: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2650: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2651: G_MODULE||l_api_name,
2652: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2653: END IF;
2654:

Line 3002: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2998: -- Standard call to get message count and if count is 1, get message info.
2999: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3000:
3001: -- end debug log
3002: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3003: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3004: G_MODULE||l_api_name,
3005: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3006: END IF;

Line 3003: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

2999: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3000:
3001: -- end debug log
3002: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3003: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3004: G_MODULE||l_api_name,
3005: '1000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3006: END IF;
3007:

Line 3038: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3034: END IF;
3035:
3036: EXCEPTION
3037: WHEN FND_API.G_EXC_ERROR THEN
3038: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3039: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3040: G_MODULE||l_api_name,
3041: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3042: END IF;

Line 3039: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

3035:
3036: EXCEPTION
3037: WHEN FND_API.G_EXC_ERROR THEN
3038: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3039: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3040: G_MODULE||l_api_name,
3041: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3042: END IF;
3043:

Line 3052: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3048: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3049: fnd_file.put_line(FND_FILE.LOG,' ');
3050:
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3052: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3053: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3054: G_MODULE||l_api_name,
3055: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3056: END IF;

Line 3053: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

3049: fnd_file.put_line(FND_FILE.LOG,' ');
3050:
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3052: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3053: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3054: G_MODULE||l_api_name,
3055: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3056: END IF;
3057:

Line 3066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3062: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3063: fnd_file.put_line(FND_FILE.LOG,' ');
3064:
3065: WHEN OTHERS THEN
3066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3068: G_MODULE||l_api_name,
3069: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3070: END IF;

Line 3067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,

3063: fnd_file.put_line(FND_FILE.LOG,' ');
3064:
3065: WHEN OTHERS THEN
3066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3068: G_MODULE||l_api_name,
3069: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
3070: END IF;
3071: