신규 구성품 추가 : L004-0089, L004-0090, P001-0171, L004-0091

This commit is contained in:
KwakJooYoung 2025-09-25 17:08:56 +09:00
parent ac895bb01d
commit fdd5797605
2 changed files with 137 additions and 100 deletions

View File

@ -1603,103 +1603,107 @@ Public Class mainForm
Private Function comCountSet() As Boolean Private Function comCountSet() As Boolean
DBCmd = "SELECT Mask5Cnt DBCmd = "SELECT Mask5Cnt
,Mask10Cnt , Mask10Cnt
,HairBandCnt , HairBandCnt
,GelCnt , GelCnt
,MiniGelCnt , MiniGelCnt
,AmpleCnt , AmpleCnt
,CreamCnt , CreamCnt
,UmbrellaCnt , UmbrellaCnt
,FenCnt , FenCnt
,ChargerCnt , ChargerCnt
,CableCnt , CableCnt
,TonerCnt , TonerCnt
,Case_PRO_Black , Case_PRO_Black
,Case_PRO_Beige , Case_PRO_Beige
,Case_PRO_Red , Case_PRO_Red
,Case_PRO_Pink , Case_PRO_Pink
,Case_MAX_Black , Case_MAX_Black
,Case_MAX_Apr , Case_MAX_Apr
,Case_MAX_Mint , Case_MAX_Mint
,Case_MAX_Beige , Case_MAX_Beige
,SoothingGelCnt , SoothingGelCnt
,Carton0_Cnt , Carton0_Cnt
,Carton1_Cnt , Carton1_Cnt
,Carton2_Cnt , Carton2_Cnt
,Carton3_Cnt , Carton3_Cnt
,Carton4_Cnt , Carton4_Cnt
,Carton5_Cnt , Carton5_Cnt
,Carton6_Cnt , Carton6_Cnt
,Shopbag_Cnt , Shopbag_Cnt
,CosShopbag_Cnt , CosShopbag_Cnt
,DustBagCnt , DustBagCnt
,Case_MAX_Purple , Case_MAX_Purple
,Case_PRO_SnakeBlakc , Case_PRO_SnakeBlakc
,KollagenCnt , KollagenCnt
,KollagenSetCnt , KollagenSetCnt
,Kollagen_PCnt , Kollagen_PCnt
,KollagenSet_PCnt , KollagenSet_PCnt
,CleansingWaterCnt , CleansingWaterCnt
,TonerPadCnt , TonerPadCnt
,Case_MAX_SafBK_Cnt , Case_MAX_SafBK_Cnt
,Hologram_1Cnt , Hologram_1Cnt
,Hologram_3Cnt , Hologram_3Cnt
,Hologram_5Cnt , Hologram_5Cnt
,Case_MAX_SafPp_Cnt , Case_MAX_SafPp_Cnt
,Case_MAX_Yellow , Case_MAX_Yellow
,Kollagen_Pe1Cnt , Kollagen_Pe1Cnt
,Kollagen_Pe3Cnt , Kollagen_Pe3Cnt
,Kollagen_Pe5Cnt , Kollagen_Pe5Cnt
,ATCircleCaseCnt , ATCircleCaseCnt
,APSquareCaseCnt , APSquareCaseCnt
,Case_MAX_Peach , Case_MAX_Peach
,MasSoothingCnt , MasSoothingCnt
,Case_MAX_SMintCnt , Case_MAX_SMintCnt
,MeshPouchCnt , MeshPouchCnt
,FirmingAmpCnt , FirmingAmpCnt
,HyaluronicAmpCnt , HyaluronicAmpCnt
,nightshotcnt , nightshotcnt
,morningshotcnt , morningshotcnt
,casemaxwoodicnt , casemaxwoodicnt
,Elicolltonercnt , Elicolltonercnt
,Elicollampcnt , Elicollampcnt
,Elicollcreamcnt , Elicollcreamcnt
,Elihyaltonercnt , Elihyaltonercnt
,Elihyalampcnt , Elihyalampcnt
,Elihyalcreamcnt , Elihyalcreamcnt
,Dayshotcnt , Dayshotcnt
,Beautyshopbagcnt , Beautyshopbagcnt
,Gummycnt , Gummycnt
,Stickjellycnt , Stickjellycnt
,Newyearbagcnt , Newyearbagcnt
,Emsbeltcnt , Emsbeltcnt
,Beltbagcnt , Beltbagcnt
,Dayshot2cnt , Dayshot2cnt
,Elixircnt , Elixircnt
,Elixirpremiumcnt , Elixirpremiumcnt
,Emsbeltcontrollsetcnt , Emsbeltcontrollsetcnt
,FabricBagcnt , FabricBagcnt
,Goldshopbagcnt , Goldshopbagcnt
,MorNigshotsetcnt , MorNigshotsetcnt
,CTBoxcnt , CTBoxcnt
,ElesqLiftingTonercnt , ElesqLiftingTonercnt
,ElesqLiftingCeamcnt , ElesqLiftingCeamcnt
,ElesqLiftingECreamcnt , ElesqLiftingECreamcnt
,ElesqLiftingAmpcnt , ElesqLiftingAmpcnt
,ElesqAquaTonercnt , ElesqAquaTonercnt
,ElesqAquaCeamcnt , ElesqAquaCeamcnt
,ElesqAquaECreamcnt , ElesqAquaECreamcnt
,ElesqAquaAmpcnt , ElesqAquaAmpcnt
,Carton8_Cnt , Carton8_Cnt
,KeyringCnt , KeyringCnt
,DoenaLiftingTonercnt , DoenaLiftingTonercnt
,DoenaLiftingAmpcnt , DoenaLiftingAmpcnt
,DoenaLiftingCreamcnt , DoenaLiftingCreamcnt
,FirmingCollagenGelcnt , FirmingCollagenGelcnt
,KeyringSallyCnt , KeyringSallyCnt
,BeautykitHairbandCnt , BeautykitHairbandCnt
,BeautykitMirrorSCnt , BeautykitMirrorSCnt
,BeautykitMirrorLCnt , BeautykitMirrorLCnt
, BloomingMoistureGel150Cnt
, FirmingCollagenGel150Cnt
, TweedCaseCnt
, BloomingMoistureGel250Cnt
FROM " & applySalesDB & " WHERE PackingCode = '" & playCode & "'" '신규구성품추가 : 자동화동작(무게측정)에서 포장 구성품 수량 조회 추가 FROM " & applySalesDB & " WHERE PackingCode = '" & playCode & "'" '신규구성품추가 : 자동화동작(무게측정)에서 포장 구성품 수량 조회 추가
If DBQueryReader(DBCmd) Then If DBQueryReader(DBCmd) Then
@ -2701,6 +2705,7 @@ Public Class mainForm
txbPacking.Text = packingCode txbPacking.Text = packingCode
' 무게측정
If weightRun() = False Then If weightRun() = False Then
Return False Return False
End If End If
@ -2925,8 +2930,12 @@ Public Class mainForm
", KeyringSallyCnt = '" & comInCount(comDB.keyringSally) & "'" & ", KeyringSallyCnt = '" & comInCount(comDB.keyringSally) & "'" &
", BeautykitHairbandCnt = '" & comInCount(comDB.beautykitHairband) & "'" & ", BeautykitHairbandCnt = '" & comInCount(comDB.beautykitHairband) & "'" &
", BeautykitMirrorSCnt = '" & comInCount(comDB.beautykitMirrorS) & "'" & ", BeautykitMirrorSCnt = '" & comInCount(comDB.beautykitMirrorS) & "'" &
", BeautykitMirrorLCnt = '" & comInCount(comDB.beautykitMirrorL) & "'" & '신규구성품추가/신규제품추가 : 추가한 품목 수량 업데이트 추가 ", BeautykitMirrorLCnt = '" & comInCount(comDB.beautykitMirrorL) & "'" &
" WHERE PackingCode = '" & packingCode & "'" ", BloomingMoistureGel150Cnt = '" & comInCount(comDB.bloomingMoistureGel150) & "'" &
", FirmingCollagenGel150Cnt = '" & comInCount(comDB.firmingCollagenGel150) & "'" &
", TweedCaseCnt = '" & comInCount(comDB.tweedCase) & "'" &
", BloomingMoistureGel250Cnt = '" & comInCount(comDB.bloomingMoistureGel250) & "'" &
" WHERE PackingCode = '" & packingCode & "'" '신규구성품추가/신규제품추가 : 추가한 품목 수량 업데이트 추가
If DBCommand(DBCmd) = False Then If DBCommand(DBCmd) = False Then
errorOut("등록오류") errorOut("등록오류")
@ -3380,6 +3389,10 @@ Public Class mainForm
, BeautykitHairbandCnt , BeautykitHairbandCnt
, BeautykitMirrorSCnt , BeautykitMirrorSCnt
, BeautykitMirrorLCnt , BeautykitMirrorLCnt
, BloomingMoistureGel150Cnt
, FirmingCollagenGel150Cnt
, TweedCaseCnt
, BloomingMoistureGel250Cnt
FROM " & applyCountDB & " WHERE DATETIME = '" & nowToday & "'" '신규구성품추가/신규제품추가 : 추가한 품목 일반동작 수량 조회 추가 FROM " & applyCountDB & " WHERE DATETIME = '" & nowToday & "'" '신규구성품추가/신규제품추가 : 추가한 품목 일반동작 수량 조회 추가
countCommandFunc(countSaveList.normal) countCommandFunc(countSaveList.normal)
Else Else
@ -3504,6 +3517,10 @@ Public Class mainForm
, APBeautykitHairbandCnt , APBeautykitHairbandCnt
, APBeautykitMirrorSCnt , APBeautykitMirrorSCnt
, APBeautykitMirrorLCnt , APBeautykitMirrorLCnt
, APBloomingMoistureGel150Cnt
, APFirmingCollagenGel150Cnt
, APTweedCaseCnt
, APBloomingMoistureGel250Cnt
FROM " & applyCountDB & " WHERE DATETIME = '" & nowToday & "'" '신규구성품추가/신규제품추가 : 추가한 품목 자동화동작(포장) 수량 조회 추가 FROM " & applyCountDB & " WHERE DATETIME = '" & nowToday & "'" '신규구성품추가/신규제품추가 : 추가한 품목 자동화동작(포장) 수량 조회 추가
countCommandFunc(countSaveList.autopack) countCommandFunc(countSaveList.autopack)
Else Else
@ -3627,6 +3644,10 @@ Public Class mainForm
, AWBeautykitHairbandCnt , AWBeautykitHairbandCnt
, AWBeautykitMirrorSCnt , AWBeautykitMirrorSCnt
, AWBeautykitMirrorLCnt , AWBeautykitMirrorLCnt
, AWBloomingMoistureGel150Cnt
, AWFirmingCollagenGel150Cnt
, AWTweedCaseCnt
, AWBloomingMoistureGel250Cnt
FROM " & applyCountDB & " WHERE DATETIME = '" & nowToday & "'" '신규구성품추가/신규제품추가 : 추가한 품목 자동화동작(무게측정) 수량 조회 추가 FROM " & applyCountDB & " WHERE DATETIME = '" & nowToday & "'" '신규구성품추가/신규제품추가 : 추가한 품목 자동화동작(무게측정) 수량 조회 추가
countCommandFunc(countSaveList.autoWeight) countCommandFunc(countSaveList.autoWeight)
End If End If

