DBA Data[Home] [Help]

APPS.POR_AUTOSOURCE_UTIL_PKG dependencies on FND_LOG

Line 6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

2: /* $Header: PORSRCUB.pls 120.9.12020000.6 2013/05/10 03:42:27 bpulivar ship $ */
3:
4: -- Logging Static Variables
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

3:
4: -- Logging Static Variables
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

4: -- Logging Static Variables
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'ICX.PLSQL.POR_AUTOSOURCE_UTIL_PKG.';

Line 9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'ICX.PLSQL.POR_AUTOSOURCE_UTIL_PKG.';
13:

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

6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'ICX.PLSQL.POR_AUTOSOURCE_UTIL_PKG.';
13:
14: /* Check if the item is internally orderable in the destination organization */

Line 11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'ICX.PLSQL.POR_AUTOSOURCE_UTIL_PKG.';
13:
14: /* Check if the item is internally orderable in the destination organization */
15: FUNCTION is_internal_orderable(p_item_id IN NUMBER,

Line 302: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

298: ORDER BY avail_quantity DESC, msub.secondary_inventory_name ASC;
299:
300: BEGIN
301:
302: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
303:
304: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
305: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name, 'Start Autosource');
306: END IF;

Line 305: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name, 'Start Autosource');

301:
302: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
303:
304: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
305: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name, 'Start Autosource');
306: END IF;
307:
308: p_error_msg_code := '';
309:

Line 332: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name, 'Return Custom');

328: -- check if the autosource logic was customized
329: if l_custom_package_flag = TRUE then
330:
331: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
332: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name, 'Return Custom');
333: END IF;
334:
335: return TRUE;
336: end if;

Line 339: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

335: return TRUE;
336: end if;
337:
338: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
339: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
340: l_procedure_name, 'Item ID: ' || to_char(p_item_id));
341: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
342: l_procedure_name, 'Category ID: ' || to_char(p_category_id));
343: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

Line 341: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

337:
338: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
339: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
340: l_procedure_name, 'Item ID: ' || to_char(p_item_id));
341: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
342: l_procedure_name, 'Category ID: ' || to_char(p_category_id));
343: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
344: l_procedure_name, 'Dest Org ID: ' || to_char(p_dest_organization_id));
345: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

Line 343: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

339: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
340: l_procedure_name, 'Item ID: ' || to_char(p_item_id));
341: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
342: l_procedure_name, 'Category ID: ' || to_char(p_category_id));
343: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
344: l_procedure_name, 'Dest Org ID: ' || to_char(p_dest_organization_id));
345: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
346: l_procedure_name, 'Dest Subinv: ' || p_dest_subinventory);
347: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

Line 345: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

341: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
342: l_procedure_name, 'Category ID: ' || to_char(p_category_id));
343: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
344: l_procedure_name, 'Dest Org ID: ' || to_char(p_dest_organization_id));
345: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
346: l_procedure_name, 'Dest Subinv: ' || p_dest_subinventory);
347: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
348: l_procedure_name, 'Vendor ID: ' || to_char(p_vendor_id));
349: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

Line 347: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

343: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
344: l_procedure_name, 'Dest Org ID: ' || to_char(p_dest_organization_id));
345: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
346: l_procedure_name, 'Dest Subinv: ' || p_dest_subinventory);
347: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
348: l_procedure_name, 'Vendor ID: ' || to_char(p_vendor_id));
349: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
350: l_procedure_name, 'Vendor Site ID: ' || to_char(p_vendor_site_id));
351: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

Line 349: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

345: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
346: l_procedure_name, 'Dest Subinv: ' || p_dest_subinventory);
347: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
348: l_procedure_name, 'Vendor ID: ' || to_char(p_vendor_id));
349: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
350: l_procedure_name, 'Vendor Site ID: ' || to_char(p_vendor_site_id));
351: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
352: l_procedure_name, 'Not Purchasable Override: ' || p_not_purchasable_override);
353: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

Line 351: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

347: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
348: l_procedure_name, 'Vendor ID: ' || to_char(p_vendor_id));
349: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
350: l_procedure_name, 'Vendor Site ID: ' || to_char(p_vendor_site_id));
351: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
352: l_procedure_name, 'Not Purchasable Override: ' || p_not_purchasable_override);
353: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
354: l_procedure_name, 'Unit of Issue: ' || p_unit_of_issue);
355: END IF;

Line 353: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

349: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
350: l_procedure_name, 'Vendor Site ID: ' || to_char(p_vendor_site_id));
351: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
352: l_procedure_name, 'Not Purchasable Override: ' || p_not_purchasable_override);
353: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
354: l_procedure_name, 'Unit of Issue: ' || p_unit_of_issue);
355: END IF;
356:
357: -- first find the MRP: Assignment Set profile value

Line 361: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

357: -- first find the MRP: Assignment Set profile value
358: l_set_id := to_number(fnd_profile.value('MRP_DEFAULT_ASSIGNMENT_SET'));
359:
360: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
361: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
362: l_procedure_name, 'Assignment Set ID: ' || to_char(l_set_id));
363: END IF;
364:
365: -- get the unit of issue of the destination org

Line 371: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name, 'Return F');

367:
368: if l_set_id is null then
369: p_error_msg_code := 'ICX_POR_SRC_SETUP_INC';
370: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
371: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name, 'Return F');
372: END IF;
373: return FALSE;
374: end if;
375:

