PROCEDURE EDI_INTERSIL_UPD_TESTING3 IS -- -- To generate EDI AMD Assembly WIP to Unix -- Person Date Comments -- --------- ------ ------------------------------------------- -- Emmy 2003-Mar-11 Intersil EDI Files Specification -- PYFong 2004-Dec-01 Intersil EDI new format -- Emmy 2005-Jul-07 Add Tracecode field to TEST, qtyScrap to TPRL, Eng lot indicator to ASSM & TEST -- Emmy 2005-Sep-02 SPLT CETX9 > S200533004600;PRBE as currently reported;SPLT S200533004600 > CETX9;SHIP CETX9 -- Emmy 2005-Oct-18 fix bug on EBR lot 'EL' -- Emmy 2005-Oct-19 Lot_Test_Ship; select base on tstactualshipmentdate. -- Emmy 2005-Oct-19 Lot_Assy_Ship; perform a SPLIT transaction b4 ship. -- YS Heng 2006-Mar-17 Test & Finishing activity lot number turn to report as customer lot number -- YS Heng 2006-Mar-22 Request by Fletcher, Philippa, to include all records that report in the daily casSHIP and -- camSHIP files (with CAS/CAM internal supplier lot numbers currently) as the SHIP rows -- in the casMOVE and camMOVE files with Intersil lot numbers (Old). -- YS Heng 2006-Mar-24 Request by Treverton, Robert, to change the PRBE Record data where the existing -- quantity in and out will be reported in wafer quantity rather than dies quantity -- YS Heng 2006-Apr-19 Add new address code H12-17 --> MY4 (Feedback from Fletcher, Philippa) -- (Lot_Assy_Ship,Lot_WProbe_Ship,Lot_Test_Ship,Shipment) -- YS Heng 2006-Apr-21 Intersil QuickTrace LOT MOVE File Specification Revision 1.14 -- Lead frame lot number, Epoxy lot number, Gold wire lot number, Mold Compound lot number, -- Operation description --> 30 characters & add in Die Quantity field -- YS Heng 2006-Jun-28 Fix W-PHA Probe Step no Equipment Info problem -- YS Heng 2006-Aug-01 Fix W-PRE step error when no previous TrackIn record but suddenly appear Trackout, -- this cause some quantity fields is blank (Only fill up when TrackIn) -- YS Heng 2006-Aug-27 Fix W-PCA Probe Step no Equipment Info problem -- YS Heng 2006-Oct-03 To fix Finishing Partial Lot (-P01) lot number not change error -- YS Heng 2006-Aug-28 Quicktrace Specification Version 1.16 Change : -- (1) To include Engineering Lot Indicator (Lot Indicator filed) to TPRL row -- (2) To add in new field, Tester Data File to TEST and PRBE rows to shows lots that -- DO NOT have a Tester Data File when a Tester Data File is usually expected for -- that operation. -- Release Date : 11 Oct 2006 -- YS Heng 2006-Oct-16 Request by Fletcher Philippa and Abdullah to stop sending the SHIP file and remove the -- duplication SHIP rows in MOVE file for both CAS and CAM site -- YS Heng 2006-Nov-14 (1) Treverton, Robert, missing other Assembly AF-DAT split sublot merge back at T-PRE record -- (2) Treverton, Robert, report Finishing SPLT & MRGE record for reel cration -- (3) Abdullah & Dinesh, integrated tape and reel balance lot retrack Test COM (ex, T-ETR-COM) -- or integrated Test COM (ex, T-ETR-COM) step Tester Data File flag indicator to report is -- based on whether the lot have FwCatns_FinishingTxn record (if yes then it is the TrackIn -- lot that suppose to have the Tester Data File generated and FTP) -- YS Heng 2006-Nov-15 FTP also the QuickTrace file generated to carsem internal FTP server (Sally Foo group) --2006-Apr-21 -- Unix_sql varchar2(355); Unix_sql varchar2(32767); edi_int_data utl_file.file_type; --2006-Oct-16 --edi_shp_data utl_file.file_type; edi_int_ftp utl_file.file_type; --2006-Nov-15 --edi_int_ftp4 utl_file.file_type; --filename4 varchar2(40); --2006-Oct-16 --edi_int_ftp2 utl_file.file_type; v_msg varchar2(255); from_sysdate varchar2(18); from_sysdate2 varchar2(18); To_sysdate varchar2(18); vTrackInTimestamp varchar2(18); filename varchar2(40); --2006-Oct-16 --filename2 varchar2(40); filename3 varchar2(40); Record_type varchar2(4); vWaferScrapped Number(38); vQuantityIn Number(38); vDieloss Number(38); vTraceCode varchar2(40); vLotnumber varchar2(40); vCustomerlotnumber varchar2(40); vIndicator varchar2(255); var1 varchar2(18); var2 varchar2(18); Step_Description varchar2(40); vEquipment varchar2(40); vOutStep varchar2(40); vLf varchar2(10); vEpxy varchar2(10); vWr varchar2(10); vMcpd varchar2(10); vpath varchar2(50); vExist_Counter Number(8); --2006-Aug-28 vTEST_TesterDataFile varchar2(5); vPROBE_TesterDataFile varchar2(5); --2006-Nov-14 v_RecordType varchar2(4); vExist_FinishingTxnCounter Number(8); --Put testing cursor here Begin --Put testing cursor here Ebd BEGIN -- Select txntimestamp into from_sysdate from edi_wipfeed_trml -- Where customerlotnumber ='EDI_INTERSIL_UPD'; -- from_sysdate2 := to_char(sysdate-2,'YYYYMMDD') || ' 000000'; -- To_sysdate := to_char(sysdate-1,'YYYYMMDD') || ' 235959'; filename:='QuickTrace.HarjitTest'; select CS_UTILS.GET_UTL_PATH into vpath from dual; edi_int_data := utl_file.fopen(vpath,filename,'W'); var1 := to_char(sysdate,'YYYYMMDD HH24MISS'); dbms_output.put_line('Start '||var1); --Put testing cursor block here ***Begin --Put testing cursor block ***End Unix_Sql := 'Testing'; utl_file.put_line(edi_int_data,Unix_sql); v_msg := 'Close Unix File'; utl_file.fclose(edi_int_data); var2 := to_char(sysdate,'YYYYMMDD HH24MISS'); dbms_output.put_line('End '||var2); dbms_output.put_line('Statement processed in '||round((utl_cal.delta(var1,var2)*24)*60,5)||' minutes.'); EXCEPTION when utl_file.internal_error then dbms_output.put_line ('utl_file; an internal error occurred.'); utl_file.fclose_all; when utl_file.invalid_filehandle then dbms_output.put_line ('utl_file: the file handle was invalid.'); utl_file.fclose_all; when utl_file.invalid_mode then dbms_output.put_line ('utl_file: an invalid open mode was given '); utl_file.fclose_all; when utl_file.invalid_operation then dbms_output.put_line ('utl_file: an invalid operation was attempted.'|| v_msg ); utl_file.fclose_all; when utl_file.invalid_path then dbms_output.put_line ('utl_file: an invalid path was given for the file .'); utl_file.fclose_all; when utl_file.read_error then dbms_output.put_line ('utl_file: a read error occurred.'); utl_file.fclose_all; when utl_file.write_error then dbms_output.put_line ('utl_file: a write error occurred.'); utl_file.fclose_all; when others then dbms_output.put_line ('some other error occurred.'|| v_msg || SUBSTR(SQLERRM, 1, 255)); utl_file.fclose_all; END;