DBA Data[Home] [Help]

APPS.JAI_CMN_RG_23AC_II_PKG dependencies on UTL_FILE

Line 576: --For UTL File..

572: V_OTHER_CLOSING_BALANCE NUMBER;
573: V_COUNT NUMBER;
574: v_commit_count number:=0;
575: --Variable Declarations Ends here..........
576: --For UTL File..
577: v_myfilehandle UTL_FILE.FILE_TYPE; -- This is for File handling
578: v_utl_location VARCHAR2(512);
579: v_debug_flag VARCHAR2(1); -- := 'N' File.Sql.35 by Brathod
580: lv_name VARCHAR2(30); --rchandan for bug#4428980

Line 577: v_myfilehandle UTL_FILE.FILE_TYPE; -- This is for File handling

573: V_COUNT NUMBER;
574: v_commit_count number:=0;
575: --Variable Declarations Ends here..........
576: --For UTL File..
577: v_myfilehandle UTL_FILE.FILE_TYPE; -- This is for File handling
578: v_utl_location VARCHAR2(512);
579: v_debug_flag VARCHAR2(1); -- := 'N' File.Sql.35 by Brathod
580: lv_name VARCHAR2(30); --rchandan for bug#4428980
581: --Ends here......

Line 601: lv_name := 'utl_file_dir';--rchandan for bug#4428980

597: v_debug_flag := 'N';
598:
599: IF v_debug_flag ='Y' THEN
600: BEGIN
601: lv_name := 'utl_file_dir';--rchandan for bug#4428980
602: SELECT DECODE(SUBSTR (value,1,INSTR(value,',') -1),NULL,
603: Value,SUBSTR (value,1,INSTR(value,',') -1))
604: INTO v_utl_location
605: FROM v$parameter

Line 612: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location,'componentbalances.log','A');

