added remaining LSL2 entities
This commit is contained in:
11
LSL2/OIEVENT/DELETEROW/CUST_INQUIRY.SPEC_INFO.json
Normal file
11
LSL2/OIEVENT/DELETEROW/CUST_INQUIRY.SPEC_INFO.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare function send_message\r\n\r\nVoid = send_message( @window:'.SPEC_INFO', 'INSERT', RowNum, RowData )\r\nSelPos = .spec_info->selpos\r\nSelPos<2> = SelPos<2> -1\r\n.spec_info->selpos = SelPos\r\nRETURN 1"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/ORDER.ORDER_DETAIL.json
Normal file
11
LSL2/OIEVENT/DELETEROW/ORDER.ORDER_DETAIL.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare function msg, send_message, fieldcount\r\ndeclare subroutine extract_si_keys\r\n$insert invoice_equ\r\n$insert logical\r\n$insert wafer_inv_equ\r\n$insert msg_equates\r\nequ WIPos$ to 6\r\n\r\nSelPos = .order_detail->selpos\r\nCurCol = SelPos<1>\r\nCurRow = SelPos<2>\r\nOrderLine = CurRow\r\n* IF THIS ORDER LINE ITEM HAS BEEN INVOICED THEN DO NOT ALLOW DELETION OF THE ROW\r\nOrderNo = .order_no->text\r\nInvoiced = false$\r\nextract_si_keys(\"INVOICE\", \"ORDER_NO\", OrderNo, KeyList)\r\nKCnt = fieldcount( KeyList, @vm )\r\nfor i = 1 to KCnt\r\n ThisInv = KeyList<1,i>\r\n OrderLineItems = xlate( 'INVOICE', ThisInv, invoice_order_line_item$, 'X' )\r\n locate OrderLine in OrderLineItems using @vm setting LPos then\r\n Invoiced = true$\r\n end\r\n until Invoiced\r\nnext i\r\nif Invoiced then\r\n Void = send_message( @window:'.ORDER_DETAIL', 'INSERT', RowNum, RowData )\r\n SelPos = .order_detail->selpos\r\n SelPos<2> = SelPos<2> - 1\r\n .order_detail->selpos = SelPos\r\n MsgInfo = ''\r\n MsgInfo<mtext$> = 'This order line item has already been inoviced...deletion is not allowed.'\r\n MsgInfo<micon$> = 'H'\r\n Void = msg( '', MsgInfo )\r\n return 0\r\nend \r\nWaferInvId = RowData<1,6>\r\nWIRec = xlate( 'WAFER_INV', WaferInvId, '', 'X' )\r\nOrdNo = .order_no->text\r\nWIOrdNos = WIRec<wafer_inv_order_no$>\r\nlocate OrdNo in WIOrdNos using @vm setting FPos then\r\n MsgInfo = ''\r\n MsgInfo<mtext$> = 'You will need to manually adjust wafer inventory# ':WaferInvId\r\n MsgInfo<micon$> = '!'\r\n Void = msg( '', MsgInfo )\r\nend\r\nRETURN 1"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/RDS_PRE_EPI.PRE_EPI_SIG_INFO.json
Normal file
11
LSL2/OIEVENT/DELETEROW/RDS_PRE_EPI.PRE_EPI_SIG_INFO.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare function send_message, msg\r\n$insert msg_equates\r\n\r\nCurrPos = @CtrlEntId->selpos\r\nCurrCol = CurrPos<1>\r\nCurrRow = CurrPos<2>\r\n\r\nIF RowData<1,4> NE '' THEN\r\n\t* Row is signed\r\n\tVoid = Send_Message( CtrlEntId, 'INSERT', RowNum, RowData )\r\n\tCurrRow = CurrRow - 1\r\n\t@CtrlEntId->selpos = CurrCol:@FM:CurrRow\r\n\tRETURN 0\t\r\nEND\r\n\r\nMsgInfo = ''\r\nMsgInfo<mtext$> = 'Do you wish to delete this cleaning entry?'\r\nMsgInfo<mtype$> = 'BNY'\r\nResp = msg( '', MsgInfo )\r\nif not(Resp) then\r\n Void = send_message( CtrlEntId, 'INSERT', RowNum, RowData )\r\n SelPos = @CtrlEntId->selpos\r\n SelPos<2> = SelPos<2> -1\r\n @CtrlEntId->selpos = SelPos\r\nend\r\nRETURN 0\r\n\r\n\r\n/*\r\ndeclare function send_message, msg\r\n$insert msg_equates\r\n\r\nMsgInfo = ''\r\nMsgInfo<mtext$> = 'Do you wish to delete this cleaning entry?'\r\nMsgInfo<mtype$> = 'BNY'\r\nResp = msg( '', MsgInfo )\r\nif not(Resp) then\r\n Void = send_message( CtrlEntId, 'INSERT', RowNum, RowData )\r\n SelPos = @CtrlEntId->selpos\r\n SelPos<2> = SelPos<2> -1\r\n @CtrlEntId->selpos = SelPos\r\nend\r\nRETURN 0\r\n*/"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/RDS_PRE_EPI_ORG.PRE_EPI_SIG_INFO.json
Normal file
11
LSL2/OIEVENT/DELETEROW/RDS_PRE_EPI_ORG.PRE_EPI_SIG_INFO.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare function send_message, msg\r\n$insert msg_equates\r\n\r\nCurrPos = @CtrlEntId->selpos\r\nCurrCol = CurrPos<1>\r\nCurrRow = CurrPos<2>\r\n\r\nIF RowData<1,4> NE '' THEN\r\n\t* Row is signed\r\n\tVoid = Send_Message( CtrlEntId, 'INSERT', RowNum, RowData )\r\n\tCurrRow = CurrRow - 1\r\n\t@CtrlEntId->selpos = CurrCol:@FM:CurrRow\r\n\tRETURN 0\t\r\nEND\r\n\r\nMsgInfo = ''\r\nMsgInfo<mtext$> = 'Do you wish to delete this cleaning entry?'\r\nMsgInfo<mtype$> = 'BNY'\r\nResp = msg( '', MsgInfo )\r\nif not(Resp) then\r\n Void = send_message( CtrlEntId, 'INSERT', RowNum, RowData )\r\n SelPos = @CtrlEntId->selpos\r\n SelPos<2> = SelPos<2> -1\r\n @CtrlEntId->selpos = SelPos\r\nend\r\nRETURN 0\r\n\r\n\r\n/*\r\ndeclare function send_message, msg\r\n$insert msg_equates\r\n\r\nMsgInfo = ''\r\nMsgInfo<mtext$> = 'Do you wish to delete this cleaning entry?'\r\nMsgInfo<mtype$> = 'BNY'\r\nResp = msg( '', MsgInfo )\r\nif not(Resp) then\r\n Void = send_message( CtrlEntId, 'INSERT', RowNum, RowData )\r\n SelPos = @CtrlEntId->selpos\r\n SelPos<2> = SelPos<2> -1\r\n @CtrlEntId->selpos = SelPos\r\nend\r\nRETURN 0\r\n*/"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/RDS_REJECTS.REJ_INFO.json
Normal file
11
LSL2/OIEVENT/DELETEROW/RDS_REJECTS.REJ_INFO.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare function msg, send_message\r\n$insert ncr_equ\r\n$insert logical\r\n\r\nNCRId = RowData<1,6>\r\nRejCnt = RowData<1,1>\r\nRejLoss = RowData<1,2>\r\nRejAC = RowData<1,4>\r\n*if xlate( 'NCR', NCRId, ncr_status$, 'X' ) = 'O' then\r\n NCRsToDelete = get_property( @window, '@NCRsToDelete' )\r\n RejCntToDelete = get_property( @window, '@RejCntToDelete' )\r\n RejLossToDelete = get_property( @window, '@RejLossToDelete' )\r\n RejACToDelete = get_property( @window, '@RejACToDelete' )\r\n *\r\n NCRsToDelete<-1> = NCRId\r\n RejCntToDelete<-1> = RejCnt\r\n RejLossToDelete<-1> = RejLoss\r\n RejACToDelete<-1> = RejAC\r\n Void = set_property( @window, '@NCRsToDelete', NCRsToDelete )\r\n Void = set_property( @window, '@RejCntToDelete', RejCntToDelete )\r\n Void = set_property( @window, '@RejLossToDelete', RejLossToDelete )\r\n Void = set_property( @window, '@RejACToDelete', RejACToDelete )\r\n *\r\n*end else\r\n * TELL USER THAT THEY CANNOT DELETE\r\n* MsgInfo = ''\r\n* MsgInfo<mtext$> = 'The corresponding NCR ':NCRId:' for this accounted reject has already been signed. You cannot delete this.'\r\n* MsgInfo<micon$> = 'H'\r\n* Void = msg( '', MsgInfo )\r\n* Void = send_message( CtrlEntId, 'INSERT', RowNum, RowData ) \r\n*end\r\nRETURN 1"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/REACT_HRS.REACT_INFO.json
Normal file
11
LSL2/OIEVENT/DELETEROW/REACT_HRS.REACT_INFO.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare function send_message\r\n\r\nVoid = send_message( @window:'.REACT_INFO', 'INSERT', RowNum, RowData )\r\nSelPos = .react_info->selpos\r\nSelPos<2> = SelPos<2> -1\r\n.react_info->selpos = SelPos\r\nRETURN 0"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/SCHEDULE_SRL.RDS_DETAIL.json
Normal file
11
LSL2/OIEVENT/DELETEROW/SCHEDULE_SRL.RDS_DETAIL.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare subroutine forward_event\r\ndeclare function send_event\r\n$insert schedule_equ\r\n\r\nforward_event( CtrlEntId, CtrlClassId, RowNum, RowData )\r\nRecord = get_property( @window, 'RECORD' )\r\nRecord = delete( Record, schedule_wafers_in$, RowNum, 0 )\r\nRecord = delete( Record, schedule_run_order_num$, RowNum, 0 )\r\nRecord = delete( Record, schedule_rds_ids$, RowNum, 0 )\r\nVoid = set_property( @window, 'RECORD', Record )\r\nVoid = send_event( @window:'.TOT_WAF_IN', 'CALCULATE', 1 )\r\nRETURN 0"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/SCHEDULE_SRL.SHIP_DETAIL.json
Normal file
11
LSL2/OIEVENT/DELETEROW/SCHEDULE_SRL.SHIP_DETAIL.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare subroutine forward_event\r\ndeclare function send_event\r\n$insert schedule_srl_equ\r\n\r\nforward_event( CtrlEntId, CtrlClassId, RowNum, RowData )\r\nRecord = get_property( @window, 'RECORD' )\r\nRecord = delete( Record, schedule_srl_ship_qty$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_ship_date$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_invoice_ids$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_ship_via$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_tracking_no$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_ship_setup_charge$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_rejects$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_unprocessed$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_ship_price$, RowNum, 0 )\r\nVoid = set_property( @window, 'RECORD', Record )\r\nVoid = send_event( @window:'.TOTAL_SHIP_QTY', 'CALCULATE', 1 )\r\nVoid = send_event( @window:'.TOTAL_NOT_SHIP_QTY', 'CALCULATE', 1 )\r\nVoid = send_event( @window:'.TOTAL_SHIP_AMOUNT', 'CALCULATE', 1 )\r\nVoid = send_event( @window:'.TOTAL_REJ', 'CALCULATE', 1 )\r\nRETURN 0"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/SCHEDULE_SRL.WAFER_SCHED_SHIP.json
Normal file
11
LSL2/OIEVENT/DELETEROW/SCHEDULE_SRL.WAFER_SCHED_SHIP.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare subroutine forward_event\r\ndeclare function send_event\r\n$insert schedule_srl_equ\r\n\r\nforward_event( CtrlEntId, CtrlClassId, RowNum, RowData )\r\nRecord = get_property( @window, 'RECORD' )\r\nRecord = delete( Record, schedule_srl_sched_qty$, RowNum, 0 )\r\nRecord = delete( Record, schedule_srl_sched_date$, RowNum, 0 )\r\nVoid = set_property( @window, 'RECORD', Record )\r\nVoid = send_event( @window:'.TOT_SCHED', 'CALCULATE', 1 )\r\nVoid = send_event( @window:'.TOT_NOT_SCHED', 'CALCULATE', 1 )\r\nRETURN 0"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/WO_MAINT_SCHED.SCHED_INFO.json
Normal file
11
LSL2/OIEVENT/DELETEROW/WO_MAINT_SCHED.SCHED_INFO.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare function send_message\r\n\r\nVoid = send_message( @window:'.SCHED_INFO', 'INSERT', RowNum, RowData )\r\nSelPos = .sched_info->selpos\r\nSelPos<2> = SelPos<2> -1\r\n.sched_info->selpos = SelPos\r\nRETURN 0"
|
||||
}
|
||||
}
|
||||
}
|
11
LSL2/OIEVENT/DELETEROW/WO_MAST_SCHED.SCHED_INFO.json
Normal file
11
LSL2/OIEVENT/DELETEROW/WO_MAST_SCHED.SCHED_INFO.json
Normal file
@ -0,0 +1,11 @@
|
||||
{
|
||||
"header": {
|
||||
"version": 1,
|
||||
"type": "record"
|
||||
},
|
||||
"body": {
|
||||
"record1": {
|
||||
"<1>": "declare function send_message\r\n\r\nVoid = send_message( @window:'.SCHED_INFO', 'INSERT', RowNum, RowData )\r\nSelPos = .sched_info->selpos\r\nSelPos<2> = SelPos<2> -1\r\n.sched_info->selpos = SelPos\r\nRETURN 0"
|
||||
}
|
||||
}
|
||||
}
|
Reference in New Issue
Block a user