pre cutover push

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

View File

@ -606,9 +606,9 @@ UNTIL LoadFailed
NEXT I
RDSRec<RDS_OPERATOR_OUT$> = @USER4
RDSRec<RDS_DATE_OUT$> = Date()
RDSRec<RDS_TIME_OUT$> = Time()
* RDSRec<RDS_OPERATOR_OUT$> = @USER4
* RDSRec<RDS_DATE_OUT$> = Date()
* RDSRec<RDS_TIME_OUT$> = Time()
UnloadDTM = OCONV(RDSRec<RDS_DATE_OUT$>, 'D4/' ):' ':OCONV( RDSRec<RDS_TIME_OUT$>, 'MTH' )
@ -710,10 +710,10 @@ IF NOT(UnloadFailed) THEN
* Update Reactor Status with load data
If UnloadFailed EQ False$ then
Send_Info('Updating Reactor ':Reactor:' Status...')
* Send_Info('Updating Reactor ':Reactor:' Status...')
InCassettes = SRP_Array('Clean', InCassNos, 'TrimAndMakeUnique', @VM)
obj_React_Status('ReactorUnload',Reactor:@RM:WONo:@RM:InCassettes:@RM:UnloadDTM:@RM:RDSNo)
* InCassettes = SRP_Array('Clean', InCassNos, 'TrimAndMakeUnique', @VM)
* obj_React_Status('ReactorUnload',Reactor:@RM:WONo:@RM:InCassettes:@RM:UnloadDTM:@RM:RDSNo)
IF Get_Status(errCode) THEN ErrMsg(errCode)
@ -1674,3 +1674,4 @@ NEXT I
RETURN