DBA Data[Home] [Help]

APPS.GMF_ALLOC_PROC dependencies on FND_LOG

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

204: x_retval := fnd_concurrent.set_completion_status('ERROR',NULL);
205: END IF;
206: COMMIT;
207:
208: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
209: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,C_MODULE||'.end','Cost Allocation process completed successfully');
210: END IF;
211:
212: EXCEPTION

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

205: END IF;
206: COMMIT;
207:
208: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
209: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,C_MODULE||'.end','Cost Allocation process completed successfully');
210: END IF;
211:
212: EXCEPTION
213: WHEN utl_file.invalid_path THEN

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

282: )
283: IS
284: l_local_module VARCHAR2(80) := '.delete_allocations';
285: BEGIN
286: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Deleting Allocations');
288: END IF;
289: /* Bug 7458002 - Commented
290: DELETE FROM

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

283: IS
284: l_local_module VARCHAR2(80) := '.delete_allocations';
285: BEGIN
286: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
287: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Deleting Allocations');
288: END IF;
289: /* Bug 7458002 - Commented
290: DELETE FROM
291: gl_aloc_dtl

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

317: );
318:
319: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from Allocations table gl_aloc_dtl' );
320:
321: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
322: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Deleting Allocations');
323: END IF;
324:
325: EXCEPTION

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

318:
319: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from Allocations table gl_aloc_dtl' );
320:
321: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
322: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Deleting Allocations');
323: END IF;
324:
325: EXCEPTION
326: WHEN NO_DATA_FOUND THEN

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

325: EXCEPTION
326: WHEN NO_DATA_FOUND THEN
327: alloc_log_msg(C_LOG_FILE, '0 Rows deleted from gl_aloc_dtl ');
328: v_status := 0;
329: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
330: THEN
331: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,c_module||l_local_module,'0 Rows deleted from gl_aloc_dtl');
332: END IF;
333:

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

327: alloc_log_msg(C_LOG_FILE, '0 Rows deleted from gl_aloc_dtl ');
328: v_status := 0;
329: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
330: THEN
331: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,c_module||l_local_module,'0 Rows deleted from gl_aloc_dtl');
332: END IF;
333:
334: WHEN OTHERS THEN
335: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);

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

332: END IF;
333:
334: WHEN OTHERS THEN
335: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
336: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
337: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,c_module||l_local_module,to_char(SQLCODE) || ' ' || SQLERRM);
338: END IF;
339: v_status := -1;
340:

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

333:
334: WHEN OTHERS THEN
335: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
336: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
337: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,c_module||l_local_module,to_char(SQLCODE) || ' ' || SQLERRM);
338: END IF;
339: v_status := -1;
340:
341: END delete_allocations;

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

404: l_local_module VARCHAR2(80);
405: BEGIN
406: l_local_module := c_module||'.get_legal_entity_details';
407:
408: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
409: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.begin','Starting');
410: END IF;
411:
412:

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

405: BEGIN
406: l_local_module := c_module||'.get_legal_entity_details';
407:
408: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
409: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.begin','Starting');
410: END IF;
411:
412:
413: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

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

409: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.begin','Starting');
410: END IF;
411:
412:
413: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
414: THEN
415: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_local_module,'Retrieving Legal Entity information for calendar: '|| g_calendar_code ||' and Period: '||g_period_code);
416: END IF;
417:

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

411:
412:
413: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
414: THEN
415: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_local_module,'Retrieving Legal Entity information for calendar: '|| g_calendar_code ||' and Period: '||g_period_code);
416: END IF;
417:
418: OPEN Cur_get_le(g_period_id);
419: FETCH Cur_get_le INTO x_le_id,g_le_name;

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

419: FETCH Cur_get_le INTO x_le_id,g_le_name;
420: IF (Cur_get_le%NOTFOUND) THEN
421: CLOSE Cur_get_le;
422:
423: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
424: THEN
425: /*alloc_log_msg(2, 'No legal entity exists for cost calendar: ' ||g_calendar_code);*/
426: 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);
427: END IF;

Line 426: 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);

422:
423: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
424: THEN
425: /*alloc_log_msg(2, 'No legal entity exists for cost calendar: ' ||g_calendar_code);*/
426: 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);
427: END IF;
428: RETURN(-1); /* No calendar exists.*/
429: END IF;
430: CLOSE Cur_get_le;

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

429: END IF;
430: CLOSE Cur_get_le;
431:
432: /* Fetch the fiscal policy information for the company retrieved */
433: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
434: THEN
435: /*alloc_log_msg( 2,'Retrieving Fiscal policy for legal entity: ' ||g_le_name );*/
436: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);
437: END IF;

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

432: /* Fetch the fiscal policy information for the company retrieved */
433: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
434: THEN
435: /*alloc_log_msg( 2,'Retrieving Fiscal policy for legal entity: ' ||g_le_name );*/
436: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);
437: END IF;
438:
439: OPEN Cur_get_fiscal_plcy(X_le_id);
440: FETCH Cur_get_fiscal_plcy INTO P_fiscal_plcy;

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

439: OPEN Cur_get_fiscal_plcy(X_le_id);
440: FETCH Cur_get_fiscal_plcy INTO P_fiscal_plcy;
441: IF (Cur_get_fiscal_plcy%NOTFOUND) THEN
442: CLOSE Cur_get_fiscal_plcy;
443: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
444: THEN
445: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);
446: END IF;
447: alloc_log_msg(C_LOG_FILE, 'No fiscal policy is defined for legal_entity ' || g_le_name);

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

441: IF (Cur_get_fiscal_plcy%NOTFOUND) THEN
442: CLOSE Cur_get_fiscal_plcy;
443: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
444: THEN
445: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,l_local_module,'Retrieving Fiscal policy for legal entity: ' ||g_le_name);
446: END IF;
447: alloc_log_msg(C_LOG_FILE, 'No fiscal policy is defined for legal_entity ' || g_le_name);
448: RETURN(-2); /* No fiscal policy is defined for this company.*/
449: END IF;

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

463: */
464:
465: alloc_log_msg( C_LOG_FILE, 'Retrieved Fiscal Policy Details successfully' );
466:
467: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
468: THEN
469: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.end','Retrieved discal policy details successfully');
470: END IF;
471: RETURN(0);

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

465: alloc_log_msg( C_LOG_FILE, 'Retrieved Fiscal Policy Details successfully' );
466:
467: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
468: THEN
469: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_local_module||'.end','Retrieved discal policy details successfully');
470: END IF;
471: RETURN(0);
472: END get_legal_entity_details;
473:

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

497:
498: PROCEDURE delete_interface(v_status OUT NOCOPY NUMBER) IS
499: l_local_module VARCHAR2(80) := '.delete_interface';
500: BEGIN
501: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
502: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Delete interface');
503: END IF;
504:
505: alloc_log_msg(C_LOG_FILE, 'Deleting rows from gl_aloc_inp for calendar '||

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

498: PROCEDURE delete_interface(v_status OUT NOCOPY NUMBER) IS
499: l_local_module VARCHAR2(80) := '.delete_interface';
500: BEGIN
501: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
502: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.begin','Delete interface');
503: END IF;
504:
505: alloc_log_msg(C_LOG_FILE, 'Deleting rows from gl_aloc_inp for calendar '||
506: g_calendar_code||' and period '||g_period_code || ' and cost type '||g_cost_mthd_code);

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

513: v_status :=0;
514:
515: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from Interface table gl_aloc_inp' );
516:
517: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
518: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Delete interface');
519: END IF;
520:
521: EXCEPTION

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

514:
515: alloc_log_msg( C_LOG_FILE, TO_CHAR(SQL%ROWCOUNT) || ' Rows deleted from Interface table gl_aloc_inp' );
516:
517: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
518: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,c_module||l_local_module||'.end','Delete interface');
519: END IF;
520:
521: EXCEPTION
522:

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

588: BEGIN
589: l_previous_module := g_calling_module;
590: g_calling_module := g_calling_module||l_local_module;
591:
592: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
593: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||'.begin','Allocating Cost');
594: END IF;
595:
596: /* B1418787 List out all the allocation codes that exceed 100% */

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

589: l_previous_module := g_calling_module;
590: g_calling_module := g_calling_module||l_local_module;
591:
592: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
593: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||'.begin','Allocating Cost');
594: END IF;
595:
596: /* B1418787 List out all the allocation codes that exceed 100% */
597: alloc_log_msg( C_LOG_FILE, 'Following allocation codes will be ignored as the total percentage does not equal 100.');

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

