fix : CtMaxResult As String, If CtMaxResult = False

MAXIMUM_Product_Program/MainForm.vb

@@ -2904,9 +2904,9 @@ FailLoad:
             DBCmd = "SELECT IFNULL(max(Ct_SN),0) FROM " & ApplyNonTDDB & " WHERE Ct_Manufacture_Year = '" & NowYear & "' AND Ct_Manufacture_Month = '" & NowMonth & "' AND Ct_SN LIKE '" & ClassCode & ColorCode & "%' AND Ct_Model = '" & txbPDModel.Text & "' AND Ct_SN > 100000 AND (Ct_Type = '" & txbPDType.Text & "' OR Ct_Type = 'SET')"
         End If
 
-        Dim CtMaxResult As Integer = DBQueryScalar(DBCmd)
+        Dim CtMaxResult As String = DBQueryScalar(DBCmd)
 
-        If CtMaxResult = 0 Then
+        If CtMaxResult = "False" Then
             MsgBox("최대값을 불러올 수 없습니다.", vbCritical)
             Return "NULL"
         End If

업데이트 내역.txt

@@ -1,4 +1,6 @@
 1. program ver 1.1.12
 2. DBQueryScalar(DBCmd) 의 값이 count인 경우 integer로 받도록 수정
 	- "False" 를 0으로 변경
+	-  Dim CtMaxResult As String = DBQueryScalar(DBCmd)
+	-  If CtMaxResult = "False" Then
 3. prodinputFunc()의 info1, info2 userID 점검 코드 삭제