feat: Firming Collagen Gel

SalesPacking_MES_API_Project/countForm.Designer.vb

@@ -360,6 +360,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.pnfirmingcollagengel = New System.Windows.Forms.Panel()
+        Me.txbfirmingcollagengel = New System.Windows.Forms.TextBox()
+        Me.lbfirmingcollagengel = New System.Windows.Forms.Label()
         Me.gbCount.SuspendLayout()
         Me.gbCase.SuspendLayout()
         Me.gbAlto.SuspendLayout()
@@ -482,6 +485,7 @@ Partial Class countForm
         Me.pnHair.SuspendLayout()
         Me.pnMask10.SuspendLayout()
         Me.pnMask5.SuspendLayout()
+        Me.pnfirmingcollagengel.SuspendLayout()
         Me.SuspendLayout()
         '
         'Label1
@@ -2424,6 +2428,7 @@ Partial Class countForm
         '
         'gbProd
         '
+        Me.gbProd.Controls.Add(Me.pnfirmingcollagengel)
         Me.gbProd.Controls.Add(Me.pndoenaliftingcream)
         Me.gbProd.Controls.Add(Me.pndoenaliftingamp)
         Me.gbProd.Controls.Add(Me.pndoenaliftingtoner)
@@ -4141,6 +4146,38 @@ Partial Class countForm
         Me.lbMask5.TabIndex = 0
         Me.lbMask5.Text = "아쿠아 마스크"
         '
+        'pnfirmingcollagengel
+        '
+        Me.pnfirmingcollagengel.Controls.Add(Me.txbfirmingcollagengel)
+        Me.pnfirmingcollagengel.Controls.Add(Me.lbfirmingcollagengel)
+        Me.pnfirmingcollagengel.Location = New System.Drawing.Point(240, 672)
+        Me.pnfirmingcollagengel.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
+        Me.pnfirmingcollagengel.Name = "pnfirmingcollagengel"
+        Me.pnfirmingcollagengel.Size = New System.Drawing.Size(233, 42)
+        Me.pnfirmingcollagengel.TabIndex = 36
+        '
+        'txbfirmingcollagengel
+        '
+        Me.txbfirmingcollagengel.BackColor = System.Drawing.SystemColors.Window
+        Me.txbfirmingcollagengel.Location = New System.Drawing.Point(138, 0)
+        Me.txbfirmingcollagengel.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
+        Me.txbfirmingcollagengel.MaxLength = 10
+        Me.txbfirmingcollagengel.Name = "txbfirmingcollagengel"
+        Me.txbfirmingcollagengel.ReadOnly = True
+        Me.txbfirmingcollagengel.Size = New System.Drawing.Size(87, 38)
+        Me.txbfirmingcollagengel.TabIndex = 1
+        Me.txbfirmingcollagengel.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+        '
+        'lbfirmingcollagengel
+        '
+        Me.lbfirmingcollagengel.AutoSize = True
+        Me.lbfirmingcollagengel.Location = New System.Drawing.Point(3, 2)
+        Me.lbfirmingcollagengel.Name = "lbfirmingcollagengel"
+        Me.lbfirmingcollagengel.Size = New System.Drawing.Size(174, 46)
+        Me.lbfirmingcollagengel.TabIndex = 0
+        Me.lbfirmingcollagengel.Text = "FM콜라겐젤"
+        Me.lbfirmingcollagengel.UseCompatibleTextRendering = True
+        '
         'countForm
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 15.0!)
@@ -4389,6 +4426,8 @@ Partial Class countForm
         Me.pnMask10.PerformLayout()
         Me.pnMask5.ResumeLayout(False)
         Me.pnMask5.PerformLayout()
+        Me.pnfirmingcollagengel.ResumeLayout(False)
+        Me.pnfirmingcollagengel.PerformLayout()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -4730,4 +4769,7 @@ Partial Class countForm
     Friend WithEvents pndoenaliftingcream As Panel
     Friend WithEvents txbdoenaliftingcream As TextBox
     Friend WithEvents lbdoenaliftingcream As Label
