diff --git a/LSL2/STPROC/WO_DAILY_VALID.txt b/LSL2/STPROC/WO_DAILY_VALID.txt index 29ed1e8..c5f7b48 100644 --- a/LSL2/STPROC/WO_DAILY_VALID.txt +++ b/LSL2/STPROC/WO_DAILY_VALID.txt @@ -20,11 +20,13 @@ status() = Valid$ BEGIN CASE CASE ConvType = 'ICONV' - + * Maintaining the two following comments. Still too good to toss - JRO Also want to note that this here limits us to 6 characters in a WO * Keep this comment from Bryce, the code is gone but the comment is to good to toss... * check number of seperate layers - god this fucking layering keeps haunting me. + WONo = '' + WOStepKey = '' - Bad = false$ + Bad = false$ CONVERT '.' TO '' IN DataIo IF NUM( DataIo ) THEN IF LEN(DataIo) = 7 THEN @@ -45,12 +47,12 @@ BEGIN CASE END IF Bad THEN - MsgInfo = '' - MsgInfo = WONo:' is not a valid Work Order...' + MsgInfo = '' + MsgInfo = DataIo:' is not a valid Work Order...' MsgInfo = '!' * let it be valid just warn - Void = msg( '', MsgInfo ) - status() = invalid_nomsg$ + Void = msg( '', MsgInfo ) + status() = invalid_nomsg$ END CASE ConvType = 'OCONV' @@ -62,3 +64,4 @@ BEGIN CASE END CASE RETURN +