>> On zOS, its EBCDIC file, is there any solution first convert to ASCII then 
>> Terse send?

BM,

You can use DFSORT TRAN=ETOA function which translates characters from EBCDIC 
to ASCII using the default standard TCP/IP service EBCDIC-to-ASCII translation 
table. For example, with TRAN=ETOA, the EBCDIC characters aB2 (X'81C2F2') would 
be replaced by the ASCII characters aB2 (X'614232').

//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DISP=SHR,DSN=Your.input.FB.EBCDIC.file
//SORTOUT  DD DSN=your.output.FB.ASCII.file,
//            DISP=(NEW,CATLG,DELETE),
//            SPACE=(CYL,(X,Y),RLSE)
//SYSIN    DD *
  OPTION COPY
  OUTREC BUILD=(1,lrecl,TRAN=ETOA)
//*

•       Pass the value of lrecl as numeric.

If your input is a VB file, then use the following control cards

//SYSIN    DD *
  OPTION COPY
  OUTREC BUILD=(1,4,5,TRAN=ETOA)
//*

You can terse the output file and then FTP it to windows.

Thanks,
Kolusu
DFSORT Development
IBM Corporation


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

Reply via email to