 |
|
 |
 |
 |
 | J.D.S. MICROPROCESSING TECHNICAL BULLETIN DATE WRITTEN: 08/08/91 SUBMITTED BY: R. SANDE SEQUENCE: 1 OF 1 FILEID: TB019 BULLETIN
HYDRA SNA SUPPORT SOFTWARE TAPE RELEASE 1.1E * * The format of this tape is as follows: * * FILE 0 INSTRUCTION FILE. * 80 X 80 list of these instructions. * * * FILE 1 CMS format Contains all required members for * CMS users. * * The tape can be used with the commands provided below. * cuu represents the real channel address of the tape drive. * * CP ATT cuu * 181 * TAPE FSF * VMFPLC2 LOAD * * * * This file was created using the 'VMFPLC2 DUMP' function * for the following members: * * SNAUTIL ASSEMBLE SNAUTIL Source Program * SNAUTIL TEXT SNAUTIL Object Module * SNAUTIL CNTRL SNAUTIL Control File * for configuration definitions. * SNADFLT CONFIG Factory default configuration + full * terminal definition library Please * read the beginning of the file for * instructions on adding other TDF's. * * * FILE 2 VSE format Contains all required members for * VSE users blocked 80 X 12000 (150 records per block). * USE DITTO FOR REBLOCKING: TTR,CUU,CUU,80,1 * where cuu represents the addresses of the 2 tape drives * * After reblocking, the JCL below catalogs the * members. NOTE: Different JCL'S are required for VSE/SP & * DOS/VSE systems. * cuu represents the channel address ot the tape drive. * library represents the DOS/VSE library name. * lib.sublib represents the VSE/SP library and sublibrary. * * DOS/VSE format: * * // JOB CATUTIL * // ASSGN SYSIPT,cuu * // LIBDEF SL,TO=library * // LIBDEF RL,TO=library * // EXEC MAINT * /& * * * VSE/SP format: * * // JOB CATUTIL * // ASSGN SYSIPT,cuu * // EXEC LIBR,PARM='ACCESS SUBLIB=lib.sublib' * /& * * The following members will be cataloged: * * Source: * A.SNAUTIL SNAUTIL source program. * D.SNACNTRL SNAUTIL control file * for configuration definitions. * D.SNADFLT Factory default configuration + full * terminal definition library Please * read the beginning of the file for * instructions on adding other TDF'S. * * Relo: * SNAUTIL SNAUTIL OBJECT MODULE. * * * FILE 3 OS/MVS format Contains all required members for * OS/MVS users blocked 80 X 12000 (150 records per block) * * * The new version of SNAUTIL needs to run in 384K of real address * space. An example of the JCL that could be used to copy the first * file to a library is provided below: * Note: The fourth file on the tape contains the MVS (OS) source. * * //GETDOC JOB * //STEP1 EXEC PGM=IEBUPDTE,PARM=NEW * //SYSPRINT DD SYSOUT=A * //SYSIN DD DSN=FILE1, * // DISP=(OLD,KEEP), * // UNIT=TAPE, * // VOL=SER=HYDRA, * // LABEL=(1,NL), * // DCB=(LRECL=80,BLKSIZE=80,RECFM=FB) * //SYSUT2 DD DSN=user.source.library(filename) * // UNIT=SYSDA, * // VOL=SER=serial, * // SPACE=(TRK,(15,15,5)), * // DISP=(NEW,CATLG,DELETE), * // DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB,DSORG=PO) * * The next example illustrates the JCL necessary to copy the source code * files to a library: * * * * //GETUTIL JOB * //STEP1 EXEC PGM=IEBUPDTE,PARM=NEW * //SYSPRINT DD SYSOUT=A * //SYSIN DD DSN=FILE4, * // DISP=(OLD,KEEP), * // UNIT=TAPE, * // VOL=SER=HYDRA, * // LABEL=(4,NL), * // DCB=(LRECL=80,BLKSIZE=12000,RECFM=FB) * //SYSUT2 DD DSN=user.source.library, * // UNIT=SYSDA, * // VOL=SER=serial, * // SPACE=(TRK,(15,15,5)), * // DISP=(NEW,CATLG,DELETE), * // DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB,DSORG=PO) * * An example of the JCL needed to assemble SNAUTIL is provided below: * * //ASMUTIL JOB * //*MAIN,CLASS=COMPILE * //ASMIT EXEC ASMHCL,PARM.C='NOBATCH,XREF,NODECK,OBJECT', * // PARM.L='MAP,LET,NCAL' * //* * //C.SYSIN DD DSN=user.source.library(SNAUTIL),DISP=SHR * //L.SYSLMOD DD DSN=user.loadlib,DISP=SHR * //L.SYSIN DD * * SETCODE AC(1) * NAME SNAUTIL(R) * /* * // * * An example of the JCL needed to run SNAUTIL and SAVE the configuration * is given below. Note: For an SNAUTIL command such as SAVE, RESTORE, * ADD, etc. to work, the first command executed is always LOADCTL, * which loads the SNAUTIL control file. In this example, SAVE is the * requested function: * * //SNASAVE JOB * //S1 EXEC PGM=SNAUTIL,ADDRSPC=REAL,REGION=384K * //HY00 DD UNIT=cuu,DISP=OLD * //SYSPCH DD DSN=user.savelib(filename),DISP=OLD * //*SYSPCH DD SYSOUT=*,DCB=(LRECL=80,BLKSIZE=80,RECFM=FB) * //SYSLST DD SYSOUT=* * //SYSUDUMP DD SYSOUT=* * //SYSIPT DD * * LOADCTL * /* * // DD DSN=user.source.lib(filename),DISP=SHR * // DD * * SAVE * EOJ * /* * * * In the previous examples, the lower case values represent * user defined libraries and members that contain the SNAUTIL program * and data files. SETCODE AC(1) is required for APF (Authorized * Program Facility) to support SNAUTIL channel I/O. * In the SAVE example, cuu refers to HYDRA SNA's channel address. * For JES3 users, the DISP parameter should be NEW. For * additional information about SNAUTIL, please refer to Chapter 5 in * the HYDRA SNA Reference Guide, January 1990 edition. * * The following members will be cataloged: * * SNAUTIL SNAUTIL source program * SNACNTRL SNAUTIL control file * for configuration definitions. * SNADFLT Factory default configuration + f ull * terminal definition library Ple ase * read the beginning of the file fo r * instructions on adding other TDF's. * * * FILE 4 80 x 12000 file on how to create HYDRA SNA terminal definitions. * * * FILE 5 FIVE (5) tape marks.
|
 |
 |
|


 |
 |
 |