JobModify Script not getting stored correctly

I'm have a job that creates another job and the JobModify is cutting of the script after 500 characters. I've checked the "MyScript" and "MyScriptFile" with a MessageBox and it is all there. It just doesn't get stored in the job itself. Any ideas?

CreateDynamicJob:
==============================
Dim MyJobNumber, number
Dim MyScript, string
Dim MyScriptFile, string
FileReadAll "C:\\24x7\\Script-Data\\SyncScript.txt", MyScriptFile
MessageBox MyScriptFile
ConcatEx "Dim( MySystem, string, \"ems_test\" )", MyScriptFile, MyScript
MessageBox MyScript
JobCreate MyJobNumber
JobModify MyJobNumber, "Name", "MyAutoCreateScript"
JobModify MyJobNumber, "Schedule_Type", "X"
JobModify MyJobNumber, "JOB_TYPE", "S"
JobModify MyJobNumber, "SCRIPT_TYPE", "JAL"
JobModify MyJobNumber, "SCRIPT", MyScript
//JobRun MyJobNumber

Contents of SyncScript.txt file
===============================

Dim( MyServerList, string, "srv-wvm,srv-mut,srv-okc" )
Dim( MyStatus, boolean, True )
Dim( MyServer, string )
Dim( ServerToProcess, boolean, True )
Dim( MyLogData, string )
GetToken( ",", MyServerList, MyServer )
NotEqual( MyServer, "", ServerToProcess )
LoopWhile( ServerToProcess, ProcessedAllServers )

SyncFieldLincASP MyServer, MySystem, MyStatus

ChooseCase MyStatus, CaseMyStatusFinished

Case True

ConCatEx(MySystem, " syncronized succeeded on server ", MyServer, MyLogData)

LogAddMessageEx( "INFO", 1, "SyncFieldLincASP", MyLogData)

Case False

ConCatEx(MySystem, " syncronization FAILED on server ", MyServer, MyLogData)

LogAddMessageEx( "ERROR", 1, "SyncFieldLincASP", MyLogData)

CaseMyStatusFinished:

GetToken( ",", MyServerList, MyServer )

NotEqual( MyServer, "", ServerToProcess )
ProcessedAllServers:

Both script fragment and file look good to me, at least how you got them in the message. I don't know why you get only 500 chars. Consider emailing all files to support, including the complete script for the job creating another job

As a workaround for now you can change the line
JobModify MyJobNumber, "SCRIPT", MyScript

to
FileSave "c:\\temp.jdl", MyScript
JobModify MyJobNumber, "SCRIPT", "@@SCRIPT:C:\\temp.jdl"
JobRun MyJobNumber
FileDelete "c:\\temp.jdl"

: I'm have a job that creates another job and the JobModify is cutting of the
: script after 500 characters. I've checked the "MyScript" and
: "MyScriptFile" with a MessageBox and it is all there. It just
: doesn't get stored in the job itself. Any ideas?

: CreateDynamicJob: ==============================
: Dim MyJobNumber, number
: Dim MyScript, string
: Dim MyScriptFile, string
: FileReadAll "C:\\24x7\\Script-Data\\SyncScript.txt", MyScriptFile
: MessageBox MyScriptFile
: ConcatEx "Dim( MySystem, string, \"ems_test\" )",
: MyScriptFile, MyScript
: MessageBox MyScript
: JobCreate MyJobNumber
: JobModify MyJobNumber, "Name", "MyAutoCreateScript"
: JobModify MyJobNumber, "Schedule_Type", "X"
: JobModify MyJobNumber, "JOB_TYPE", "S"
: JobModify MyJobNumber, "SCRIPT_TYPE", "JAL"
: JobModify MyJobNumber, "SCRIPT", MyScript
: //JobRun MyJobNumber

: Contents of SyncScript.txt file
: ===============================

: Dim( MyServerList, string, "srv-wvm,srv-mut,srv-okc" )
: Dim( MyStatus, boolean, True )
: Dim( MyServer, string )
: Dim( ServerToProcess, boolean, True )
: Dim( MyLogData, string )
: GetToken( ",", MyServerList, MyServer )
: NotEqual( MyServer, "", ServerToProcess )
: LoopWhile( ServerToProcess, ProcessedAllServers )

: SyncFieldLincASP MyServer, MySystem, MyStatus

: ChooseCase MyStatus, CaseMyStatusFinished

: Case True

: ConCatEx(MySystem, " syncronized succeeded on server ", MyServer,
: MyLogData)

: LogAddMessageEx( "INFO", 1, "SyncFieldLincASP",
: MyLogData)

: Case False

: ConCatEx(MySystem, " syncronization FAILED on server ", MyServer,
: MyLogData)

: LogAddMessageEx( "ERROR", 1, "SyncFieldLincASP",
: MyLogData)

: CaseMyStatusFinished: GetToken( ",", MyServerList, MyServer )

: NotEqual( MyServer, "", ServerToProcess )
: ProcessedAllServers: