MVSFORUMS.com

[shekar123]

Hai All,

Is there any way by which we can know the GDG generation creation time and the userid who has created the new GDG generation.For example if we have a GDG lists:

Code:

PROJECT.TEST.GDG PROJECT.TEST.GDG.G0001V00 PROJECT.TEST.GDG.G0002V00 PROJECT.TEST.GDG.G0003V00 PROJECT.TEST.GDG.G0004V00 PROJECT.TEST.GDG.G0005V00

In test environment many users will be working on datasets.If any userid say TECH022 submits the job of creation of new version of GDG how do we know what time is the new sixth generation and which userid has created.

Code:

PROJECT.TEST.GDG.G0006V00

If we see the information for generation

Code:

Command - Enter "/" to select action                  Message           Volume ------------------------------------------------------------------------------- I        PROJECT.TEST.GDG.G0006V00                             DSTEST1

we get the following information of creation date and referenced date only.

Code:

Creation date . . . : 2005/11/01      Referenced date . . : 2005/11/01

How do we know the userid who has created the generation as well the time of creation ?
_________________
Shekar
Grow Technically

[kolusu]

shekar123,

Please search before posting. check this link which explains about extracting the gdg version create dates

http://www.mvsforums.com/helpboards/viewtopic.php?t=2104&highlight=create+gdg

Hope this helps...

Cheers

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

[shekar123]

Kolusu,

I tried out the JCL but i am getting RC code 16 in the TOOLMSG step and invalid sysntax error in the DFSMSG step.Can u please explain me why ?

TOOLMSG ERROR

Code:

1ICE600I 0 DFSORT ICETOOL UTILITY RUN STARTED                                                                                                                     ICE632I 0 SOURCE FOR ICETOOL STATEMENTS:  TOOLIN                                                                                                                                                                                                 ICE630I 0 MODE IN EFFECT:  STOP                                                                                                                                              COPY FROM(IN)  USING(CTL1)                                         ICE606I 0 DFSORT CALL 0001 FOR COPY FROM IN       TO OUTFIL   USING CTL1CNTL COMPLETED  ICE602I 0 OPERATION RETURN CODE:  00                                                                                                                                          SORT FROM(CON) USING(CTL2)                                         ICE606I 0 DFSORT CALL 0002 FOR SORT FROM CON      TO OUTFIL   USING CTL2CNTL TERMINATED  ICE602I 0 OPERATION RETURN CODE:  16                                            ICE601I 0 DFSORT ICETOOL UTILITY RUN ENDED - RETURN CODE:  16

DFSMSG ERROR

Code:

0            OPTION EQUALS                                                                    INREC FIELDS=(1,49,50,2,CHANGE=(1,C'19',C'0',                                                                      C'20',C'1',                                                                      C'21',C'2'),NOMATCH=(C'0'),                                  52,5,80:X,81,8)                                                    SORT FIELDS=(81,8,ZD,A)                                                          SUM FIELDS=(50,6,ZD)                                                            OUTREC FIELDS=(1,49,50,6,ZD,PD,LENGTH=4,80:X)                                    OUTFIL FNAMES=OUT,                                                              OUTREC=(1,44,C' IS CREATED ON: ',50,4,DT1,EDIT=(TTTT-TT-TT),80:X)                                                     $                             ICE007A E SYNTAX ERROR                                                           ICE146I 0 END OF STATEMENTS FROM CTL2CNTL - PARAMETER LIST STATEMENTS FOLLOW               DEBUG NOABEND,ESTAE                                                             OPTION LIST,MSGPRT=ALL,MSGDDN=DFSMSG,RESINV=0,SORTDD=CTL2,SORTIN=CON,DY*                           NALLOC                                                 ICE052I 3 END OF DFSORT

_________________
Shekar
Grow Technically

[Frank Yaeger]

The error message for DFSORT's DT1 format indicates you are very behind in DFSORT service. DT1 has been available in DFSORT since March, 2002. Ask your System Programmer to install DFSORT R14 PTF UQ95213 (Dec, 2004) - that will get you all of the DFSORT functional PTFs.
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

[shekar123]

Thanks Frank & Kolusu for your replies.

In the case if the job was successful(DFSORT R14 PTF UQ95213 was available),then i would have got the output as:

Code:

PROJECT.TEST.GDG                  IS CREATED ON: 2005-11-01 PROJECT.TEST.GDG.G0001V00         IS CREATED ON: 2005-11-01 PROJECT.TEST.GDG.G0002V00         IS CREATED ON: 2005-11-01 PROJECT.TEST.GDG.G0003V00         IS CREATED ON: 2005-11-01 PROJECT.TEST.GDG.G0004V00         IS CREATED ON: 2005-11-01 PROJECT.TEST.GDG.G0005V00         IS CREATED ON: 2005-11-01 PROJECT.TEST.GDG.G0006V00         IS CREATED ON: 2005-11-01

My question could be silly too but i just want to know is there any way where in we can know what is the TIME of creation of GDG base as well as TIME of creation of each generation and the USERID who created the base / generations individually?
_________________
Shekar
Grow Technically

[kolusu]