|
@@ -385,7 +385,7 @@ While Not InkjetRs.EOF |
|
|
oRsKitLabels("OutboundSerial") = serialStart |
|
|
oRsKitLabels("OutboundSerial") = serialStart |
|
|
oRsKitLabels("InBoundSerial") = serialStart + 1 |
|
|
oRsKitLabels("InBoundSerial") = serialStart + 1 |
|
|
oRsKitLabels("OutboundIMBDigits") = KitRs("OutBoundSTID").Value & Mid & serialStart |
|
|
oRsKitLabels("OutboundIMBDigits") = KitRs("OutBoundSTID").Value & Mid & serialStart |
|
|
oRsKitLabels("InBoundIMBDigits") = KitRs("InboundSTID").Value & serialStart + 1 & Jcode |
|
|
|
|
|
|
|
|
oRsKitLabels("InBoundIMBDigits") = KitRs("InboundSTID").Value & Mid & serialStart + 1 & Jcode |
|
|
End If |
|
|
End If |
|
|
oRsKitLabels.Update |
|
|
oRsKitLabels.Update |
|
|
oConn.Execute("UPDATE InkjetRecords Set [KitLabelID]=" & KitLabelID & " WHERE ID=" & InkjetRs("ID") & ";") |
|
|
oConn.Execute("UPDATE InkjetRecords Set [KitLabelID]=" & KitLabelID & " WHERE ID=" & InkjetRs("ID") & ";") |
|
|