Copy it to a UNIX file with FILEDATA=TEXT using IENGENER or other. Then copy it back to a PS dataset with appreciate LRECL and RECFM. The first step will copy each physical record to UNIX, and put a LF at the end to be a regular UNIX text file. The second step will copy the UNIX file back to FB or VB. If FB, it will pad with space. If VB, it will put the right LLBB at the front.
On Wed, Jun 12, 2019, 14:06 Farley, Peter x23353 < peter.far...@broadridge.com> wrote: > We have a vendor-generated file that comes in with > DCB=(RECFM=U,LRECL=200,BLKSIZE=27998) (don't ask why please, this DCB > setting is out of our hands). > > The records are actually variable length data, up to 200 bytes of actual > data with no length prefix (no RDW/BDW). No binary data, only text > characters. I suspect a *ix text-format file as the vendor source but have > no proof of that. > > We have tried every utility we could think of (IEBGENER, IDCAMS REPRO, > SORT INREC BUILD=(1,200)) to copy this data to a more usable z/OS record > format but so far nothing we tried works. > > Am I correct that only a Rexx or awk script could do this conversion > (given the update to Rexx to support RECFM=U files and awk's native > capabilities) or an HLL program coded to handle U-format input can do this > conversion? > > Any other ideas you have to help us perform the conversion without writing > an HLL program would be much appreciated. > > Peter > -- > > This message and any attachments are intended only for the use of the > addressee and may contain information that is privileged and confidential. > If the reader of the message is not the intended recipient or an authorized > representative of the intended recipient, you are hereby notified that any > dissemination of this communication is strictly prohibited. If you have > received this communication in error, please notify us immediately by > e-mail and delete the message and any attachments from your system. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
