View previous topic :: View next topic |
Author |
Message |
Dibakar Advanced

Joined: 02 Dec 2002 Posts: 700 Topics: 63 Location: USA
|
Posted: Tue Sep 23, 2003 7:01 am Post subject: |
|
|
You cannot pass parameters to 'DD *' try some other way out. |
|
Back to top |
|
 |
warp5 Intermediate

Joined: 02 Dec 2002 Posts: 429 Topics: 18 Location: Germany
|
Posted: Wed Sep 24, 2003 12:30 am Post subject: |
|
|
Or try doing a search on this, this has been asked and answered many times. |
|
Back to top |
|
 |
Dibakar Advanced

Joined: 02 Dec 2002 Posts: 700 Topics: 63 Location: USA
|
Posted: Wed Sep 24, 2003 1:21 am Post subject: |
|
|
First post here might work for you
You need to put some variables in queue statement. And here is an example to do it -
Code: |
hlq = 'XXXX'; llq='YYYY'; MLQ= 'MMMM'; mylimit=5
queue " DEFINE GDG (NAME("hlq"."MLQ"."llq".FILE) - "
queue " LIMIT ("mylimit") - "
|
Diba. |
|
Back to top |
|
 |
Bill Dennis Advanced

Joined: 03 Dec 2002 Posts: 579 Topics: 1 Location: Iowa, USA
|
Posted: Mon Sep 29, 2003 2:33 pm Post subject: |
|
|
If there are not too many values for HLQ and LLQ, you could store them as PDS members and string the dsname across several stmnts. Each piece starts in col 2 and ends with a dash, as follows:
Code: | ...statements to assign HLQ=XXXX,LLQ=YYYY
//SYSIN DD *
DEFINE GDG (NAME(-
// DD DSN=MY.PDS(&hlq),DISP=SHR member has XXXX.- in col2
// DD * continue the dsname
MLQ.-
// DD DSN=MY.PDS(&llq),DISP=SHR member has YYYY.- in col2
// DD * finish the dsname
FILE) -
LIMIT (50) - /* this could be a member, too */
NOEMPTY -
SCRATCH)
|
The end result is the dsname put back together but the variables can be used. If you had hundreds of possibilities, this may not be workable.
Bill |
|
Back to top |
|
 |
Mike Chantrey Intermediate
Joined: 10 Sep 2003 Posts: 234 Topics: 1 Location: Wansford
|
Posted: Thu Oct 02, 2003 11:36 am Post subject: |
|
|
Most sites have a home-grown utility program which accepts a PARM string including JCL parameters etc. if necessary and writes out the expanded string to a card format dataset; this dataset is then used as input to such things as IDCAMS.
Ask your sysprogs if they have such a utility and some sample JCL.
Generalized example:
Code: |
//PARMSTEP EXEC PGM=PARMUTIL,PARM=' DELETE &HLQ..TEST NONVSAM'
//PARMOUT DD DSN=&&IDCPARM,DISP=(NEW,PASS),UNIT=WORK,
// DCB=CARDS,SPACE=(TRK,1)
|
This example generates an IDCAMS SYSIN dataset to delete the non-VSAM dataset called &HLQ..TEST
You can run multiple steps writing to the temp dataset with DISP=(MOD,PASS) in order to build up longer multi-card IDCAMS (or whatever) parameter datasets. |
|
Back to top |
|
 |
|
|