MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

How to find the elements using the given copybook(Endevor)

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
magopala
Beginner


Joined: 02 Mar 2006
Posts: 4
Topics: 3
PostPosted: Wed Mar 15, 2006 5:26 am    Post subject: How to find the elements using the given copybook(Endevor) Reply with quote
Iam tring to find out all the cobol modules using the given copybook. We use Endevor as version control and all the production elemennts are in Endevor library. Is there any option in Endevor to accomplish this search?

Thanks
Manju
Back to top
View user's profile Send private message
mf_user
Intermediate


Joined: 01 Jun 2003
Posts: 372
Topics: 105
PostPosted: Thu Mar 16, 2006 7:43 am    Post subject: use option 3.14 Reply with quote
Hi,

As you said, the copybook is used by many programs. You can use ISPF option 3.14 to search the particular Endevor PDS for the COPYBOOK name you want to know.

HTH.
_________________
MF
==
Any training that does not include the emotions, mind and body is incomplete; knowledge fades without feeling.
==
Back to top
View user's profile Send private message Send e-mail
mf_user
Intermediate


Joined: 01 Jun 2003
Posts: 372
Topics: 105
PostPosted: Thu Mar 16, 2006 8:40 am    Post subject: Use the following JCL to run Endevor in batch. Reply with quote
Hi,

Use the following JCL to run the Endevor in batch to search the Endevor for a string.

Code:

//XXXXXXX JOB (XXXXXX,XXXX),'XXXXXXXXXXX',
//             CLASS=X,                   
//             MSGCLASS=X,NOTIFY=&SYSUID   
//*
//***********************************
//*  ENDEVOR JCL STATEMENTS         
//***********************************
//NDVRBAT  EXEC PGM=NDVRC1,DYNAMNBR=1500,REGION=31M,
//  PARM='C1BM3000'                                 
//STEPLIB  DD DISP=SHR,DSN=XXXX.ENDEVOR.LOAD       
//CONLIB   DD DISP=SHR,DSN=XXXX.ENDEVOR.LOAD       
//WAYNC1DF DD DSN=XXXX.ENDEVOR.LOAD($XXXXXXX),     
//        DISP=(SHR,KEEP,KEEP)                     
//IDIOPTS  DD *                                     
LIST ELEMENT '*'                                             
   FROM ENVIRONMENT 'XXXXXXXX' SYSTEM 'XXXXXXX' SUBSYSTEM 'X'
     TYPE 'XXX*' STAGE P                                     
   OPTIONS SHOWING TEXT NOSEARCH                             
   WHERE TEXT EQ                                             
 'XXXXXXXX'                                                   
   BUILD ACTION &&ACTION..                                   
//SSN$XX   DD DUMMY                                 
//SYSPRINT DD SYSOUT=*                             
//**************************************************
//*             SORT WORK FILES                     
//**************************************************
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(1,2))         
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(1,2))         
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(1,2))         
//C1TPDD01 DD UNIT=SYSDA,SPACE=(CYL,5),             
//            DCB=(RECFM=VB,LRECL=260,BLKSIZE=6160)
//C1TPDD02 DD UNIT=SYSDA,SPACE=(CYL,5),             
//            DCB=(RECFM=VB,LRECL=260,BLKSIZE=6160)
//*************************************************
//*             PANVALET SUPPORT                   
//*************************************************
//C1TPLSIN DD UNIT=SYSDA,SPACE=(CYL,5),           
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//C1TPLSOU DD UNIT=SYSDA,SPACE=(CYL,5)             
//C1PLMSGS DD SYSOUT=*                             
//************************************************************
//*  OUTPUT DATA SETS                                         
//************************************************************
//C1MSGS1  DD SYSOUT=*                                       
//C1MSGS2  DD SYSOUT=*                                       
//C1PRINT  DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=121,BLKSIZE=6171)
//SYSUDUMP DD SYSOUT=*                                       
//SYSOUT   DD SYSOUT=*                                       
//************************************************
//*  REQUEST DATA SET                             
//************************************************
//BSTIPT01 DD DSN=XXXXX.XXXXXX.XXX(SCL01),DISP=SHR


HTH.
_________________
MF
==
Any training that does not include the emotions, mind and body is incomplete; knowledge fades without feeling.
==
Back to top
View user's profile Send private message Send e-mail
anita_m
Beginner


Joined: 20 Sep 2006
Posts: 41
Topics: 12
Location: Venus
PostPosted: Thu Apr 26, 2007 11:09 am    Post subject: Reply with quote
How can I specify a search for 'string1 AND string2' using NDVRC1?
Back to top
View user's profile Send private message
JanM
Beginner


Joined: 29 May 2006
Posts: 9
Topics: 0
PostPosted: Tue May 01, 2007 6:34 am    Post subject: Reply with quote
Manju,

Verify whether or not the ACMQ-interface of Endevor has been activated for your site.
It has the potential to give you the information youn require, provided that monitor=components has been specified for your input-datasets.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
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


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group