comment out json writer class

VECTO/GUI/IEPCForm.vb

@@ -390,10 +390,10 @@ Public Class IEPCForm
         iepc.SetDragCurveEntries(lvDragCurve)
 
 
-        If Not iepc.SaveFile(file) Then
-            MsgBox("Cannot save to " & file, MsgBoxStyle.Critical)
-            Return False
-        End If
+        'If Not iepc.SaveFile(file) Then
+        '    MsgBox("Cannot save to " & file, MsgBoxStyle.Critical)
+        '    Return False
+        'End If
         
         _changed = False
         LbStatus.Text = ""

VECTO/Input Files/IEPCInputData.vb

@@ -29,13 +29,13 @@ Public Class IEPCInputData
     Public Function SaveFile(filePath As String) As Boolean
         _filePath = filePath
 
-        Try
-            Dim writer = New JSONFileWriter()
-            writer.SaveIEPC(Me, filePath, Cfg.DeclMode)
-        Catch ex As Exception
-            MsgBox("Failed to write IEPC file: " + ex.Message)
-            Return False
-        End Try
+        'Try
+        '    Dim writer = New JSONFileWriter()
+        '    writer.SaveIEPC(Me, filePath, Cfg.DeclMode)
+        'Catch ex As Exception
+        '    MsgBox("Failed to write IEPC file: " + ex.Message)
+        '    Return False
+        'End Try
 
         Return True
     End Function