eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.GMF_ALLOC_PROC dependencies on FND_LOG

Line 224: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

220: x_retval := fnd_concurrent.set_completion_status('ERROR',NULL);
221: END IF;
222: COMMIT;
223:
224: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
225: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,C_MODULE||'.end','Cost Allocation process completed successfully');
226: END IF;
227:
228: EXCEPTION

Line 225: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,C_MODULE||'.end','Cost Allocation process completed successfully');

221: END IF;
222: COMMIT;
223:
224: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
225: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,C_MODULE||'.end','Cost Allocation process completed successfully');
226: END IF;
227:
228: EXCEPTION
229: WHEN utl_file.invalid_path THEN

Line 330: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

326: -- Bug 12561766 ends
327:
328: l_local_module VARCHAR2(80) := '.delete_allocations';
329: BEGIN
330: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
331: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Deleting Allocations');
332: END IF;
333: /* Bug 7458002 - Commented
334: DELETE FROM

Line 331: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Deleting Allocations');

327:
328: l_local_module VARCHAR2(80) := '.delete_allocations';
329: BEGIN
330: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
331: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Deleting Allocations');
332: END IF;
333: /* Bug 7458002 - Commented
334: DELETE FROM
335: gl_aloc_dtl

Line 391: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

387: WHERE xe.application_id = 555
388: AND xe.event_id = l_event.event_id
389: AND xe.event_type_code = 'GLCOSTALOC';
390:
391: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
392: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Found Expense Allocation event to Delete '||l_event.event_id);
393: END IF;
394:
395: END LOOP;

Line 392: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Found Expense Allocation event to Delete '||l_event.event_id);

388: AND xe.event_id = l_event.event_id
389: AND xe.event_type_code = 'GLCOSTALOC';
390:
391: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
392: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Found Expense Allocation event to Delete '||l_event.event_id);
393: END IF;
394:
395: END LOOP;
396:

Line 399: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

395: END LOOP;
396:
397: alloc_log_msg( C_LOG_FILE, ' Number of Allocation events to delete = ' || l_event_count );
398:
399: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
400: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Deleting Expense Allocation Events Extract Lines ');
401: END IF;
402:
403: DELETE FROM gmf_xla_extract_lines

Line 400: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Deleting Expense Allocation Events Extract Lines ');

396:
397: alloc_log_msg( C_LOG_FILE, ' Number of Allocation events to delete = ' || l_event_count );
398:
399: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
400: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Deleting Expense Allocation Events Extract Lines ');
401: END IF;
402:
403: DELETE FROM gmf_xla_extract_lines
404: WHERE Header_id IN (SELECT header_id FROM gmf_xla_extract_headers

Line 413: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

409: );
410:
411: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from gmf_xla_extract_lines. ' );
412:
413: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
414: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Deleting Expense Allocation Events Extract Headers ');
415: END IF;
416:
417: DELETE FROM gmf_xla_extract_headers

Line 414: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Deleting Expense Allocation Events Extract Headers ');

410:
411: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from gmf_xla_extract_lines. ' );
412:
413: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
414: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module, 'Deleting Expense Allocation Events Extract Headers ');
415: END IF;
416:
417: DELETE FROM gmf_xla_extract_headers
418: WHERE entity_code = 'REVALUATION'

Line 451: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

447:
448:
449: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from Allocations table gl_aloc_dtl' );
450:
451: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
452: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Deleting Allocations');
453: END IF;
454:
455: EXCEPTION

Line 452: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Deleting Allocations');

448:
449: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from Allocations table gl_aloc_dtl' );
450:
451: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
452: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Deleting Allocations');
453: END IF;
454:
455: EXCEPTION
456: WHEN NO_DATA_FOUND THEN

Line 459: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

455: EXCEPTION
456: WHEN NO_DATA_FOUND THEN
457: alloc_log_msg(C_LOG_FILE, '0 Rows deleted from gl_aloc_dtl ');
458: v_status := 0;
459: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
460: THEN
461: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,c_module||l_local_module,'0 Rows deleted from gl_aloc_dtl');
462: END IF;
463:

Line 461: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,c_module||l_local_module,'0 Rows deleted from gl_aloc_dtl');

457: alloc_log_msg(C_LOG_FILE, '0 Rows deleted from gl_aloc_dtl ');
458: v_status := 0;
459: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
460: THEN
461: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,c_module||l_local_module,'0 Rows deleted from gl_aloc_dtl');
462: END IF;
463:
464: WHEN OTHERS THEN
465: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);

Line 466: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

462: END IF;
463:
464: WHEN OTHERS THEN
465: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
466: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
467: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,c_module||l_local_module,to_char(SQLCODE) || ' ' || SQLERRM);
468: END IF;
469: v_status := -1;
470:

Line 467: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,c_module||l_local_module,to_char(SQLCODE) || ' ' || SQLERRM);

463:
464: WHEN OTHERS THEN
465: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
466: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
467: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,c_module||l_local_module,to_char(SQLCODE) || ' ' || SQLERRM);
468: END IF;
469: v_status := -1;
470:
471: END delete_allocations;

Line 538: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

534: l_local_module VARCHAR2(80);
535: BEGIN
536: l_local_module := c_module||'.get_legal_entity_details';
537:
538: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
539: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.begin','Starting');
540: END IF;
541:
542:

Line 539: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.begin','Starting');

535: BEGIN
536: l_local_module := c_module||'.get_legal_entity_details';
537:
538: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
539: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.begin','Starting');
540: END IF;
541:
542:
543: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

Line 543: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

539: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.begin','Starting');
540: END IF;
541:
542:
543: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
544: THEN
545: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_local_module,'Retrieving Legal Entity information for calendar: '|| g_calendar_code ||' and Period: '||g_period_code);
546: END IF;
547:

Line 545: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_local_module,'Retrieving Legal Entity information for calendar: '|| g_calendar_code ||' and Period: '||g_period_code);

541:
542:
543: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
544: THEN
545: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_local_module,'Retrieving Legal Entity information for calendar: '|| g_calendar_code ||' and Period: '||g_period_code);
546: END IF;
547:
548: OPEN Cur_get_le(g_period_id);
549: FETCH Cur_get_le INTO x_le_id,g_le_name;

Line 553: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

549: FETCH Cur_get_le INTO x_le_id,g_le_name;
550: IF (Cur_get_le%NOTFOUND) THEN
551: CLOSE Cur_get_le;
552:
553: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
554: THEN
555: /*alloc_log_msg(2, 'No legal entity exists for cost calendar: ' ||g_calendar_code);*/
556: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'No legal entity exists for cost calendar: ' ||g_calendar_code ||' and Period: '||g_period_code);
557: END IF;

