fix: HIFU 테스트 ProcessEnd, NgEnd 순서 변경

This commit is contained in:
kje97 2025-07-07 11:38:35 +09:00
parent 6ca3c7826c
commit 5bc2a13c72

View File

@ -4062,6 +4062,7 @@ startFail:
txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf) txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf)
End Sub End Sub
Private Sub AltoFunctionPD() Private Sub AltoFunctionPD()
StartTime = MeasureTimeAll(MeasStart) StartTime = MeasureTimeAll(MeasStart)
@ -5058,9 +5059,6 @@ RunSuccess:
End If End If
txbWindow.AppendText("=== 합격 데이터 저장 완료 ===" & vbCrLf) txbWindow.AppendText("=== 합격 데이터 저장 완료 ===" & vbCrLf)
ProcessEnd:
Jig_End()
GoTo NormalEnd
NgEnd: NgEnd:
txbWindow.AppendText("=== 불합격 데이터 저장 시작 ===" & vbCrLf) txbWindow.AppendText("=== 불합격 데이터 저장 시작 ===" & vbCrLf)
If HIFU_PostReg() Then If HIFU_PostReg() Then
@ -5081,15 +5079,8 @@ NgEnd:
FailMain() FailMain()
Else Else
txbWindow.AppendText("CSV Data Save : OK" & vbCrLf) txbWindow.AppendText("CSV Data Save : OK" & vbCrLf)
FailMain()
If TestError = False Then
FailMain()
Else
SuccessMain()
End If
End If End If
Else Else
@ -5110,7 +5101,7 @@ NgEnd:
End If End If
txbWindow.AppendText("=== 불합격 데이터 저장 완료 ===" & vbCrLf) txbWindow.AppendText("=== 불합격 데이터 저장 완료 ===" & vbCrLf)
ProcessEnd:
Jig_End() Jig_End()
NormalEnd: NormalEnd:
txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf) txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf)