feat: 기기 제품 추가

This commit is contained in:
kje97 2025-07-18 16:56:40 +09:00
parent d7acd011cf
commit f4164f94d9
2 changed files with 53 additions and 37 deletions

File diff suppressed because one or more lines are too long

View File

@ -77,12 +77,13 @@
alphaBody
alto
effect
effectv3
End Enum
Public prodDBCount(prodDB.effect) As Integer '' DB 저장
Public prodInCount(prodDB.effect) As Integer '' 패킹 저장 10
Public prodComCount(prodDB.effect) As Integer '' 로컬 저장
Public prodInSerial(prodDB.effect) As String '' LogData 저장
Public prodPackCommand(prodDB.effect) As String ''
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 Enum comDB
mask5
@ -237,6 +238,10 @@
prodInCount(prodDB.effect) = ckCount
prodInSerial(prodDB.effect) = serial
Case prodDB.effectv3
prodInCount(prodDB.effectv3) = ckCount
prodInSerial(prodDB.effectv3) = serial
Case Else
MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
Return True
@ -473,6 +478,7 @@
countCommand(prodDB.alphaBody) = "AlphaBodyCnt"
countCommand(prodDB.alto) = "AltoCnt"
countCommand(prodDB.effect) = "EffectCnt"
countCommand(prodDB.effectv3) = "EffectV3Cnt"
countCommand(prodInCount.Length + comDB.mask5) = "Mask5Cnt"
countCommand(prodInCount.Length + comDB.mask10) = "Mask10Cnt"
@ -588,6 +594,7 @@
countCommand(prodDB.alphaBody) = "APAlphaBodyCnt"
countCommand(prodDB.alto) = "APAltoCnt"
countCommand(prodDB.effect) = "APEffectCnt"
countCommand(prodDB.effect) = "APEffectV3Cnt"
countCommand(prodInCount.Length + comDB.mask5) = "APMask5Cnt"
countCommand(prodInCount.Length + comDB.mask10) = "APMask10Cnt"
@ -704,6 +711,7 @@
countCommand(prodDB.alto) = "AWAltoCnt"
countCommand(prodDB.effect) = "AWEffectCnt"
countCommand(prodDB.effectv3) = "AWEffectV3Cnt"
countCommand(prodInCount.Length + comDB.mask5) = "AWMask5Cnt"
countCommand(prodInCount.Length + comDB.mask10) = "AWMask10Cnt"
@ -821,5 +829,6 @@
prodPackCommand(prodDB.alto) = "Alto_Serial"
prodPackCommand(prodDB.effect) = "Effect_Serial"
prodPackCommand(prodDB.effectv3) = "EffectV3_Serial"
End Sub
End Module