602: FOR cur_alloc_fixed_invalid_tmp IN cur_alloc_fixed_invalid LOOP
603: alloc_log_msg( C_LOG_FILE, rpad(cur_alloc_fixed_invalid_tmp.alloc_code, 15, ' ') || ' - ' ||rpad(cur_alloc_fixed_invalid_tmp.total_percentage, 16, ' '));
604: END LOOP;
605: /* Bug 7458002 - Commented
606: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
607: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_allocations','deleting Allocations ...');
608: END IF;
609: delete_allocations(v_from_alloc_code, v_to_alloc_code, x_status);
610:

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

603: alloc_log_msg( C_LOG_FILE, rpad(cur_alloc_fixed_invalid_tmp.alloc_code, 15, ' ') || ' - ' ||rpad(cur_alloc_fixed_invalid_tmp.total_percentage, 16, ' '));
604: END LOOP;
605: /* Bug 7458002 - Commented
606: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
607: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_allocations','deleting Allocations ...');
608: END IF;
609: delete_allocations(v_from_alloc_code, v_to_alloc_code, x_status);
610:
611: IF (x_status < 0)

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

615: END IF;*/
616:
617: IF (v_refresh_interface = 1)
618: THEN
619: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
620: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_interface','deleting Interface data...');
621: END IF;
622:
623: delete_interface(x_status);

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

616:
617: IF (v_refresh_interface = 1)
618: THEN
619: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
620: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.delete_interface','deleting Interface data...');
621: END IF;
622:
623: delete_interface(x_status);
624: IF (x_status < 0)

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

627: return;
628: END IF;
629: alloc_log_msg( C_LOG_FILE, 'Retrieving Expenses ...');
630:
631: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
632: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_expenses','Retrieving Expenses ....');
633: END IF;
634: get_expenses(v_from_alloc_code, v_to_alloc_code);
635:

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

628: END IF;
629: alloc_log_msg( C_LOG_FILE, 'Retrieving Expenses ...');
630:
631: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
632: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_expenses','Retrieving Expenses ....');
633: END IF;
634: get_expenses(v_from_alloc_code, v_to_alloc_code);
635:
636: g_calling_module := l_previous_module||l_local_module;

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

634: get_expenses(v_from_alloc_code, v_to_alloc_code);
635:
636: g_calling_module := l_previous_module||l_local_module;
637:
638: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
639: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_alloc_basis','Retrieving Basis Information ....');
640: END IF;
641: alloc_log_msg( C_LOG_FILE, 'Retrieving Basis Information ...');
642: get_alloc_basis(v_from_alloc_code, v_to_alloc_code);

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

635:
636: g_calling_module := l_previous_module||l_local_module;
637:
638: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
639: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.get_alloc_basis','Retrieving Basis Information ....');
640: END IF;
641: alloc_log_msg( C_LOG_FILE, 'Retrieving Basis Information ...');
642: get_alloc_basis(v_from_alloc_code, v_to_alloc_code);
643: g_calling_module := l_previous_module||l_local_module;

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

645: /* Do not refresh the interface */
646:
647: alloc_log_msg( C_LOG_FILE, 'Processing Fixed Precentage Information ...');
648:
649: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
650: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.refresh_fixed','Processing Fixed Percentage Information ....');
651: END IF;
652: refresh_fixed(v_from_alloc_code,v_to_alloc_code);
653: g_calling_module := l_previous_module||l_local_module;

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

646:
647: alloc_log_msg( C_LOG_FILE, 'Processing Fixed Precentage Information ...');
648:
649: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
650: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.refresh_fixed','Processing Fixed Percentage Information ....');
651: END IF;
652: refresh_fixed(v_from_alloc_code,v_to_alloc_code);
653: g_calling_module := l_previous_module||l_local_module;
654: END IF;

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

652: refresh_fixed(v_from_alloc_code,v_to_alloc_code);
653: g_calling_module := l_previous_module||l_local_module;
654: END IF;
655:
656: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
657: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.process_alloc_dtl','Allocating Expenses ...');
658: END IF;
659:
660: alloc_log_msg( C_LOG_FILE, 'Allocating Expenses ...');

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

653: g_calling_module := l_previous_module||l_local_module;
654: END IF;
655:
656: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
657: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,g_calling_module||'.process_alloc_dtl','Allocating Expenses ...');
658: END IF;
659:
660: alloc_log_msg( C_LOG_FILE, 'Allocating Expenses ...');
661: process_alloc_dtl(v_from_alloc_code,v_to_alloc_code);

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

666:
667: EXCEPTION
668: WHEN others THEN
669: alloc_log_msg( C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
670: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
671: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);
672: END IF;
673: v_status := -1;
674: END cost_allocate;

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

