Your Browser is not longer supported

Please use Google Chrome, Mozilla Firefox or Microsoft Edge to view the page correctly
Loading...

{{viewport.spaceProperty.prod}}

SECURE-FREE-VOLUMES Flag and relocate free tapes

&pagelevel(4)&pagelevel

Privilege                ADA, DA, administrator without domains

This statement has two functions:

  • Identification of free tapes with respect to the type of reservation.

  • Outputting transport messages MAR4164 (relocation requests).

DAs can only execute the statement in their own domain. The DOMAIN operand is thus meaningless for them.

Format 

SECURE-FREE-VOLUMES                                                             Alias: SCFV
NUMBER-OF-VOLUMES = <integer 1..9999>
,TO-LOCATION = <alphanum-name 1..8>
,FROM-LOCATION = CENTRAL / <alphanum-name 1..8>
,VOLUME = *ALL / *INTERVAL(...)

*INTERVAL(...)


|FROM = *FIRST / <vsn>


|,TO = *LAST / <vsn>


|,FROM-FSEQ = 1 / <integer 1..9999>
,DEVICE-TYPE = *STD / <structured-name 1..8>
,USAGE = *ANY / *BY-MARENUCP
,FREE-POOL = *NO / *GLOBAL / *TSOS / <filename 1..54 without-gen-vers> / <text 2..32 without-sep>
,DOMAIN = *STD-DOMAIN / *OWN / <alphanum-name 1..8>
,MESSAGE-DESTINATION = *SYSOUT / list-poss(5): *SYSOUT / *SYSLST / *CONSOLE / *PRINTER / *FILE
,OVERFLOW-CONTROL = *BY-PROGRAM / *BY-SYSTEM

Operands

NUMBER-OF-VOLUMES = <integer 1..9999>
Number of free tapes to be processed.

TO-LOCATION = <alphanum-name 1..8>
Location name or symbolic location name to which free tapes are to be relocated. This may be identical to FROM-LOCATION, in which case the tapes are merely flagged.

FROM-LOCATION = CENTRAL / <alphanum-name 1..8>
Location from which free tapes are to be selected.

VOLUME =
Range of archive numbers from which free tapes are to be processed.

VOLUME = *ALL
All free tapes are processed.

VOLUME = *INTERVAL(...)
All free tapes whose archive number is within the specified range are processed.

FROM = *FIRST
All tapes are processed, starting with the lowest available archive number.

FROM = <vsn>
Archive number. All tapes whose archive number is greater than or equal to the specified archive number are processed.

TO = *LAST
All tapes are processed up to the highest existing archive number.

TO = <vsn>
Archive number. All tapes whose archive number is less than or equal to the specified archive number are processed.

FROM-FSEQ = 1 / <integer 1..9999>
File sequence number of the FROM operand. Specifies the precise file sequence number at which processing is to begin. This operand is relevant only if the statement is issued via the program interface.

DEVICE-TYPE =
Device type.

DEVICE-TYPE = *STD
The tapes are of the default device type (DEFAULT-DEVICE-TYPE) whose value was specified with the MODIFY-MAREN-PARAMETERS statement.

DEVICE-TYPE = <structured-name 1..8>
Device type. For a list of possible entries (depending on the BS2000 version), see manual “System Installation” [6].

USAGE =
Specifies the possible reservation type for the tapes selected. Reservation is effected either explicitly via the RESERVE-FREE-VOLUME statement or implicitly via the automatic free tape allocation facility MARENUCP.

USAGE = *ANY
Both types of reservation are permitted for the free tapes selected.

USAGE = *BY-MARENUCP
The tapes are to be reserved via MARENUCP only.

FREE-POOL =
Selects the catalog entries to be made available on the basis of the free tape pool.

FREE-POOL = *NO
Only free tapes assigned to the *NO free tape pool are selected.

FREE-POOL = *GLOBAL
Only free tapes assigned to the *GLOBAL free tape pool are selected.

FREE-POOL = *TSOS
Only free tapes assigned to the *TSOS free tape pool are selected.

 

If aliases are specified for the *NO, *GLOBAL or *TSOS values, then these operand values will be expanded to their full length for compatibility reasons (e.g. *GL is expanded to *GLOBAL).

FREE-POOL = <filename 1..54 without-gen-vers>
Only free tapes assigned to the free tape pool for HSMS/ARCHIVE applications using the specified directory are selected. If this directory is located under a remote user ID, both the user ID and the catalog ID must be entered. The user's own ID and standard catalog ID can be omitted.

FREE-POOL = <text 2..32 without-sep>
Specifies the name of a free tape pool. The name of the free tape pool must begin with “*” followed by at least one character from A-Z or 0-9. The characters “.”, “-” and “_” are permitted, but not at the end and not next to each other.

DOMAIN =
Only those tapes are processed which are assigned to the specified domain.

DOMAIN = *STD-DOMAIN
Only tapes of the standard domain are processed.

DOMAIN = *OWN
Only tapes of the user’s own domain are processed. The user’s own domain is the domain of the system on which the ADA is currently working or the domain in which he/she has taken over the DA role.

DOMAIN = <alphanum-name 1..8>
Only tapes of the selected domain are processed. If domains are used, the DA is shown free tapes either from the standard domain or from his/her own domain. This is dependent on which value the domain-specific FREE-VOLUMES operand has. The ADA is shown free tapes of the domain which is specified with the DOMAIN operand.

MESSAGE-DESTINATION = *SYSOUT / list-poss(5): *SYSOUT / *SYSLST / *CONSOLE / *PRINTER / *FILE
Specifies the medium on which the transport messages MAR4164 are to be output. See notes below.

OVERFLOW-CONTROL =
Type of screen overflow control in interactive mode.

OVERFLOW-CONTROL = *BY-PROGRAM
Control by the program: after eighteen catalog entries have been processed, a message is displayed inquiring whether the current operation is to be continued or aborted.

OVERFLOW-CONTROL = *BY-SYSTEM
Control by BS2000: screen overflow control is based entirely on the system parameter TCHOFLO or the value set in the MODIFY-TERMINAL-OPTIONS command.

