nishmija
New User
Joined: 09 Nov 2006
Posts: 2
|
|
|
|
Hi,
I want to write a SCL that can display the CCID, userid, current date and generate date of an endevor element.
This is the SCL I used:
LIST ELEMENT '*'
FROM ENVIRONMENT 'PROD'
SYSTEM 'ABC'
SUBSYSTEM 'ABCDEF'
TYPE '*'
STAGE '6' .
But this SCL is only returning me the element name and version number.
Is it possible for me to extract the other details like CCID, current date and generate date as well.
Thanks in advance |
|
kgrimes
New User
Joined: 28 Sep 2009
Posts: 22
Location: Columbia, SC
|
|
|
|
Hi nishmija,
There are several ways to get the information that you are looking for. Two of the best ways are the Endevor CSV (Comma Separated Value) Utility and the Endevor List Element API.
You could use the Endevor CSV Utility to create a file in Comma Separated Value format that you could download to a PC and open with Microsoft Excel (or any other program that can read a CSV file). Then you can filter, sort, print, etc.
Another easier and quicker way to get the information is from the Endevor List Element API. Endevor already comes with some fully functional sample API programs including a program named ENTBJAPI that allows you to execute inventory function calls based on control cards. Look in the Endevor JCLLIB for a job called BC1JAAPI or ask your Endevor Administrator for help in setting up the JCL and control cards for this batch job.
| Code: |
//jobname JOB (acct info),'name',CLASS=x
//*
//*-------------------------------------------------------------------*
//* *
//* NAME: BC1JAAPI *
//* *
//* PURPOSE - EXECUTE ENDEVOR API PROGRAM: ENTBJAPI *
//* *
//*-------------------------------------------------------------------*
//STEP01 EXEC PGM=NDVRC1,PARM='ENTBJAPI',REGION=4096K
//STEPLIB DD DISP=SHR,DSN=your.user.authlib
// DD DISP=SHR,DSN=your.authlib
//CONLIB DD DISP=SHR,DSN=your.conlib
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//BSTERR DD SYSOUT=*
//BSTAPI DD SYSOUT=*
//SYMDUMP DD DUMMY
//SYSUDUMP DD SYSOUT=*
//MSG3FILE DD SYSOUT=*,DCB=(RECFM=FB,LRECL=133,BLKSIZE=13300)
//EXT1ELM DD DSN=your.output.file,DISP=(NEW,PASS),
// UNIT=SRTDA,SPACE=(TRK,(5,5)),
// DCB=(RECFM=VB,LRECL=2048,BLKSIZE=22800)
//SYSIN DD *
* RECORD ID IS IN COLUMNS 1-5
*
*---+----1----+----2----+----3----+----4----+----5----+----6----+----7--
***** AACTL = CONTROL STRUCTURE INFORMATION
* V - COLUMN 6 = SHUTDOWN FLAG STRUCTURE
* VVVVVVVV - COLUMN 7-14 IS THE MSG FILE DDNAME
* VVVVVVVV - COLUMN 15-22 OUTPUT DATA FILE DDNAME
*
*---+----1----+----2----+----3----+----4----+----5----+----6----+----7--
* FOR MANY REQUESTS, THE FOLLOWING SETTINGS ARE APPROPRIATE
* V - COLUMN 6 = PATH SETTING
* = ' ' FOR LOGICAL
* = 'L' FOR LOGICAL
* = 'P' FOR PHYSICAL
* V - COLUMN 7 = RETURN SETTING
* = ' ' FOR FIRST FOUND
* = 'F' FOR FIRST FOUND
* = 'A' FOR ALL FOUND
* V - COLUMN 8 = SEARCH SETTING
* = ' ' FOR FIRST
* = 'A' FOR ALL
* = 'B' FOR BETWEEN
* = 'E' FOR NEXT
* = 'N' FOR NO
* = 'R' FOR RANGE
* V - COLUMN 9 = UNUSED
*
*---+----1----+----2----+----3----+----4----+----5----+----6----+----7--
***** ALELM = LIST ELEMENT STRUCTURE INFORMATION
* V - COLUMN 6 = PATH SETTING
* V - COLUMN 7 = RETURN SETTING
* V - COLUMN 8 = SEARCH SETTING
* V - COLUMN 9 = UNUSED
* VVVVVVVV - COLUMN 10-17 ENVIRONMENT NAME
* V - COLUMN 18 = STAGE ID
* VVVVVVVV - COLUMN 19-26 SYSTEM NAME
* VVVVVVVV - COLUMN 27-34 SUBSYSTEM NAME
* COLUMN 35-44 = ELEMENT NAME VVVVVVVVVV
* COLUMN 45-52 = TYPE NAME VVVVVVVV
* COLUMN 53-60 = TO-ENV NAME VVVVVVVV
* COLUMN 61 = TO-STAGE ID V
* COLUMN 62-71 = THRU-ELEMENT NAME VVVVVVVVVV
* NOTE: IF BETWEEN/RANGE SETTINGS ARE USED, YOU NEED TO SPECIFY
* TO-ENV AND TO-STAGE, OTHERWISE LEAVE BLANK.
*---+----1----+----2----+----3----+----4----+----5----+----6----+----7--
*
AACTL MSG3FILEEXT1ELM
ALELMLFN PROD 6ABC ABCDEF * * * *
RUN
* LAST CALL, ENSURE THAT THE API SERVER IS SHUTDOWN.
AACTLY
RUN
QUIT
//* |
Regards,
Kevin |
|
