I originally sent to wrong forum

Sent from my iPhone

Begin forwarded message:

> From: Micheal Butz <[email protected]>
> Date: March 31, 2014 at 11:02:50 PM EDT
> To: Assembler Language <[email protected]>
> Subject: Rexx substr not retiring string
> 
> I have some imbedded JCL in a. sequitial file
> 
> Problem is it starts at col 2 and I need it shift over to column 1
> 
> So I use a stem e.g outvar
> 
> Do I = 1 to n.  /* where n is the number of lines */
> 
> Outvar.I = substr(jcl.I,2,81)
> 
> Afterwards I write out the results
> 
> execio * DISKW outds (finis stem outvar
> 
> Outds is the ddname of the dataset that should have the Jcl
> 
> When I look at the dataset represented by outds
> 
> It the variable name outvar0,outvar1
> 
> But not the data
> 
> Thanks
> 
> Sent from my iPhone

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to