I am creating a sample routine which has to pass a text as argumet and that needs to be stored in to a file. But I am getting <<ERROR>>.
Arg1=some text here
SrcDir=/usr/pathname/
FileName=Output.txt
Code: Select all
$INCLUDE DSINCLUDE JOBCONTROL.H
Text=Arg1
ToCmd = 'echo ' : Arg1 : ' > ' :SrcDir : FileName
Call DSExecute("UNIX",ToCmd,output,retcode)
if retcode = 0 then PRINT "File Created Sucessfully" else PRINT "File Creation Failed"
Ans=0
Thanks in advance
--
Sekhar