DBA Data[Home] [Help]

APPS.PO_RELGEN_PKG dependencies on FND_LOG

Line 894: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

890:
891: --
892: l_return_status := FND_API.G_RET_STS_SUCCESS;
893: IF (g_fnd_debug = 'Y') THEN
894: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
895: FND_LOG.string (
896: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
897: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
898: MESSAGE => 'Start create release shipments'

Line 895: FND_LOG.string (

891: --
892: l_return_status := FND_API.G_RET_STS_SUCCESS;
893: IF (g_fnd_debug = 'Y') THEN
894: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
895: FND_LOG.string (
896: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
897: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
898: MESSAGE => 'Start create release shipments'
899: );

Line 896: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,

892: l_return_status := FND_API.G_RET_STS_SUCCESS;
893: IF (g_fnd_debug = 'Y') THEN
894: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
895: FND_LOG.string (
896: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
897: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
898: MESSAGE => 'Start create release shipments'
899: );
900: END IF;

Line 955: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

951:
952: --
953: l_progress := '002';
954: IF (g_fnd_debug = 'Y') THEN
955: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
956: FND_LOG.string (
957: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
958: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
959: MESSAGE => x_ship_to_location_id

Line 956: FND_LOG.string (

952: --
953: l_progress := '002';
954: IF (g_fnd_debug = 'Y') THEN
955: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
956: FND_LOG.string (
957: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
958: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
959: MESSAGE => x_ship_to_location_id
960: );

Line 957: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,

953: l_progress := '002';
954: IF (g_fnd_debug = 'Y') THEN
955: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
956: FND_LOG.string (
957: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
958: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
959: MESSAGE => x_ship_to_location_id
960: );
961: END IF;

Line 1351: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

1347: WHEN OTHERS THEN
1348: FND_FILE.put_line(FND_FILE.LOG,
1349: c_log_head || l_api_name || ' exception; location: '
1350: || l_progress || ' SQL code: ' || sqlcode);
1351: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1352: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||
1353: l_api_name || '.others_exception', 'EXCEPTION: Location is '
1354: || l_progress || ' SQL CODE is '||sqlcode);
1355: END IF;

Line 1352: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||

1348: FND_FILE.put_line(FND_FILE.LOG,
1349: c_log_head || l_api_name || ' exception; location: '
1350: || l_progress || ' SQL code: ' || sqlcode);
1351: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1352: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||
1353: l_api_name || '.others_exception', 'EXCEPTION: Location is '
1354: || l_progress || ' SQL CODE is '||sqlcode);
1355: END IF;
1356: raise_application_error(-20001,sqlerrm||'---'||msgbuf);

Line 2580: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

2576: x_check_status := FND_API.G_RET_STS_SUCCESS;
2577:
2578: l_progress := '000';
2579: IF g_fnd_debug = 'Y' THEN
2580: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2581: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2582: || l_progress,'PO REQ: Price, Amount Toleance check');
2583: END IF;
2584: END IF;

Line 2581: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

2577:
2578: l_progress := '000';
2579: IF g_fnd_debug = 'Y' THEN
2580: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2581: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2582: || l_progress,'PO REQ: Price, Amount Toleance check');
2583: END IF;
2584: END IF;
2585:

Line 2597: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

2593: FROM po_system_parameters;
2594:
2595: l_progress := '001';
2596: IF g_fnd_debug = 'Y' THEN
2597: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2598: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2599: || l_progress,'Is price tol check enforced '||l_enforce_price_tolerance
2600: || ' Is price amount check enforced ' || l_enforce_price_amount);
2601: END IF;

Line 2598: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

2594:
2595: l_progress := '001';
2596: IF g_fnd_debug = 'Y' THEN
2597: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2598: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2599: || l_progress,'Is price tol check enforced '||l_enforce_price_tolerance
2600: || ' Is price amount check enforced ' || l_enforce_price_amount);
2601: END IF;
2602: END IF;

Line 2649: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

2645: --Do price tolerance check
2646: IF l_enforce_price_tolerance = 'Y' THEN
2647:
2648: IF g_fnd_debug = 'Y' THEN
2649: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2650: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2651: || l_progress,'Doing Price Tolerance check');
2652: END IF;
2653: END IF;

Line 2650: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

2646: IF l_enforce_price_tolerance = 'Y' THEN
2647:
2648: IF g_fnd_debug = 'Y' THEN
2649: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2650: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2651: || l_progress,'Doing Price Tolerance check');
2652: END IF;
2653: END IF;
2654: OPEN req_price_tol_cursor(l_line_location_id(shipment_line));

Line 2763: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

2759:
2760: --Do price 'not to exceed' amount check
2761: IF l_enforce_price_amount = 'Y' THEN
2762: IF g_fnd_debug = 'Y' THEN
2763: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2764: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2765: || l_progress,'Doing Not to exceed amt check');
2766: END IF;
2767: END IF;

Line 2764: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

2760: --Do price 'not to exceed' amount check
2761: IF l_enforce_price_amount = 'Y' THEN
2762: IF g_fnd_debug = 'Y' THEN
2763: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2764: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2765: || l_progress,'Doing Not to exceed amt check');
2766: END IF;
2767: END IF;
2768:

Line 2847: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

2843: WHEN OTHERS THEN
2844: FND_FILE.put_line(FND_FILE.LOG,
2845: c_log_head || l_api_name || ' exception; location: '
2846: || l_progress || ' SQL code: ' || sqlcode);
2847: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2848: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||
2849: l_api_name || '.others_exception', 'EXCEPTION: Location is '
2850: || l_progress || ' SQL CODE is '||sqlcode);
2851: END IF;

Line 2848: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||

2844: FND_FILE.put_line(FND_FILE.LOG,
2845: c_log_head || l_api_name || ' exception; location: '
2846: || l_progress || ' SQL code: ' || sqlcode);
2847: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
2848: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||
2849: l_api_name || '.others_exception', 'EXCEPTION: Location is '
2850: || l_progress || ' SQL CODE is '||sqlcode);
2851: END IF;
2852: raise_application_error(-20001,sqlerrm||'---'||msgbuf);

Line 2906: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

2902: l_federal_instance := PO_CORE_S.Check_Federal_Instance(
2903: PO_MOAC_UTILS_PVT.Get_Current_Org_Id);
2904: --
2905: IF g_fnd_debug = 'Y' THEN
2906: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2907: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2908: || l_progress,'Perform pre-approval checks on the release');
2909: END IF;
2910: END IF;

Line 2907: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

2903: PO_MOAC_UTILS_PVT.Get_Current_Org_Id);
2904: --
2905: IF g_fnd_debug = 'Y' THEN
2906: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2907: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2908: || l_progress,'Perform pre-approval checks on the release');
2909: END IF;
2910: END IF;
2911:

Line 2925: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

2921: ----------------------------------------------
2922:
2923: l_progress := '012';
2924: IF g_fnd_debug = 'Y' THEN
2925: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2926: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2927: || l_progress,'REL 12: Amount released check for min release amt');
2928: END IF;
2929: END IF;

Line 2926: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

2922:
2923: l_progress := '012';
2924: IF g_fnd_debug = 'Y' THEN
2925: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2926: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2927: || l_progress,'REL 12: Amount released check for min release amt');
2928: END IF;
2929: END IF;
2930:

Line 2997: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

2993: ----------------------------------------------
2994:
2995: l_progress := '013';
2996: IF g_fnd_debug = 'Y' THEN
2997: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2998: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2999: || l_progress,'REL 13: GL date check ');
3000: END IF;
3001: END IF;

Line 2998: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

2994:
2995: l_progress := '013';
2996: IF g_fnd_debug = 'Y' THEN
2997: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
2998: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
2999: || l_progress,'REL 13: GL date check ');
3000: END IF;
3001: END IF;
3002:

Line 3065: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

3061: ----------------------------------------------
3062:
3063: l_progress := '014';
3064: IF g_fnd_debug = 'Y' THEN
3065: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3066: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3067: || l_progress,'Rel 14: UOM Interclass conversions check');
3068: END IF;
3069: END IF;

Line 3066: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

3062:
3063: l_progress := '014';
3064: IF g_fnd_debug = 'Y' THEN
3065: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3066: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3067: || l_progress,'Rel 14: UOM Interclass conversions check');
3068: END IF;
3069: END IF;
3070:

Line 3114: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

3110: --------------------------------------------------
3111:
3112: l_progress := '015';
3113: IF g_fnd_debug = 'Y' THEN
3114: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3115: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3116: || l_progress,'REL 15: Item restricted check ');
3117: END IF;
3118: END IF;

Line 3115: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

3111:
3112: l_progress := '015';
3113: IF g_fnd_debug = 'Y' THEN
3114: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3115: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3116: || l_progress,'REL 15: Item restricted check ');
3117: END IF;
3118: END IF;
3119:

Line 3186: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

3182: ---------------------------------------------
3183:
3184: l_progress := '016';
3185: IF g_fnd_debug = 'Y' THEN
3186: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3187: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3188: || l_progress,'REL 16: ASL Debarred check ');
3189: END IF;
3190: END IF;

Line 3187: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

3183:
3184: l_progress := '016';
3185: IF g_fnd_debug = 'Y' THEN
3186: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3187: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3188: || l_progress,'REL 16: ASL Debarred check ');
3189: END IF;
3190: END IF;
3191:

Line 3266: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

3262: -- Check if vendor site has a valid Central Contractor Registration(CCR)
3263: l_progress := '017';
3264:
3265: IF g_fnd_debug = 'Y' THEN
3266: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3267: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name
3268: ||'.'|| l_progress,'Vendor site registration check ');
3269: END IF;
3270: END IF;

Line 3267: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name

3263: l_progress := '017';
3264:
3265: IF g_fnd_debug = 'Y' THEN
3266: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3267: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name
3268: ||'.'|| l_progress,'Vendor site registration check ');
3269: END IF;
3270: END IF;
3271:

Line 3308: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

3304:
3305: --
3306: l_progress := '018';
3307: IF g_fnd_debug = 'Y' THEN
3308: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3309: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3310: || l_progress,'LCM enabled release shipment should have invoice match option as receipt');
3311: END IF;
3312: END IF;

Line 3309: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

3305: --
3306: l_progress := '018';
3307: IF g_fnd_debug = 'Y' THEN
3308: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3309: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3310: || l_progress,'LCM enabled release shipment should have invoice match option as receipt');
3311: END IF;
3312: END IF;
3313: l_textline := FND_MESSAGE.GET_STRING('PO','PO_SUB_REL_SHIP_INV_MATCH_NE_R');

Line 3333: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

3329: END IF;
3330:
3331: l_progress := '019';
3332: IF g_fnd_debug = 'Y' THEN
3333: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3334: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3335: || l_progress,'LCM enabled release distribution should have destination type as Inventory');
3336: END IF;
3337: END IF;

Line 3334: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'

3330:
3331: l_progress := '019';
3332: IF g_fnd_debug = 'Y' THEN
3333: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3334: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,c_log_head || '.'||l_api_name||'.'
3335: || l_progress,'LCM enabled release distribution should have destination type as Inventory');
3336: END IF;
3337: END IF;
3338:

Line 3366: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

3362: WHEN OTHERS THEN
3363: FND_FILE.put_line(FND_FILE.LOG,
3364: c_log_head || l_api_name || ' exception; location: '
3365: || l_progress || ' SQL code: ' || sqlcode);
3366: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3367: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||
3368: l_api_name || '.others_exception', 'EXCEPTION: Location is '
3369: || l_progress || ' SQL CODE is '||sqlcode);
3370: END IF;

Line 3367: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||

