From 3ba7ffe782bd4d33657ddfeee81ef69b65231070 Mon Sep 17 00:00:00 2001
From: "Infineon\\Ouellette" <jonathan.ouellette@infineon.com>
Date: Wed, 12 Feb 2025 16:47:18 -0700
Subject: [PATCH] Pushed a change for TW Tracking Phase 2 yesterday that broke
 current system. Added in gating logic

---
 LSL2/STPROC/TEST_RUN_SERVICES.txt | 34 +++++++++++++++++--------------
 1 file changed, 19 insertions(+), 15 deletions(-)

diff --git a/LSL2/STPROC/TEST_RUN_SERVICES.txt b/LSL2/STPROC/TEST_RUN_SERVICES.txt
index 466781c..d1bf7fd 100644
--- a/LSL2/STPROC/TEST_RUN_SERVICES.txt
+++ b/LSL2/STPROC/TEST_RUN_SERVICES.txt
@@ -321,22 +321,25 @@ Service CreateTestRunRecord(RunTypeID, EqpType, EqpID, PSNo, RDSNo, UserID, TWLo
     TWRunKey     = ''
     Response     = ''
     ErrorMessage = ''
+    TWTrackingSystemActive = Database_Services('ReadDataColumn', 'APP_INFO', 'NEW_TW_SYSTEM_ACTIVE_SWITCH', 1, True$, 0, False$)
     //Pre-Checks.
-    If TWLotIds NE '' then
-        for each TWLotId in TWLotIds using @VM setting twLotPos
-            ThisTWLotCurrQty = Database_Services('ReadDataColumn', 'LOT', TWLotId, LOT_WAFER_QTY$, True$, 0, False$)
-            If ThisTWLotCurrQty then
-                ThisTWLotUsageQty = TWLotQtys<1, twLotPos>
-                If ThisTWLotCurrQty LT ThisTWLotUsageQty then
-                    ErrorMessage = 'Error in Create Test Run Record routine. Lot # ' : TWLotId : ' does not have enough wafers. Please choose ' : ThisTWLotCurrQty : ' wafers or less.'
-                end
-            end else
-                ErrorMessage = 'Error in Create Test Run Record routine. Lot # ' : TWLotId : ' has a zero wafer quantity.'
-            end
-        Until ErrorMessage NE ''
-        Next TWLotId
-    end else
-        ErrorMessage = 'Error in Create Test Run Record routine. No test wafer lots entered.'
+    If TWTrackingSystemActive then
+		If TWLotIds NE '' then
+			for each TWLotId in TWLotIds using @VM setting twLotPos
+				ThisTWLotCurrQty = Database_Services('ReadDataColumn', 'LOT', TWLotId, LOT_WAFER_QTY$, True$, 0, False$)
+				If ThisTWLotCurrQty then
+					ThisTWLotUsageQty = TWLotQtys<1, twLotPos>
+					If ThisTWLotCurrQty LT ThisTWLotUsageQty then
+						ErrorMessage = 'Error in Create Test Run Record routine. Lot # ' : TWLotId : ' does not have enough wafers. Please choose ' : ThisTWLotCurrQty : ' wafers or less.'
+					end
+				end else
+					ErrorMessage = 'Error in Create Test Run Record routine. Lot # ' : TWLotId : ' has a zero wafer quantity.'
+				end
+			Until ErrorMessage NE ''
+			Next TWLotId
+		end else
+			ErrorMessage = 'Error in Create Test Run Record routine. No test wafer lots entered.'
+		end
     end
     If ErrorMessage EQ '' then
         If RunTypeID NE '' AND EqpType NE '' AND EqpID NE '' AND UserID NE '' then
@@ -794,3 +797,4 @@ end service
 
 
 
+