MVSFORUMS.com

[kris_madras]

Hi,


I am passing YEAR as a parametre to the SYNCSORT as :



// SET YY=04
//S10S EXEC PGM=SORT,PARM=&YY
//SYSIn DD *
// SORT FIELDS=OPY
// OUTREC FIELDS=(1,C.....)

I am trying to use YY value in OUTREC fields..
While sorting the Input file , the requirement is write YY PARA METRE in the output location 1 byte


i.e. instead of OUTREC FIELDS=(1,C'04')

Please let me know How can I change the above declaration to use PARM (YY)...?



Thanks
Kris

[superk]

You may want to review this link:

http://www.mvsforums.com/helpboards/viewtopic.php?t=2940

and pay close attention to using the SYMNAMES DD statement in your SORT job.

[kris_madras]

Superk,
Thanks for your reply. But the case is :

// SET YEAR1=04
//SORTTES1 JOB 00000,'RITE AID EXTRACT ',........
//S10S EXEC PGM=SORT
//SORTIN DD DSN=DSNAME,DISP=SHR
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1,YEAR1)
//*

The SYMNAMES DD Statement suggested in the forum :
//SYMNAMES DD *
YEAR1 C'04'

My requirement is without giving a constant value i.e. C'04' , I need to pass from symbolic variable.

like

//SYMNAMES DD *
YEAR1 &YY ----------------> YY is a symbolic parametre(has some value in priror statements)


Thanks
Kris

[kolusu]

kris,

Please post the requirement , so that we can suggest an alternate solution. Sort products are not capable of receiving parms. However you can create a dynamic control cards.

Thanks,

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

[superk]

This is just one possible solution that I came up with: