CRLF for EXECIO to USS file?



IBM's Command List programming language & Restructured Extended Executor

CRLF for EXECIO to USS file?

Postby weaverbrosracing » Sat Aug 21, 2010 1:14 am

I'm writing to a USS file from a batch REXX job and would like a more readable format then I'm getting. When I write my records it comes out as one long record and I'd like 80 byte records. I tried LRECL on the ALLOCATE, but that didn't seem to work. Here's my code:

"ALLOCATE FI(WSPNSSBG) PATH('/usps/etc/test.group'),
PATHOPTS(ORDWR,OCREAT,OEXCL,OTRUNC) PATHMODE(SIRWXU),
PATHDISP(KEEP,KEEP) LRECL(80)"
"EXECIO * DISKW WSPNSSBG (STEM SMSSBgrp."
"EXECIO * DISKW WSPNSSBG (STEM EASECgrp."
"EXECIO * DISKW WSPNSSBG (STEM UPDATEgrp. FINIS"
"FREE FI(WSPNSSBG)"

Thanks, Steve
weaverbrosracing
 
Posts: 2
Joined: Sat Aug 21, 2010 1:06 am
Has thanked: 0 time
Been thanked: 0 time

Re: CRLF for EXECIO to USS file?

Postby Robert Sample » Sat Aug 21, 2010 1:21 am

Unix files do not have an LRECL, which is part of the DCB that Unix files don't have.

Your best bet, if you want 80-byte records, is to create them in a z/OS file and then do an OPUT or OCOPY to transfer the z/OS file to Unix System Services.
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: CRLF for EXECIO to USS file?

Postby weaverbrosracing » Sat Aug 21, 2010 1:26 am

That's what I did originally, but then I thought it would be nice to do it in one step. I guess I should be able to do an OPUT from my REXX code.
Thanks
weaverbrosracing
 
Posts: 2
Joined: Sat Aug 21, 2010 1:06 am
Has thanked: 0 time
Been thanked: 0 time


Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post