diff --git a/SalesPacking_MES_API_Project/mySQLAddress.vb b/SalesPacking_MES_API_Project/mySQLAddress.vb index c65420e..21ded80 100644 --- a/SalesPacking_MES_API_Project/mySQLAddress.vb +++ b/SalesPacking_MES_API_Project/mySQLAddress.vb @@ -199,15 +199,19 @@ 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 - prodInSerial(prodCode) = serial + 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 + comInCount(prodCode) += ckCount Else MsgBox("잘못된 데이터가 개입되었습니다", vbCritical) Return True