129:
130: l_progress := '000';
131:
132: IF g_fnd_debug = 'Y' THEN
133: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
134: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
135: || l_progress,'Doing Validation on passed in data');
136: END IF;
137: END IF;
130: l_progress := '000';
131:
132: IF g_fnd_debug = 'Y' THEN
133: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
134: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
135: || l_progress,'Doing Validation on passed in data');
136: END IF;
137: END IF;
138:
276:
277: l_progress := '007';
278:
279: IF g_fnd_debug = 'Y' THEN
280: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
281: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
282: || l_progress,'Calling PVT package');
283: END IF;
284: END IF;
277: l_progress := '007';
278:
279: IF g_fnd_debug = 'Y' THEN
280: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
281: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
282: || l_progress,'Calling PVT package');
283: END IF;
284: END IF;
285:
320: );
321:
322: l_progress := '008';
323: IF g_fnd_debug = 'Y' THEN
324: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
325: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
326: || l_progress,'Back in GRP package. Returning to the caller');
327: END IF;
328: END IF;
321:
322: l_progress := '008';
323: IF g_fnd_debug = 'Y' THEN
324: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
325: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
326: || l_progress,'Back in GRP package. Returning to the caller');
327: END IF;
328: END IF;
329:
343: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name);
344: END IF;
345:
346: IF (g_fnd_debug = 'Y') THEN
347: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
348: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
349: l_api_name || '.others_exception', 'EXCEPTION: Location is '
350: || l_progress || ' SQL CODE is '||sqlcode);
351: END IF;
344: END IF;
345:
346: IF (g_fnd_debug = 'Y') THEN
347: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
348: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
349: l_api_name || '.others_exception', 'EXCEPTION: Location is '
350: || l_progress || ' SQL CODE is '||sqlcode);
351: END IF;
352: END IF;
499: BEGIN
500:
501: l_progress := '000';
502: IF g_fnd_debug = 'Y' THEN
503: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
504: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
505: || l_progress,'Called OVERLOADED procedure. Filled missing parameters');
506: END IF;
507: END IF;
500:
501: l_progress := '000';
502: IF g_fnd_debug = 'Y' THEN
503: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
504: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
505: || l_progress,'Called OVERLOADED procedure. Filled missing parameters');
506: END IF;
507: END IF;
508:
539: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name);
540: END IF;
541:
542: IF (g_fnd_debug = 'Y') THEN
543: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
544: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
545: l_api_name || '.others_exception', 'EXCEPTION: Location is '
546: || l_progress || ' SQL CODE is '||sqlcode);
547: END IF;
540: END IF;
541:
542: IF (g_fnd_debug = 'Y') THEN
543: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
544: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
545: l_api_name || '.others_exception', 'EXCEPTION: Location is '
546: || l_progress || ' SQL CODE is '||sqlcode);
547: END IF;
548: END IF;
589: l_progress := '000';
590:
591: IF ( g_fnd_debug = 'Y' )
592: THEN
593: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
594: FND_LOG.string( FND_LOG.LEVEL_STATEMENT,
595: g_log_head || '.'||l_api_name||'.'|| l_progress,
596: 'Called OVERLOADED procedure. Filled missing parameters');
597: END IF;
590:
591: IF ( g_fnd_debug = 'Y' )
592: THEN
593: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
594: FND_LOG.string( FND_LOG.LEVEL_STATEMENT,
595: g_log_head || '.'||l_api_name||'.'|| l_progress,
596: 'Called OVERLOADED procedure. Filled missing parameters');
597: END IF;
598: END IF;
640: END IF;
641:
642: IF ( g_fnd_debug = 'Y' )
643: THEN
644: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
645: FND_LOG.string(FND_LOG.level_unexpected,
646: g_log_head || l_api_name || '.others_exception',
647: 'EXCEPTION: Location is '|| l_progress || ' SQL CODE is '|| sqlcode);
648: END IF;
641:
642: IF ( g_fnd_debug = 'Y' )
643: THEN
644: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
645: FND_LOG.string(FND_LOG.level_unexpected,
646: g_log_head || l_api_name || '.others_exception',
647: 'EXCEPTION: Location is '|| l_progress || ' SQL CODE is '|| sqlcode);
648: END IF;
649: END IF;
784:
785: l_progress := '010';
786:
787: IF g_fnd_debug = 'Y' THEN
788: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
789: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
790: || l_progress,'Doing Validation on passed in data');
791: END IF;
792: END IF;
785: l_progress := '010';
786:
787: IF g_fnd_debug = 'Y' THEN
788: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
789: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,g_log_head || '.'||l_api_name||'.'
790: || l_progress,'Doing Validation on passed in data');
791: END IF;
792: END IF;
793:
902: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name);
903: END IF;
904:
905: IF (g_fnd_debug = 'Y') THEN
906: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
907: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
908: l_api_name || '.others_exception', 'EXCEPTION: Location is '
909: || l_progress || ' SQL CODE is '||sqlcode);
910: END IF;
903: END IF;
904:
905: IF (g_fnd_debug = 'Y') THEN
906: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
907: FND_LOG.string(FND_LOG.level_unexpected, g_log_head ||
908: l_api_name || '.others_exception', 'EXCEPTION: Location is '
909: || l_progress || ' SQL CODE is '||sqlcode);
910: END IF;
911: END IF;