Cecilio, You can use DFSORT's new translation function ETOA which translates characters from EBCDIC to ASCII using the default standard TCP/IP service EBCDIC-to-ASCII translation table.
//STEP0100 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DISP=SHR,DSN=Your Input Tape DSN //SORTOUT DD DSN=Your output ASCII dataset, // DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA, // SPACE=(CYL,(X,Y),RLSE) //SYSIN DD * OPTION COPY INREC BUILD=(1,80,TRAN=ETOA) //* The input records will be copied with the characters in positions 1-80 translated from EBCDIC to ASCII using the default standard TCP/IP service ASCII-to-EBCDIC table. If your input is VB , then change the INREC statement to the following INREC BUILD=(1,4,5,TRAN=ETOA) Sri Hari Kolusu DFSORT Development IBM Corporation IBM Mainframe Discussion List <[email protected]> wrote on 10/15/2012 08:34:24 AM: > From: af dc <[email protected]> > To: [email protected], > Date: 10/15/2012 08:42 AM > Subject: Convert data tape to ASCII format > Sent by: IBM Mainframe Discussion List <[email protected]> > > Hello, > I need to copy data from STK/9840 tape media (text sequential dsns) to disk > on Ascii format. To send them to AIX. What is the best way of doing it ?? > Env is z/os 1.12 > > 1) recall dsns (they are hsm migrated) > 2) running ditto to convert those dsns to ascii format > 3) send those ascii files to AIX machine > ?? > > Any hint is welcome, A.CEcilio > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
