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

보급형 모델 기존 key(88code) - value(itemcode) 에서 체험판 품목 추가되어 key(itemcode) - value(88code)로 수정

Browse Source
This commit is contained in:
hyelinjung 2026-02-19 10:00:00 +09:00
parent ef6602d000
commit f632ccf10c
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
OrderPackingProcessor/mainForm.vb
View File

@ -1,4 +1,4 @@
Imports System.IO Imports System.IO
Imports System.IO.Ports Imports System.IO.Ports
Imports System.Management Imports System.Management
Imports System.Reflection.Emit Imports System.Reflection.Emit
@ -248,7 +248,7 @@ Public Class mainForm
Private defaultData(defaultList.refer) As String Private defaultData(defaultList.refer) As String
''보급형 88코드 ''보급형 88코드
Private lowProdList As New Dictionary(Of String, String) ''key:88 vlaue: itemcode Private lowProdList As New Dictionary(Of String, String) ''key: itemcode value: 88_Code
''보급형 기기 포함 ''보급형 기기 포함
Private lowProdContain As Boolean = False Private lowProdContain As Boolean = False
'' 세트코드 '' 세트코드
@ -321,7 +321,7 @@ Public Class mainForm
If DBQueryReader(cmd) Then If DBQueryReader(cmd) Then
For i = 0 To sqlDataQuery.Length - 1 For i = 0 To sqlDataQuery.Length - 1
If i Mod 2 = 1 Then If i Mod 2 = 1 Then
lowProdList.Add(sqlDataQuery(queryFlag - 1), sqlDataQuery(queryFlag)) lowProdList.Add(sqlDataQuery(queryFlag), sqlDataQuery(queryFlag - 1))
End If End If
queryFlag += 1 queryFlag += 1
Next Next
@ -3756,7 +3756,7 @@ Public Class mainForm
End If End If
Else Else
If orderSwitch = True Then If orderSwitch = True Then
If lowProdList.ContainsKey(playCode) Then If lowProdList.ContainsValue(playCode) Then
If oybtn.Checked Then If oybtn.Checked Then
Return "PRODSCAN" Return "PRODSCAN"
Else Else
@ -4173,7 +4173,7 @@ Public Class mainForm
errorGen("등록 데이터 중 제품이 등록되어 있지 않는 항목이 존재합니다.") errorGen("등록 데이터 중 제품이 등록되어 있지 않는 항목이 존재합니다.")
Return False Return False
End If End If
If lowProdList.ContainsValue(prodArray(itemCode.code, dataCount)) And lowProdContain = False Then If lowProdList.ContainsKey(prodArray(itemCode.code, dataCount)) And lowProdContain = False Then
lowProdContain = True lowProdContain = True
End If End If