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

주석 추가

Browse Source
This commit is contained in:
KwakJooYoung 2025-12-11 13:35:55 +09:00
parent 1bc21794a5
commit bbac77a574
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
OrderPackingProcessor/mainForm.vb
View File

@ -1635,6 +1635,7 @@ Public Class mainForm
Dim prodSerial(item_product_max_index) As String Dim prodSerial(item_product_max_index) As String
Dim query_product_serial As String = Nothing Dim query_product_serial As String = Nothing
'제품 ProdCode는 1부터 시작하기에 (1)부터 조회
For i = 1 To item_product_max_index For i = 1 To item_product_max_index
If item_product_list(i).sales_packing_serial_col_nm <> Nothing Then If item_product_list(i).sales_packing_serial_col_nm <> Nothing Then
If query_product_serial <> Nothing Then If query_product_serial <> Nothing Then
@ -2284,6 +2285,7 @@ Public Class mainForm
Private Function packingDBSaveOld(packingCode As String) As Boolean Private Function packingDBSaveOld(packingCode As String) As Boolean
Dim query_product_cnt As String = Nothing Dim query_product_cnt As String = Nothing
'제품 ProdCode ProSet(1),LuxSet(2)는 같은 컬럼을 사용하고 있어, ProSet(1),LuxSet(2)는 아래에서 따로 합산
For i = prodDB.proface To item_product_max_index For i = prodDB.proface To item_product_max_index
If item_product_list(i).sales_packing_cnt_col_nm <> Nothing And item_product_list(i).cnt > 0 Then If item_product_list(i).sales_packing_cnt_col_nm <> Nothing And item_product_list(i).cnt > 0 Then
query_product_cnt = query_product_cnt & ", " & item_product_list(i).sales_packing_cnt_col_nm & " = '" & item_product_list(i).cnt & "'" query_product_cnt = query_product_cnt & ", " & item_product_list(i).sales_packing_cnt_col_nm & " = '" & item_product_list(i).cnt & "'"