Accessing ELIPS( Extended LIBRARIAN Interactive Productivity ) thru CLIST , i need to PDS from ELIPS to my own PDS like " userid.test1.test1", how can i open any PDS which in on ELIPS in brows mode thru CLIST or REXX
Joined: 14 Jun 2006 Posts: 331 Location: Jacksonville, FL
I have a shortcut REXX program for all the PDS libraries I access. Here is the code for one of them:
Code:
/*************************REXX***********/
PARSE UPPER ARG JOBFIND
DSN1= "('PDS.DATASET.HERE')"
IF JOBFIND ?= "" THEN SIGNAL FINDJOB
ISPEXEC "EDIT DATASET"||DSN1
EXIT
FINDJOB:
DSN1= "('PDS.DATASET.HERE("||JOBFIND||")')"
ISPEXEC "EDIT DATASET"||DSN1
EXIT
END
You must value PDS.DATASET.HERE with your PDS name. You must store this REXX program in your REXX PDS library with a name (MYPDS) or whatever.
Entering on the command line:
TSO MYPDS - takes you to all the members of your PDS
TSO MYPDS MEMNAME - takes you directly to the member called MEMNAME
TSO MYPDS ABC* - displays all members in your PDS starting with ABC*
TSO MYPDS BLANK - if BLANK does not exist, it puts you in a empty member called BLANK
When you back out of your PDS or PDS member, you will be right back within ELIPS browse where you started.
thanks for the quick reply actually what i want to do is
1) i m in ISPF panel main screen which comes just after login to tso.from where on typing elips i will get prompted to ELIPS library fromwhere with the option i can brows or edit any pds stored in ELIPS library(like mastfile or production file PDS) and can also copy it to my own pds(like nbk56gf.file.input )
2) what i want is to make a tool in REXX or CLIST which can copy from mastfile to my own PDS(created automatically) with/without the timestamp
Joined: 14 Jun 2006 Posts: 331 Location: Jacksonville, FL
You could easily write a REXX to copy one member of a PDS to another, however, datasets within ELIPS have a DSORG of DA (direct access). The ELIPS application allows you to access members of a direct access file. I don't think a REXX program has the capacity to read these type of files in order to perform a copy.
thanks for the quick reply.
i got some info on this please go thru and see if any help is possible.
Elips can be accessed thru lambaste command or not?
elips is the ca-librarian.
refer to ca homepage for documentation...
ca: computer associates
Specifies the DATASET name to allocate. If the dataset-name is fully
qualified, the name must be enclosed in quotes. If the dataset-name is
not in quotes, the dataset-name is qualified with the current TSO
profile prefix.
FILE(dd-name) or DDNAME(dd-name)
Specifies the DDNAME to which the file is allocated.
PROGRAM(program-name)
Is a required parameter that specifies the name of the program to be
executed immediately after successful allocation.
Optional Operands:
VOLUME(vol-ser)
Specifies the volume that contains the dataset. If the dataset is
not cataloged, the VOLUME(vol-ser) parameter is required.
UNIT(unit-name)
Specifies the unit name of the volume. If a unit name is not specified, a
default specification of SYSALLDA is used.
PARMS(program-parms)
Specifies free-form parameters to be passed to the program specified
by program-name. The free-form parameters must follow standard OS
parameter conventions.
CLOSEFREE
Is the equivalent of coding "FREE=CLOSE" in JCL.
If the program specified by program-name opens and closes the LAM file
more than once, do not use CLOSEFREE, or an abend will result. Leaving
out the CLOSEFREE parameter and using the default will always work.
LAM(lam-parms)
Specifies sub-keywords and sub-parameters that activate LAM features.
LAM features supported in the OS JCL have corresponding
sub-keywords that can be entered in their place, as lam-parms, as
follows:
password
Specifies a four-letter, LIBRARIAN member password consisting of
strictly alphabetic characters.
date
Specifies a date in the form of YYMMDDHHMMSS. An even number of
digits can be omitted from the right. LIB/AM assumes the highest
possible value for omitted digits.
x
Specifies the numeric absolute level of an archived member. The
letter L must preceed the absolute level number.
y
Specifies the numeric relative level of an archived member. A
minus sign (-) must preceed the relative level number.
For more explanation of these LAM sub-keywords, see the CA-LIBRARIAN User
Guide. If you were using TSO online, you could issue the following TSO
commands to list a CA-LIBRARIAN member, for example,
LIBR.DEMO(COBPGM), using IEBGENER:
1. LAMBASTE enforces LAM sub-parameter syntax and ignores a LAM
sub-parameter that is mutually exclusive with another LAM
sub-parameter scanned first.
2. LAMBASTE forces the allocation dataset to be input only. The LRECL is
set to 80, the BLKSIZE to 3120, and the RECFM to 'FB'. These
settings are for LAM use only, and do not change the DCB attributes
of the CA-LIBRARIAN Master file. The program can always reblock
the records.
3. LAMBASTE always frees the specified ddname before allocating it,
there is no need to free it beforehand.
4. LAMBASTE always frees the specified ddname after execution of the
specified program.
5. Dynamic concatenation is currently not supported by LAM, so
concatenation support is not coded in LAMBASTE.
6. LAMBASTE is coded to couple allocation and program invocation in a
single execution of LAMBASTE.
7. If you use the LAMBASTE command in a CLIST, you may want to turn-on
prompting with the "CONTROL PROMPT" statement.
8. The LAMBASTE command supports standard TSO abbreviations of command
syntax. Therefore, DATASET or DSNAME can be abbreviated DS,
FILE or DDNAME can be abbreviated F, and PROGRAM can be
abbreviated PGM.