Notes

  • Only free tapes (VOLUME-STATUS=*FREE) whose TEMPORARY-LOCATION is the same as the specified FROM-LOCATION are relocated.

  • If MESSAGE-DESTINATION=*PRINTER/*FILE is specified, all transport messages are written to the file $<userid>.MAREN.SECURE-FREE-VOLUMES, where userid is the user ID of the calling task. If the file already exists, it is extended, otherwise, it is created.

  • If MESSAGE-DESTINATION=*PRINTER is specified, the file MAREN.SECURE-FREE-VOLUMES is printed and deleted after the last VSN has been processed using the SPOOL macro PRNT. Output is directed to the printer specified in the MAREN parameter EXPORT-RECEIPT = *PRINTER(DEVICE-NAME=...). If the statement aborts, the file is not printed. The statement can then be restarted, the file is updated, and in the event of normal termination, the file containing all the transport messages generated is printed.

  • If MESSAGE-DESTINATION=*PRINTER is specified and the MAREN parameter EXPORT-RECEIPT contains a value other than PRINTER, the statement is rejected with the message MARM175.

  • The selected free tapes are always flagged in accordance with the USAGE operand, independent of any previously existing flags.

  • The operand USAGE=*BY-MARENUCP is also recommended for the SECURE-FREE-VOLUMES statement with a directory specification. Although tapes pre-reserved for ARCHIVE cannot be reserved using the MAREN statement RESERVE-FREE-VOLUME, they can be reserved by means of the ARCHIVE statement POOL ...,ADD=vsn.

  • Archive system locations must not be used for the FROM-LOCATION and TO-LOCATION operands. The only exception here is if the same archive system location is specified for both operands, in which case no tapes are relocated.

Examples

//secure-free-volumes number-of-vol=5,to-loc=system3,vol=*int(FR0000)
%  MARM169 VOLUME 'FR0000' AVAILABLE FOR RESERVATIONS AT LOCATION 'SYSTEM3'
%  MAR4164 PLEASE TRANSPORT VOLUME 'FR0000' FROM 'CENTRAL' TO 'SYSTEM3'
%  MARM169 VOLUME 'FR0001' AVAILABLE FOR RESERVATIONS AT LOCATION 'SYSTEM3'
%  MAR4164 PLEASE TRANSPORT VOLUME 'FR0001' FROM 'CENTRAL' TO 'SYSTEM3'
%  MARM169 VOLUME 'FR0008' AVAILABLE FOR RESERVATIONS AT LOCATION 'SYSTEM3'
%  MAR4164 PLEASE TRANSPORT VOLUME 'FR0008' FROM 'CENTRAL' TO 'SYSTEM3'
%  MARM169 VOLUME 'FR0013' AVAILABLE FOR RESERVATIONS AT LOCATION 'SYSTEM3'
%  MAR4164 PLEASE TRANSPORT VOLUME 'FR0013' FROM 'CENTRAL' TO 'SYSTEM3'
%  MARM169 VOLUME 'FR0019' AVAILABLE FOR RESERVATIONS AT LOCATION 'SYSTEM3'
%  MAR4164 PLEASE TRANSPORT VOLUME 'FR0019' FROM 'CENTRAL' TO 'SYSTEM3'
%  MARM120 TOTAL OF 5 MAREN CATALOG ENTRIES PROCESSED

Five free tapes starting with VSN fr0000 are relocated from CENTRAL to SYSTEM3. The transport messages appear only on SYSOUT.

//show-volume-attributes volume=FR0000
VOLUME    = FR0000       FILE-SEQ      = 0001          DEV-TYPE =  TAPE-C4
USER-ID   =              HOME-LOCATION = CENTRAL       RESERV-DATE =
ACCOUNT   =              FREE-LOCATION = CENTRAL       FREE-DATE   =
USER-ACC  = OWNER-ONLY   TEMP-LOCATION = SYSTEM3       EXPIR-DATE  =
PASSWORD  = NONE
EXPORT    = C'                                                  '  /
REMARK /1 = C'                        ' /2 = C'          ' /3 = C'      '
USER-FIELD= C'                                                      '
FILE-NAME =
SAVE-FILE =                 SUBSAVE/SEQ =   /    CR-JOB/REQUEST-NA  =
FREE-POOL = *NO                                  CR-CAT-ID          =
VOL-GROUP =                                      CR-USER-ID         =
VOL-SEQ   = 0001       CR-DATE      =            LAST-ACC-DATE      =
FIRST-VOL =            CR-TIME      =            LAST-ACC-TIME      =
CLOSE-IND =            LAST-CL-DATE =            LAST-ACC-USER-ID   =
VOL-STATUS= FREE       LAST-CL-TIME =            LAST-ACC-ACCOUNT   =
INIT      = NO         REG-DATE     =            LAST-ACC-JOB-NAME  =
ADM-FIELD = C'        ' /2 = C'                ' LAST-ACC-TSN       =
                                                 LAST-ACC-HOSTNAME  =
                                                 LAST-WRITE-BLK-CNT =

This statement shows the result.

//sec-free-vol num-of-vol=10,to-loc=system4,from-loc=system1,mess-dest=*console
%  MARM169 VOLUME 'FR1000' AVAILABLE FOR RESERVATIONS AT LOCATION 'SYSTEM4'
(MSG) %  %  MAR4164 PLEASE TRANSPORT VOLUME 'FR1000' FROM 'SYSTEM1' TO
'SYSTEM4'
%  MARM169 VOLUME 'FR1001' AVAILABLE FOR RESERVATIONS AT LOCATION 'SYSTEM4'
(MSG) %  %  MAR4164 PLEASE TRANSPORT VOLUME 'FR1001' FROM 'SYSTEM1' TO
'SYSTEM4'
...
%  MARM169 VOLUME 'FR1009' AVAILABLE FOR RESERVATIONS AT LOCATION 'SYSTEM4'
(MSG) %  %  MAR4164 PLEASE TRANSPORT VOLUME 'FR1009' FROM 'SYSTEM1' TO
'SYSTEM4'
%  MARM120 TOTAL OF 10 MAREN CATALOG ENTRIES PROCESSED

Ten free tapes on SYSTEM1 are relocated to SYSTEM4. The transport messages are output on the console (messages begin with (MSG) %).

//sec-free-vol num-of-vol=4,to=system4,from=system4,usage=*by-marenucp
%  MARM168 VOLUME 'FR1000' SECURED FOR MARENUCP AT LOCATION 'SYSTEM4'
%  MARM168 VOLUME 'FR1001' SECURED FOR MARENUCP AT LOCATION 'SYSTEM4'
%  MARM168 VOLUME 'FR1002' SECURED FOR MARENUCP AT LOCATION 'SYSTEM4'
%  MARM168 VOLUME 'FR1003' SECURED FOR MARENUCP AT LOCATION 'SYSTEM4'
%  MARM120 TOTAL OF 4 MAREN CATALOG ENTRIES PROCESSED

Four free tapes already located on SYSTEM4 are flagged for automatic free tape allocation using MARENUCP, i.e. these four tapes cannot be reserved using RESERVE-FREE-VOLUMES.