Line 556: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'No legal entity exists for cost calendar: ' ||g_calendar_code ||' and Period: '||g_period_code);

552:
553: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
554: THEN
555: /*alloc_log_msg(2, 'No legal entity exists for cost calendar: ' ||g_calendar_code);*/
556: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'No legal entity exists for cost calendar: ' ||g_calendar_code ||' and Period: '||g_period_code);
557: END IF;
558: RETURN(-1); /* No calendar exists.*/
559: END IF;
560: CLOSE Cur_get_le;

Line 563: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

559: END IF;
560: CLOSE Cur_get_le;
561:
562: /* Fetch the fiscal policy information for the company retrieved */
563: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
564: THEN
565: /*alloc_log_msg( 2,'Retrieving Fiscal policy for legal entity: ' ||g_le_name );*/
566: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);
567: END IF;

Line 566: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);

562: /* Fetch the fiscal policy information for the company retrieved */
563: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
564: THEN
565: /*alloc_log_msg( 2,'Retrieving Fiscal policy for legal entity: ' ||g_le_name );*/
566: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);
567: END IF;
568:
569: OPEN Cur_get_fiscal_plcy(X_le_id);
570: FETCH Cur_get_fiscal_plcy INTO P_fiscal_plcy;

Line 573: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

569: OPEN Cur_get_fiscal_plcy(X_le_id);
570: FETCH Cur_get_fiscal_plcy INTO P_fiscal_plcy;
571: IF (Cur_get_fiscal_plcy%NOTFOUND) THEN
572: CLOSE Cur_get_fiscal_plcy;
573: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
574: THEN
575: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);
576: END IF;
577: alloc_log_msg(C_LOG_FILE, 'No fiscal policy is defined for legal_entity ' || g_le_name);

