feat: pro S

2025-08-11 18:08:06 +09:00 · 2025-08-11 18:08:06 +09:00 · 76c8d99964
commit 76c8d99964
parent 571ce1991f
4 changed files with 179 additions and 27 deletions
--- a/SalesPacking_MES_API_Project/countForm.Designer.vb
+++ b/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
--- a/SalesPacking_MES_API_Project/countForm.vb
+++ b/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)
--- a/SalesPacking_MES_API_Project/mainForm.vb
+++ b/SalesPacking_MES_API_Project/mainForm.vb
--- a/SalesPacking_MES_API_Project/mySQLAddress.vb
+++ b/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 prodInCount(prodDB.effectV3) As Integer    '' 패킹 저장 10
-    Public prodComCount(prodDB.effectV3) As Integer   '' 로컬 저장
-    Public prodInSerial(prodDB.effectV3) As String    '' LogData 저장
-    Public prodPackCommand(prodDB.effectV3) As String  ''
+    Public prodDBCount(prodDB.proS) As Integer    '' DB 저장
+    Public prodInCount(prodDB.proS) As Integer    '' 패킹 저장 10
+    Public prodComCount(prodDB.proS) As Integer   '' 로컬 저장
+    Public prodInSerial(prodDB.proS) As String    '' LogData 저장
+    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