Ron Wells wrote:
John>> tried following..
I'm I missing something here...copied ok but did not convert to EBCDIC ??
//OGETSTEP EXEC PGM=IKJEFT01,REGION=4M
//INHFS DD PATH='/XFS/XTST/exports',
// PATHDISP=KEEP
//OUTMVS DD DSN=TST1.TEST.TXT,DISP=(,CATLG),
// UNIT=SYSDA,SPACE=(TRK,(1,1)),
// DCB=(BLKSIZE=800,LRECL=80,RECFM=FB)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
OCOPY INDD(INHFS) OUTDD(OUTMVS) TEXT CONVERT(YES)
Try adding TO1047 after CONVERT(YES)
Kind regards,
-Steve Comstock
The Trainer's Friend, Inc.
303-393-8716
http://www.trainersfriend.com
z/OS Application development made easier
* Our classes include
+ How things work
+ Programming examples with realistic applications
+ Starter / skeleton code
+ Complete working programs
+ Useful utilities and subroutines
+ Tips and techniques
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
