When you issue TSO command SCRIPT dsn FI(fi_data_set) ... what controls the space parameters used when allocating the data set (e.g., primary and secondary extent sizes, and whether tracks or or cylinders)?
If the "default" size is not adequate, is there any remedy other than pre-allocating a large-enough data set?
The default allocation sizes are in the User Option Table modules supplied for customizing DCF. For TSO, that is DSMTSUOT. DSMTSUOT has a SPACE parameter on a DSMTSDEF macro. The default space is SPACE=(CYL,1,1,1). To increase the space for the output file for a single run, allocate the SCRPTFIL ddname. DO NOT use the FILE option on the SCRIPT command. If you code both, the FILE command option takes precedence and the SCRPTFIL ddname is ignored. Make sure you specify the DCB attributes of the output file completely on SCRIPTFIL, use the values from Table 28 'Output File Formats' in Chapter 5 of the "SCRIPT/VS Language Reference" (SH35-0070-07). For example, DCB=(DSORG=PS,RECFM=VBM,LRECL=8205,BLKSIZE=8209) If you want to permanently change the default allocation, modifiy DSMTSUOT with the desired values. DSMTSUOT is found in the 'SCRIPT.R40.DCFASM' library. Modify it is with an SMP/E usermod. For example, ++USERMOD(LTSUOT1) . ++VER(Z038) FMID(JSR1413) PRE( UN75529 ) /* USERMOD LTSUOT1 CREATED USING SMP SYSMOD INSTALL DIALOG. CREATED BY: RBOLAN ON: 96/04/05 10:36 DESCRIPTION: customize dsmtsuot for my installation. */ . ++SRC(DSMTSUOT) . ...insert your modified DSMTSUOT source here. Notice the PRE( un75529 ) keyword. You will want to fill in the PTF number that your SMP/E system has for DSMTSUOT RMID value. You can create the usermod with the SMP/E ISPF dialog panels. Then just RECEIVE and APPLY the usermod as you would an APAR or PTF. See the Script Text Programmer's Guide, 'Tailoring SCRIPT/VS for Your Installation' for more information on DSMTSUOT. Remember it is not necessary to first go to a data set then print the data set in another step. You can go directly to output, like this example: > //RBOLANX JOB (TSS40000),'PQ14483 TEST ',NOTIFY=RBOLAN, > // CLASS=A,MSGCLASS=T,MSGLEVEL=(1,1),TIME=(,30), > // REGION=0M > //OUT1 OUTPUT DEST=BLDMAN1.PR31,PRMODE=PAGE > //SCRIPT EXEC PGM=IKJEFT01 > //STEPLIB DD DISP=SHR,DSN=RBOLAN.R40.DCFLOAD > //SCRPTFIL DD SYSOUT=*,OUTPUT=*.OUT1 > //SCRPTFNT DD DISP=SHR,DSN=SYS1.FONTLIBB > //SYSTSPRT DD SYSOUT=* > //SYSTSIN DD * > PROFILE PREFIX(RBOLAN) > SCRIPT PQ14483.SCRIPT DEV(3820A) > // Subject: References in script files Moved to BOOKIE FORUM on IBMTEXT by SGRALLA at BLDVMA
Last updated: 98/11/11 16:48:09