MVSFORUMS.com

[Phantom]

rsivananda,

Version 1.1 is one of the latest versions of syncsort (Latest: 1.2). This supports ALTSEQ. Customize my code and try it. Should work.

Thanks,
Phantom

[rsivananda]

Apologies to Phantom for not responding to that question on file2
I thought it's file1 alone.
anyway i am checking with the code u have sent and will get back to u

[rsivananda]

Hi Phantom
I tried executing u r code and resulted in the following error

WER164B 1,028K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1,020K BYTES USED
WER146B 4K BYTES OF EMERGENCY SPACE ALLOCATED
WER267A SORT STATEMENT : STATEMENT NOT FOUND
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE

The : is missing and coudn't fix that. Could you plz help me out and i think i need to sit with syncsort guide to explore more options and syntax

[Phantom]

rsivananda,

Did you change PGM=SYNCTOOL to PGM=SORT ?

If so, you need to use SORT FIELDS=COPY.

If not, Then paste your JCL. Probably in TOOLIN or CTL1CNTL, you would not have left any blanks before COPY / OUTFIL statement.

Syntax: You need to leave atleast 1 space in each and every line of SYSIN / TOOLIN / Custom control cards while using Sort.

Thanks,
Phantom

[kolusu]

Rsivananda,

Here is an untested code. I assumed that your special char has just one record with all possible special character. I coded it for a max of 80 special characters.

[code:1:a2586d03ff]
//STEP0100 EXEC PGM=EZTPA00
//*
//STEPLIB DD DSN=EASYTREV.LOADLIB,
// DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSSNAP DD SYSOUT=*
//INFILE DD DSN=YOUR INPUT FILE,
// DISP=SHR
//SPLCHAR DD *
`~!@#$%^&*()_-+=[]{}\
_________________
Kolusu
www.linkedin.com/in/kolusu

[rsivananda]

Phantom and Kolusu... All i can say ur stars... the code is absolutely working and into production now.i used the ezt solution

[Nabanita Das]

Can anyone give me similar code in SAS. My shop does not have EZT, sorry. Any help??????????????????

[kolusu]