View File

@ -187,6 +187,10 @@
beautykitHairband beautykitHairband
beautykitMirrorS beautykitMirrorS
beautykitMirrorL beautykitMirrorL
bloomingMoistureGel150
firmingCollagenGel150
tweedCase
bloomingMoistureGel250
'신규구성품추가 : 추가하는 품목의 변수 추가 '신규구성품추가 : 추가하는 품목의 변수 추가
End Enum End Enum
Public comDB_max_index As Integer = [Enum].GetNames(GetType(comDB)).Length - 1 Public comDB_max_index As Integer = [Enum].GetNames(GetType(comDB)).Length - 1
@ -344,6 +348,10 @@
countCommand(prodInCount.Length + comDB.beautykitHairband) = "BeautykitHairbandCnt" countCommand(prodInCount.Length + comDB.beautykitHairband) = "BeautykitHairbandCnt"
countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "BeautykitMirrorSCnt" countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "BeautykitMirrorSCnt"
countCommand(prodInCount.Length + comDB.beautykitMirrorL) = "BeautykitMirrorLCnt" countCommand(prodInCount.Length + comDB.beautykitMirrorL) = "BeautykitMirrorLCnt"
countCommand(prodInCount.Length + comDB.bloomingMoistureGel150) = "BloomingMoistureGel150Cnt"
countCommand(prodInCount.Length + comDB.firmingCollagenGel150) = "FirmingCollagenGel150Cnt"
countCommand(prodInCount.Length + comDB.tweedCase) = "TweedCaseCnt"
countCommand(prodInCount.Length + comDB.bloomingMoistureGel250) = "BloomingMoistureGel250Cnt"
'신규구성품추가 : 추가한 comDB 수량을 DB에 저장하기 위해 jomtPackingCount 생성한 일반동작 컬럼명 추가 '신규구성품추가 : 추가한 comDB 수량을 DB에 저장하기 위해 jomtPackingCount 생성한 일반동작 컬럼명 추가
Case countSaveList.autopack Case countSaveList.autopack
@ -466,6 +474,10 @@
countCommand(prodInCount.Length + comDB.beautykitHairband) = "APBeautykitHairbandCnt" countCommand(prodInCount.Length + comDB.beautykitHairband) = "APBeautykitHairbandCnt"
countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "APBeautykitMirrorSCnt" countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "APBeautykitMirrorSCnt"
countCommand(prodInCount.Length + comDB.beautykitMirrorL) = "APBeautykitMirrorLCnt" countCommand(prodInCount.Length + comDB.beautykitMirrorL) = "APBeautykitMirrorLCnt"
countCommand(prodInCount.Length + comDB.bloomingMoistureGel150) = "APBloomingMoistureGel150Cnt"
countCommand(prodInCount.Length + comDB.firmingCollagenGel150) = "APFirmingCollagenGel150Cnt"
countCommand(prodInCount.Length + comDB.tweedCase) = "APTweedCaseCnt"
countCommand(prodInCount.Length + comDB.bloomingMoistureGel250) = "APBloomingMoistureGel250Cnt"
'신규구성품추가 : 추가한 comDB 수량을 DB에 저장하기 위해 jomtPackingCount 생성한 자동화동작(포장) 컬럼명 추가 '신규구성품추가 : 추가한 comDB 수량을 DB에 저장하기 위해 jomtPackingCount 생성한 자동화동작(포장) 컬럼명 추가
Case countSaveList.autoWeight Case countSaveList.autoWeight
@ -588,6 +600,10 @@
countCommand(prodInCount.Length + comDB.beautykitHairband) = "AWBeautykitHairbandCnt" countCommand(prodInCount.Length + comDB.beautykitHairband) = "AWBeautykitHairbandCnt"
countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "AWBeautykitMirrorSCnt" countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "AWBeautykitMirrorSCnt"
countCommand(prodInCount.Length + comDB.beautykitMirrorL) = "AWBeautykitMirrorLCnt" countCommand(prodInCount.Length + comDB.beautykitMirrorL) = "AWBeautykitMirrorLCnt"
countCommand(prodInCount.Length + comDB.bloomingMoistureGel150) = "AWBloomingMoistureGel150Cnt"
countCommand(prodInCount.Length + comDB.firmingCollagenGel150) = "AWFirmingCollagenGel150Cnt"
countCommand(prodInCount.Length + comDB.tweedCase) = "AWTweedCaseCnt"
countCommand(prodInCount.Length + comDB.bloomingMoistureGel250) = "AWBloomingMoistureGel250Cnt"
'신규구성품추가 : 추가한 comDB 수량을 DB에 저장하기 위해 jomtPackingCount 생성한 자동화동작(무게측정) 컬럼명 추가 '신규구성품추가 : 추가한 comDB 수량을 DB에 저장하기 위해 jomtPackingCount 생성한 자동화동작(무게측정) 컬럼명 추가
End Select End Select