Merged PR 25255: Status Indicator for Open RTF in OI
Adding a status for all lot types for an Open Return TO Fab Record.
This commit is contained in:
parent
993c812252
commit
e09912b8bb
@ -19,7 +19,7 @@ Compile Function obj_WM_Out(Method,Parms)
|
||||
|
||||
Declare Function Get_Status, Msg, Utility, obj_Tables, NextKey, obj_WO_Verify, obj_Prod_Spec, Send_Dyn, obj_RDS_Makeup
|
||||
Declare Function obj_RDS2, obj_WM_Out, Delete, Signature_Services, Environment_Services, Logging_Services
|
||||
Declare Function Database_Services, SRP_Array
|
||||
Declare Function Database_Services, SRP_Array, Return_To_Fab_Services
|
||||
Declare Subroutine Set_Status, Msg, obj_Tables, Send_Dyn, obj_WO_Step, obj_RDS_Layer, obj_RDS_Test, Btree.Extract
|
||||
Declare Subroutine Extract_SI_Keys, obj_WM_Out, obj_WO_Mat, obj_Post_Log, obj_WO_Mat_Log, ErrMsg, obj_WO_Wfr
|
||||
Declare Subroutine Logging_Services, Material_Services, Database_Services, Update_Index, Work_Order_Services
|
||||
@ -382,12 +382,18 @@ CurrStatus:
|
||||
CurrLocation = XLATE('WO_MAT',WOMatKey,'CURR_LOCATION','X')
|
||||
END
|
||||
|
||||
|
||||
IF WOMatRec<WO_MAT_HOLD$> = 1 AND WOMatRec<WO_MAT_HOLD_ENTITY$,1> = 'WM_OUT' THEN
|
||||
Result = 'HOLD' ;* Box is on Hold
|
||||
RETURN
|
||||
END
|
||||
|
||||
OpenRTF = Return_To_Fab_Services('GetOpenReturnToFabRecordIdByCassId', WMOutKey)
|
||||
|
||||
IF OpenRTF NE '' THEN
|
||||
Result = 'RTF' ;* Open RTF on WM_OUT *
|
||||
RETURN
|
||||
END
|
||||
|
||||
|
||||
IF WMOutRec<WM_OUT_SHIP_NO$> NE '' THEN
|
||||
Result = 'SHIP'
|
||||
@ -1988,3 +1994,5 @@ ConvertCleanInsp:
|
||||
|
||||
RETURN
|
||||
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user