diff --git a/LSL2/STPROC/COMM_QA_MET_RESULT.txt b/LSL2/STPROC/COMM_QA_MET_RESULT.txt index f74745a..09728aa 100644 --- a/LSL2/STPROC/COMM_QA_MET_RESULT.txt +++ b/LSL2/STPROC/COMM_QA_MET_RESULT.txt @@ -374,6 +374,7 @@ Refresh: * Line = MU Wafer * ******************* IF (SlotList NE '') THEN + FormMUWaferThkResult = TRIM(SlotList) DatabaseMUWaferThkResult = WOMatRec @@ -403,8 +404,8 @@ Refresh: IF NOT(Found) THEN MUBoxResults<0, BoxIndex> = False$ - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, LTGREY$) - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', COL$MU_WAFER_THK_RESULT, Line, WHITE$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, LTGREY$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', COL$MU_WAFER_THK_RESULT, Line, WHITE$) Set_Property(@WINDOW, '@MU_WAFER_THK_MISSING_REQ', 0) END else MUBoxResults<0, BoxIndex> = True$ @@ -413,7 +414,7 @@ Refresh: IF (FormMUWaferThkResult NE '') THEN IF ((FormMUWaferThkResult < MetMin) OR (FormMUWaferThkResult > MetMax)) THEN - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, RED$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, RED$) Set_Property(@WINDOW, '@MU_WAFER_THK_RANGE_REQ', 0) END @@ -424,7 +425,7 @@ Refresh: IF (SlotList NE '') THEN IF (BoxNumber = FIELD(SlotList,'.',1,2)) THEN IF (LoopIndex = Line) OR (TRIM(SlotList) = '') THEN - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', LoopIndex, MU_GREEN$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, LoopIndex, MU_GREEN$) stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', COL$MU_WAFER_THK_RESULT, LoopIndex, WHITE$) END END @@ -439,15 +440,15 @@ Refresh: * Line = Regular Wafer * ************************ IF (Line = TestSlot) THEN - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, YELLOW$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, YELLOW$) END ELSE //JRO FormMUWaferThkResult = TRIM(SlotList) IF FormMUWaferThkResult NE '' AND ((FormMUWaferThkResult < MetMin) OR (FormMUWaferThkResult > MetMax)) then - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, RED$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, RED$) Set_Property(@WINDOW, '@ADE_WAFER_THK_RANGE_REQ', 0) end else - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, WHITE$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, WHITE$) end END END @@ -533,7 +534,7 @@ Refresh: IF NOT(Found) THEN MUBoxResults<0, BoxIndex> = False$ - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, LTGREY$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, LTGREY$) stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', COL$EPI_MU_WAFER_THK_RESULT, Line, WHITE$) Set_Property(@WINDOW, '@MU_WAFER_THK_MISSING_REQ', 0) END else @@ -543,7 +544,7 @@ Refresh: IF (FormMUWaferThkResult NE '') THEN IF ((FormMUWaferThkResult < MetMin) OR (FormMUWaferThkResult > MetMax)) THEN - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, RED$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, RED$) stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', COL$EPI_MU_WAFER_THK_RESULT, Line, WHITE$) Set_Property(@WINDOW, '@MU_WAFER_THK_RANGE_REQ', 0) END @@ -555,7 +556,7 @@ Refresh: IF (SlotList NE '') THEN IF (BoxNumber = FIELD(SlotList,'.',1,2)) THEN IF ((LoopIndex = Line) OR (TRIM(SlotList) = '')) THEN - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', LoopIndex, MU_GREEN$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, LoopIndex, MU_GREEN$) stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', COL$EPI_MU_WAFER_THK_RESULT, LoopIndex, WHITE$) END END @@ -570,15 +571,15 @@ Refresh: * Line = Regular Wafer * ************************ IF (Line = TestSlot) THEN - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, YELLOW$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, YELLOW$) END ELSE //JRO FormMUWaferThkResult = TRIM(SlotList) IF FormMUWaferThkResult NE '' AND ((FormMUWaferThkResult < MetMin) OR (FormMUWaferThkResult > MetMax)) then - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, RED$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, RED$) Set_Property(@WINDOW, '@ADE_WAFER_THK_RANGE_REQ', 0) end else - stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', '', Line, WHITE$) + stat = Send_Message(SlotCtrl, 'COLOR_BY_POS', 0, Line, WHITE$) end END END @@ -1131,3 +1132,4 @@ PubSaveClick: RETURN +