+    Friend WithEvents pnfirmingcollagengel As Panel
+    Friend WithEvents txbfirmingcollagengel As TextBox
+    Friend WithEvents lbfirmingcollagengel As Label
 End Class

SalesPacking_MES_API_Project/countForm.vb

@@ -109,6 +109,7 @@ Public Class countForm
         txbdoenaliftingtoner.Text = comComCount(comDB.DoenaLiftingToner)
         txbdoenaliftingamp.Text = comComCount(comDB.DoenaLiftingAmp)
         txbdoenaliftingcream.Text = comComCount(comDB.DoenaLiftingCream)
+        pnfirmingcollagengel.Text = comComCount(comDB.FirmingCollagenGel)
 
 
     End Sub

SalesPacking_MES_API_Project/mySQLAddress.vb

@@ -191,10 +191,12 @@
         DoenaLiftingAmp
         DoenaLiftingCream
 
+        FirmingCollagenGel
+
     End Enum
-    Public comDBCount(comDB.DoenaLiftingCream) As Integer   ''DB 저장
+    Public comDBCount(comDB.FirmingCollagenGel) As Integer   ''DB 저장
-    Public comInCount(comDB.DoenaLiftingCream) As Integer   '' 패킹 저장 32 + 10 = 42 - 1 = 41
+    Public comInCount(comDB.FirmingCollagenGel) As Integer   '' 패킹 저장 32 + 10 = 42 - 1 = 41
-    Public comComCount(comDB.DoenaLiftingCream) As Integer  '' 로컬 저장
+    Public comComCount(comDB.FirmingCollagenGel) As Integer  '' 로컬 저장
 
     Public countCommand(prodInCount.Length + comInCount.Length - 1) As String
 
@@ -488,6 +490,8 @@
                     comInCount(comDB.DoenaLiftingAmp) = ckCount
                 Case comDB.DoenaLiftingCream
                     comInCount(comDB.DoenaLiftingCream) = ckCount
+                Case comDB.FirmingCollagenGel
+                    comInCount(comDB.FirmingCollagenGel) = ckCount
 
                 Case Else
                     MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
@@ -626,6 +630,7 @@
                 countCommand(prodInCount.Length + comDB.DoenaLiftingToner) = "DoenaLiftingTonercnt"
                 countCommand(prodInCount.Length + comDB.DoenaLiftingAmp) = "DoenaLiftingAmpcnt"
                 countCommand(prodInCount.Length + comDB.DoenaLiftingCream) = "DoenaLiftingCreamcnt"
+                countCommand(prodInCount.Length + comDB.FirmingCollagenGel) = "FirmingCollagenGelcnt"
 
             Case countSaveList.autopack
 
@@ -751,6 +756,7 @@
                 countCommand(prodInCount.Length + comDB.DoenaLiftingToner) = "APDoenaLiftingTonercnt"
                 countCommand(prodInCount.Length + comDB.DoenaLiftingAmp) = "APDoenaLiftingAmpcnt"
                 countCommand(prodInCount.Length + comDB.DoenaLiftingCream) = "APDoenaLiftingCreamcnt"
+                countCommand(prodInCount.Length + comDB.FirmingCollagenGel) = "APFirmingCollagenGelcnt"
 
             Case countSaveList.autoWeight
 
@@ -878,6 +884,7 @@
                 countCommand(prodInCount.Length + comDB.DoenaLiftingToner) = "AWDoenaLiftingTonercnt"
                 countCommand(prodInCount.Length + comDB.DoenaLiftingAmp) = "AWDoenaLiftingAmpcnt"
                 countCommand(prodInCount.Length + comDB.DoenaLiftingCream) = "AWDoenaLiftingCreamcnt"
+                countCommand(prodInCount.Length + comDB.FirmingCollagenGel) = "AWFirmingCollagenGelcnt"
 
         End Select
     End Sub