Line 575: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);

571: IF (Cur_get_fiscal_plcy%NOTFOUND) THEN
572: CLOSE Cur_get_fiscal_plcy;
573: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
574: THEN
575: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);
576: END IF;
577: alloc_log_msg(C_LOG_FILE, 'No fiscal policy is defined for legal_entity ' || g_le_name);
578: RETURN(-2); /* No fiscal policy is defined for this company.*/
579: END IF;

Line 597: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

593: */
594:
595: alloc_log_msg( C_LOG_FILE, 'Retrieved Fiscal Policy Details successfully' );
596:
597: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
598: THEN
599: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.end','Retrieved discal policy details successfully');
600: END IF;
601: RETURN(0);

Line 599: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.end','Retrieved discal policy details successfully');

595: alloc_log_msg( C_LOG_FILE, 'Retrieved Fiscal Policy Details successfully' );
596:
597: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
598: THEN
599: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.end','Retrieved discal policy details successfully');
600: END IF;
601: RETURN(0);
602: END get_legal_entity_details;
603:

Line 634: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

630: v_to_alloc_code VARCHAR2,
631: v_status OUT NOCOPY NUMBER) IS
632: l_local_module VARCHAR2(80) := '.delete_interface';
633: BEGIN
634: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Delete interface');
636: END IF;
637:
638: alloc_log_msg(C_LOG_FILE, 'Deleting rows from gl_aloc_inp for calendar '||g_calendar_code ||

Line 635: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Delete interface');

631: v_status OUT NOCOPY NUMBER) IS
632: l_local_module VARCHAR2(80) := '.delete_interface';
633: BEGIN
634: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Delete interface');
636: END IF;
637:
638: alloc_log_msg(C_LOG_FILE, 'Deleting rows from gl_aloc_inp for calendar '||g_calendar_code ||
639: ' and period '||g_period_code || ' and cost type '||g_cost_mthd_code ||' From Alloc code '||v_from_alloc_code ||'To Alloc code '||v_to_alloc_code );

Line 657: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

653: v_status :=0;
654:
655: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from Interface table gl_aloc_inp' );
656:
657: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
658: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Delete interface');
659: END IF;
660:
661: EXCEPTION

Line 658: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Delete interface');

654:
655: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from Interface table gl_aloc_inp' );
656:
657: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
658: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Delete interface');
659: END IF;
660:
661: EXCEPTION
662:

Line 732: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

728: BEGIN
729: l_previous_module := g_calling_module;
730: g_calling_module := g_calling_module||l_local_module;
731:
732: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
733: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||'.begin','Allocating Cost');
734: END IF;
735:
736: /* B1418787 List out all the allocation codes that exceed 100% */

Line 733: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||'.begin','Allocating Cost');

729: l_previous_module := g_calling_module;
730: g_calling_module := g_calling_module||l_local_module;
731:
732: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
733: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||'.begin','Allocating Cost');
734: END IF;
735:
736: /* B1418787 List out all the allocation codes that exceed 100% */
737: alloc_log_msg( C_LOG_FILE, 'Following allocation codes will be ignored as the total percentage does not equal 100.');

Line 746: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