3363: FND_FILE.put_line(FND_FILE.LOG,
3364: c_log_head || l_api_name || ' exception; location: '
3365: || l_progress || ' SQL code: ' || sqlcode);
3366: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3367: FND_LOG.string(FND_LOG.level_unexpected, c_log_head ||
3368: l_api_name || '.others_exception', 'EXCEPTION: Location is '
3369: || l_progress || ' SQL CODE is '||sqlcode);
3370: END IF;
3371: raise_application_error(-20001,sqlerrm||'---'||msgbuf);

Line 3412: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

3408: BEGIN
3409: l_return_status := FND_API.G_RET_STS_SUCCESS;
3410:
3411: IF (g_fnd_debug = 'Y') THEN
3412: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3413: FND_LOG.string (
3414: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
3415: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
3416: MESSAGE => 'Start create delivery record for approved Blanket Release'

Line 3413: FND_LOG.string (

3409: l_return_status := FND_API.G_RET_STS_SUCCESS;
3410:
3411: IF (g_fnd_debug = 'Y') THEN
3412: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3413: FND_LOG.string (
3414: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
3415: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
3416: MESSAGE => 'Start create delivery record for approved Blanket Release'
3417: );

Line 3414: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,

3410:
3411: IF (g_fnd_debug = 'Y') THEN
3412: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
3413: FND_LOG.string (
3414: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
3415: MODULE => c_log_head || '.'||l_api_name||'.' || l_progress,
3416: MESSAGE => 'Start create delivery record for approved Blanket Release'
3417: );
3418: END IF;

Line 3472: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

3468: );
3469: END IF;
3470:
3471: IF (g_fnd_debug = 'Y') THEN
3472: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3473: FND_LOG.string(
3474: LOG_LEVEL => FND_LOG.level_unexpected,
3475: MODULE => c_log_head ||'.'||l_api_name||'.others_exception',
3476: MESSAGE => FND_MSG_PUB.get(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F')

Line 3473: FND_LOG.string(

3469: END IF;
3470:
3471: IF (g_fnd_debug = 'Y') THEN
3472: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3473: FND_LOG.string(
3474: LOG_LEVEL => FND_LOG.level_unexpected,
3475: MODULE => c_log_head ||'.'||l_api_name||'.others_exception',
3476: MESSAGE => FND_MSG_PUB.get(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F')
3477: );

Line 3474: LOG_LEVEL => FND_LOG.level_unexpected,

3470:
3471: IF (g_fnd_debug = 'Y') THEN
3472: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3473: FND_LOG.string(
3474: LOG_LEVEL => FND_LOG.level_unexpected,
3475: MODULE => c_log_head ||'.'||l_api_name||'.others_exception',
3476: MESSAGE => FND_MSG_PUB.get(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F')
3477: );
3478: END IF;

Line 3595: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

3591: c_log_head || l_api_name || ' exception; location: '
3592: || l_progress || ' SQL code: ' || sqlcode);
3593:
3594: IF (g_fnd_debug = 'Y') THEN
3595: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3596: FND_LOG.string(
3597: LOG_LEVEL => FND_LOG.level_unexpected,
3598: MODULE => c_log_head||l_api_name||'.error_exception',
3599: MESSAGE => 'EXCEPTION ' || l_progress || ': SQL CODE is '||sqlcode

Line 3596: FND_LOG.string(

3592: || l_progress || ' SQL code: ' || sqlcode);
3593:
3594: IF (g_fnd_debug = 'Y') THEN
3595: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3596: FND_LOG.string(
3597: LOG_LEVEL => FND_LOG.level_unexpected,
3598: MODULE => c_log_head||l_api_name||'.error_exception',
3599: MESSAGE => 'EXCEPTION ' || l_progress || ': SQL CODE is '||sqlcode
3600: );

Line 3597: LOG_LEVEL => FND_LOG.level_unexpected,

3593:
3594: IF (g_fnd_debug = 'Y') THEN
3595: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
3596: FND_LOG.string(
3597: LOG_LEVEL => FND_LOG.level_unexpected,
3598: MODULE => c_log_head||l_api_name||'.error_exception',
3599: MESSAGE => 'EXCEPTION ' || l_progress || ': SQL CODE is '||sqlcode
3600: );
3601: END IF;