diff --git a/ProductFunctionTester/Main_Form.vb b/ProductFunctionTester/Main_Form.vb index 61afb45..bae2a79 100644 --- a/ProductFunctionTester/Main_Form.vb +++ b/ProductFunctionTester/Main_Form.vb @@ -4712,8 +4712,11 @@ RunSuccess: FailMain() End If txbWindow.AppendText("=== 합격 데이터 저장 완료 ===" & vbCrLf) + + ' 합격 처리 완료 후 정상 종료로 이동 + GoTo NormalEnd + ProcessEnd: - Jig_End() txbWindow.AppendText("=== 불합격 데이터 저장 시작 ===" & vbCrLf) ' 불합격 시에도 전체 데이터 저장 로직 실행 If RF_PostReg() Then @@ -4752,6 +4755,7 @@ ProcessEnd: txbWindow.AppendText("=== 불합격 데이터 저장 완료 ===" & vbCrLf) + Jig_End() NormalEnd: myscope.IO.Clear() 'txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf) @@ -5425,7 +5429,6 @@ ProcessEnd: End If End Sub - Private Function CountUpdate() As Boolean If rdbAltoPD.Checked = True Then DBCmd = "UPDATE " & pd1CntTableNow & " SET PD1_AltoCnt = '" & txbDayCount.Text & "', PD1_AltoOkCnt = '" & txbOkCount.Text & "', PD1_AltoNgCnt = '" & txbNgCount.Text & "' WHERE PD1_Date = '" & NowDate & "'"