phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

pre cutover push

Browse Source
This commit is contained in:
Infineon\StieberD
2024-09-04 20:33:41 -07:00
parent 6ea6969f4b
commit 7762b129af
2072 changed files with 130000 additions and 95295 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
LSL2/OIEVENT/WRITE/EXPORTS..json
View File

@ -5,7 +5,7 @@
},
"body": {
"record1": {
"<1>": "declare function rowexists, msg, memberof\r\n$insert msg_equates\r\n\r\nExportName = .export_name->text\r\nif index( ExportName, '_SYSTEM_', 1 ) and not( memberof( @user4, 'MASTER' ) ) and (@USERNAME NE 'BRYCE_BARB') then\r\n MsgInfo = ''\r\n MsgInfo<mtext$> = 'You can not save SYSTEM Export templates...'\r\n MsgInfo<micon$> = 'H'\r\n void = msg( '', MsgInfo )\r\n return 0\r\nend else\r\n if rowexists( 'EXPORTS', ExportName ) else\r\n .entry_id->text = @user4\r\n end\r\nend\r\nRETURN 1\r\n"
"<1>": "declare function rowexists, msg, memberof\r\n$insert msg_equates\r\n\r\nExportName = .export_name->text\r\nif index( ExportName, '_SYSTEM_', 1 ) and not( memberof( @user4, 'MASTER' ) ) then\r\n MsgInfo = ''\r\n MsgInfo<mtext$> = 'You can not save SYSTEM Export templates...'\r\n MsgInfo<micon$> = 'H'\r\n void = msg( '', MsgInfo )\r\n return 0\r\nend else\r\n if rowexists( 'EXPORTS', ExportName ) else\r\n .entry_id->text = @user4\r\n end\r\nend\r\nRETURN 1\r\n"
}
}
}

2
LSL2/OIEVENT/WRITE/EXPORTS_A..json
View File

@ -5,7 +5,7 @@
},
"body": {
"record1": {
"<1>": "declare function rowexists, msg, memberof, Get_Property\r\n$insert msg_equates\r\n\r\nExportName = Get_Property(@WINDOW:'.EXPORT_NAME','TEXT')\r\nif index( ExportName, '_SYSTEM_', 1 ) and not( memberof( @user4, 'MASTER' ) ) and (@USERNAME NE 'BRYCE_BARB') then\r\n MsgInfo = ''\r\n MsgInfo<mtext$> = 'You can not save SYSTEM Export templates...'\r\n MsgInfo<micon$> = 'H'\r\n void = msg( '', MsgInfo )\r\n return 0\r\nend else\r\n if rowexists( 'EXPORTS', ExportName ) else\r\n .entry_id->text = @user4\r\n end\r\nend\r\nRETURN 1\r\n"
"<1>": "declare function rowexists, msg, memberof, Get_Property\r\n$insert msg_equates\r\n\r\nExportName = Get_Property(@WINDOW:'.EXPORT_NAME','TEXT')\r\nif index( ExportName, '_SYSTEM_', 1 ) and not( memberof( @user4, 'MASTER' ) ) then\r\n MsgInfo = ''\r\n MsgInfo<mtext$> = 'You can not save SYSTEM Export templates...'\r\n MsgInfo<micon$> = 'H'\r\n void = msg( '', MsgInfo )\r\n return 0\r\nend else\r\n if rowexists( 'EXPORTS', ExportName ) else\r\n .entry_id->text = @user4\r\n end\r\nend\r\nRETURN 1\r\n"
}
}
}

2
LSL2/OIEVENT/WRITE/PROD_SPEC..json
View File

