PROMS/Word Add-Ins for PROMS Import/W2PAddIn/W2PAddIn/Setup.vb

@@ -0,0 +1,115 @@
+Option Explicit On
+Imports MSXML2
+
+Module Setup
+    Public App As Word.Application
+    Public Structure LevelDef
+        Public Def As String
+        Public Level As Integer
+    End Structure
+    Public Structure StepStyle
+        Public ID As String
+        Public LevelDefs() As LevelDef
+    End Structure
+    Public Structure VESection
+        Public ID As String
+        Public Pattern As String
+        Public number As String
+        Public Title As String
+        Public Style As String
+        Public StyleID As String
+        Public StyleName As String
+        Public name As String
+        Public IsSub As Boolean
+        Public StepStyle As StepStyle
+        Public StepOffset As Integer
+        Public IsMultiple As Boolean
+        Public FmtFile As String
+        Public Type As String
+        Public Library As String
+        Public TableStyle As String
+        Public ColumnMode As String
+        Public MergeStyle As String
+        Public HeaderTag As String
+        Public Config As String
+        Public ChangeNumber As Boolean
+        Public FindTitle As String
+        Public Level As String
+    End Structure
+    Public Structure VEStep
+        Public ID As String
+        Public FmtFile As String
+        Public Description As String
+        Public Ident As String
+        Public Type As String
+        Public Parent As String
+        Public Menu As String
+        Public NumStyle As String
+        Public Deflt As String
+    End Structure
+    Public Structure VEFormat
+        Public name As String
+        Public dom As DOMDocument60
+    End Structure
+    Public Structure VECheckoff
+        Public ID As String
+        Public FmtFile As String
+        Public Menu As String
+    End Structure
+    Public Structure VEProperty
+        Public name As String
+        Public Type As String
+        Public text As String
+        Public value As String
+    End Structure
+    Public Structure VEPSI
+        Public Style As String
+        Public name As String
+        Public Type As String
+        Public text As String
+        Public value As String
+        Public Justify As String
+        Public x As String
+        Public y As String
+        Public Width As String
+        Public Height As String
+        Public Length As String
+    End Structure
+    Public Structure VEPSIFrame
+        'X As String
+        'Y As String
+        Public Width As String
+        Public Height As String
+        Public Caption As String
+    End Structure
+    Public Idents As Object
+    Public IgnoreMe() As String
+    Public Separators As Object
+    Public SetupFiles As Object
+    Public VECheckoffs() As VECheckoff
+    Public VEProperties() As VEProperty
+    Public VESections() As VESection
+    Public VESteps() As VEStep
+    Public StepStyles() As StepStyle
+    Public domSetup As DOMDocument60
+    Public ThisFormat As VEFormat
+    Public ThisPSI() As VEPSI
+    Public ThisPSIFrame As VEPSIFrame
+
+    Public MySection As VESection
+    Public ThisSection As VESection
+    Public ThisSectionID As Integer
+    Public ThisStepStyle As StepStyle
+    Public ThisStepStyleID As Integer
+    Public ThisVEStep As VEStep
+    Public ThisSeparator As String
+    Public ThisLevel As String
+    Public ThisIdent As String
+    Public ThisSetup As String
+    Public RibbonStatus As String
+    Public ThisRange As Word.Range
+
+    Const FmtFolder As String = "fmtall"
+    Const sSetupFileExtension As String = ".xml"
+    Public Const bDebug As Boolean = True
+End Module