Using a global variable defined Macro script 1 and using the same variable value in Macro script2

Here are two example files for you.  The first one, the Send Variable writes the variables to a text file and then calls the second script and sends the name of the text file.  The second file gets the text file name and then loads in the variables.  I have attached both files for you.

Example Macro to Send Variables.iss

Option Explicit

'define variables to send (could also use an array)
Dim var1 As String
Dim var2 As String
Dim var3 As String
Dim var4 As String
Dim var5 As String
Dim sVarTextFilename As String

Sub Main

	'set-up the variables
	var1 = "1"
	var2 = "Oranges"
	var3 = "20190708"
	var4 = "Test"
	var5 = "Script"
	'call the file that writes the variables to a text file and returns the filename and path
	sVarTextFilename = writeVariablesToTextFile()
	'call the second IDEAScript and send the filename that holds the variables
	Client.RunIDEAScriptEX "Macros.ILB\Example Macro to Get Variables.iss", sVarTextFilename, "", "", ""
End Sub

Function writeVariablesToTextFile() As String
	Const ForReading = 1
	Const ForWriting = 2
	Dim fso As Object
	Dim f As Object
	Dim sTextFilename As String
	
	'set the default file location and name
	sTextFilename = Client.WorkingDirectory() & "var test file.txt"
	'The Scripting.FileSystemObject allows us to access the file system to write and read files
	Set fso = CreateObject("Scripting.FileSystemObject")
		'Create the new file if it doesn't exist and write the variables to it.
		Set f = fso.OpenTextFile(sTextFilename, ForWriting, True)
			f.writeline var1
			f.writeline var2
			f.writeline var3
			f.writeline var4
			f.writeline var5
			f.close
		Set f = Nothing
	Set fso = Nothing
	writeVariablesToTextFile = sTextFilename
End Function

Example Macro to Send Variables.iss

Option Explicit
'define variables to send (could also use an array)
Dim var1 As String
Dim var2 As String
Dim var3 As String
Dim var4 As String
Dim var5 As String
Dim sVarTextFilename As String

Sub Main
	'obtain the name of the text file that holds the variables
	sVarTextFilename = arg1
	
	Call readTheVariables()
	MsgBox "Var1: " & var1
	MsgBox "Var2: " & var2
	MsgBox "Var3: " & var3
	MsgBox "Var4: " & var4
	MsgBox "Var5: " & var5
End Sub

Function readTheVariables()
	Const ForReading = 1
	Const ForWriting = 2
	Dim fso As Object
	Dim f As Object
	Dim i As Integer
	Dim sText As String

'MsgBox sVarTextFilename 
'sVarTextFilename = "C:\Users\elementb\Documents\My IDEA Documents\IDEA Projects\Samples\var test file.txt"
	i = 1
	Set fso = CreateObject("Scripting.FileSystemObject")
		'Set 'open the file for reading
		Set f = fso.OpenTextFile(sVarTextFilename, ForReading)
			Do While f.AtEndOfStream <> True
				'for large number of variables using an array would be better
				Select Case i
					Case 1
						var1 = f.readline
					Case 2
						var2 = f.readline
					Case 3
						var3 = f.readline
					Case 4
						var4 = f.readline
					Case 5
						var5 = f.readline
				End Select
				i = i + 1
			Loop
			'msgbox f.ReadAll
		Set f = Nothing
	Set fso = Nothing
End Function