DBA Data[Home] [Help]

APPS.EGO_BOM_BULKLOAD_PVT_PKG dependencies on FND_FILE

Line 61: FND_FILE.put_line(FND_FILE.LOG, ' Log file location --> '||l_log_output_dir||'/'||G_ERROR_FILE_NAME ||' created with status '|| l_log_return_status);

57: ,x_return_status => l_log_return_status
58: ,x_error_mesg => l_errbuff
59: );
60:
61: FND_FILE.put_line(FND_FILE.LOG, ' Log file location --> '||l_log_output_dir||'/'||G_ERROR_FILE_NAME ||' created with status '|| l_log_return_status);
62:
63: IF (l_log_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
64: FND_FILE.put_line(FND_FILE.LOG, 'Unable to open error log file. Error => '||l_errbuff);
65: END IF;

Line 64: FND_FILE.put_line(FND_FILE.LOG, 'Unable to open error log file. Error => '||l_errbuff);

60:
61: FND_FILE.put_line(FND_FILE.LOG, ' Log file location --> '||l_log_output_dir||'/'||G_ERROR_FILE_NAME ||' created with status '|| l_log_return_status);
62:
63: IF (l_log_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
64: FND_FILE.put_line(FND_FILE.LOG, 'Unable to open error log file. Error => '||l_errbuff);
65: END IF;
66:
67: END IF;--IF c_get_utl_file_dir%FOUND THEN
68:

Line 394: FND_FILE.put_line(FND_FILE.LOG, ' ******** New Log ******** ');

390: G_CONCREQ_VALID_FLAG := TRUE;
391: END IF;
392:
393: IF (G_CONCREQ_VALID_FLAG ) THEN
394: FND_FILE.put_line(FND_FILE.LOG, ' ******** New Log ******** ');
395: END IF;
396:
397: -- the values are chosen from the FND_GLOBALS
398: G_USER_ID := FND_GLOBAL.user_id ;

Line 415: --Replace this with FND_FILE.put_line() if needed.

411: --Opens Error_Handler debug session
412: --Open_Debug_Session;
413:
414: --After Open_Debug_Session, can log using Error_Handler.Write_Debug()
415: --Replace this with FND_FILE.put_line() if needed.
416: --Error_Handler.Write_Debug('G_USER_ID : '||TO_CHAR(G_USER_ID));
417: --Error_Handler.Write_Debug('G_PROG_ID : '||TO_CHAR(G_PROG_ID));
418: --Error_Handler.Write_Debug('G_REQUEST_ID : '||TO_CHAR(G_REQUEST_ID));
419: --Error_Handler.Write_Debug('P_RESULT_FMT_USAGE_ID : '||TO_CHAR(p_Resultfmt_Usage_Id));

Line 438: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering First Loop ');

434: SET Transaction_Id = MTL_SYSTEM_ITEMS_INTERFACE_S.NEXTVAL
435: WHERE Resultfmt_Usage_Id = p_Resultfmt_Usage_Id AND PROCESS_STATUS = 1 ;
436:
437: IF l_debug = 'Y' THEN
438: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering First Loop ');
439: END IF;
440:
441:
442: -- Get the Mapped Columns to a Table

Line 465: FND_FILE.PUT_LINE( FND_FILE.LOG,'Exiting First Loop ');

461: i := i+1;
462: END LOOP;
463:
464: IF l_debug = 'Y' THEN
465: FND_FILE.PUT_LINE( FND_FILE.LOG,'Exiting First Loop ');
466: END IF;
467:
468:
469: -- Process The Rows for BOM BO Header For Create and Update.

Line 485: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering First SQL 1' || l_dyn_sql);

481:
482: l_dyn_sql := l_dyn_sql_insert || ' ' || l_dyn_sql_select;
483:
484: IF l_debug = 'Y' THEN
485: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering First SQL 1' || l_dyn_sql);
486: END IF;
487:
488:
489: EXECUTE IMMEDIATE l_dyn_sql USING p_resultfmt_usage_id;

Line 546: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2' || l_dyn_sql);

542:
543: l_dyn_sql := l_dyn_sql_insert || ' ' || l_dyn_sql_select;
544:
545: IF l_debug = 'Y' THEN
546: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2' || l_dyn_sql);
547: END IF;
548:
549: EXECUTE IMMEDIATE l_dyn_sql USING p_resultfmt_usage_id;
550: -- End of Process Components for UPDATE

Line 552: FND_FILE.PUT_LINE( FND_FILE.LOG,'Executed Succesfully 2');

548:
549: EXECUTE IMMEDIATE l_dyn_sql USING p_resultfmt_usage_id;
550: -- End of Process Components for UPDATE
551: IF l_debug = 'Y' THEN
552: FND_FILE.PUT_LINE( FND_FILE.LOG,'Executed Succesfully 2');
553: END IF;
554:
555:
556: -- Process Components for CREATE/ADD

Line 570: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.1' || l_dyn_sql_cursor);

566: l_dyn_sql_cursor := l_dyn_sql_cursor || ' AND (Transaction_Type = ''' || G_TXN_CREATE || ''' OR Transaction_Type = ''' || G_TXN_ADD || ''' ';
567: l_dyn_sql_cursor := l_dyn_sql_cursor || ' OR Transaction_Type = ''' || G_TXN_SYNC || ''' )';
568:
569: IF l_debug = 'Y' THEN
570: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.1' || l_dyn_sql_cursor);
571: END IF;
572:
573: l_cursor_select := Dbms_Sql.Open_Cursor;
574: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);

Line 583: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.2' || p_resultfmt_usage_id);

579:
580: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
581:
582: IF l_debug = 'Y' THEN
583: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.2' || p_resultfmt_usage_id);
584: END IF;
585:
586:
587: l_cursor_execute := Dbms_Sql.EXECUTE(l_cursor_select);

Line 590: FND_FILE.PUT_LINE( FND_FILE.LOG,'SUCCESS');

586:
587: l_cursor_execute := Dbms_Sql.EXECUTE(l_cursor_select);
588:
589: IF l_debug = 'Y' THEN
590: FND_FILE.PUT_LINE( FND_FILE.LOG,'SUCCESS');
591: END IF;
592: i := 1;
593: LOOP
594: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN

Line 628: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 3' || l_dyn_sql);

624: END IF;
625: END LOOP;
626:
627: IF l_debug = 'Y' THEN
628: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 3' || l_dyn_sql);
629: END IF;
630:
631:
632: Dbms_Sql.Close_Cursor(l_cursor_select);

Line 672: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 4' || l_dyn_sql);

668:
669: l_dyn_sql := l_dyn_sql_insert || ' ' || l_dyn_sql_select;
670:
671: IF l_debug = 'Y' THEN
672: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 4' || l_dyn_sql);
673: END IF;
674:
675: EXECUTE IMMEDIATE l_dyn_sql USING p_resultfmt_usage_id;
676: -- End of Process Components for CREATE/ADD

Line 679: FND_FILE.PUT_LINE( FND_FILE.LOG,'Executed Succesfully 4');

675: EXECUTE IMMEDIATE l_dyn_sql USING p_resultfmt_usage_id;
676: -- End of Process Components for CREATE/ADD
677:
678: IF l_debug = 'Y' THEN
679: FND_FILE.PUT_LINE( FND_FILE.LOG,'Executed Succesfully 4');
680: END IF;
681:
682: -- Start of process components for Delete
683: l_dyn_sql_insert := '';

Line 718: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 5' || l_dyn_sql);

714:
715: l_dyn_sql := l_dyn_sql_insert || ' ' || l_dyn_sql_select;
716:
717: IF l_debug = 'Y' THEN
718: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 5' || l_dyn_sql);
719: END IF;
720:
721: EXECUTE IMMEDIATE l_dyn_sql USING p_resultfmt_usage_id;
722: -- End of process components for Delete

Line 725: FND_FILE.PUT_LINE( FND_FILE.LOG,'Before UPdate of AssemblyType');

721: EXECUTE IMMEDIATE l_dyn_sql USING p_resultfmt_usage_id;
722: -- End of process components for Delete
723:
724: IF l_debug = 'Y' THEN
725: FND_FILE.PUT_LINE( FND_FILE.LOG,'Before UPdate of AssemblyType');
726: END IF;
727:
728: -- Updateing the assembly_type to 2 for BOM_header
729: UPDATE BOM_BILL_OF_MTLS_INTERFACE set assembly_type = 2

Line 733: FND_FILE.PUT_LINE( FND_FILE.LOG,'After UPdate of AssemblyType');

729: UPDATE BOM_BILL_OF_MTLS_INTERFACE set assembly_type = 2
730: where assembly_type is null;
731:
732: IF l_debug = 'Y' THEN
733: FND_FILE.PUT_LINE( FND_FILE.LOG,'After UPdate of AssemblyType');
734: END IF;
735:
736: -- iNSERT ROWS FOR PRIMARY ALTERNATE FOR creating primary bom if it doesn't exist
737: -- Also set the txn id for all those rows

Line 787: FND_FILE.PUT_LINE( FND_FILE.LOG,'Done Processing');

783: );
784:
785:
786: IF l_debug = 'Y' THEN
787: FND_FILE.PUT_LINE( FND_FILE.LOG,'Done Processing');
788: END IF;
789:
790: --Error_Handler.Write_Debug('Structure Import : UPDATE : l_err_text = ' || l_err_text);
791:

Line 801: FND_FILE.PUT_LINE( FND_FILE.LOG,'Completed Processing');

797: ,x_retcode => l_retcode
798: );
799:
800: IF l_debug = 'Y' THEN
801: FND_FILE.PUT_LINE( FND_FILE.LOG,'Completed Processing');
802: END IF;
803:
804: --Error_Handler.Write_Debug('Updated the Process Status to Indicate Successful/Unsucessful component/structure Import Completion');
805:

Line 815: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering Exception Message ' || x_errbuff);

811: --Error_Handler.Write_Debug('error text : '|| SQLERRM);
812: x_errbuff := 'Error : '||TO_CHAR(SQLCODE)||'---'||SQLERRM;
813: x_retcode := Error_Handler.G_STATUS_ERROR;
814: IF l_debug = 'Y' THEN
815: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering Exception Message ' || x_errbuff);
816: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering Exception Code' || x_retcode);
817: END IF;
818: Error_Handler.Close_Debug_Session;
819:

Line 816: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering Exception Code' || x_retcode);

812: x_errbuff := 'Error : '||TO_CHAR(SQLCODE)||'---'||SQLERRM;
813: x_retcode := Error_Handler.G_STATUS_ERROR;
814: IF l_debug = 'Y' THEN
815: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering Exception Message ' || x_errbuff);
816: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering Exception Code' || x_retcode);
817: END IF;
818: Error_Handler.Close_Debug_Session;
819:
820: END PROCESS_BOM_INTERFACE_LINES;