28 lines
448 B
Plaintext
28 lines
448 B
Plaintext
COMPILE ROUTINE TEST_OBJ_MUWafers(Dummy)
|
|
ROWDEF(CHARSTR)
|
|
|
|
DECLARE SUBROUTINE obj_MUWafers, Set_Status
|
|
DECLARE FUNCTION Get_Status, obj_MUWafers
|
|
|
|
Set_Status(0)
|
|
|
|
WONo = '149211'
|
|
|
|
Parms = WONo:@RM ;*
|
|
Parms := @RM ;* WOLogRec
|
|
Parms := 1:@RM ;* ReturnKeys Flag
|
|
Parms := 1 ;* Use Reactor Run Table Flag
|
|
|
|
|
|
DEBUG
|
|
|
|
AvailMU_WOMatKeys = obj_MUWafers('AvailWafers',Parms)
|
|
|
|
debug
|
|
|
|
* * * * * * *
|
|
Bail:
|
|
* * * * * * *
|
|
|
|
RETURN
|