Template:VSE ENTPSASM: Difference between revisions

From m204wiki
Jump to navigation Jump to search
(Automatically generated page update)
 
(Automatically generated page update)
Line 5: Line 5:
* ********************************************************************
* ********************************************************************
*                          Rocket Model 204
*                          Rocket Model 204
*                                02/15
*                                09/16
* ********************************************************************
* ********************************************************************
*  ENTPSASM translates, assembles and catalogs IFENTPS
*  ENTPSASM translates, assembles and catalogs IFENTPS
Line 23: Line 23:
/*    START - starting location of dataset
/*    START - starting location of dataset
/*    VOLSER - volume serial of dataset
/*    VOLSER - volume serial of dataset
/*
/* (-- For Rocket Support only: filename=ENTPSASM --)
/*
// EXEC PROC=M204JCL      DLBL for JCL sublibrary
// EXEC PROC=M204JCL      DLBL for JCL sublibrary
// LIBDEF PROC,SEARCH=M204LIB.V750
// LIBDEF PROC,SEARCH=M204LIB.V770
// EXEC PROC=M204WRK1
// EXEC PROC=M204WRK1
// EXEC PROC=M204V750   DLBL for V750 M204 library
// EXEC PROC=M204V770   DLBL for V770 M204 library
// LIBDEF SOURCE,SEARCH=M204LIB.V750
// LIBDEF SOURCE,SEARCH=M204LIB.V770
// LIBDEF PHASE,SEARCH=PRD1.BASE
// LIBDEF PHASE,SEARCH=PRD1.BASE
// EXEC DFHEAP1$
// EXEC DFHEAP1$
Line 35: Line 38:
// OPTION DECK
// OPTION DECK
// EXEC PROC=M204JCL      DLBL for JCL sublibrary
// EXEC PROC=M204JCL      DLBL for JCL sublibrary
// LIBDEF PROC,SEARCH=M204LIB.V750
// LIBDEF PROC,SEARCH=M204LIB.V770
// EXEC PROC=M204WRK2,DLBNAME=IJSYSPH,PLU=SYSPCH
// EXEC PROC=M204WRK2,DLBNAME=IJSYSPH,PLU=SYSPCH
// EXEC PROC=M204WRK1,DLBNAME=IJSYSIN,PLU=SYSIPT
// EXEC PROC=M204WRK1,DLBNAME=IJSYSIN,PLU=SYSIPT
// EXEC PROC=M204V750   DLBL for V750 M204 library
// EXEC PROC=M204V770   DLBL for V770 M204 library
// LIBDEF SOURCE,SEARCH=(M204LIB.V750,PRD1.BASE)
// LIBDEF SOURCE,SEARCH=(M204LIB.V770,PRD1.BASE)
// EXEC    ASMA90,SIZE=(ASMA90,64K),PARM='CPAT(SYSL),EX(LBX(EDECKXIT)),*
// EXEC    ASMA90,SIZE=(ASMA90,64K),PARM='CPAT(SYSL),EX(LBX(EDECKXIT)),*
               FOLD,OP(UNI),LINECOUNT(056)'
               FOLD,OP(UNI),LINECOUNT(056)'
Line 45: Line 48:
CLOSE SYSPCH,PUNCH
CLOSE SYSPCH,PUNCH
// EXEC PROC=M204JCL      DLBL for JCL sublibrary
// EXEC PROC=M204JCL      DLBL for JCL sublibrary
// LIBDEF PROC,SEARCH=M204LIB.V750
// LIBDEF PROC,SEARCH=M204LIB.V770
// EXEC PROC=M204WRK2,DLBNAME=IJSYSIN,PLU=SYSIPT
// EXEC PROC=M204WRK2,DLBNAME=IJSYSIN,PLU=SYSIPT
// EXEC PROC=M204V750   DLBL for V750 M204 library
// EXEC PROC=M204V770   DLBL for V770 M204 library
// EXEC LIBR,PARM='A S=M204LIB.V750;CAT IFENTPS.OBJ REP=Y'
// EXEC LIBR,PARM='A S=M204LIB.V750;CAT IFENTPS.OBJ REP=Y'
/*
/*

Revision as of 23:02, 9 November 2016

// JOB ENTPSASM * ******************************************************************** * Rocket Model 204 * 09/16 * ******************************************************************** * ENTPSASM translates, assembles and catalogs IFENTPS * Remove the leading '*' from the $$ SLI statement /* /* To adapt this procedure to your installation: /* 1. Modify JOB statement /* 2. Modify the following in the job stream: /* ASSGN - this jcl assumes standard assignments /* for the logical units (SYS000) referenced /* in EXTENT statements. Add as needed: /* (e.g., // ASSGN SYS000,cuu) /* DATE - expiration date of dataset /* LENGTH - length of dataset in blocks/tracks /* if a MODEL 204 distribution file, see installation /* guide for number of 6184 byte pages /* START - starting location of dataset /* VOLSER - volume serial of dataset /* /* (-- For Rocket Support only: filename=ENTPSASM --) /* // EXEC PROC=M204JCL DLBL for JCL sublibrary // LIBDEF PROC,SEARCH=M204LIB.V770 // EXEC PROC=M204WRK1 // EXEC PROC=M204V770 DLBL for V770 M204 library // LIBDEF SOURCE,SEARCH=M204LIB.V770 // LIBDEF PHASE,SEARCH=PRD1.BASE // EXEC DFHEAP1$ ** $$ SLI MEM=IFENTPS.A code ***** /* CLOSE SYSPCH,PUNCH // OPTION DECK // EXEC PROC=M204JCL DLBL for JCL sublibrary // LIBDEF PROC,SEARCH=M204LIB.V770 // EXEC PROC=M204WRK2,DLBNAME=IJSYSPH,PLU=SYSPCH // EXEC PROC=M204WRK1,DLBNAME=IJSYSIN,PLU=SYSIPT // EXEC PROC=M204V770 DLBL for V770 M204 library // LIBDEF SOURCE,SEARCH=(M204LIB.V770,PRD1.BASE) // EXEC ASMA90,SIZE=(ASMA90,64K),PARM='CPAT(SYSL),EX(LBX(EDECKXIT)),* FOLD,OP(UNI),LINECOUNT(056)' CLOSE SYSIPT,SYSRDR CLOSE SYSPCH,PUNCH // EXEC PROC=M204JCL DLBL for JCL sublibrary // LIBDEF PROC,SEARCH=M204LIB.V770 // EXEC PROC=M204WRK2,DLBNAME=IJSYSIN,PLU=SYSIPT // EXEC PROC=M204V770 DLBL for V770 M204 library // EXEC LIBR,PARM='A S=M204LIB.V750;CAT IFENTPS.OBJ REP=Y' /* /& CLOSE SYSIPT,SYSRDR