Line 385: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

381: l_is_purchasable_flag := 'N';
382: end if;
383:
384: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
385: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
386: l_procedure_name, 'Is Purchasable Flag: ' || l_is_purchasable_flag);
387: END IF;
388:
389: -- run the sourcing query

Line 399: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

395: l_vendor_site_id;
396: exit when c_sourcing%NOTFOUND;
397:
398: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
399: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
400: l_procedure_name, 'Source Org ID: ' || to_char(l_source_organization_id));
401: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
402: l_procedure_name, 'Source Type: ' || l_source_type);
403: END IF;

Line 401: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

397:
398: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
399: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
400: l_procedure_name, 'Source Org ID: ' || to_char(l_source_organization_id));
401: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
402: l_procedure_name, 'Source Type: ' || l_source_type);
403: END IF;
404:
405: if PO_ASL_SV.check_asl_action('2_SOURCING',l_vendor_id,

Line 413: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

409: -- if the sourcing rules say to pick the supplier, return supplier
410: if l_source_type = 3 then
411: p_sourcing_type := 'SUPPLIER';
412: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
413: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
414: l_procedure_name, 'Return T ' || p_sourcing_type);
415: END IF;
416: return true;
417: end if;

Line 425: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

421: -- check if the item is assigned to this particular source org
422: if is_item_assigned(p_item_id, l_source_organization_id) = 1 then
423:
424: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
425: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
426: l_procedure_name, 'Is Item Assigned: 1');
427: END IF;
428:
429: l_is_item_assigned_err := FALSE;

Line 434: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

430: -- check if there is a valid shipping network betweem the destination org and this particular source org
431: if is_valid_shipping_network(l_source_organization_id, p_dest_organization_id) = 1 then
432:
433: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
434: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
435: l_procedure_name, 'Is Valid Shipping Network: 1');
436: END IF;
437:
438: l_is_ship_network_assigned_err := FALSE;

Line 443: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

439: -- check if the item flags are correctly set in this particular source org
440: if is_item_shippable(p_item_id, l_source_organization_id) = 1 then
441:
442: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
443: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
444: l_procedure_name, 'Is Item Shippable: 1');
445: END IF;
446:
447: l_is_item_shippable_err := FALSE;

Line 456: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

452: -- price change and charge account is regenerated. Hence, rounding it off to 10 to prevent the same
453: p_cost_price := round(p_cost_price,10);
454:
455: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
456: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
457: l_procedure_name, 'Cost Price:' || to_char(p_cost_price));
458: END IF;
459:
460: OPEN c_avail_quantity;

Line 471: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

467: -- default to this source org and subinventory
468: -- otherwise keep search the sourcing rule
469:
470: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
471: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
472: l_procedure_name, 'Avail Qty:' || to_char(l_avail_quantity));
473: END IF;
474:
475: if l_avail_quantity > 0 then

Line 481: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

477: p_source_organization_id := l_source_organization_id;
478: p_source_subinventory := l_source_subinventory;
479: close c_sourcing;
480: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
481: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
482: l_procedure_name, 'Return T ' || p_sourcing_type);
483: END IF;
484: return true;
485: elsif l_avail_quantity = 0 then

Line 493: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

489: p_source_organization_id := l_source_organization_id;
490: --p_source_subinventory := l_source_subinventory;
491: close c_sourcing;
492: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
493: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
494: l_procedure_name, 'Return T ' || p_sourcing_type);
495: END IF;
496: return true;
497: END IF;

Line 507: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

503: if ( (l_count = 0) and not (l_sourcing_rule_exist_err or l_is_item_assigned_err or l_is_ship_network_assigned_err or l_is_item_shippable_err)
504: and (Nvl(FND_PROFILE.Value('POR_SRC_INT_STO_ITMS_NO_AVAIL'),'INTERNALLY') = 'INTERNALLY')) then
505:
506: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
507: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
508: l_procedure_name, 'Count = 0');
509: END IF;
510:
511: l_first_source_org_id := l_source_organization_id ;

Line 529: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

525: if ( ( l_count > 0) and (l_first_source_org_id <> -9999) ) then
526: p_sourcing_type := 'INTERNAL';
527: p_source_organization_id := l_first_source_org_id;
528: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
529: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
530: l_procedure_name, 'Return T ' || p_sourcing_type);
531: END IF;
532: return TRUE;
533: end if;

Line 539: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

535: -- if we didn't find an internal source and the item is purchasable, return Supplier
536: if (l_is_purchasable_flag = 'Y') then
537: p_sourcing_type := 'SUPPLIER';
538: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
539: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
540: l_procedure_name, 'Return T ' || p_sourcing_type);
541: END IF;
542: return TRUE;
543: end if;

Line 562: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

558: p_error_msg_code := 'ICX_POR_NO_INT_SOURCES_ERR';
559: end if;
560:
561: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
562: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
563: l_procedure_name, 'Return F');
564: END IF;
565:
566: return FALSE;

Line 575: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||

571: if c_sourcing%ISOPEN then
572: close c_sourcing;
573: end if;
574: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
575: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME ||
576: l_procedure_name, 'Exception Return F');
577: END IF;
578: RETURN FALSE;
579: