Page 1 of 1

USS Z/OS REXX

PostPosted: Thu Jan 21, 2010 4:27 pm
by fuuss
Hey
Still working on some problems
I am working on a Rexx which is executed in the OMVS so the USS

I tried to open a dataset from the MVS system of our Mainframe

  address TSO "ALLOC F(IN) DA('ci.sys.ftp.script(FTPFRACC)'),
SHR REU"                                                     
if RC>0 then exit                                           
/* Read all the records in to array Lines. */               
address TSO "EXECIO * DISKR IN (STEM record1. finis"       
/**********************************************/             
address TSO "say substr(record1.1,1,20)"                     

this doesn't work at all , how could I manage this

second question is how can I open a Linux file ( path /user/test/ps.out ) which has several lignes ( for exemple 3)

/user/cisyscl/test/Timestamp.55554ah.log
/user/cisyscl/test/Timestamp.bl2003abhlah.log
/user/cisyscl/test/Timestamp.blabhlah.log


and working with every ligne .

It's not that easy going from MVS to USS

I hope you may help me ,

thanks in advance

Re: USS Z/OS REXX

PostPosted: Thu Jan 21, 2010 6:32 pm
by Robert Sample
Allocating to DA is allocating to a z?OS dataset. You must use PATH to allocate to a z/OS Unix System Services file.

Re: USS Z/OS REXX

PostPosted: Thu Jan 21, 2010 6:33 pm
by fuuss
Ok here we have already a solution for the second Question


/* rexx */                                   
call syscalls 'ON'                           
address syscall                             
'readfile /user/cisyscl/test/test.out list.'


I was too simple I didn't get it hehe sorry but still posting it here ,

Re: USS Z/OS REXX

PostPosted: Fri Jan 22, 2010 1:07 pm
by enrico-sorichetti
this doesn't work at all , how could I manage this

usual comment about it does not work attitude
too bad... we all hope that You can fix it soon!

a few cocerns
after the alloc why not display the return code before exiting?
after the execio why not test and display the return code
usually the return codes will give an insight on the why something does not work