jionmt-sw/shpmt-OrderPackingProcessor
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases 10 Wiki Activity

feat: Firming Collagen Gel

Browse Source
This commit is contained in:
jiwonRepair 2025-08-27 18:24:56 +09:00
parent efacf4ed32
commit 384a52f30a
4 changed files with 68 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
SalesPacking_MES_API_Project/countForm.Designer.vb generated
View File

@ -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

1
SalesPacking_MES_API_Project/countForm.vb
View File

@ -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

30
SalesPacking_MES_API_Project/mainForm.vb
View File

File diff suppressed because one or more lines are too long

13
SalesPacking_MES_API_Project/mySQLAddress.vb
View File

@ -191,10 +191,12 @@
DoenaLiftingAmp
DoenaLiftingCream
FirmingCollagenGel
End Enum
Public comDBCount(comDB.DoenaLiftingCream) As Integer ''DB 저장
Public comInCount(comDB.DoenaLiftingCream) As Integer '' 패킹 저장 32 + 10 = 42 - 1 = 41
Public comComCount(comDB.DoenaLiftingCream) As Integer '' 로컬 저장
Public comDBCount(comDB.FirmingCollagenGel) As Integer ''DB 저장
Public comInCount(comDB.FirmingCollagenGel) As Integer '' 패킹 저장 32 + 10 = 42 - 1 = 41
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