feat: pro S

SalesPacking_MES_API_Project/countForm.Designer.vb

@@ -144,6 +144,9 @@ Partial Class countForm
         Me.txbProFace = New System.Windows.Forms.TextBox()
         Me.lbProFace = New System.Windows.Forms.Label()
         Me.gbCDual = New System.Windows.Forms.GroupBox()
+        Me.pnMaximumAlpha = New System.Windows.Forms.Panel()
+        Me.txbMaximumAlpha = New System.Windows.Forms.TextBox()
+        Me.lbMaximumAlpha = New System.Windows.Forms.Label()
         Me.pneffectV3 = New System.Windows.Forms.Panel()
         Me.txbeffectV3 = New System.Windows.Forms.TextBox()
         Me.lbeffectV3 = New System.Windows.Forms.Label()
@@ -335,6 +338,9 @@ Partial Class countForm
         Me.pnMask5 = New System.Windows.Forms.Panel()
         Me.txbMask5 = New System.Windows.Forms.TextBox()
         Me.lbMask5 = New System.Windows.Forms.Label()
+        Me.pnProS = New System.Windows.Forms.Panel()
+        Me.txbProS = New System.Windows.Forms.TextBox()
+        Me.lbProS = New System.Windows.Forms.Label()
         Me.gbCount.SuspendLayout()
         Me.gbCase.SuspendLayout()
         Me.gbAlto.SuspendLayout()
@@ -381,6 +387,7 @@ Partial Class countForm
         Me.pnProSet.SuspendLayout()
         Me.pnProFace.SuspendLayout()
         Me.gbCDual.SuspendLayout()
+        Me.pnMaximumAlpha.SuspendLayout()
         Me.pneffectV3.SuspendLayout()
         Me.pneffect.SuspendLayout()
         Me.pnAlto.SuspendLayout()
@@ -448,6 +455,7 @@ Partial Class countForm
         Me.pnHair.SuspendLayout()
         Me.pnMask10.SuspendLayout()
         Me.pnMask5.SuspendLayout()
+        Me.pnProS.SuspendLayout()
         Me.SuspendLayout()
         '
         'Label1
@@ -1759,6 +1767,8 @@ Partial Class countForm
         '
         'gbCDual
         '
+        Me.gbCDual.Controls.Add(Me.pnProS)
+        Me.gbCDual.Controls.Add(Me.pnMaximumAlpha)
         Me.gbCDual.Controls.Add(Me.pneffectV3)
         Me.gbCDual.Controls.Add(Me.pneffect)
         Me.gbCDual.Controls.Add(Me.pnAlto)
@@ -1777,6 +1787,39 @@ Partial Class countForm
         Me.gbCDual.TabStop = False
         Me.gbCDual.Text = "DUALSONIC"
         '
