Fujitsu BS2000 Handbuch Seite 312

% MARM121 MAREN CATALOG ENTRY 'MB2249'/'0001' MODIFIED
% MARM120 TOTAL OF 9 MAREN CATALOG ENTRIES PROCESSED
Mit dieser Anweisung wird für die Bänder, deren Archivnummern im Bereich MB2240 und MB2249 liegen, der
Dauer-Lagerort ROBABBA1 vergeben.
//modify-volume-attr vol=*all,select=*res(user-id=test1,new-user-id=test2)
% MARM121 MAREN CATALOG ENTRY 'ID1040'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID1043'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID2004'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'MB2243'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'XY0005'/'0001' MODIFIED
% MARM120 TOTAL OF 4 MAREN CATALOG ENTRIES PROCESSED
Mit dieser Anweisung werden alle bisher unter der Benutzerkennung TEST1 archivierten Bänder nun der
Benutzerkennung TEST2 zugeordnet.
//mod-vol-attr vol=*int(id5000,id6000),sel=*reserved(user-id=user1),
prot=*par(free-date=0)
% MARM121 MAREN CATALOG ENTRY 'ID5001'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5002'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5003'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5004'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5005'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5006'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5007'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5801'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5802'/'0001' MODIFIED
% MARM121 MAREN CATALOG ENTRY 'ID5803'/'0001' MODIFIED
% MARM120 TOTAL OF 10 MAREN CATALOG ENTRIES PROCESSED
Das Freigabedatum aller Bänder, deren Archivnummern im Wertebereich zwischen ID5000 und ID6000 liegen und
der Benutzerkennung USER1 zugeordnet sind, wird auf das aktuelle Tagesdatum gesetzt. Dies hat zur Folge, dass
die betreffenden Bänder beim nächsten Freigabelauf mit der MARENADM-Anweisung FREE-VOLUMES
freigegeben werden. Bänder, deren Archivnummern außerhalb des angegebenen Nummernkreises liegen bzw. die
nicht unter der Benutzerkennung USER1 eingetragen sind, bleiben von der Änderung ausgenommen.
//print-vol-attr voL=*int(id5000,id6000),sel=*y(loc01),
output=list.vol.1,layout-contr=*no
% JMS0066 JOB 'ULF' ACCEPTED ON <date> AT 08:59, TSN = 1AV5
% MARM170 STATEMENT '//PRINT-VOLUME-ATTRIBUTES' PROCESSED
In allen Katalogeinträgen soll der Lagerort DA1100 durch DA1200 ersetzt werden. Dazu ist bei der Anweisung
PRINT-VOLUME-ATTRIBUTES im SELECT-Operand anzugeben, dass alle Katalogeinträge, die in den
Katalogeintragsfeldern HOME-, FREE- oder TEMPORARY-LOCATION den Wert DA1100 enthalten, in die
Ausgabedatei LIST.VOL.1 zu übernehmen sind. Für diese Auswahl existiert bereits der Parametersatz LOC01.
312