742: FOR cur_alloc_fixed_invalid_tmp IN cur_alloc_fixed_invalid LOOP
743: alloc_log_msg( C_LOG_FILE, rpad(cur_alloc_fixed_invalid_tmp.alloc_code, 15, ' ') || ' - ' ||rpad(cur_alloc_fixed_invalid_tmp.total_percentage, 16, ' '));
744: END LOOP;
745: /* Bug 7458002 - Commented
746: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
747: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_allocations','deleting Allocations ...');
748: END IF;
749: delete_allocations(v_from_alloc_code, v_to_alloc_code, x_status);
750:

Line 747: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_allocations','deleting Allocations ...');

743: alloc_log_msg( C_LOG_FILE, rpad(cur_alloc_fixed_invalid_tmp.alloc_code, 15, ' ') || ' - ' ||rpad(cur_alloc_fixed_invalid_tmp.total_percentage, 16, ' '));
744: END LOOP;
745: /* Bug 7458002 - Commented
746: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
747: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_allocations','deleting Allocations ...');
748: END IF;
749: delete_allocations(v_from_alloc_code, v_to_alloc_code, x_status);
750:
751: IF (x_status < 0)

Line 759: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

755: END IF;*/
756:
757: IF (v_refresh_interface = 1)
758: THEN
759: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
760: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_interface','deleting Interface data...');
761: END IF;
762:
763: delete_interface(v_from_alloc_code, v_to_alloc_code, x_status );

Line 760: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_interface','deleting Interface data...');

756:
757: IF (v_refresh_interface = 1)
758: THEN
759: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
760: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_interface','deleting Interface data...');
761: END IF;
762:
763: delete_interface(v_from_alloc_code, v_to_alloc_code, x_status );
764: IF (x_status < 0)

Line 771: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

767: return;
768: END IF;
769: alloc_log_msg( C_LOG_FILE, 'Retrieving Expenses ...');
770:
771: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
772: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_expenses','Retrieving Expenses ....');
773: END IF;
774: get_expenses(v_from_alloc_code, v_to_alloc_code);
775:

Line 772: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_expenses','Retrieving Expenses ....');

768: END IF;
769: alloc_log_msg( C_LOG_FILE, 'Retrieving Expenses ...');
770:
771: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
772: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_expenses','Retrieving Expenses ....');
773: END IF;
774: get_expenses(v_from_alloc_code, v_to_alloc_code);
775:
776: g_calling_module := l_previous_module||l_local_module;

Line 778: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

774: get_expenses(v_from_alloc_code, v_to_alloc_code);
775:
776: g_calling_module := l_previous_module||l_local_module;
777:
778: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
779: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_alloc_basis','Retrieving Basis Information ....');
780: END IF;
781: alloc_log_msg( C_LOG_FILE, 'Retrieving Basis Information ...');
782: get_alloc_basis(v_from_alloc_code, v_to_alloc_code);

Line 779: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_alloc_basis','Retrieving Basis Information ....');

775:
776: g_calling_module := l_previous_module||l_local_module;
777:
778: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
779: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_alloc_basis','Retrieving Basis Information ....');
780: END IF;
781: alloc_log_msg( C_LOG_FILE, 'Retrieving Basis Information ...');
782: get_alloc_basis(v_from_alloc_code, v_to_alloc_code);
783: g_calling_module := l_previous_module||l_local_module;

Line 789: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

785: /* Do not refresh the interface */
786:
787: alloc_log_msg( C_LOG_FILE, 'Processing Fixed Precentage Information ...');
788:
789: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
790: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.refresh_fixed','Processing Fixed Percentage Information ....');
791: END IF;
792: refresh_fixed(v_from_alloc_code,v_to_alloc_code);
793: g_calling_module := l_previous_module||l_local_module;

Line 790: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.refresh_fixed','Processing Fixed Percentage Information ....');

786:
787: alloc_log_msg( C_LOG_FILE, 'Processing Fixed Precentage Information ...');
788:
789: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
790: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.refresh_fixed','Processing Fixed Percentage Information ....');
791: END IF;
792: refresh_fixed(v_from_alloc_code,v_to_alloc_code);
793: g_calling_module := l_previous_module||l_local_module;
794: END IF;

Line 796: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

792: refresh_fixed(v_from_alloc_code,v_to_alloc_code);
793: g_calling_module := l_previous_module||l_local_module;
794: END IF;
795:
796: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
797: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.process_alloc_dtl','Allocating Expenses ...');
798: END IF;
799:
800: alloc_log_msg( C_LOG_FILE, 'Allocating Expenses ...');