+        'pnMaximumAlpha
+        '
+        Me.pnMaximumAlpha.Controls.Add(Me.txbMaximumAlpha)
+        Me.pnMaximumAlpha.Controls.Add(Me.lbMaximumAlpha)
+        Me.pnMaximumAlpha.Location = New System.Drawing.Point(195, 520)
+        Me.pnMaximumAlpha.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
+        Me.pnMaximumAlpha.Name = "pnMaximumAlpha"
+        Me.pnMaximumAlpha.Size = New System.Drawing.Size(189, 50)
+        Me.pnMaximumAlpha.TabIndex = 10
+        '
+        'txbMaximumAlpha
+        '
+        Me.txbMaximumAlpha.BackColor = System.Drawing.SystemColors.Window
+        Me.txbMaximumAlpha.Font = New System.Drawing.Font("함초롬바탕", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.txbMaximumAlpha.Location = New System.Drawing.Point(85, 6)
+        Me.txbMaximumAlpha.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
+        Me.txbMaximumAlpha.MaxLength = 10
+        Me.txbMaximumAlpha.Name = "txbMaximumAlpha"
+        Me.txbMaximumAlpha.ReadOnly = True
+        Me.txbMaximumAlpha.Size = New System.Drawing.Size(87, 38)
+        Me.txbMaximumAlpha.TabIndex = 1
+        Me.txbMaximumAlpha.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+        '
+        'lbMaximumAlpha
+        '
+        Me.lbMaximumAlpha.AutoSize = True
+        Me.lbMaximumAlpha.Font = New System.Drawing.Font("함초롬바탕", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.lbMaximumAlpha.Location = New System.Drawing.Point(4, 9)
+        Me.lbMaximumAlpha.Name = "lbMaximumAlpha"
+        Me.lbMaximumAlpha.Size = New System.Drawing.Size(85, 32)
+        Me.lbMaximumAlpha.TabIndex = 0
+        Me.lbMaximumAlpha.Text = "MAXA"
+        '
         'pneffectV3
         '
         Me.pneffectV3.Controls.Add(Me.txbeffectV3)
@@ -2019,7 +2062,7 @@ Partial Class countForm
         'PictureBox1
         '
         Me.PictureBox1.Image = Global.SalesPacking_MES_API_Project.My.Resources.Resources.logo
-        Me.PictureBox1.Location = New System.Drawing.Point(13, 594)
+        Me.PictureBox1.Location = New System.Drawing.Point(13, 684)
         Me.PictureBox1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.PictureBox1.Name = "PictureBox1"
         Me.PictureBox1.Size = New System.Drawing.Size(366, 91)
@@ -2302,7 +2345,7 @@ Partial Class countForm
         Me.lbkeyring.AutoSize = True
         Me.lbkeyring.Location = New System.Drawing.Point(3, 2)
         Me.lbkeyring.Name = "lbkeyring"
-        Me.lbkeyring.Size = New System.Drawing.Size(70, 46)
+        Me.lbkeyring.Size = New System.Drawing.Size(56, 37)
         Me.lbkeyring.TabIndex = 0
         Me.lbkeyring.Text = "키링"
         Me.lbkeyring.UseCompatibleTextRendering = True
@@ -3833,6 +3876,39 @@ Partial Class countForm
         Me.lbMask5.TabIndex = 0
         Me.lbMask5.Text = "아쿠아 마스크"
         '
+        'pnProS
+        '
+        Me.pnProS.Controls.Add(Me.txbProS)
+        Me.pnProS.Controls.Add(Me.lbProS)
+        Me.pnProS.Location = New System.Drawing.Point(195, 573)
+        Me.pnProS.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
+        Me.pnProS.Name = "pnProS"
+        Me.pnProS.Size = New System.Drawing.Size(189, 50)
+        Me.pnProS.TabIndex = 11
+        '
+        'txbProS
+        '
+        Me.txbProS.BackColor = System.Drawing.SystemColors.Window
+        Me.txbProS.Font = New System.Drawing.Font("함초롬바탕", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.txbProS.Location = New System.Drawing.Point(85, 6)
+        Me.txbProS.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
+        Me.txbProS.MaxLength = 10
+        Me.txbProS.Name = "txbProS"
+        Me.txbProS.ReadOnly = True
+        Me.txbProS.Size = New System.Drawing.Size(87, 38)
+        Me.txbProS.TabIndex = 1
+        Me.txbProS.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+        '
+        'lbProS
+        '
+        Me.lbProS.AutoSize = True
+        Me.lbProS.Font = New System.Drawing.Font("함초롬바탕", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.lbProS.Location = New System.Drawing.Point(4, 9)
+        Me.lbProS.Name = "lbProS"
+        Me.lbProS.Size = New System.Drawing.Size(96, 40)
+        Me.lbProS.TabIndex = 0
+        Me.lbProS.Text = "PROS"
+        '
         'countForm
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 15.0!)
@@ -3935,6 +4011,8 @@ Partial Class countForm
         Me.pnProFace.ResumeLayout(False)
         Me.pnProFace.PerformLayout()
         Me.gbCDual.ResumeLayout(False)
+        Me.pnMaximumAlpha.ResumeLayout(False)
+        Me.pnMaximumAlpha.PerformLayout()
         Me.pneffectV3.ResumeLayout(False)
         Me.pneffectV3.PerformLayout()
         Me.pneffect.ResumeLayout(False)
@@ -4064,6 +4142,8 @@ Partial Class countForm
         Me.pnMask10.PerformLayout()
         Me.pnMask5.ResumeLayout(False)
         Me.pnMask5.PerformLayout()
+        Me.pnProS.ResumeLayout(False)
+        Me.pnProS.PerformLayout()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -4380,4 +4460,10 @@ Partial Class countForm
     Friend WithEvents pnkeyring As Panel
     Friend WithEvents txbkeyring As TextBox
     Friend WithEvents lbkeyring As Label
+    Friend WithEvents pnMaximumAlpha As Panel
+    Friend WithEvents txbMaximumAlpha As TextBox
+    Friend WithEvents lbMaximumAlpha As Label
+    Friend WithEvents pnProS As Panel
+    Friend WithEvents txbProS As TextBox
+    Friend WithEvents lbProS As Label
 End Class

SalesPacking_MES_API_Project/countForm.vb

@@ -25,6 +25,8 @@ Public Class countForm
         txbAlto.Text = prodComCount(prodDB.alto)
         txbeffect.Text = prodComCount(prodDB.effect)
         txbeffectV3.Text = prodComCount(prodDB.effectV3)
+        txbeffectV3.Text = prodComCount(prodDB.maximumAlpha)
+        txbProS.Text = prodComCount(prodDB.proS)
 
         txbMask5.Text = comComCount(comDB.mask5)
         txbMask10.Text = comComCount(comDB.mask10)

SalesPacking_MES_API_Project/mySQLAddress.vb

@@ -78,12 +78,14 @@
         alto
         effect
         effectV3
+        maximumAlpha
+        proS
     End Enum
-    Public prodDBCount(prodDB.effectV3) As Integer    '' DB 저장
+    Public prodDBCount(prodDB.proS) As Integer    '' DB 저장
-    Public prodInCount(prodDB.effectV3) As Integer    '' 패킹 저장 10
+    Public prodInCount(prodDB.proS) As Integer    '' 패킹 저장 10
-    Public prodComCount(prodDB.effectV3) As Integer   '' 로컬 저장
+    Public prodComCount(prodDB.proS) As Integer   '' 로컬 저장
-    Public prodInSerial(prodDB.effectV3) As String    '' LogData 저장
+    Public prodInSerial(prodDB.proS) As String    '' LogData 저장
-    Public prodPackCommand(prodDB.effectV3) As String  ''
+    Public prodPackCommand(prodDB.proS) As String  ''
 
     Public Enum comDB
         mask5
@@ -245,6 +247,14 @@
                     prodInCount(prodDB.effectV3) = ckCount
                     prodInSerial(prodDB.effectV3) = serial
 
+                Case prodDB.maximumAlpha
+                    prodInCount(prodDB.maximumAlpha) = ckCount
+                    prodInSerial(prodDB.maximumAlpha) = serial
+
+                Case prodDB.proS
+                    prodInCount(prodDB.proS) = ckCount
+                    prodInSerial(prodDB.proS) = serial
+
                 Case Else
                     MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
                     Return True
@@ -486,6 +496,8 @@
                 countCommand(prodDB.alto) = "AltoCnt"
                 countCommand(prodDB.effect) = "EffectCnt"
                 countCommand(prodDB.effectV3) = "EffectV3Cnt"
+                countCommand(prodDB.maximumAlpha) = "MAXIMUMALPHACnt"
+                countCommand(prodDB.proS) = "ProSCnt"
 
                 countCommand(prodInCount.Length + comDB.mask5) = "Mask5Cnt"
                 countCommand(prodInCount.Length + comDB.mask10) = "Mask10Cnt"
@@ -603,6 +615,8 @@
                 countCommand(prodDB.alto) = "APAltoCnt"
                 countCommand(prodDB.effect) = "APEffectCnt"
                 countCommand(prodDB.effectV3) = "APEffectV3Cnt"
+                countCommand(prodDB.maximumAlpha) = "APMAXIMUMALPHACnt"
+                countCommand(prodDB.proS) = "APProSCnt"
 
                 countCommand(prodInCount.Length + comDB.mask5) = "APMask5Cnt"
                 countCommand(prodInCount.Length + comDB.mask10) = "APMask10Cnt"
@@ -722,6 +736,8 @@
                 countCommand(prodDB.alto) = "AWAltoCnt"
                 countCommand(prodDB.effect) = "AWEffectCnt"
                 countCommand(prodDB.effectV3) = "AWEffectV3Cnt"
+                countCommand(prodDB.maximumAlpha) = "AWMAXIMUMALPHACnt"
+                countCommand(prodDB.proS) = "AWProSCnt"
 
                 countCommand(prodInCount.Length + comDB.mask5) = "AWMask5Cnt"
                 countCommand(prodInCount.Length + comDB.mask10) = "AWMask10Cnt"
@@ -843,5 +859,9 @@
         prodPackCommand(prodDB.effect) = "Effect_Serial"
 
         prodPackCommand(prodDB.effectV3) = "EffectV3_Serial"
+
+        prodPackCommand(prodDB.maximumAlpha) = "MAXIMUM_ALPHA_SN"
+
+        prodPackCommand(prodDB.proS) = "Pro_S_Serial"
     End Sub
 End Module