shpmt-OrderPackingProcessor/OrderPackingProcessor/mySQLAddress.vb

Module mySQLAddress
    Private Const mainOrderDB As String = "jomtOrderDB.jomtOrderTbl"
    Private Const testOrderDB As String = "jomtOrderTestDB.jomtOrderTbl"

    Private Const mainSalesDB As String = "jomtTesterDB.jomtSalesPackingTbl"
    Private Const testSalesDB As String = "jomtTesterServerDB.jomtSalesPackingTbl"

    Private Const mainCountDB As String = "jomtTesterDB.jomtPackingCount"
    Private Const testCountDB As String = "jomtTesterServerDB.jomtPackingCount"

    Private Const mainCartDB As String = "jomtTesterDB.jomtCartridgeTbl"
    Private Const testCartDB As String = "jomtTesterServerDB.jomtCartridgeTbl"

    Private Const mainProdDB As String = "jomtTesterDB.jomtProductTbl"
    Private Const testProdDB As String = "jomtTesterServerDB.jomtProductTbl"

    Private Const mainDivDB As String = "jomtTesterDB.jomtDeviceTbl"
    Private Const testDivDB As String = "jomtTesterServerDB.jomtDeviceTbl"

    Private Const mainPlistDB As String = "jomtTesterDB.jomtProdList"
    Private Const testPlistDB As String = "jomtTesterServerDB.jomtProdList"

    Private Const mainClistDB As String = "jomtTesterDB.jomtComponentTbl"
    Private Const testClistDB As String = "jomtTesterServerDB.jomtComponentTbl"

    Private Const mainPackEvent As String = "jomtTesterDB.jomtPackEvent"
    Private Const testPackEvent As String = "jomtTesterServerDB.jomtPackEvent"

    Private Const mainPKCodeDB As String = "jomtTesterDB.jomtPKCodeTbl"

    Private Const testHistoryDB As String = "jomtTesterServerDB.jomtPackHistoryTbl"
    Private Const testPackDB As String = "jomtTesterServerDB.jomtSalesPackingTbl_New"

    Private Const MainNonTDDB As String = "jomtTesterDB.jomtNonTDTbl"
    Private Const TestNonTDDB As String = "jomtTesterServerDB.jomtNonTDTbl"

    Private Const mainModelInfoDB As String = "jomtTesterDB.jomtModelInfoTbl"
    Private Const testModelInfoDB As String = "jomtTesterServerDB.jomtModelInfoTbl"

    Public applyOrderDB As String = mainOrderDB
    Public applySalesDB As String = mainSalesDB
    Public applyCountDB As String = mainCountDB
    Public applyCartDB As String = mainCartDB
    Public applyProdDB As String = mainProdDB
    Public applyDivDB As String = mainDivDB
    Public applyPlistDB As String = mainPlistDB
    Public applyClistDB As String = mainClistDB
    Public applyPackEvent As String = mainPackEvent
    Public applyPKCodeDB As String = mainPKCodeDB
    Public applyNonTDDB As String = MainNonTDDB
    Public ApplyModelInfoDB As String = mainModelInfoDB

    Public applyPackDB As String = testPackDB
    Public applyHistoryDB As String = testHistoryDB

    Public Enum countSaveList
        normal
        autopack
        autoWeight
    End Enum

    Public Enum dbCode
        prodDBcode
        comDBcode
    End Enum

    Public Enum prodDB
        packingCount
        proset
        luxset
        proface
        luxface
        proeye
        luxeye
        probody
        luxbody
        maximum
        alphaSet
        alphaFace
        alphaEye
        alphaBody
        alto
        effect
        effectV3
        maximumAlpha
        optimum
        '신규제품추가 : 추가하는 품목의 변수 추가
    End Enum
    Public prodDB_max_index As Integer = [Enum].GetNames(GetType(prodDB)).Length - 1
    Public prodDBCount(prodDB_max_index) As Integer    '' DB 저장
    Public prodInCount(prodDB_max_index) As Integer    '' 패킹 저장 10
    Public prodComCount(prodDB_max_index) As Integer   '' 로컬 저장
    Public prodInSerial(prodDB_max_index) As String    '' LogData 저장
    Public prodPackCommand(prodDB_max_index) As String  ''

    Public Enum comDB
        mask5
        mask10
        hairband
        gel
        minigel
        ample
        cream
        umb
        fen
        charger
        cable
        toner
        problack
        probeige
        prored
        propink
        maxblack
        maxapr
        maxmint
        maxbeige
        soothing
        car0
        car1
        car2
        car3
        car4
        car5
        car6
        bag
        cosbag
        dustbag
        maxPurple
        proSnakeBlack
        kollagen
        kollagenset
        kollagen_P
        kollagenset_P
        cleansingWater
        tonerPad
        maxSaffianoBK
        hologram1
        hologram3
        hologram5
        caseSaffianoPp
        maxYellow
        Kollagen_Pe1
        Kollagen_Pe3
        Kollagen_Pe5
        ATCircleCase
        APSquareCase
        maxPeach
        massageSoothing
        maxSMint
        meshpouch
        firmingAmp
        hyaluronicAmp
        nightshot
        morningshot
        casemaxwoodi
        Elicolltoner
        Elicollamp
        Elicollcream
        Elihyaltoner
        Elihyalamp
        Elihyalcream
        Dayshot
        Beautyshopbag
        Gummy
        Stickjelly
        Newyearbag
        Emsbelt
        Beltbag
        Dayshot2
        Elixir
        Elixirpremium
        Emsbeltcontrollset
        FabricBag
        Goldshopbag
        MorNigshotset
        CTBox
        ElesqLiftingToner
        ElesqLiftingCeam
        ElesqLiftingECream
        ElesqLiftingAmp
        ElesqAquaToner
        ElesqAquaCeam
        ElesqAquaECream
        ElesqAquaAmp
        car8
        keyring
        DoenaLiftingToner
        DoenaLiftingAmp
        DoenaLiftingCream
        FirmingCollagenGel
        keyringSally
        beautykitHairband
        beautykitMirrorS
        beautykitMirrorL
        bloomingMoistureGel150
        firmingCollagenGel150
        tweedCase
        bloomingMoistureGel250
        '신규구성품추가 : 추가하는 품목의 변수 추가
    End Enum
    Public comDB_max_index As Integer = [Enum].GetNames(GetType(comDB)).Length - 1
    Public comDBCount(comDB_max_index) As Integer   ''DB 저장
    Public comInCount(comDB_max_index) As Integer   '' 패킹 저장 32 + 10 = 42 - 1 = 41
    Public comComCount(comDB_max_index) As Integer  '' 로컬 저장

    Public countCommand(prodInCount.Length + comInCount.Length - 1) As String

    Public Function packingCountset(dbType As Int16, prodCode As Int16, ckCount As Int16, serial As String)
        If dbType = dbCode.prodDBcode Then
            If prodCode >= prodDB.proset And prodCode <= prodDB_max_index Then
                prodInCount(prodCode) += ckCount
                If prodInSerial(prodCode) = Nothing Then
                    prodInSerial(prodCode) = serial
                Else
                    prodInSerial(prodCode) = prodInSerial(prodCode) & "/" & serial
                End If
            Else
                MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
                Return True
            End If
        Else
            If prodCode >= comDB.mask5 And prodCode <= comDB_max_index Then
                comInCount(prodCode) += ckCount
            Else
                MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
                Return True
            End If
        End If

        Return False
    End Function

    Public Sub countCommandFunc(saveType As Int16)

        Select Case saveType
            Case countSaveList.normal

                countCommand(prodDB.packingCount) = "PackingCount"
                countCommand(prodDB.proset) = "ProSetCnt"
                countCommand(prodDB.luxset) = "LuxSetCnt"
                countCommand(prodDB.proface) = "ProFaceCnt"
                countCommand(prodDB.luxface) = "LuxFaceCnt"
                countCommand(prodDB.proeye) = "ProEyeCnt"
                countCommand(prodDB.luxeye) = "LuxEyeCnt"
                countCommand(prodDB.probody) = "ProBodyCnt"
                countCommand(prodDB.luxbody) = "LuxBodyCnt"
                countCommand(prodDB.maximum) = "MAXIMUMCnt"
                countCommand(prodDB.alphaSet) = "AlphaSetCnt"
                countCommand(prodDB.alphaFace) = "AlphaFaceCnt"
                countCommand(prodDB.alphaEye) = "AlphaEyeCnt"
                countCommand(prodDB.alphaBody) = "AlphaBodyCnt"
                countCommand(prodDB.alto) = "AltoCnt"
                countCommand(prodDB.effect) = "EffectCnt"
                countCommand(prodDB.effectV3) = "EffectV3Cnt"
                countCommand(prodDB.maximumAlpha) = "MAXIMUMALPHACnt"
                countCommand(prodDB.optimum) = "OptimumCnt"
                '신규제품추가 : 추가한 prodDB 수량을 DB에 저장하기 위해 jomtPackingCount 에 생성한 일반동작 컬럼명 추가

                countCommand(prodInCount.Length + comDB.mask5) = "Mask5Cnt"
                countCommand(prodInCount.Length + comDB.mask10) = "Mask10Cnt"
                countCommand(prodInCount.Length + comDB.hairband) = "HairBandCnt"
                countCommand(prodInCount.Length + comDB.gel) = "GelCnt"
                countCommand(prodInCount.Length + comDB.minigel) = "MiniGel"
                countCommand(prodInCount.Length + comDB.ample) = "AmpleCnt"
                countCommand(prodInCount.Length + comDB.cream) = "CreamCnt"
                countCommand(prodInCount.Length + comDB.umb) = "UmbrellaCnt"
                countCommand(prodInCount.Length + comDB.fen) = "FenCnt"
                countCommand(prodInCount.Length + comDB.charger) = "ChargerCnt"
                countCommand(prodInCount.Length + comDB.cable) = "CableCnt"
                countCommand(prodInCount.Length + comDB.toner) = "TonerCnt"
                countCommand(prodInCount.Length + comDB.problack) = "CasePROBlack"
                countCommand(prodInCount.Length + comDB.probeige) = "CasePROBeige"
                countCommand(prodInCount.Length + comDB.prored) = "CasePRORed"
                countCommand(prodInCount.Length + comDB.propink) = "CasePROPink"
                countCommand(prodInCount.Length + comDB.maxblack) = "CaseMAXBlack"
                countCommand(prodInCount.Length + comDB.maxapr) = "CaseMAXApr"
                countCommand(prodInCount.Length + comDB.maxmint) = "CaseMAXMint"
                countCommand(prodInCount.Length + comDB.maxbeige) = "CaseMAXBeige"
                countCommand(prodInCount.Length + comDB.soothing) = "SoothingGelCnt"
                countCommand(prodInCount.Length + comDB.car0) = "Carton0Cnt"
                countCommand(prodInCount.Length + comDB.car1) = "Carton1Cnt"
                countCommand(prodInCount.Length + comDB.car2) = "Carton2Cnt"
                countCommand(prodInCount.Length + comDB.car3) = "Carton3Cnt"
                countCommand(prodInCount.Length + comDB.car4) = "Carton4Cnt"
                countCommand(prodInCount.Length + comDB.car5) = "Carton5Cnt"
                countCommand(prodInCount.Length + comDB.car6) = "Carton6Cnt"
                countCommand(prodInCount.Length + comDB.bag) = "BagCnt"
                countCommand(prodInCount.Length + comDB.cosbag) = "CosBagCnt"
                countCommand(prodInCount.Length + comDB.dustbag) = "DustBagCnt"
                countCommand(prodInCount.Length + comDB.maxPurple) = "CaseMAXPurple"
                countCommand(prodInCount.Length + comDB.proSnakeBlack) = "CasePROSnakeBlack"
                countCommand(prodInCount.Length + comDB.kollagen) = "KollagenCnt"
                countCommand(prodInCount.Length + comDB.kollagenset) = "KollagenSetCnt"
                countCommand(prodInCount.Length + comDB.kollagen_P) = "Kollagen_PCnt"
                countCommand(prodInCount.Length + comDB.kollagenset_P) = "KollagenSet_PCnt"
                countCommand(prodInCount.Length + comDB.cleansingWater) = "CleansingWaterCnt"
                countCommand(prodInCount.Length + comDB.tonerPad) = "TonerPadCnt"
                countCommand(prodInCount.Length + comDB.maxSaffianoBK) = "CaseMaxSafBK"
                countCommand(prodInCount.Length + comDB.hologram1) = "Hologram_1Cnt"
                countCommand(prodInCount.Length + comDB.hologram3) = "Hologram_3Cnt"
                countCommand(prodInCount.Length + comDB.hologram5) = "Hologram_5Cnt"
                countCommand(prodInCount.Length + comDB.caseSaffianoPp) = "CaseMaxSafPp"
                countCommand(prodInCount.Length + comDB.maxYellow) = "CaseMaxYellow"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe1) = "Kollagen_Pe1Cnt"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe3) = "Kollagen_Pe3Cnt"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe5) = "Kollagen_Pe5Cnt"
                countCommand(prodInCount.Length + comDB.ATCircleCase) = "ATCircleCaseCnt"
                countCommand(prodInCount.Length + comDB.APSquareCase) = "APSquareCaseCnt"
                countCommand(prodInCount.Length + comDB.maxPeach) = "CaseMAXPeach"
                countCommand(prodInCount.Length + comDB.massageSoothing) = "MasSoothingCnt"
                countCommand(prodInCount.Length + comDB.maxSMint) = "CaseMAXSMint"
                countCommand(prodInCount.Length + comDB.meshpouch) = "MeshPouchCnt"
                countCommand(prodInCount.Length + comDB.firmingAmp) = "FirmingAmpCnt"
                countCommand(prodInCount.Length + comDB.hyaluronicAmp) = "HyaluronicAmpCnt"
                countCommand(prodInCount.Length + comDB.nightshot) = "nightshotcnt"
                countCommand(prodInCount.Length + comDB.morningshot) = "morningshotcnt"
                countCommand(prodInCount.Length + comDB.casemaxwoodi) = "casemaxwoodicnt"
                countCommand(prodInCount.Length + comDB.Elicolltoner) = "Elicolltonercnt"
                countCommand(prodInCount.Length + comDB.Elicollamp) = "Elicollampcnt"
                countCommand(prodInCount.Length + comDB.Elicollcream) = "Elicollcreamcnt"
                countCommand(prodInCount.Length + comDB.Elihyaltoner) = "Elihyaltonercnt"
                countCommand(prodInCount.Length + comDB.Elihyalamp) = "Elihyalampcnt"
                countCommand(prodInCount.Length + comDB.Elihyalcream) = "Elihyalcreamcnt"
                countCommand(prodInCount.Length + comDB.Dayshot) = "Dayshotcnt"
                countCommand(prodInCount.Length + comDB.Beautyshopbag) = "Beautyshopbagcnt"
                countCommand(prodInCount.Length + comDB.Gummy) = "Gummycnt"
                countCommand(prodInCount.Length + comDB.Stickjelly) = "Stickjellycnt"
                countCommand(prodInCount.Length + comDB.Newyearbag) = "Newyearbagcnt"
                countCommand(prodInCount.Length + comDB.Emsbelt) = "Emsbeltcnt"
                countCommand(prodInCount.Length + comDB.Beltbag) = "Beltbagcnt"
                countCommand(prodInCount.Length + comDB.Dayshot2) = "Dayshot2cnt"
                countCommand(prodInCount.Length + comDB.Elixir) = "Elixircnt"
                countCommand(prodInCount.Length + comDB.Elixirpremium) = "Elixirpremiumcnt"
                countCommand(prodInCount.Length + comDB.Emsbeltcontrollset) = "Emsbeltcontrollsetcnt"
                countCommand(prodInCount.Length + comDB.FabricBag) = "FabricBagcnt"
                countCommand(prodInCount.Length + comDB.Goldshopbag) = "Goldshopbagcnt"
                countCommand(prodInCount.Length + comDB.MorNigshotset) = "MorNigshotsetcnt"
                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"
                countCommand(prodInCount.Length + comDB.car8) = "Carton8Cnt"
                countCommand(prodInCount.Length + comDB.keyring) = "KeyringCnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingToner) = "DoenaLiftingTonercnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingAmp) = "DoenaLiftingAmpcnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingCream) = "DoenaLiftingCreamcnt"
                countCommand(prodInCount.Length + comDB.FirmingCollagenGel) = "FirmingCollagenGelcnt"
                countCommand(prodInCount.Length + comDB.keyringSally) = "KeyringSallyCnt"
                countCommand(prodInCount.Length + comDB.beautykitHairband) = "BeautykitHairbandCnt"
                countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "BeautykitMirrorSCnt"
                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 에 생성한 일반동작 컬럼명 추가

            Case countSaveList.autopack

                countCommand(prodDB.packingCount) = "AutoPackCnt"
                countCommand(prodDB.proset) = "APProSetCnt"
                countCommand(prodDB.luxset) = "APLuxSetCnt"
                countCommand(prodDB.proface) = "APProFaceCnt"
                countCommand(prodDB.luxface) = "APLuxFaceCnt"
                countCommand(prodDB.proeye) = "APProEyeCnt"
                countCommand(prodDB.luxeye) = "APLuxEyeCnt"
                countCommand(prodDB.probody) = "APProBodyCnt"
                countCommand(prodDB.luxbody) = "APLuxBodyCnt"
                countCommand(prodDB.maximum) = "APMAXIMUMCnt"
                countCommand(prodDB.alphaSet) = "APAlphaSetCnt"
                countCommand(prodDB.alphaFace) = "APAlphaFaceCnt"
                countCommand(prodDB.alphaEye) = "APAlphaEyeCnt"
                countCommand(prodDB.alphaBody) = "APAlphaBodyCnt"
                countCommand(prodDB.alto) = "APAltoCnt"
                countCommand(prodDB.effect) = "APEffectCnt"
                countCommand(prodDB.effectV3) = "APEffectV3Cnt"
                countCommand(prodDB.maximumAlpha) = "APMAXIMUMALPHACnt"
                countCommand(prodDB.optimum) = "APOptimumCnt"
                '신규제품추가 : 추가한 prodDB 수량을 DB에 저장하기 위해 jomtPackingCount 에 생성한 자동화동작(포장) 컬럼명 추가

                countCommand(prodInCount.Length + comDB.mask5) = "APMask5Cnt"
                countCommand(prodInCount.Length + comDB.mask10) = "APMask10Cnt"
                countCommand(prodInCount.Length + comDB.hairband) = "APHairBandCnt"
                countCommand(prodInCount.Length + comDB.gel) = "APGelCnt"
                countCommand(prodInCount.Length + comDB.minigel) = "APMiniGel"
                countCommand(prodInCount.Length + comDB.ample) = "APAmpleCnt"
                countCommand(prodInCount.Length + comDB.cream) = "APCreamCnt"
                countCommand(prodInCount.Length + comDB.umb) = "APUmbrellaCnt"
                countCommand(prodInCount.Length + comDB.fen) = "APFenCnt"
                countCommand(prodInCount.Length + comDB.charger) = "APChargerCnt"
                countCommand(prodInCount.Length + comDB.cable) = "APCableCnt"
                countCommand(prodInCount.Length + comDB.toner) = "APTonerCnt"
                countCommand(prodInCount.Length + comDB.problack) = "APCasePROBlack"
                countCommand(prodInCount.Length + comDB.probeige) = "APCasePROBeige"
                countCommand(prodInCount.Length + comDB.prored) = "APCasePRORed"
                countCommand(prodInCount.Length + comDB.propink) = "APCasePROPink"
                countCommand(prodInCount.Length + comDB.maxblack) = "APCaseMAXBlack"
                countCommand(prodInCount.Length + comDB.maxapr) = "APCaseMAXApr"
                countCommand(prodInCount.Length + comDB.maxmint) = "APCaseMAXMint"
                countCommand(prodInCount.Length + comDB.maxbeige) = "APCaseMAXBeige"
                countCommand(prodInCount.Length + comDB.soothing) = "APSoothingGelCnt"
                countCommand(prodInCount.Length + comDB.car0) = "APCarton0Cnt"
                countCommand(prodInCount.Length + comDB.car1) = "APCarton1Cnt"
                countCommand(prodInCount.Length + comDB.car2) = "APCarton2Cnt"
                countCommand(prodInCount.Length + comDB.car3) = "APCarton3Cnt"
                countCommand(prodInCount.Length + comDB.car4) = "APCarton4Cnt"
                countCommand(prodInCount.Length + comDB.car5) = "APCarton5Cnt"
                countCommand(prodInCount.Length + comDB.car6) = "APCarton6Cnt"
                countCommand(prodInCount.Length + comDB.bag) = "APBagCnt"
                countCommand(prodInCount.Length + comDB.cosbag) = "APCosBagCnt"
                countCommand(prodInCount.Length + comDB.dustbag) = "APDustBagCnt"
                countCommand(prodInCount.Length + comDB.maxPurple) = "APCaseMAXPurple"
                countCommand(prodInCount.Length + comDB.proSnakeBlack) = "APCasePROSnakeBlack"
                countCommand(prodInCount.Length + comDB.kollagen) = "APKollagenCnt"
                countCommand(prodInCount.Length + comDB.kollagenset) = "APKollagenSetCnt"
                countCommand(prodInCount.Length + comDB.kollagen_P) = "APKollagen_PCnt"
                countCommand(prodInCount.Length + comDB.kollagenset_P) = "APKollagenSet_PCnt"
                countCommand(prodInCount.Length + comDB.cleansingWater) = "APCleansingWaterCnt"
                countCommand(prodInCount.Length + comDB.tonerPad) = "APTonerPadCnt"
                countCommand(prodInCount.Length + comDB.maxSaffianoBK) = "APCaseMaxSafBK"
                countCommand(prodInCount.Length + comDB.hologram1) = "APHologram_1Cnt"
                countCommand(prodInCount.Length + comDB.hologram3) = "APHologram_3Cnt"
                countCommand(prodInCount.Length + comDB.hologram5) = "APHologram_5Cnt"
                countCommand(prodInCount.Length + comDB.caseSaffianoPp) = "APCaseMaxSafPp"
                countCommand(prodInCount.Length + comDB.maxYellow) = "APCaseMaxYellow"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe1) = "APKollagen_Pe1Cnt"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe3) = "APKollagen_Pe3Cnt"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe5) = "APKollagen_Pe5Cnt"
                countCommand(prodInCount.Length + comDB.ATCircleCase) = "APATCircleCaseCnt"
                countCommand(prodInCount.Length + comDB.APSquareCase) = "APAPSquareCaseCnt"
                countCommand(prodInCount.Length + comDB.maxPeach) = "APCaseMAXPeach"
                countCommand(prodInCount.Length + comDB.massageSoothing) = "APMasSoothingCnt"
                countCommand(prodInCount.Length + comDB.maxSMint) = "APCaseMAXSMint"
                countCommand(prodInCount.Length + comDB.meshpouch) = "APMeshPouchCnt"
                countCommand(prodInCount.Length + comDB.firmingAmp) = "APFirmingAmpCnt"
                countCommand(prodInCount.Length + comDB.hyaluronicAmp) = "APHyaluronicAmpCnt"
                countCommand(prodInCount.Length + comDB.nightshot) = "APnightshotcnt"
                countCommand(prodInCount.Length + comDB.morningshot) = "APmorningshotcnt"
                countCommand(prodInCount.Length + comDB.casemaxwoodi) = "APcasemaxwoodicnt"
                countCommand(prodInCount.Length + comDB.Elicolltoner) = "APElicolltonercnt"
                countCommand(prodInCount.Length + comDB.Elicollamp) = "APElicollampcnt"
                countCommand(prodInCount.Length + comDB.Elicollcream) = "APElicollcreamcnt"
                countCommand(prodInCount.Length + comDB.Elihyaltoner) = "APElihyaltonercnt"
                countCommand(prodInCount.Length + comDB.Elihyalamp) = "APElihyalampcnt"
                countCommand(prodInCount.Length + comDB.Elihyalcream) = "APElihyalcreamcnt"
                countCommand(prodInCount.Length + comDB.Dayshot) = "APDayshotcnt"
                countCommand(prodInCount.Length + comDB.Beautyshopbag) = "APBeautyshopbagcnt"
                countCommand(prodInCount.Length + comDB.Gummy) = "APGummycnt"
                countCommand(prodInCount.Length + comDB.Stickjelly) = "APStickjellycnt"
                countCommand(prodInCount.Length + comDB.Newyearbag) = "APNewyearbagcnt"
                countCommand(prodInCount.Length + comDB.Emsbelt) = "APEmsbeltcnt"
                countCommand(prodInCount.Length + comDB.Beltbag) = "APBeltbagcnt"
                countCommand(prodInCount.Length + comDB.Dayshot2) = "APDayshot2cnt"
                countCommand(prodInCount.Length + comDB.Elixir) = "APElixircnt"
                countCommand(prodInCount.Length + comDB.Elixirpremium) = "APElixirpremiumcnt"
                countCommand(prodInCount.Length + comDB.Emsbeltcontrollset) = "APEmsbeltcontrollsetcnt"
                countCommand(prodInCount.Length + comDB.FabricBag) = "APFabricBagcnt"
                countCommand(prodInCount.Length + comDB.Goldshopbag) = "APGoldshopbagcnt"
                countCommand(prodInCount.Length + comDB.MorNigshotset) = "APMorNigshotsetcnt"
                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"
                countCommand(prodInCount.Length + comDB.car8) = "APCarton8Cnt"
                countCommand(prodInCount.Length + comDB.keyring) = "APKeyringCnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingToner) = "APDoenaLiftingTonercnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingAmp) = "APDoenaLiftingAmpcnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingCream) = "APDoenaLiftingCreamcnt"
                countCommand(prodInCount.Length + comDB.FirmingCollagenGel) = "APFirmingCollagenGelcnt"
                countCommand(prodInCount.Length + comDB.keyringSally) = "APKeyringSallyCnt"
                countCommand(prodInCount.Length + comDB.beautykitHairband) = "APBeautykitHairbandCnt"
                countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "APBeautykitMirrorSCnt"
                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 에 생성한 자동화동작(포장) 컬럼명 추가

            Case countSaveList.autoWeight

                countCommand(prodDB.packingCount) = "AutoWeightCnt"
                countCommand(prodDB.proset) = "AWProSetCnt"
                countCommand(prodDB.luxset) = "AWLuxSetCnt"
                countCommand(prodDB.proface) = "AWProFaceCnt"
                countCommand(prodDB.luxface) = "AWLuxFaceCnt"
                countCommand(prodDB.proeye) = "AWProEyeCnt"
                countCommand(prodDB.luxeye) = "AWLuxEyeCnt"
                countCommand(prodDB.probody) = "AWProBodyCnt"
                countCommand(prodDB.luxbody) = "AWLuxBodyCnt"
                countCommand(prodDB.maximum) = "AWMAXIMUMCnt"
                countCommand(prodDB.alphaSet) = "AWAlphaSetCnt"
                countCommand(prodDB.alphaFace) = "AWAlphaFaceCnt"
                countCommand(prodDB.alphaEye) = "AWAlphaEyeCnt"
                countCommand(prodDB.alphaBody) = "AWAlphaBodyCnt"
                countCommand(prodDB.alto) = "AWAltoCnt"
                countCommand(prodDB.effect) = "AWEffectCnt"
                countCommand(prodDB.effectV3) = "AWEffectV3Cnt"
                countCommand(prodDB.maximumAlpha) = "AWMAXIMUMALPHACnt"
                countCommand(prodDB.optimum) = "AWOptimumCnt"
                '신규제품추가 : 추가한 prodDB 수량을 DB에 저장하기 위해 jomtPackingCount 에 생성한 자동화동작(무게측정) 컬럼명 추가

                countCommand(prodInCount.Length + comDB.mask5) = "AWMask5Cnt"
                countCommand(prodInCount.Length + comDB.mask10) = "AWMask10Cnt"
                countCommand(prodInCount.Length + comDB.hairband) = "AWHairBandCnt"
                countCommand(prodInCount.Length + comDB.gel) = "AWGelCnt"
                countCommand(prodInCount.Length + comDB.minigel) = "AWMiniGel"
                countCommand(prodInCount.Length + comDB.ample) = "AWAmpleCnt"
                countCommand(prodInCount.Length + comDB.cream) = "AWCreamCnt"
                countCommand(prodInCount.Length + comDB.umb) = "AWUmbrellaCnt"
                countCommand(prodInCount.Length + comDB.fen) = "AWFenCnt"
                countCommand(prodInCount.Length + comDB.charger) = "AWChargerCnt"
                countCommand(prodInCount.Length + comDB.cable) = "AWCableCnt"
                countCommand(prodInCount.Length + comDB.toner) = "AWTonerCnt"
                countCommand(prodInCount.Length + comDB.problack) = "AWCasePROBlack"
                countCommand(prodInCount.Length + comDB.probeige) = "AWCasePROBeige"
                countCommand(prodInCount.Length + comDB.prored) = "AWCasePRORed"
                countCommand(prodInCount.Length + comDB.propink) = "AWCasePROPink"
                countCommand(prodInCount.Length + comDB.maxblack) = "AWCaseMAXBlack"
                countCommand(prodInCount.Length + comDB.maxapr) = "AWCaseMAXApr"
                countCommand(prodInCount.Length + comDB.maxmint) = "AWCaseMAXMint"
                countCommand(prodInCount.Length + comDB.maxbeige) = "AWCaseMAXBeige"
                countCommand(prodInCount.Length + comDB.soothing) = "AWSoothingGelCnt"
                countCommand(prodInCount.Length + comDB.car0) = "AWCarton0Cnt"
                countCommand(prodInCount.Length + comDB.car1) = "AWCarton1Cnt"
                countCommand(prodInCount.Length + comDB.car2) = "AWCarton2Cnt"
                countCommand(prodInCount.Length + comDB.car3) = "AWCarton3Cnt"
                countCommand(prodInCount.Length + comDB.car4) = "AWCarton4Cnt"
                countCommand(prodInCount.Length + comDB.car5) = "AWCarton5Cnt"
                countCommand(prodInCount.Length + comDB.car6) = "AWCarton6Cnt"
                countCommand(prodInCount.Length + comDB.bag) = "AWBagCnt"
                countCommand(prodInCount.Length + comDB.cosbag) = "AWCosBagCnt"
                countCommand(prodInCount.Length + comDB.dustbag) = "AWDustBagCnt"
                countCommand(prodInCount.Length + comDB.maxPurple) = "AWCaseMAXPurple"
                countCommand(prodInCount.Length + comDB.proSnakeBlack) = "AWCasePROSnakeBlack"
                countCommand(prodInCount.Length + comDB.kollagen) = "AWKollagenCnt"
                countCommand(prodInCount.Length + comDB.kollagenset) = "AWKollagenSetCnt"
                countCommand(prodInCount.Length + comDB.kollagen_P) = "AWKollagen_PCnt"
                countCommand(prodInCount.Length + comDB.kollagenset_P) = "AWKollagenSet_PCnt"
                countCommand(prodInCount.Length + comDB.cleansingWater) = "AWCleansingWaterCnt"
                countCommand(prodInCount.Length + comDB.tonerPad) = "AWTonerPadCnt"
                countCommand(prodInCount.Length + comDB.maxSaffianoBK) = "AWCaseMaxSafBK"
                countCommand(prodInCount.Length + comDB.hologram1) = "AWHologram_1Cnt"
                countCommand(prodInCount.Length + comDB.hologram3) = "AWHologram_3Cnt"
                countCommand(prodInCount.Length + comDB.hologram5) = "AWHologram_5Cnt"
                countCommand(prodInCount.Length + comDB.caseSaffianoPp) = "AWCaseMaxSafPp"
                countCommand(prodInCount.Length + comDB.maxYellow) = "AWCaseMaxYellow"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe1) = "AWKollagen_Pe1Cnt"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe3) = "AWKollagen_Pe3Cnt"
                countCommand(prodInCount.Length + comDB.Kollagen_Pe5) = "AWKollagen_Pe5Cnt"
                countCommand(prodInCount.Length + comDB.ATCircleCase) = "AWATCircleCaseCnt"
                countCommand(prodInCount.Length + comDB.APSquareCase) = "AWAPSquareCaseCnt"
                countCommand(prodInCount.Length + comDB.maxPeach) = "AWCaseMAXPeach"
                countCommand(prodInCount.Length + comDB.massageSoothing) = "AWMasSoothingCnt"
                countCommand(prodInCount.Length + comDB.maxSMint) = "AWCaseMAXSMint"
                countCommand(prodInCount.Length + comDB.meshpouch) = "AWMeshPouchCnt"
                countCommand(prodInCount.Length + comDB.firmingAmp) = "AWFirmingAmpCnt"
                countCommand(prodInCount.Length + comDB.hyaluronicAmp) = "AWHyaluronicAmpCnt"
                countCommand(prodInCount.Length + comDB.nightshot) = "AWnightshotcnt"
                countCommand(prodInCount.Length + comDB.morningshot) = "AWmorningshotcnt"
                countCommand(prodInCount.Length + comDB.casemaxwoodi) = "AWcasemaxwoodicnt"
                countCommand(prodInCount.Length + comDB.Elicolltoner) = "AWElicolltonercnt"
                countCommand(prodInCount.Length + comDB.Elicollamp) = "AWElicollampcnt"
                countCommand(prodInCount.Length + comDB.Elicollcream) = "AWElicollcreamcnt"
                countCommand(prodInCount.Length + comDB.Elihyaltoner) = "AWElihyaltonercnt"
                countCommand(prodInCount.Length + comDB.Elihyalamp) = "AWElihyalampcnt"
                countCommand(prodInCount.Length + comDB.Elihyalcream) = "AWElihyalcreamcnt"
                countCommand(prodInCount.Length + comDB.Dayshot) = "AWDayshotcnt"
                countCommand(prodInCount.Length + comDB.Beautyshopbag) = "AWBeautyshopbagcnt"
                countCommand(prodInCount.Length + comDB.Gummy) = "AWGummycnt"
                countCommand(prodInCount.Length + comDB.Stickjelly) = "AWStickjellycnt"
                countCommand(prodInCount.Length + comDB.Newyearbag) = "AWNewyearbagcnt"
                countCommand(prodInCount.Length + comDB.Emsbelt) = "AWEmsbeltcnt"
                countCommand(prodInCount.Length + comDB.Beltbag) = "AWBeltbagcnt"
                countCommand(prodInCount.Length + comDB.Dayshot2) = "AWDayshot2cnt"
                countCommand(prodInCount.Length + comDB.Elixir) = "AWElixircnt"
                countCommand(prodInCount.Length + comDB.Elixirpremium) = "AWElixirpremiumcnt"
                countCommand(prodInCount.Length + comDB.Emsbeltcontrollset) = "AWEmsbeltcontrollsetcnt"
                countCommand(prodInCount.Length + comDB.FabricBag) = "AWFabricBagcnt"
                countCommand(prodInCount.Length + comDB.Goldshopbag) = "AWGoldshopbagcnt"
                countCommand(prodInCount.Length + comDB.MorNigshotset) = "AWMorNigshotsetcnt"
                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"
                countCommand(prodInCount.Length + comDB.car8) = "AWCarton8Cnt"
                countCommand(prodInCount.Length + comDB.keyring) = "AWKeyringCnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingToner) = "AWDoenaLiftingTonercnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingAmp) = "AWDoenaLiftingAmpcnt"
                countCommand(prodInCount.Length + comDB.DoenaLiftingCream) = "AWDoenaLiftingCreamcnt"
                countCommand(prodInCount.Length + comDB.FirmingCollagenGel) = "AWFirmingCollagenGelcnt"
                countCommand(prodInCount.Length + comDB.keyringSally) = "AWKeyringSallyCnt"
                countCommand(prodInCount.Length + comDB.beautykitHairband) = "AWBeautykitHairbandCnt"
                countCommand(prodInCount.Length + comDB.beautykitMirrorS) = "AWBeautykitMirrorSCnt"
                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 에 생성한 자동화동작(무게측정) 컬럼명 추가

        End Select
    End Sub

    Public Sub countDBCommand()
        prodPackCommand(prodDB.proset) = "Main_Product_SN"
        prodPackCommand(prodDB.luxset) = "Main_Product_SN"
        prodPackCommand(prodDB.proface) = "Pro_Face_Serial"
        prodPackCommand(prodDB.luxface) = "Lux_Face_Serial"
        prodPackCommand(prodDB.proeye) = "Pro_Eye_Serial"
        prodPackCommand(prodDB.luxeye) = "Lux_Eye_Serial"
        prodPackCommand(prodDB.probody) = "Pro_Body_Serial"
        prodPackCommand(prodDB.luxbody) = "Lux_Body_Serial"
        prodPackCommand(prodDB.maximum) = "MAXIMUM_SN"
        prodPackCommand(prodDB.alphaSet) = "Alpha_Set_Serial"
        prodPackCommand(prodDB.alphaFace) = "Alpha_Face_Serial"
        prodPackCommand(prodDB.alphaEye) = "Alpha_Eye_Serial"
        prodPackCommand(prodDB.alphaBody) = "Alpha_Body_Serial"
        prodPackCommand(prodDB.alto) = "Alto_Serial"
        prodPackCommand(prodDB.effect) = "Effect_Serial"
        prodPackCommand(prodDB.effectV3) = "EffectV3_Serial"
        prodPackCommand(prodDB.maximumAlpha) = "MAXIMUM_ALPHA_SN"
        prodPackCommand(prodDB.optimum) = "Optimum_Serial"
        '신규제품추가 : 추가한 prodDB 시리얼번호를 DB에 저장하기 위해 jomtSalesPackingTbl 에 생성한 시리얼번호 컬럼명 추가
    End Sub
End Module