128:
129: l_progress := '000';
130:
131: IF g_fnd_debug = 'Y' THEN
132: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
133: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
134: || l_progress,'Doing Validation on passed in data');
135: END IF;
136: END IF;
129: l_progress := '000';
130:
131: IF g_fnd_debug = 'Y' THEN
132: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
133: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
134: || l_progress,'Doing Validation on passed in data');
135: END IF;
136: END IF;
137:
275:
276: l_progress := '007';
277:
278: IF g_fnd_debug = 'Y' THEN
279: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
280: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
281: || l_progress,'Calling PVT package');
282: END IF;
283: END IF;
276: l_progress := '007';
277:
278: IF g_fnd_debug = 'Y' THEN
279: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
280: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
281: || l_progress,'Calling PVT package');
282: END IF;
283: END IF;
284:
318: );
319:
320: l_progress := '008';
321: IF g_fnd_debug = 'Y' THEN
322: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
323: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
324: || l_progress,'Back in GRP package. Returning to the caller');
325: END IF;
326: END IF;
319:
320: l_progress := '008';
321: IF g_fnd_debug = 'Y' THEN
322: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
323: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
324: || l_progress,'Back in GRP package. Returning to the caller');
325: END IF;
326: END IF;
327:
341: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name);
342: END IF;
343:
344: IF (g_fnd_debug = 'Y') THEN
345: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
346: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
347: l_api_name || '.others_exception', 'EXCEPTION: Location is '
348: || l_progress || ' SQL CODE is '||sqlcode);
349: END IF;
342: END IF;
343:
344: IF (g_fnd_debug = 'Y') THEN
345: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
346: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
347: l_api_name || '.others_exception', 'EXCEPTION: Location is '
348: || l_progress || ' SQL CODE is '||sqlcode);
349: END IF;
350: END IF;
493: BEGIN
494:
495: l_progress := '000';
496: IF g_fnd_debug = 'Y' THEN
497: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
498: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
499: || l_progress,'Called OVERLOADED procedure. Filled missing parameters');
500: END IF;
501: END IF;
494:
495: l_progress := '000';
496: IF g_fnd_debug = 'Y' THEN
497: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
498: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
499: || l_progress,'Called OVERLOADED procedure. Filled missing parameters');
500: END IF;
501: END IF;
502:
533: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name);
534: END IF;
535:
536: IF (g_fnd_debug = 'Y') THEN
537: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
538: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
539: l_api_name || '.others_exception', 'EXCEPTION: Location is '
540: || l_progress || ' SQL CODE is '||sqlcode);
541: END IF;
534: END IF;
535:
536: IF (g_fnd_debug = 'Y') THEN
537: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
538: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
539: l_api_name || '.others_exception', 'EXCEPTION: Location is '
540: || l_progress || ' SQL CODE is '||sqlcode);
541: END IF;
542: END IF;
582: l_progress := '000';
583:
584: IF ( g_fnd_debug = 'Y' )
585: THEN
586: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
587: FND_LOG.string( FND_LOG.LEVEL_STATEMENT,
588: g_log_head || '.'||l_api_name||'.'|| l_progress,
589: 'Called OVERLOADED procedure. Filled missing parameters');
590: END IF;
583:
584: IF ( g_fnd_debug = 'Y' )
585: THEN
586: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
587: FND_LOG.string( FND_LOG.LEVEL_STATEMENT,
588: g_log_head || '.'||l_api_name||'.'|| l_progress,
589: 'Called OVERLOADED procedure. Filled missing parameters');
590: END IF;
591: END IF;
632: END IF;
633:
634: IF ( g_fnd_debug = 'Y' )
635: THEN
636: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
637: FND_LOG.string(FND_LOG.level_unexpected,
638: g_log_head || l_api_name || '.others_exception',
639: 'EXCEPTION: Location is '|| l_progress || ' SQL CODE is '|| sqlcode);
640: END IF;
633:
634: IF ( g_fnd_debug = 'Y' )
635: THEN
636: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
637: FND_LOG.string(FND_LOG.level_unexpected,
638: g_log_head || l_api_name || '.others_exception',
639: 'EXCEPTION: Location is '|| l_progress || ' SQL CODE is '|| sqlcode);
640: END IF;
641: END IF;
774:
775: l_progress := '010';
776:
777: IF g_fnd_debug = 'Y' THEN
778: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
779: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
780: || l_progress,'Doing Validation on passed in data');
781: END IF;
782: END IF;
775: l_progress := '010';
776:
777: IF g_fnd_debug = 'Y' THEN
778: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
779: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
780: || l_progress,'Doing Validation on passed in data');
781: END IF;
782: END IF;
783:
892: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name);
893: END IF;
894:
895: IF (g_fnd_debug = 'Y') THEN
896: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
897: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
898: l_api_name || '.others_exception', 'EXCEPTION: Location is '
899: || l_progress || ' SQL CODE is '||sqlcode);
900: END IF;
893: END IF;
894:
895: IF (g_fnd_debug = 'Y') THEN
896: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
897: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
898: l_api_name || '.others_exception', 'EXCEPTION: Location is '
899: || l_progress || ' SQL CODE is '||sqlcode);
900: END IF;
901: END IF;