667: EXCEPTION
668: WHEN others THEN
669: alloc_log_msg( C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
670: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
671: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);
672: END IF;
673: v_status := -1;
674: END cost_allocate;
675:

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

735: FOR cur_get_exp_tmp IN cur_get_exp
736: LOOP
737: alloc_log_msg( C_LOG_FILE, ' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);
738:
739: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
740: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,g_calling_module||'.put_alloc_expenses',' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);
741: END IF;
742:
743: put_alloc_expenses(

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

736: LOOP
737: alloc_log_msg( C_LOG_FILE, ' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);
738:
739: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
740: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,g_calling_module||'.put_alloc_expenses',' Processing allocation code '||cur_get_exp_tmp.exp_alloc_code);
741: END IF;
742:
743: put_alloc_expenses(
744: cur_get_exp_tmp.exp_alloc_id,

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

874: open cur_bal_type;
875: fetch cur_bal_type INTO x_in_actual_flag;
876: close cur_bal_type;
877:
878: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
879: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_SEGMENTS() API');
880: END IF;
881:
882: x_return_status := fnd_flex_ext.get_segments (

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

875: fetch cur_bal_type INTO x_in_actual_flag;
876: close cur_bal_type;
877:
878: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
879: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_SEGMENTS() API');
880: END IF;
881:
882: x_return_status := fnd_flex_ext.get_segments (
883: application_short_name => 'SQLGL',

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

924: alloc_log_msg(C_LOG_FILE,FND_MESSAGE.GET);
925: RETURN;
926: END IF;
927:
928: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
929: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Finished Calling FND_FLEX_EXT.GET_SEGMENTS() API');
930: END IF;
931:
932: x_in_ytd_ptd := v_ytd_ptd;

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

925: RETURN;
926: END IF;
927:
928: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
929: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Finished Calling FND_FLEX_EXT.GET_SEGMENTS() API');
930: END IF;
931:
932: x_in_ytd_ptd := v_ytd_ptd;
933:

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

995: x_error_status := nvl(x_error_status,0);
996:
997: IF (x_error_status <> 100 AND x_error_status >= 0) THEN
998: /* INVCONV sschinch */
999: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1000: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_COMBINATION_ID() API');
1001: END IF;
1002: x_to_account_id := fnd_flex_ext.get_ccid(application_short_name => 'SQLGL',
1003: key_flex_code => 'GL#',

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

996:
997: IF (x_error_status <> 100 AND x_error_status >= 0) THEN
998: /* INVCONV sschinch */
999: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1000: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module,'Calling FND_FLEX_EXT.GET_COMBINATION_ID() API');
1001: END IF;
1002: x_to_account_id := fnd_flex_ext.get_ccid(application_short_name => 'SQLGL',
1003: key_flex_code => 'GL#',
1004: structure_number => g_structure_number,

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

1015: alloc_log_msg(C_LOG_FILE, ' Account: '||x_to_segment|| ' Amount = '||to_char(x_amount));
1016: ELSE
1017: l_mesg_text := FND_MESSAGE.GET;
1018: alloc_log_msg(C_LOG_FILE,l_mesg_text);
1019: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1020: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,g_calling_module,'Error returned from FND_FLEX_EXT.GET_COMBINATION_ID() API '||l_mesg_text);
1021: END IF;
1022: END IF;
1023: END IF;

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

1016: ELSE
1017: l_mesg_text := FND_MESSAGE.GET;
1018: alloc_log_msg(C_LOG_FILE,l_mesg_text);
1019: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1020: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,g_calling_module,'Error returned from FND_FLEX_EXT.GET_COMBINATION_ID() API '||l_mesg_text);
1021: END IF;
1022: END IF;
1023: END IF;
1024: /* end SSCHINCH */

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

1062:
1063: IS
1064: l_local_module VARCHAR2(80):= '.insert_alloc_inp';
1065: BEGIN
1066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1067: THEN
1068: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin','Inserting ...');
1069: END IF;
1070:

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

1064: l_local_module VARCHAR2(80):= '.insert_alloc_inp';
1065: BEGIN
1066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1067: THEN
1068: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin','Inserting ...');
1069: END IF;
1070:
1071: INSERT
1072: INTO

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

1107: 0,
1108: 0,
1109: NULL
1110: );
1111: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1112: THEN
1113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed Inserting data into interface...');
1114: END IF;
1115: EXCEPTION

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

1109: NULL
1110: );
1111: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1112: THEN
1113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed Inserting data into interface...');
1114: END IF;
1115: EXCEPTION
1116: WHEN OTHERS THEN
1117: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

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

1113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed Inserting data into interface...');
1114: END IF;
1115: EXCEPTION
1116: WHEN OTHERS THEN
1117: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1118: THEN
1119: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);
1120: END IF;
1121: END insert_alloc_inp;

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

1115: EXCEPTION
1116: WHEN OTHERS THEN
1117: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1118: THEN
1119: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);
1120: END IF;
1121: END insert_alloc_inp;
1122:
1123: /* *********************************************************

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

1269: EXCEPTION
1270: WHEN NO_DATA_FOUND THEN
1271: alloc_log_msg(C_LOG_FILE, '0 Rows deleted from gl_aloc_inp for fixed');
1272:
1273: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1274: THEN
1275: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module,'0 Rows deleted from gl_aloc_inp for fixed');
1276: END IF;
1277: WHEN OTHERS THEN

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

1271: alloc_log_msg(C_LOG_FILE, '0 Rows deleted from gl_aloc_inp for fixed');
1272:
1273: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1274: THEN
1275: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module,'0 Rows deleted from gl_aloc_inp for fixed');
1276: END IF;
1277: WHEN OTHERS THEN
1278: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
1279:

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

1276: END IF;
1277: WHEN OTHERS THEN
1278: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
1279:
1280: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1281: THEN
1282: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);
1283: END IF;
1284: END ;

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

1278: alloc_log_msg(C_LOG_FILE, to_char(SQLCODE) || ' ' || SQLERRM);
1279:
1280: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1281: THEN
1282: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,g_calling_module,to_char(SQLCODE) || ' ' || SQLERRM);
1283: END IF;
1284: END ;
1285: g_calling_module := g_calling_module||l_local_module;
1286: FOR cur_aloc_fixed_tmp IN cur_alloc_fixed LOOP

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

1292: );
1293:
1294: END LOOP;
1295: g_calling_module := l_previous_module;
1296: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1297: THEN
1298: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed successfully');
1299: END IF;
1300:

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

1294: END LOOP;
1295: g_calling_module := l_previous_module;
1296: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1297: THEN
1298: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.end','Completed successfully');
1299: END IF;
1300:
1301: END refresh_fixed;
1302:

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

1357: x_allocated_amount gl_aloc_inp.amount%type;
1358: x_alloc_code gl_aloc_mst.alloc_code%TYPE;
1359: l_local_module VARCHAR2(80) := '.process_aloc_dtl';
1360: BEGIN
1361: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1362: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin',' Starting..');
1363: END IF;
1364:
1365: FOR cur_alocinp_tmp IN cur_glaloc_inp LOOP

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

1358: x_alloc_code gl_aloc_mst.alloc_code%TYPE;
1359: l_local_module VARCHAR2(80) := '.process_aloc_dtl';
1360: BEGIN
1361: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1362: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.begin',' Starting..');
1363: END IF;
1364:
1365: FOR cur_alocinp_tmp IN cur_glaloc_inp LOOP
1366: IF (X_prev_alloc_id <> cur_alocinp_tmp.alloc_id) THEN

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

1529: END IF;
1530: END LOOP;
1531:
1532: /* Bug 7458002 - To delete obsoleted rows in gl_aloc_dtl (Start) */
1533: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1534: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.delete_allocations','deleting Allocations ...');
1535: END IF;
1536: delete_allocations(v_from_alloc_code, v_to_alloc_code, x_status);
1537:

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

1530: END LOOP;
1531:
1532: /* Bug 7458002 - To delete obsoleted rows in gl_aloc_dtl (Start) */
1533: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1534: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,g_calling_module||l_local_module||'.delete_allocations','deleting Allocations ...');
1535: END IF;
1536: delete_allocations(v_from_alloc_code, v_to_alloc_code, x_status);
1537:
1538: IF (x_status < 0)

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

1542: /* Bug 7458002 - End */
1543:
1544: EXCEPTION
1545: WHEN OTHERS THEN
1546: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1547: THEN
1548: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);
1549: END IF;
1550: END process_alloc_dtl;

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

1544: EXCEPTION
1545: WHEN OTHERS THEN
1546: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1547: THEN
1548: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,g_calling_module||l_local_module,to_char(SQLCODE)||' '||SQLERRM);
1549: END IF;
1550: END process_alloc_dtl;
1551:
1552: