[UNDLogo]

Welcome to Librarian


TSO Librarian

LIBRARIAN


To access Librarian, one must define librarian defaults by setting up LIBSET

Option 6 Commands from the ISPF Primary Option Menu.

Enter LIBSET after the arrow prompt ===> LIBSET in the ISPF Command Shell

PRESS ENTER

ISPF Command Shell

Enter TSO or Workstation commands below:

===> LIBSET





Place cursor on choice and press enter to Retrieve command

=>

=>

=>



The Librarian Setup Panel will appear as shown below:

Key in the Disk Master name you would like to have as a default to access librarian

Job Class - A - the job class necessary to run a batch job

Output Class - Q - where the output is accessible after the batch job is run

Account Number - the account number necessary for a job card

Room Number - the room number where the output should be distributed if printed

PRESS ENTER to process

--------------------- Librarian Setup Panel ----------------

COMMAND ===>

This information is used to submit jobs to Librarian

Disk Master ........ ________

Job Class ..........

Output Class ....... __

Account Number...... ________

Room Number ........

Press ENTER to process. Press END to cancel.

THREE REXX EXECS TO ACCESS LIBRARIAN


There are three librarian REXX execs written to access librarian. There are execs to copy from librarian, replace in librarian, and add to librarian. Any librarian module that includes a dash - in column 1 must be changed to an equals = sign before replacing or adding a module.

LIBCOP - to copy a member from librarian - LIBCOP XXXXXXXX YYYYYYYY

XXXXXXXX - is the module you would like to copy

YYYYYYYY is the librarian master from which you would like to copy if it is different than the default



LIBREP - Once a module has been pulled in from librarian and edited, it can be replaced in librarian. In edit mode, at the command line, key in LIBREP MODULE NAME PASSWORD. A batch job will be submitted to the system.

LIBADD - modules may be added to librarian. In edit mode, at the command line, key in LIBADD. In the Librarian Add Panel:

Key in Model name - the name of the module you want to add

Model Password - the four digit password

Sequence Parameters is prefilled

Model Description - a description of the module you are adding

Programmer ID - your initials

Language - the language the module is coded

Disk Master will prefill with the default, change if another librarian is desired

PRESS ENTER to process

--------------------- Librarian Add Panel --------------

COMMAND ===>

Fill out the following:

Model Name ......... ________

Model Password ..... ____

Sequence Parameters. /81,6,10,10/_

Model Description... ______________________________

Programmer Id....... ____

Language ........... ___

Disk Master......... MASTR2__



Press ENTER to process. Press PF3 to exit.



DELETE LIBRARIAN MODULES


There has not been an EXEC developed to delete librarian modules. A sample JCL is included for deleting librarian modules. Changes required are:

Job card requires the name of the job, the batch account number, the room number, a description of the job

The librarian module master on the //LSTMEMBR JCL line

The name of the module and password on the -DLM card

//________ JOB (_______,____),'__________',CLASS=A,TIME=5

//* TO PRINT A MODULE FROM MASTER USE DSKMSTR='DSK.MSTR' ON 5TH LINE

//* TO PRINT A MODULE FROM HECNEX USE DSKMSTR='DSKMSTR.HECNEX' ON LINE 5

//* TO PRINT A MODULE FROM MCRH USE DSKMSTR='DSKMSTR.MCRH' ON 5TH LINE

//LSTMEMBR EXEC LIBRND,DSKMSTR='DSK.____'

//SYSIN DD *

-DLM ________,____

-END

/*

//







LIST ALL MEMBERS OF A LIBRARIAN DATA SET


The sample JCL below will list all the members of a librarian data set.

Changes required are:

Job card requires the name of the job, the batch account number, the room number, a description of the job

The librarian module master on the //LSTMEMBR JCL line

//________ JOB (_______,____),'__________',CLASS=A,TIME=5

//*********************************************************

//*

//*********************************************************

//LSTMEMBR EXEC LIBRN,DSKMSTR='DSKMSTR.______',PRINT=Q

//SYSIN DD *

-OPT GPO

-INDEX ADDA=010101

-END

/*

//