Compare commits
2 Commits
519eec0901
...
d7acd011cf
Author | SHA1 | Date | |
---|---|---|---|
d7acd011cf | |||
17de6db0f4 |
File diff suppressed because one or more lines are too long
@ -168,10 +168,20 @@
|
|||||||
MorNigshotset
|
MorNigshotset
|
||||||
CTBox
|
CTBox
|
||||||
|
|
||||||
|
ElesqLiftingToner
|
||||||
|
ElesqLiftingCeam
|
||||||
|
ElesqLiftingECream
|
||||||
|
ElesqLiftingAmp
|
||||||
|
ElesqAquaToner
|
||||||
|
ElesqAquaCeam
|
||||||
|
ElesqAquaECream
|
||||||
|
ElesqAquaAmp
|
||||||
|
|
||||||
|
|
||||||
End Enum
|
End Enum
|
||||||
Public comDBCount(comDB.CTBox) As Integer ''DB 저장
|
Public comDBCount(comDB.ElesqAquaAmp) As Integer ''DB 저장
|
||||||
Public comInCount(comDB.CTBox) As Integer '' 패킹 저장 32 + 10 = 42 - 1 = 41
|
Public comInCount(comDB.ElesqAquaAmp) As Integer '' 패킹 저장 32 + 10 = 42 - 1 = 41
|
||||||
Public comComCount(comDB.CTBox) As Integer '' 로컬 저장
|
Public comComCount(comDB.ElesqAquaAmp) As Integer '' 로컬 저장
|
||||||
|
|
||||||
Public countCommand(prodInCount.Length + comInCount.Length - 1) As String
|
Public countCommand(prodInCount.Length + comInCount.Length - 1) As String
|
||||||
|
|
||||||
@ -415,8 +425,22 @@
|
|||||||
comInCount(comDB.Goldshopbag) = ckCount
|
comInCount(comDB.Goldshopbag) = ckCount
|
||||||
Case comDB.MorNigshotset
|
Case comDB.MorNigshotset
|
||||||
comInCount(comDB.MorNigshotset) = ckCount
|
comInCount(comDB.MorNigshotset) = ckCount
|
||||||
Case comDB.CTBox
|
Case comDB.ElesqLiftingToner
|
||||||
comInCount(comDB.CTBox) = ckCount
|
comInCount(comDB.ElesqLiftingToner) = ckCount
|
||||||
|
Case comDB.ElesqLiftingCeam
|
||||||
|
comInCount(comDB.ElesqLiftingCeam) = ckCount
|
||||||
|
Case comDB.ElesqLiftingECream
|
||||||
|
comInCount(comDB.ElesqLiftingECream) = ckCount
|
||||||
|
Case comDB.ElesqLiftingAmp
|
||||||
|
comInCount(comDB.ElesqLiftingAmp) = ckCount
|
||||||
|
Case comDB.ElesqAquaToner
|
||||||
|
comInCount(comDB.ElesqAquaToner) = ckCount
|
||||||
|
Case comDB.ElesqAquaCeam
|
||||||
|
comInCount(comDB.ElesqAquaCeam) = ckCount
|
||||||
|
Case comDB.ElesqAquaECream
|
||||||
|
comInCount(comDB.ElesqAquaECream) = ckCount
|
||||||
|
Case comDB.ElesqAquaAmp
|
||||||
|
comInCount(comDB.ElesqAquaAmp) = ckCount
|
||||||
|
|
||||||
Case Else
|
Case Else
|
||||||
MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
|
MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
|
||||||
@ -536,6 +560,15 @@
|
|||||||
countCommand(prodInCount.Length + comDB.Goldshopbag) = "Goldshopbagcnt"
|
countCommand(prodInCount.Length + comDB.Goldshopbag) = "Goldshopbagcnt"
|
||||||
countCommand(prodInCount.Length + comDB.MorNigshotset) = "MorNigshotsetcnt"
|
countCommand(prodInCount.Length + comDB.MorNigshotset) = "MorNigshotsetcnt"
|
||||||
countCommand(prodInCount.Length + comDB.CTBox) = "CTBoxcnt"
|
countCommand(prodInCount.Length + comDB.CTBox) = "CTBoxcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingToner) = "ElesqLiftingTonercnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingCeam) = "ElesqLiftingCeamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingECream) = "ElesqLiftingECreamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingAmp) = "ElesqLiftingAmpcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaToner) = "ElesqAquaTonercnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaCeam) = "ElesqAquaCeamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaECream) = "ElesqAquaECreamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaAmp) = "ElesqAquaAmpcnt"
|
||||||
|
|
||||||
|
|
||||||
Case countSaveList.autopack
|
Case countSaveList.autopack
|
||||||
|
|
||||||
@ -642,7 +675,14 @@
|
|||||||
countCommand(prodInCount.Length + comDB.Goldshopbag) = "APGoldshopbagcnt"
|
countCommand(prodInCount.Length + comDB.Goldshopbag) = "APGoldshopbagcnt"
|
||||||
countCommand(prodInCount.Length + comDB.MorNigshotset) = "APMorNigshotsetcnt"
|
countCommand(prodInCount.Length + comDB.MorNigshotset) = "APMorNigshotsetcnt"
|
||||||
countCommand(prodInCount.Length + comDB.CTBox) = "APCTBoxcnt"
|
countCommand(prodInCount.Length + comDB.CTBox) = "APCTBoxcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingToner) = "APElesqLiftingTonercnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingCeam) = "APElesqLiftingCeamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingECream) = "APElesqLiftingECreamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingAmp) = "APElesqLiftingAmpcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaToner) = "APElesqAquaTonercnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaCeam) = "APElesqAquaCeamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaECream) = "APElesqAquaECreamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaAmp) = "APElesqAquaAmpcnt"
|
||||||
|
|
||||||
Case countSaveList.autoWeight
|
Case countSaveList.autoWeight
|
||||||
|
|
||||||
@ -751,6 +791,14 @@
|
|||||||
countCommand(prodInCount.Length + comDB.Goldshopbag) = "AWGoldshopbagcnt"
|
countCommand(prodInCount.Length + comDB.Goldshopbag) = "AWGoldshopbagcnt"
|
||||||
countCommand(prodInCount.Length + comDB.MorNigshotset) = "AWMorNigshotsetcnt"
|
countCommand(prodInCount.Length + comDB.MorNigshotset) = "AWMorNigshotsetcnt"
|
||||||
countCommand(prodInCount.Length + comDB.CTBox) = "AWCTBoxcnt"
|
countCommand(prodInCount.Length + comDB.CTBox) = "AWCTBoxcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingToner) = "AWlesqLiftingTonercnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingCeam) = "AWElesqLiftingCeamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingECream) = "AWElesqLiftingECreamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqLiftingAmp) = "AWElesqLiftingAmpcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaToner) = "AWElesqAquaTonercnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaCeam) = "AWElesqAquaCeamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaECream) = "AWElesqAquaECreamcnt"
|
||||||
|
countCommand(prodInCount.Length + comDB.ElesqAquaAmp) = "AWElesqAquaAmpcnt"
|
||||||
|
|
||||||
End Select
|
End Select
|
||||||
End Sub
|
End Sub
|
||||||
|
Loading…
x
Reference in New Issue
Block a user