feat: Effect V3, carton box 8

SalesPacking_MES_API_Project/countForm.vb

@@ -24,6 +24,7 @@ Public Class countForm
         txbAlphaBody.Text = prodComCount(prodDB.alphaBody)
         txbAlto.Text = prodComCount(prodDB.alto)
         txbeffect.Text = prodComCount(prodDB.effect)
+        txbeffectV3.Text = prodComCount(prodDB.effectV3)
 
         txbMask5.Text = comComCount(comDB.mask5)
         txbMask10.Text = comComCount(comDB.mask10)
@@ -98,6 +99,7 @@ Public Class countForm
         txbbeltbag.Text = comComCount(comDB.Beltbag)
         txbDayshot2.Text = comComCount(comDB.Dayshot2)
         txbelixir.Text = comComCount(comDB.Elixir)
+        txbbox8.Text = comComCount(comDB.car8)
 
     End Sub
 

SalesPacking_MES_API_Project/mySQLAddress.vb

@@ -77,12 +77,13 @@
         alphaBody
         alto
         effect
+        effectV3
     End Enum
-    Public prodDBCount(prodDB.effect) As Integer    '' DB 저장
+    Public prodDBCount(prodDB.effectV3) As Integer    '' DB 저장
-    Public prodInCount(prodDB.effect) As Integer    '' 패킹 저장 10
+    Public prodInCount(prodDB.effectV3) As Integer    '' 패킹 저장 10
-    Public prodComCount(prodDB.effect) As Integer   '' 로컬 저장
+    Public prodComCount(prodDB.effectV3) As Integer   '' 로컬 저장
-    Public prodInSerial(prodDB.effect) As String    '' LogData 저장
+    Public prodInSerial(prodDB.effectV3) As String    '' LogData 저장
-    Public prodPackCommand(prodDB.effect) As String  ''
+    Public prodPackCommand(prodDB.effectV3) As String  ''
 
     Public Enum comDB
         mask5
@@ -177,11 +178,12 @@
         ElesqAquaECream
         ElesqAquaAmp
 
+        car8
 
     End Enum
-    Public comDBCount(comDB.ElesqAquaAmp) As Integer   ''DB 저장
+    Public comDBCount(comDB.car8) As Integer   ''DB 저장
-    Public comInCount(comDB.ElesqAquaAmp) As Integer   '' 패킹 저장 32 + 10 = 42 - 1 = 41
+    Public comInCount(comDB.car8) As Integer   '' 패킹 저장 32 + 10 = 42 - 1 = 41
-    Public comComCount(comDB.ElesqAquaAmp) As Integer  '' 로컬 저장
+    Public comComCount(comDB.car8) As Integer  '' 로컬 저장
 
     Public countCommand(prodInCount.Length + comInCount.Length - 1) As String
 
@@ -237,6 +239,10 @@
                     prodInCount(prodDB.effect) = ckCount
                     prodInSerial(prodDB.effect) = serial
 
+                Case prodDB.effectV3
+                    prodInCount(prodDB.effectV3) = ckCount
+                    prodInSerial(prodDB.effectV3) = serial
+
                 Case Else
                     MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
                     Return True
@@ -441,6 +447,8 @@
                     comInCount(comDB.ElesqAquaECream) = ckCount
                 Case comDB.ElesqAquaAmp
                     comInCount(comDB.ElesqAquaAmp) = ckCount
+                Case comDB.car8
+                    comInCount(comDB.car8) = ckCount
 
                 Case Else
                     MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
@@ -473,6 +481,7 @@
                 countCommand(prodDB.alphaBody) = "AlphaBodyCnt"
                 countCommand(prodDB.alto) = "AltoCnt"
                 countCommand(prodDB.effect) = "EffectCnt"
+                countCommand(prodDB.effectV3) = "EffectV3Cnt"
 
                 countCommand(prodInCount.Length + comDB.mask5) = "Mask5Cnt"
                 countCommand(prodInCount.Length + comDB.mask10) = "Mask10Cnt"
@@ -568,6 +577,7 @@
                 countCommand(prodInCount.Length + comDB.ElesqAquaCeam) = "ElesqAquaCeamcnt"
                 countCommand(prodInCount.Length + comDB.ElesqAquaECream) = "ElesqAquaECreamcnt"
                 countCommand(prodInCount.Length + comDB.ElesqAquaAmp) = "ElesqAquaAmpcnt"
+                countCommand(prodInCount.Length + comDB.car8) = "Carton8Cnt"
 
 
             Case countSaveList.autopack
@@ -588,6 +598,7 @@
                 countCommand(prodDB.alphaBody) = "APAlphaBodyCnt"
                 countCommand(prodDB.alto) = "APAltoCnt"
                 countCommand(prodDB.effect) = "APEffectCnt"
+                countCommand(prodDB.effectV3) = "APEffectV3Cnt"
 
                 countCommand(prodInCount.Length + comDB.mask5) = "APMask5Cnt"
                 countCommand(prodInCount.Length + comDB.mask10) = "APMask10Cnt"
@@ -683,6 +694,7 @@
                 countCommand(prodInCount.Length + comDB.ElesqAquaCeam) = "APElesqAquaCeamcnt"
                 countCommand(prodInCount.Length + comDB.ElesqAquaECream) = "APElesqAquaECreamcnt"
                 countCommand(prodInCount.Length + comDB.ElesqAquaAmp) = "APElesqAquaAmpcnt"
+                countCommand(prodInCount.Length + comDB.car8) = "APCarton8Cnt"
 
             Case countSaveList.autoWeight
 
@@ -704,6 +716,7 @@
 
                 countCommand(prodDB.alto) = "AWAltoCnt"
                 countCommand(prodDB.effect) = "AWEffectCnt"
+                countCommand(prodDB.effectV3) = "AWEffectV3Cnt"
 
                 countCommand(prodInCount.Length + comDB.mask5) = "AWMask5Cnt"
                 countCommand(prodInCount.Length + comDB.mask10) = "AWMask10Cnt"
@@ -799,6 +812,7 @@
                 countCommand(prodInCount.Length + comDB.ElesqAquaCeam) = "AWElesqAquaCeamcnt"
                 countCommand(prodInCount.Length + comDB.ElesqAquaECream) = "AWElesqAquaECreamcnt"
                 countCommand(prodInCount.Length + comDB.ElesqAquaAmp) = "AWElesqAquaAmpcnt"
+                countCommand(prodInCount.Length + comDB.car8) = "AWCarton8Cnt"
 
         End Select
     End Sub