608: WHEN OTHERS THEN
609: v_debug_flag:='N';
610: END;
611:
612: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location,'componentbalances.log','A');
613:
614: UTL_FILE.PUT_LINE(v_myfilehandle,'************************Start************************************');
615: UTL_FILE.PUT_LINE(v_myfilehandle,'The Time Stamp this Entry is Created is ' ||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS'));
616: END IF;

Line 614: UTL_FILE.PUT_LINE(v_myfilehandle,'************************Start************************************');

610: END;
611:
612: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location,'componentbalances.log','A');
613:
614: UTL_FILE.PUT_LINE(v_myfilehandle,'************************Start************************************');
615: UTL_FILE.PUT_LINE(v_myfilehandle,'The Time Stamp this Entry is Created is ' ||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS'));
616: END IF;
617:
618: FOR CUR_REC IN FETCH_REGISTER_DETAILS

Line 615: UTL_FILE.PUT_LINE(v_myfilehandle,'The Time Stamp this Entry is Created is ' ||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS'));

611:
612: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location,'componentbalances.log','A');
613:
614: UTL_FILE.PUT_LINE(v_myfilehandle,'************************Start************************************');
615: UTL_FILE.PUT_LINE(v_myfilehandle,'The Time Stamp this Entry is Created is ' ||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS'));
616: END IF;
617:
618: FOR CUR_REC IN FETCH_REGISTER_DETAILS
619: LOOP --L1

Line 621: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);

617:
618: FOR CUR_REC IN FETCH_REGISTER_DETAILS
619: LOOP --L1
620: IF V_DEBUG_FLAG='Y' THEN
621: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
622: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Location id is ' || CUR_REC.LOCATION_ID);
623: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Register id is ' || CUR_REC.REGISTER_ID);
624: END IF;
625:

Line 622: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Location id is ' || CUR_REC.LOCATION_ID);

618: FOR CUR_REC IN FETCH_REGISTER_DETAILS
619: LOOP --L1
620: IF V_DEBUG_FLAG='Y' THEN
621: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
622: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Location id is ' || CUR_REC.LOCATION_ID);
623: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Register id is ' || CUR_REC.REGISTER_ID);
624: END IF;
625:
626: BEGIN

Line 623: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Register id is ' || CUR_REC.REGISTER_ID);

619: LOOP --L1
620: IF V_DEBUG_FLAG='Y' THEN
621: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
622: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Location id is ' || CUR_REC.LOCATION_ID);
623: UTL_FILE.PUT_LINE(v_myfilehandle,'After Loop starts' ||'The Register id is ' || CUR_REC.REGISTER_ID);
624: END IF;
625:
626: BEGIN
627: SELECT NVL(BASIC_RG23A_BALANCE,0),

Line 652: UTL_FILE.PUT_LINE(v_myfilehandle,'Inside NDF' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);

648: V_ADDITIONAL_OPENING_BALANCE_C := 0;
649: V_OTHER_OPENING_BALANCE_C := 0;
650:
651: IF V_DEBUG_FLAG='Y' THEN
652: UTL_FILE.PUT_LINE(v_myfilehandle,'Inside NDF' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
653: UTL_FILE.PUT_LINE(v_myfilehandle,'Inside NDF' ||'The Location id is ' || CUR_REC.LOCATION_ID);
654: END IF;
655: --DBMS_OUTPUT.PUT_LINE('Before Insert');
656: --If the combination of Organization and Location do not exist then

Line 653: UTL_FILE.PUT_LINE(v_myfilehandle,'Inside NDF' ||'The Location id is ' || CUR_REC.LOCATION_ID);

649: V_OTHER_OPENING_BALANCE_C := 0;
650:
651: IF V_DEBUG_FLAG='Y' THEN
652: UTL_FILE.PUT_LINE(v_myfilehandle,'Inside NDF' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
653: UTL_FILE.PUT_LINE(v_myfilehandle,'Inside NDF' ||'The Location id is ' || CUR_REC.LOCATION_ID);
654: END IF;
655: --DBMS_OUTPUT.PUT_LINE('Before Insert');
656: --If the combination of Organization and Location do not exist then
657: INSERT INTO JAI_CMN_RG_COMP_BALS

Line 715: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);

711: V_OTHER_CLOSING_BALANCE := V_OTHER_OPENING_BALANCE + NVL(CUR_REC.CR_OTHER_ED,0) - NVL(CUR_REC.DR_OTHER_ED,0);
712: END;
713:
714: IF V_DEBUG_FLAG='Y' THEN
715: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
716: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Location id is ' || CUR_REC.LOCATION_ID);
717: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Register id is ' || CUR_REC.REGISTER_ID);
718: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_OPENING_BALANCE is ' || V_BASIC_OPENING_BALANCE);
719: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_CLOSING_BALANCE is ' || V_BASIC_CLOSING_BALANCE);

Line 716: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Location id is ' || CUR_REC.LOCATION_ID);

712: END;
713:
714: IF V_DEBUG_FLAG='Y' THEN
715: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
716: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Location id is ' || CUR_REC.LOCATION_ID);
717: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Register id is ' || CUR_REC.REGISTER_ID);
718: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_OPENING_BALANCE is ' || V_BASIC_OPENING_BALANCE);
719: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_CLOSING_BALANCE is ' || V_BASIC_CLOSING_BALANCE);
720: END IF;

Line 717: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Register id is ' || CUR_REC.REGISTER_ID);

713:
714: IF V_DEBUG_FLAG='Y' THEN
715: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
716: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Location id is ' || CUR_REC.LOCATION_ID);
717: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Register id is ' || CUR_REC.REGISTER_ID);
718: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_OPENING_BALANCE is ' || V_BASIC_OPENING_BALANCE);
719: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_CLOSING_BALANCE is ' || V_BASIC_CLOSING_BALANCE);
720: END IF;
721:

Line 718: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_OPENING_BALANCE is ' || V_BASIC_OPENING_BALANCE);

714: IF V_DEBUG_FLAG='Y' THEN
715: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
716: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Location id is ' || CUR_REC.LOCATION_ID);
717: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Register id is ' || CUR_REC.REGISTER_ID);
718: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_OPENING_BALANCE is ' || V_BASIC_OPENING_BALANCE);
719: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_CLOSING_BALANCE is ' || V_BASIC_CLOSING_BALANCE);
720: END IF;
721:
722: INSERT INTO JAI_CMN_RG_COMP_DTLS

Line 719: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_CLOSING_BALANCE is ' || V_BASIC_CLOSING_BALANCE);

715: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Organization id is ' || CUR_REC.ORGANIZATION_ID);
716: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Location id is ' || CUR_REC.LOCATION_ID);
717: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Register id is ' || CUR_REC.REGISTER_ID);
718: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_OPENING_BALANCE is ' || V_BASIC_OPENING_BALANCE);
719: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The V_BASIC_CLOSING_BALANCE is ' || V_BASIC_CLOSING_BALANCE);
720: END IF;
721:
722: INSERT INTO JAI_CMN_RG_COMP_DTLS
723: (EXCISE_COMP_DTL_ID,

Line 803: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Location id is ' || CUR_REC.LOCATION_ID);

799: END IF;
800: --Updation Ends here.....................................
801: --COMMIT;
802: IF V_DEBUG_FLAG='Y' THEN
803: UTL_FILE.PUT_LINE(v_myfilehandle,'Before Insert into Details table' ||'The Location id is ' || CUR_REC.LOCATION_ID);
804: END IF;
805: if v_commit_count = 100 then
806: commit;
807: v_commit_count := 0;

Line 814: UTL_FILE.FCLOSE(v_myfilehandle);

810: end if;
811: END LOOP; --L1
812: commit;
813: IF V_DEBUG_FLAG='Y' THEN
814: UTL_FILE.FCLOSE(v_myfilehandle);
815: END IF;
816: EXCEPTION --Ex1
817: WHEN OTHERS THEN
818: rollback;