396: BEGIN
397: -- -----------------------------------------------------------------------
398: -- Set variables.
399: -- -----------------------------------------------------------------------
400: l_total_start := dbms_utility.get_time;
401:
402: IF (p_log_to_file <> 'Y') THEN
403: g_log_to_file := 'N';
404: ELSE
449:
450: -- -----------------------------------------------------------------------
451: -- Code Instrumentation
452: -- -----------------------------------------------------------------------
453: l_start := dbms_utility.get_time;
454: Debug('~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~');
455: Debug('Pre-Processing....................................................');
456: dbms_application_info.set_module(
457: module_name => g_module_name,
475: p_out_refresh_type => l_refresh_type,
476: p_module_name => g_module_name
477: );
478:
479: Debug('Elapsed Time (Pre-Processing): ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
480: l_start := dbms_utility.get_time;
481:
482: -- ------------------------------------------------------------------
483: -- Compute the partners eligibilities for each program
476: p_module_name => g_module_name
477: );
478:
479: Debug('Elapsed Time (Pre-Processing): ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
480: l_start := dbms_utility.get_time;
481:
482: -- ------------------------------------------------------------------
483: -- Compute the partners eligibilities for each program
484: -- ------------------------------------------------------------------
546: 1.0
547: );
548: END IF;
549: END LOOP;
550: Debug('Load test: Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
551: l_start := dbms_utility.get_time;
552:
553:
554: -- *****************************************************************
547: );
548: END IF;
549: END LOOP;
550: Debug('Load test: Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
551: l_start := dbms_utility.get_time;
552:
553:
554: -- *****************************************************************
555: -- *****************************************************************
577:
578:
579: COMMIT;
580:
581: Debug('Elapsed Time (Total Post-Processing): ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
582:
583: -- -------------------------------------------------------------------------
584: -- Display End Time Message.
585: -- -------------------------------------------------------------------------
596: ELSE
597: FND_MSG_PUB.Add;
598: END IF;
599:
600: l_elapsed_time := DBMS_UTILITY.get_time - l_total_start;
601: Debug('=====================================================================');
602: Debug('Total Elapsed Time: ' || l_elapsed_time || ' hsec' || ' = ' ||
603: ROUND((l_elapsed_time/6000), 2) || ' minutes');
604: Debug('=====================================================================');