Line 797: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.process_alloc_dtl','Allocating Expenses ...');

793: g_calling_module := l_previous_module||l_local_module;
794: END IF;
795:
796: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
797: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.process_alloc_dtl','Allocating Expenses ...');
798: END IF;
799:
800: alloc_log_msg( C_LOG_FILE, 'Allocating Expenses ...');
801: process_alloc_dtl(v_from_alloc_code,v_to_alloc_code);

Line 810: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

806:
807: EXCEPTION
808: WHEN others THEN
809: alloc_log_msg( C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
810: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
811: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);
812: END IF;
813: v_status := -1;
814: END cost_allocate;

Line 811: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);

807: EXCEPTION
808: WHEN others THEN
809: alloc_log_msg( C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
810: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
811: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);
812: END IF;
813: v_status := -1;
814: END cost_allocate;
815:

Line 879: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

875: FOR cur_get_exp_tmp IN cur_get_exp
876: LOOP
877: alloc_log_msg( C_LOG_FILE, ' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);
878:
879: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
880: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,g_calling_module||'.put_alloc_expenses',' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);
881: END IF;
882:
883: put_alloc_expenses(

Line 880: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,g_calling_module||'.put_alloc_expenses',' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);

876: LOOP
877: alloc_log_msg( C_LOG_FILE, ' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);
878:
879: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
880: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,g_calling_module||'.put_alloc_expenses',' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);
881: END IF;
882:
883: put_alloc_expenses(
884: cur_get_exp_tmp.exp_alloc_id,

Line 1029: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1025: open cur_bal_type;
1026: fetch cur_bal_type INTO x_in_actual_flag;
1027: close cur_bal_type;
1028:
1029: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1030: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_SEGMENTS() API');
1031: END IF;
1032:
1033: x_return_status := fnd_flex_ext.get_segments (

Line 1030: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_SEGMENTS() API');

1026: fetch cur_bal_type INTO x_in_actual_flag;
1027: close cur_bal_type;
1028:
1029: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1030: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_SEGMENTS() API');
1031: END IF;
1032:
1033: x_return_status := fnd_flex_ext.get_segments (
1034: application_short_name => 'SQLGL',

Line 1079: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1075: alloc_log_msg(C_LOG_FILE,FND_MESSAGE.GET);
1076: RETURN;
1077: END IF;
1078:
1079: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1080: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Finished Calling FND_FLEX_EXT.GET_SEGMENTS() API');
1081: END IF;
1082:
1083: x_in_ytd_ptd := v_ytd_ptd;

Line 1080: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Finished Calling FND_FLEX_EXT.GET_SEGMENTS() API');

1076: RETURN;
1077: END IF;
1078:
1079: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1080: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Finished Calling FND_FLEX_EXT.GET_SEGMENTS() API');
1081: END IF;
1082:
1083: x_in_ytd_ptd := v_ytd_ptd;
1084:

Line 1183: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1179:
1180: IF (x_error_status <> 100 AND x_error_status >= 0) THEN
1181: /* INVCONV sschinch */
1182: /**Bug#12600219 - Replaced this code with following, as now we are using X_to_segment_ccid to identify account
1183: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1184: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_COMBINATION_ID() API');
1185: END IF;
1186: x_to_account_id := fnd_flex_ext.get_ccid(application_short_name => 'SQLGL',
1187: key_flex_code => 'GL#',

Line 1184: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_COMBINATION_ID() API');

1180: IF (x_error_status <> 100 AND x_error_status >= 0) THEN
1181: /* INVCONV sschinch */
1182: /**Bug#12600219 - Replaced this code with following, as now we are using X_to_segment_ccid to identify account
1183: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1184: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_COMBINATION_ID() API');
1185: END IF;
1186: x_to_account_id := fnd_flex_ext.get_ccid(application_short_name => 'SQLGL',
1187: key_flex_code => 'GL#',
1188: structure_number => g_structure_number,

Line 1203: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1199: alloc_log_msg(C_LOG_FILE, ' Account: '||x_to_segment|| ' Amount = '||to_char(x_amount));
1200: ELSE
1201: l_mesg_text := FND_MESSAGE.GET;
1202: alloc_log_msg(C_LOG_FILE,l_mesg_text);
1203: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1204: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,g_calling_module,'Error returned from FND_FLEX_EXT.GET_COMBINATION_ID() API '||l_mesg_text);
1205: END IF;
1206: END IF;
1207: **/

Line 1204: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,g_calling_module,'Error returned from FND_FLEX_EXT.GET_COMBINATION_ID() API '||l_mesg_text);

1200: ELSE
1201: l_mesg_text := FND_MESSAGE.GET;
1202: alloc_log_msg(C_LOG_FILE,l_mesg_text);
1203: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1204: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,g_calling_module,'Error returned from FND_FLEX_EXT.GET_COMBINATION_ID() API '||l_mesg_text);
1205: END IF;
1206: END IF;
1207: **/
1208:

Line 1220: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1216: );
1217: alloc_log_msg(C_LOG_FILE, ' AccountId: '||to_char(X_to_segment_ccid)|| ' Amount = '||to_char(x_amount));
1218:
1219: /* Now, fetching account using ccid just to display it in log (START)*/
1220: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1221: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_SEGMENTS() API');
1222: END IF;
1223:
1224: x_return_status := fnd_flex_ext.get_segments(application_short_name => 'SQLGL',

Line 1221: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_SEGMENTS() API');

1217: alloc_log_msg(C_LOG_FILE, ' AccountId: '||to_char(X_to_segment_ccid)|| ' Amount = '||to_char(x_amount));
1218:
1219: /* Now, fetching account using ccid just to display it in log (START)*/
1220: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1221: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_SEGMENTS() API');
1222: END IF;
1223:
1224: x_return_status := fnd_flex_ext.get_segments(application_short_name => 'SQLGL',
1225: key_flex_code => 'GL#',

Line 1246: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1242: alloc_log_msg(C_LOG_FILE,FND_MESSAGE.GET);
1243: RETURN;
1244: END IF;
1245:
1246: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Finished Calling FND_FLEX_EXT.GET_SEGMENTS() API');
1248: END IF;
1249: /* Now, fetching account using ccid just to display it in log (END)*/
1250: ELSE

Line 1247: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Finished Calling FND_FLEX_EXT.GET_SEGMENTS() API');

1243: RETURN;
1244: END IF;
1245:
1246: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Finished Calling FND_FLEX_EXT.GET_SEGMENTS() API');
1248: END IF;
1249: /* Now, fetching account using ccid just to display it in log (END)*/
1250: ELSE
1251: alloc_log_msg(C_LOG_FILE, ' WARNING: Incorrect X_to_segment_ccid, NOT inserting into gl_aloc_inp : '||to_char(X_to_segment_ccid));

Line 1299: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1295:
1296: IS
1297: l_local_module VARCHAR2(80):= '.insert_alloc_inp';
1298: BEGIN
1299: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1300: THEN
1301: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin','Inserting ...');
1302: END IF;
1303:

Line 1301: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin','Inserting ...');

1297: l_local_module VARCHAR2(80):= '.insert_alloc_inp';
1298: BEGIN
1299: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1300: THEN
1301: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin','Inserting ...');
1302: END IF;
1303:
1304: INSERT
1305: INTO

Line 1344: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1340: 0,
1341: 0,
1342: NULL
1343: );
1344: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1345: THEN
1346: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed Inserting data into interface...');
1347: END IF;
1348: EXCEPTION

Line 1346: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed Inserting data into interface...');

1342: NULL
1343: );
1344: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1345: THEN
1346: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed Inserting data into interface...');
1347: END IF;
1348: EXCEPTION
1349: WHEN OTHERS THEN
1350: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

Line 1350: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1346: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed Inserting data into interface...');
1347: END IF;
1348: EXCEPTION
1349: WHEN OTHERS THEN
1350: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1351: THEN
1352: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);
1353: END IF;
1354: END insert_alloc_inp;

Line 1352: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);

1348: EXCEPTION
1349: WHEN OTHERS THEN
1350: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1351: THEN
1352: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);
1353: END IF;
1354: END insert_alloc_inp;
1355:
1356: /* *********************************************************

Line 1506: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1502: EXCEPTION
1503: WHEN NO_DATA_FOUND THEN
1504: alloc_log_msg(C_LOG_FILE, '0 Rows deleted from gl_aloc_inp for fixed');
1505:
1506: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1507: THEN
1508: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module,'0 Rows deleted from gl_aloc_inp for fixed');
1509: END IF;
1510: WHEN OTHERS THEN

Line 1508: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module,'0 Rows deleted from gl_aloc_inp for fixed');

1504: alloc_log_msg(C_LOG_FILE, '0 Rows deleted from gl_aloc_inp for fixed');
1505:
1506: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1507: THEN
1508: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module,'0 Rows deleted from gl_aloc_inp for fixed');
1509: END IF;
1510: WHEN OTHERS THEN
1511: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
1512:

Line 1513: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1509: END IF;
1510: WHEN OTHERS THEN
1511: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
1512:
1513: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1514: THEN
1515: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);
1516: END IF;
1517: END ;

Line 1515: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);

1511: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
1512:
1513: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1514: THEN
1515: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);
1516: END IF;
1517: END ;
1518: g_calling_module := g_calling_module||l_local_module;
1519: FOR cur_aloc_fixed_tmp IN cur_alloc_fixed LOOP

Line 1529: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1525: );
1526:
1527: END LOOP;
1528: g_calling_module := l_previous_module;
1529: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1530: THEN
1531: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed successfully');
1532: END IF;
1533:

Line 1531: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed successfully');

1527: END LOOP;
1528: g_calling_module := l_previous_module;
1529: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1530: THEN
1531: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed successfully');
1532: END IF;
1533:
1534: END refresh_fixed;
1535:

Line 1594: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1590: x_allocated_amount gl_aloc_inp.amount%type;
1591: x_alloc_code gl_aloc_mst.alloc_code%TYPE;
1592: l_local_module VARCHAR2(80) := '.process_aloc_dtl';
1593: BEGIN
1594: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1595: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin',' Starting..');
1596: END IF;
1597:
1598: FOR cur_alocinp_tmp IN cur_glaloc_inp LOOP

Line 1595: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin',' Starting..');

1591: x_alloc_code gl_aloc_mst.alloc_code%TYPE;
1592: l_local_module VARCHAR2(80) := '.process_aloc_dtl';
1593: BEGIN
1594: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1595: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin',' Starting..');
1596: END IF;
1597:
1598: FOR cur_alocinp_tmp IN cur_glaloc_inp LOOP
1599: IF (X_prev_alloc_id <> cur_alocinp_tmp.alloc_id) THEN

Line 1766: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1762: END IF;
1763: END LOOP;
1764:
1765: /* Bug 7458002 - To delete obsoleted rows in gl_aloc_dtl (Start) */
1766: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1767: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.delete_allocations','deleting Allocations ...');
1768: END IF;
1769: delete_allocations(v_from_alloc_code, v_to_alloc_code, x_status);
1770:

Line 1767: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.delete_allocations','deleting Allocations ...');

1763: END LOOP;
1764:
1765: /* Bug 7458002 - To delete obsoleted rows in gl_aloc_dtl (Start) */
1766: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1767: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.delete_allocations','deleting Allocations ...');
1768: END IF;
1769: delete_allocations(v_from_alloc_code, v_to_alloc_code, x_status);
1770:
1771: IF (x_status < 0)

Line 1779: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

1775: /* Bug 7458002 - End */
1776:
1777: EXCEPTION
1778: WHEN OTHERS THEN
1779: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1780: THEN
1781: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);
1782: END IF;
1783: END process_alloc_dtl;

Line 1781: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);

1777: EXCEPTION
1778: WHEN OTHERS THEN
1779: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1780: THEN
1781: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);
1782: END IF;
1783: END process_alloc_dtl;
1784:
1785: