In this Mainframe Forum - You can post your queries on JCL, OS/390 JCL, MVS JCL, z/OS JCL, JES2 & JES3
Moderators: Frank Yaeger, DikDude, Moderator Group
-
Anuj Dhawan
- Moderator
- Posts: 1625
- Joined: Sat Aug 09, 2008 9:02 am
- Location: Mumbai, India
Post
by Anuj Dhawan » Sat Oct 15, 2011 4:03 pm
archup20 wrote:Thanks dbZ and DikDude it is working fine now.
Glad to hear that but your last response is preety much like:
but the output is not proper in my SYSREC00.
Do NOT post "it didn't work" - which is a complete waste of everyone's time.
What does it do now? Why is this not "proper". What do you want if not the output of the SELECT COUNT?
So now, how did it work, what changes did you make? In short, please share your final solution, if possible.
Regards,
Anuj
-
archup20
- Member
- Posts: 31
- Joined: Thu Dec 09, 2010 9:53 am
Post
by archup20 » Thu Oct 20, 2011 4:04 pm
//STEP010 EXEC PGM=IKJEFT01
//STEPLIB DD DSN=DB2P.RUNLIB.LOAD,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(GRT1)
RUN PROGRAM(DSNTEP2) PLAN(DSNTEP2) -
LIB('DB2P.RUNLIB.LOAD')
END
//SYSREC DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//*
//SYSPUNCH DD DUMMY
//SYSPRINT DD DSN=T6329EG.DATA.PUSDSMX,
// DISP=(NEW,CATLG,DELETE),
// SPACE=()
//SYSIN DD *
SELECT COUNT(*)
FROM ODDCDB2P.P.PUSDSMX ;
/*
This is my working code
-
DikDude
- Moderator
- Posts: 1001
- Joined: Fri Jul 22, 2011 8:39 am
- Location: usa
Post
by DikDude » Thu Oct 20, 2011 10:12 pm
Good to hear you have what you need - thank you for the followup and posting your solution
d
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts.
- Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3.
- DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming.
- SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples
- CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Mainframe Interview questions
Mainframe Tools and others