@ -5,7 +5,7 @@
},
"body": {
"record1": {
"<1>": "declare function rowexists, prod_spec_comm, msg, Comm_Prod_Spec, Get_Property\r\ndeclare subroutine create_note, forward_event, obj_Prod_Spec, Comm_Prod_Spec\r\n\r\n$INSERT QUOTE_SIGS_EQU\r\n$INSERT QUOTE_SPEC_EQU\r\n$INSERT MSG_EQUATES\r\n$INSERT LOGICAL\r\n$INSERT NOTIFICATION_EQU\r\n\r\n*Tvalue = .rtype->value\r\n*if Tvalue = '' then\r\n*\tMsgInfo = ''\r\n*\tMsgInfo<mtext$> = 'You must choose a reactor type...'\r\n*\tMsgInfo<micon$> = 'H'\r\n*\tVoid = msg( '', MsgInfo )\r\n*\treturn 0\r\n*end\r\n\r\nPSN = .prod_spec_id->text\r\nif rowexists( 'PROD_SPEC', PSN ) then\r\n RowExists = true$\r\nend else\r\n RowExists = false$\r\nend\r\nSubstrateInfo = .spec_substrate->text\r\n\r\nPSNStatus = Get_Property(@Window : '.STATUS', 'VALUE')\r\n\r\n\r\nIf @@window->savewarn EQ true$ AND PSNStatus NE 'I' then\r\n\tResult = Comm_Prod_Spec('UpdateRevHist')\r\n\tIf Result EQ False$ then\r\n\t\tReturn 0\r\n\tend\r\nend\r\n\r\nSendTo = XLATE('NOTIFICATION','PSN_DELTA',NOTIFICATION_USER_ID$,'X')\r\n\t \r\nif rowexists( 'PROD_SPEC', PSN ) then\r\n\tif ( @@window->savewarn = true$ ) then\r\n\t\tcreate_note( SendTo, 'System', 'PSN Modification', 'This PSN was modified by ':oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ):' on ':oconv( date(), 'D2/' ):' at ':oconv( time(), 'MTH' ):'.', 'PROD_SPEC', .prod_spec_id->text )\r\n\tend\r\nend else\r\n\t.entry_id->text = @user4\r\n\tcreate_note( SendTo, 'System', 'New PSN', 'This PSN was entered by ':oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ):' on ':oconv( date(), 'D2/' ):' at ':oconv( time(), 'MTH' ):'.', 'PROD_SPEC', .prod_spec_id->text )\t \r\nend\r\n\r\n* Deprecated 7/2/18 - djs - KLUSA PSN Revision History Project\r\n*if ( @@window->savewarn = true$ ) then\r\n*\tModArray = .mod_info->array\r\n*\tModArray = insert( ModArray, 1, 1, 0, @user4 )\r\n*\tModArray = insert( ModArray, 2, 1, 0, oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ) )\r\n*\tModArray = insert( ModArray, 3, 1, 0, oconv( date(), 'D2/' ) )\r\n*\t.mod_info->array = ModArray\r\n*end\r\n\r\nforward_event()\r\n\r\n*obj_Prod_Spec('PushTech',PSN)\t;* Pushes data to new table locations JCH 10/8/2012 ;* Moved to PROD_SPEC_ACTIONS (invoked by BASE_MFS) DJS 3/24/21\r\n\r\nreturn 0\r\n"
"<1>": "declare function rowexists, prod_spec_comm, msg, Comm_Prod_Spec, Get_Property\r\ndeclare subroutine create_note, forward_event, obj_Prod_Spec, Comm_Prod_Spec\r\n\r\n$INSERT QUOTE_SIGS_EQU\r\n$INSERT QUOTE_SPEC_EQU\r\n$INSERT MSG_EQUATES\r\n$INSERT LOGICAL\r\n$INSERT NOTIFICATION_EQU\r\n\r\n*Tvalue = .rtype->value\r\n*if Tvalue = '' then\r\n*\tMsgInfo = ''\r\n*\tMsgInfo<mtext$> = 'You must choose a reactor type...'\r\n*\tMsgInfo<micon$> = 'H'\r\n*\tVoid = msg( '', MsgInfo )\r\n*\treturn 0\r\n*end\r\n\r\nPSN = .prod_spec_id->text\r\nif rowexists( 'PROD_SPEC', PSN ) then\r\n RowExists = true$\r\nend else\r\n RowExists = false$\r\nend\r\nSubstrateInfo = .spec_substrate->text\r\n\r\nIf @@window->savewarn EQ true$ then\r\n\tResult = Comm_Prod_Spec('UpdateRevHist')\r\n\tIf Result EQ False$ then\r\n\t\tReturn 0\r\n\tend\r\nend\r\n\r\nSendTo = XLATE('NOTIFICATION','PSN_DELTA',NOTIFICATION_USER_ID$,'X')\r\n\t \r\nif rowexists( 'PROD_SPEC', PSN ) then\r\n\tif ( @@window->savewarn = true$ ) then\r\n\t\tcreate_note( SendTo, 'System', 'PSN Modification', 'This PSN was modified by ':oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ):' on ':oconv( date(), 'D2/' ):' at ':oconv( time(), 'MTH' ):'.', 'PROD_SPEC', .prod_spec_id->text )\r\n\tend\r\nend else\r\n\t.entry_id->text = @user4\r\n\tcreate_note( SendTo, 'System', 'New PSN', 'This PSN was entered by ':oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ):' on ':oconv( date(), 'D2/' ):' at ':oconv( time(), 'MTH' ):'.', 'PROD_SPEC', .prod_spec_id->text )\t \r\nend\r\n\r\n* Deprecated 7/2/18 - djs - KLUSA PSN Revision History Project\r\n*if ( @@window->savewarn = true$ ) then\r\n*\tModArray = .mod_info->array\r\n*\tModArray = insert( ModArray, 1, 1, 0, @user4 )\r\n*\tModArray = insert( ModArray, 2, 1, 0, oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ) )\r\n*\tModArray = insert( ModArray, 3, 1, 0, oconv( date(), 'D2/' ) )\r\n*\t.mod_info->array = ModArray\r\n*end\r\n\r\nforward_event()\r\n\r\n*obj_Prod_Spec('PushTech',PSN)\t;* Pushes data to new table locations JCH 10/8/2012 ;* Moved to PROD_SPEC_ACTIONS (invoked by BASE_MFS) DJS 3/24/21\r\n\r\nreturn 0\r\n"
}
}
}

2
LSL2/OIEVENT/WRITE/QUOTE_SRL..json
View File

@ -5,7 +5,7 @@
},
"body": {
"record1": {
"<1>": "declare function rowexists\r\n\r\nif rowexists( 'QUOTE_SRL', .quote_no->text ) else\r\n .entry_id->text = @username\r\nend \r\nreturn 1\r\n"
"<1>": "declare function rowexists\r\n\r\nif rowexists( 'QUOTE_SRL', .quote_no->text ) else\r\n .entry_id->text = @user4\r\nend \r\nreturn 1\r\n"
}
}
}

2
LSL2/OIEVENT/WRITE/RDS_POST_EPI..json
View File

@ -5,7 +5,7 @@
},
"body": {
"record1": {
"<1>": "declare function rds_comm, send_event, Get_Status, Get_Property, RowExists\r\ndeclare subroutine forward_event, Set_Status,Set_Property, obj_WO_Step, ErrMsg, RDS_React_Run, Post_Event\r\n$insert logical\r\n$insert msg_equates\r\n$insert prod_spec_equ\r\n$INSERT RDS_EQU\r\n\r\n* NEED TO READ THE MOD_ID AND MOD_DATE FROM RDS CAUSE WE ARE IGNORING SELF LOCKS\r\n* WHICH MEANS THIS RDS COULD BE CURRENTLY VIEWED VIA ANOTHER WINDOW\r\n\r\nRDSNo\t\t= Get_Property(@WINDOW:'.RDS_NO','TEXT')\r\n\r\n\r\nIF RowExists('REACT_RUN',RDSNo) ELSE\r\n\r\n\tMsg(@WINDOW,'','INVALID_RDS_NO')\r\n\tPost_Event(@WINDOW,'CLEAR')\t\r\n\t\r\n\tRETURN 0\r\n\t\r\nEND\r\n\r\n\r\n\r\nIF @@WINDOW->SAVEWARN THEN\r\n\tVoid = RDS_Comm( 'STAMP_MOD' )\r\n\tVoid = RDS_Comm( 'WRITE_STAMP' )\r\nEND\r\n\r\nOrgCursor = Get_Property('SYSTEM','CURSOR')\t;* Get existing cursor shape\r\n\t\r\nSet_Property('SYSTEM','CURSOR','H')\t\t\t;* Set to hourglass while busy\r\n\r\nForward_Event()\t\t\t\t;* Perform the write\r\n\r\nRDS_React_Run(RDSNo)\t\t;* Move RDS to REACT_RUN and REACT_RUN_CI and Final Sig to WO_MAT \r\n\r\n\r\nSet_Property('SYSTEM','CURSOR',OrgCursor)\r\n\r\nRETURN 0\r\n\t\r\n"
"<1>": "declare function rds_comm, send_event, Get_Status, Get_Property, RowExists, Wafer_Counter_Services, Datetime\r\ndeclare subroutine forward_event, Set_Status,Set_Property, obj_WO_Step, ErrMsg, RDS_React_Run, Post_Event, Wafer_Counter_Services\r\n$insert logical\r\n$insert msg_equates\r\n$insert prod_spec_equ\r\n$INSERT RDS_EQU\r\n\r\n* NEED TO READ THE MOD_ID AND MOD_DATE FROM RDS CAUSE WE ARE IGNORING SELF LOCKS\r\n* WHICH MEANS THIS RDS COULD BE CURRENTLY VIEWED VIA ANOTHER WINDOW\r\n\r\nRDSNo\t\t= Get_Property(@WINDOW:'.RDS_NO','TEXT')\r\n\r\n\r\nIF RowExists('REACT_RUN',RDSNo) ELSE\r\n\r\n\tMsg(@WINDOW,'','INVALID_RDS_NO')\r\n\tPost_Event(@WINDOW,'CLEAR')\t\r\n\t\r\n\tRETURN 0\r\n\t\r\nEND\r\n\r\n\r\n\r\nIF @@WINDOW->SAVEWARN THEN\r\n\tVoid = RDS_Comm( 'STAMP_MOD' )\r\n\tVoid = RDS_Comm( 'WRITE_STAMP' )\r\nEND\r\n\r\nOrgCursor = Get_Property('SYSTEM','CURSOR')\t;* Get existing cursor shape\r\n\t\r\nSet_Property('SYSTEM','CURSOR','H')\t\t\t;* Set to hourglass while busy\r\n\r\nIf RDSNo NE '' then\r\n\tOrigFqaWCQty = Get_Property(@Window, '@ORIG_WFR_CTR_QTY')\r\n\tCurrFqaWCQty = Get_Property(@Window:'.EDL_WAFER_COUNTER_QTY', 'TEXT')\r\n\tIf OrigFqaWCQty NE CurrFqaWCQty then\r\n\t\tWafer_Counter_Services('AddScan', RDSNo, CurrFqaWCQty, Datetime(), '', @User4, 'QA', '')\r\n\tend\r\nend\r\n\r\nForward_Event()\t\t\t\t;* Perform the write\r\n\r\nRDS_React_Run(RDSNo)\t\t;* Move RDS to REACT_RUN and REACT_RUN_CI and Final Sig to WO_MAT \r\n\r\n\r\nSet_Property('SYSTEM','CURSOR',OrgCursor)\r\n\r\nRETURN 0\r\n\t\r\n"
}
}
}

11
LSL2/OIEVENT/WRITE/REACTOR_LOG_BAK..json Normal file
View File

@ -0,0 +1,11 @@
{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "Declare Function Comm_Reactor_Log\r\n\r\nReturn Comm_Reactor_Log(CtrlEntID,'WRITE')"
}
}
}

2
LSL2/OIEVENT/WRITE/SCHEDULE_SRL..json
View File

File diff suppressed because one or more lines are too long