jionmt-sw/etc-prod-utility
5
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

fix: 시리얼 번호 읽기 오류 수정

Browse Source
This commit is contained in:
ssy99 2025-05-09 14:37:41 +09:00
parent dde1265704
commit 344f7832f8
1 changed files with 3 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
Product_Manager/MainForm.vb
View File

@ -53,8 +53,8 @@ Public Class MainForm
End Enum End Enum
Private Enum TypeCodeList Private Enum TypeCodeList
Eye = 1 Face = 1
Face Eye
Body Body
MAXType MAXType
End Enum End Enum
@ -441,18 +441,6 @@ End_Finish:
End If End If
End Function End Function
Private Function TypeCodeSetting() As Int16
If rdbIfFace.Checked = True Then
Return TypeCodeList.Face
ElseIf rdbIfEye.Checked = True Then
Return TypeCodeList.Eye
ElseIf rdbIfBody.Checked = True Then
Return TypeCodeList.Body
Else
Return TypeCodeList.MAXType
End If
End Function
Private Sub DUALSONIC_WriteFunc() Private Sub DUALSONIC_WriteFunc()
Dim StageCnt As Int16 = ErrorList.NonError Dim StageCnt As Int16 = ErrorList.NonError
Try Try
@ -522,10 +510,8 @@ End_Finish:
''******* Cart Type 전송 ******** ''******* Cart Type 전송 ********
''************************************ ''************************************
Dim TypeCodeNum As Int16 = TypeCodeSetting()
tmpCmdMessage = "carttype" tmpCmdMessage = "carttype"
cmdMessage = "[sb" & tmpCmdMessage & " " & TypeCodeNum & "]" cmdMessage = "[sb" & tmpCmdMessage & " " & TypeCode & "]"
If SendData(cmdMessage) Then If SendData(cmdMessage) Then
StageCnt = ErrorList.SendError StageCnt = ErrorList.SendError