MVSFORUMS.com :: View topic - Using COND parameter.

MVSFORUMS.com
A Community of and for MVS Professionals

FAQ

Quick Manuals

Profile

Using COND parameter.

MVSFORUMS.com Forum Index -> Job Control Language(JCL)

View previous topic :: View next topic

Author

Message

kolusu
Site Admin

Joined: 26 Nov 2002
Posts: 12367
Topics: 75
Location: San Jose

Posted: Fri Feb 04, 2005 8:38 am Post subject:

Ravi,

Try this job. I think I have covered all the test cases.

Code:

//STEP010 EXEC PGM=PGM1
//*
//STEP020 EXEC PGM=PGM2
//*
//STEP030 EXEC PGM=PGM3
//*
//STEP040 EXEC PGM=PGM4
//*
//STEP050 EXEC PGM=PGM5,
// COND=((0,NE,STEP010),(0,NE,STEP020),
// (0,NE,STEP030),(0,NE,STEP040))
//*
//STEP060 EXEC PGM=PGM6,
// COND=((0,NE,STEP010),(0,NE,STEP020),
// (0,NE,STEP030),(0,NE,STEP040),
// (9,EQ,STEP050))
//*
//STEP070 EXEC PGM=PGM7,
// COND=((0,NE,STEP010),(0,NE,STEP020),
// (0,NE,STEP030),(0,NE,STEP040),
// (9,EQ,STEP050))
//*
//STEP080 EXEC PGM=PMG8,
// COND=((0,NE,STEP010),(0,NE,STEP020),
// (0,NE,STEP030),(0,NE,STEP040),
// (9,EQ,STEP050))
//*
//STEP090 EXEC PGM=IDCAMS,
// COND=((0,NE,STEP010),(0,NE,STEP020),
// (0,NE,STEP030),(0,NE,STEP040),
// (9,EQ,STEP050))
//*
//STEP0100 EXEC PGM=SORT,
// COND=((0,NE,STEP010),(0,NE,STEP020),
// (0,NE,STEP030),(0,NE,STEP040),
// (9,EQ,STEP050),(0,NE,STEP090))
//*

Hope this helps...

Cheers

kolusu
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu

Display posts from previous:

	MVSFORUMS.com Forum Index -> Job Control Language(JCL)	All times are GMT - 5 Hours
Page 1 of 1

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum