CA Dynam for VSE User Guide

CA Dynam for VSE User Guide CA Dynam for VSE User Guide

supportcontent.ca.com
from supportcontent.ca.com More from this publisher
03.03.2015 Views

Using CA Dynam/T Option Specified As Purpose Examples drop D or 16 Erases the TLBL from the label track for the file when it is closed. A subsequent OPEN can process the next TLBL with the same DTFname hold H or 08 Prevents early drive release when the file is closed. Assignment is reset by JCL at EOJ. identify HDR1 I Forces the IBM OPEN transients to type HDR1 information from the tape being processed on the SYSLOG device. modify A or 64 Modifies the open DTF file name when there is more than one open tape file with the same name (see Notes.) // TLBL dtfname,'DSN,D' // TLBL dtfname,'DSN'...16 // TLBL FILE1,'ABC,H' // TLBL FILE1,'ABC',,,,,,08 // TLBL dtfname,'DSN,I' // TLBL dtfname,'DSN,A' // TLBL dtfname,'DSN'...64 multitask LIOCS Z The CA Dynam/T work area used between OPEN and CLOSE is released whenever the task that opens the tape is ended. The Z option will only release the work area when the main task ends. Therefore, the Z option should be used if a sub-task that opens a tape is ended before the tape is closed. // TLBL dtfname,'DSN,Z' prohibit P Prohibits dynamic LUB allocation for this DTF. // TLBL dtfname,'DSN,P' logical unit override S:nnn Overrides the logical unit defined in the DTF with the value (nnn) specified and assigns the logical unit to a dummy device. // TLBL dtfname,'DSN,S:030' delete label at close DL Delete the label for the file at the close of the file. // TLBL dtfname,'DSN,DL' EJECT E Eject cartridge from the robot at the close of the file. // TLBL dtfname,'DSN,E' Notes on the MODIFY option: CA Dynam/T modifies the file name of the DTF being opened to SYS0nnn, where nnn is the logical unit being used for the file. This is necessary when a program has two tape files with the same file name concurrently open (usually one input and one output). This rare occurrence is most likely to appear in ANSI COBOL programs with two SELECT statements for tape files, both specifying the same external name. 2–38 User Guide

Using CA Dynam/T SELECT TAPE-FILE ASSIGN TO SYS010-UT-3420-S-MASTER. SELECT TAPE-OUT ASSIGN TO SYS011-UT-3420-S-MASTER. Both files are referred to as MASTER, because of the above COBOL statements. A second OPEN results in the file being treated as uncontrolled, because CA Dynam/T requires a separate TLBL for each controlled file. Both files can be controlled if you use the dynamic file name modification option on the first of the two TLBLs with the file name MASTER: // TLBL MASTER,'DSN,A' // TLBL MASTER,'DSN' or // TLBL MASTER,'DSN',,,,,,64 // TLBL MASTER,'DSN' Suppose the logical unit for the first of the two files to be opened was SYS010. At OPEN, CA Dynam/T would change the file name to SYS0010 in the program and on the label track. Note that if you use the DROP option in conjunction with MODIFY, successive label records (TLBLs) must use the modified file name (in this case, SYS0010). Tape Reel Length Specification CA Dynam/T lets you specify the size of tape reels for specific data sets. This maximizes your magnetic tape resources. You can indicate tape reel length in any one of the following ways: • In the Catalog as an attribute of the data set • As an alphabetic TLBL option in the file-ID field CA Dynam/T provides six length codes (XS, S, MS, M, ML, L) ranging from extra short to long. They allow for data sets of various lengths. The chart below details the permitted length specifications, as defined to the Catalog using the DYNCAT DEFINE statement. This DYNCAT DEFINE Statement DEFINE 'ERROR FILE' NGEN=2 LENGTH=XS DEFINE 'TRANS FILE' NGEN=3 LENGTH=S Establishes This Tape Length extra short (200 ft.) short (400 ft.) Chapter 2: Maintaining Tape Files 2–39

Using <strong>CA</strong> <strong>Dynam</strong>/T<br />

Option<br />

Specified<br />

As<br />

Purpose<br />

Examples<br />

drop D or 16 Erases the TLBL from the label track<br />

<strong>for</strong> the file when it is closed. A<br />

subsequent OPEN can process the<br />

next TLBL with the same DTFname<br />

hold H or 08 Prevents early drive release when the<br />

file is closed. Assignment is reset by<br />

JCL at EOJ.<br />

identify HDR1 I Forces the IBM OPEN transients to<br />

type HDR1 in<strong>for</strong>mation from the tape<br />

being processed on the SYSLOG<br />

device.<br />

modify A or 64 Modifies the open DTF file name when<br />

there is more than one open tape file<br />

with the same name (see Notes.)<br />

// TLBL dtfname,'DSN,D'<br />

// TLBL dtfname,'DSN'...16<br />

// TLBL FILE1,'ABC,H'<br />

// TLBL FILE1,'ABC',,,,,,08<br />

// TLBL dtfname,'DSN,I'<br />

// TLBL dtfname,'DSN,A'<br />

// TLBL dtfname,'DSN'...64<br />

multitask<br />

LIOCS<br />

Z<br />

The <strong>CA</strong> <strong>Dynam</strong>/T work area used<br />

between OPEN and CLOSE is released<br />

whenever the task that opens the<br />

tape is ended. The Z option will only<br />

release the work area when the main<br />

task ends. There<strong>for</strong>e, the Z option<br />

should be used if a sub-task that<br />

opens a tape is ended be<strong>for</strong>e the tape<br />

is closed.<br />

// TLBL dtfname,'DSN,Z'<br />

prohibit P Prohibits dynamic LUB allocation <strong>for</strong><br />

this DTF.<br />

// TLBL dtfname,'DSN,P'<br />

logical unit<br />

override<br />

S:nnn<br />

Overrides the logical unit defined in<br />

the DTF with the value (nnn) specified<br />

and assigns the logical unit to a<br />

dummy device.<br />

// TLBL dtfname,'DSN,S:030'<br />

delete label at<br />

close<br />

DL<br />

Delete the label <strong>for</strong> the file at the<br />

close of the file.<br />

// TLBL dtfname,'DSN,DL'<br />

EJECT E Eject cartridge from the robot at the<br />

close of the file.<br />

// TLBL dtfname,'DSN,E'<br />

Notes on the MODIFY option:<br />

<strong>CA</strong> <strong>Dynam</strong>/T modifies the file name of the DTF being opened to SYS0nnn,<br />

where nnn is the logical unit being used <strong>for</strong> the file. This is necessary when a<br />

program has two tape files with the same file name concurrently open (usually<br />

one input and one output). This rare occurrence is most likely to appear in<br />

ANSI COBOL programs with two SELECT statements <strong>for</strong> tape files, both<br />

specifying the same external name.<br />

2–38 <strong>User</strong> <strong>Guide</strong>

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!