Allgemeines
Anwendungsgebiet: | Jobvariablen |
Makrotyp: | S-Typ: (C-/D-/L-Form) siehe Abschnitt „Der Operand MF“ |
Bei der C-Form und D-Form des Makroaufrufs kann ein Präfix PREFIX (pre = 1..3 Buchstaben) angegeben werden (siehe Abschnitt „Der Operand PREFIX“). | |
Voreinstellung: | PREFIX = JSE |
Makrobeschreibung
Der Makro JVSEL beschränkt die Jobvariablenmenge, die bei einem ERAJV- oder STAJV-Aufruf verarbeitet wird, auf Jobvariablen mit bestimmten Merkmalen.
Makroaufrufformat und Operandenbeschreibung
Operation | Operanden |
| |
ACCESS=
Selektiert Jobvariablen abhängig von der erlaubten Zugriffsart.
*ANY
ist Voreinstellung: Die erlaubte Zugriffsart ist kein Auswahlkriterium.
*READ
Selektiert Jobvariablen, für die Schreibzugriff mit ACCESS=READ unterbunden ist, d.h. für die nur Lesezugriff zulässig ist.
*WRITE
Selektiert Jobvariablen, für die Schreibzugriff erlaubt ist.
SHARE=
Selektiert Jobvariablen in Abhängigkeit davon, ob sie mehrbenutzbar sind.
*ANY
ist Voreinstellung: Die Mehrbenutzbarkeit ist kein Auswahlkriterium.
*YES
Selektiert Jobvariablen, auf die bei aktivierter Standard-Zugriffskontrolle auch andere Benutzerkennungen Zugriff haben.
*NO
Selektiert Jobvariablen, auf die bei aktivierter Standard-Zugriffskontrolle nur der Eigentümer bzw. Miteigentümer zugreifen darf.
PASS=
Selektiert Jobvariablen in Abhängigkeit von dem vereinbarten Kennwortschutz. Werden mehrere Kennwortarten in Listenform angegeben, nimmt das System eine logische Oder-Verknüpfung vor und selektiert alle Jobvariablen, die einer der genannten Bedingungen genügen.
*ANY
ist Voreinstellung: Der Kennwortschutz ist kein Auswahlkriterium.
*NONE
Selektiert Jobvariablen, für die kein Kennwortschutz besteht.
*RDPASS
Selektiert Jobvariablen, die durch ein Lesekennwort geschützt sind.
*WRPASS
Selektiert Jobvariablen, die durch ein Schreibkennwort geschützt sind.
(list-of-pass)
In einer Liste kann der Anwender mehrere Arten des Kennwortschutzes angeben. Selektiert alle Jobvariablen, die mit einem der angegebenen Kennworttypen geschützt sind.
CRDATE=
Informiert über Jobvariablen in Abhängigkeit vom Erstellungsdatum; Bereichsangaben gelten jeweils inklusive der angegebenen Grenzen. In die Zukunft weisende Angaben sind für CRDATE nicht sinnvoll. Datumsangaben sind in folgender Form möglich:
als absolute Datumsangabe
ein konkretes Datum in der Form yymmdd bzw. [yy]yy-mm-dd (yy = Jahr, mm = Monat, dd = Tag)als relative Datumsangabe
(6-stellig einschl. Vorzeichen) Distanz zum aktuellen Tagesdatum in der Form -n für die Vergangenheit und [+]n für die Zukunft;
(gestern = -1 oder heute = +0)
*ANY
ist Voreinstellung: Das Erstellungsdatum ist kein Auswahlkriterium.
datum
Informiert über Jobvariablen, die zu dem angegebenen Datum erstellt wurden.
datum([zeit1][,zeit2])
JVs, die an dem angegeben Tag im Zeitraum von zeit1 bis zeit2 erzeugt wurden. Fehlt zeit1, beginnt der Zeitraum um 0:00 Uhr, fehlt zeit2, endet der Zeitraum um 23:59:59 Uhr.
(datum[(zeit)])
JVs, die ab dem angegebenen Zeitpunkt angelegt wurden. Fehlt die Zeitangabe, ist der Zeitpunkt 0:00 Uhr des angegebenen Tages.
(,datum[(zeit)])
JVs, die bis zum angegebenen Zeitpunkt angelegt wurden. Fehlt die Zeitangabe, ist der Zeitpunkt 23:59:59 Uhr des angegebenen Tages.
(datum1[(zeit1)],datum2[(zeit2)])
JVs, die in dem angegeben Zeitraum erzeugt wurden. Fehlt zeit1, beginnt der Zeitraum um 0:00 Uhr von datum1, fehlt zeit2, endet der Zeitraum um 23:59:59 Uhr von datum2.
EXDATE=
Selektiert Jobvariablen in Abhängigkeit vom „Freigabedatum“. Das ist das Datum, ab dem für die Jobvariable Schreibzugriffe erlaubt sind. Bereichsangaben gelten jeweils inklusive der angegebenen Grenzen. In die Zukunft weisende Datumsangaben sind sinnvoll, wenn Schutzfristen „abgefragt“ werden. Datumsangaben sind sowohl absolut als auch relativ möglich (siehe „CRDATE“).
*ANY
ist Voreinstellung: Das Freigabedatum ist kein Auswahlkriterium.
datum
Informiert über Jobvariablen, in deren Katalogeintrag das angegebene Freigabedatum vereinbart ist.
datum([zeit1][,zeit2])
JVs, die an dem angegeben Tag im Zeitraum von zeit1 bis zeit2 erzeugt wurden. Fehlt zeit1, beginnt der Zeitraum um 0:00 Uhr, fehlt zeit2, endet der Zeitraum um 23:59:59 Uhr.
(datum[(zeit)])
JVs, die ab dem angegebenen Zeitpunkt angelegt wurden. Fehlt die Zeitangabe, ist der Zeitpunkt 0:00 Uhr des angegebenen Tages.
(,datum[(zeit)])
JVs, die bis zum angegebenen Zeitpunkt angelegt wurden. Fehlt die Zeitangabe, ist der Zeitpunkt 23:59:59 Uhr des angegebenen Tages.
(datum1[(zeit1)],datum2[(zeit2)])
JVs, die in dem angegeben Zeitraum erzeugt wurden. Fehlt zeit1, beginnt der Zeitraum um 0:00 Uhr von datum1, fehlt zeit2, endet der Zeitraum um 23:59:59 Uhr von datum2.
BASACL=
Selektiert Jobvariablen in Abhängigkeit davon, ob ein BASIC-ACL-Eintrag existiert.
*ANY
ist Voreinstellung: Ein BASIC-ACL-Eintrag ist kein Auswahlkriterium.
*NONE
Selektiert Jobvariablen, für die kein BASIC-ACL-Eintrag definiert ist.
*YES
Selektiert Jobvariablen, für die ein BASIC-ACL-Eintrag definiert ist.
OWNERAR=
Selektiert Jobvariablen in Abhängigkeit von den Zugriffsrechten, die in ihren BASIC-ACL-Einträgen für die Eigentümer festgelegt sind.
*ANY
ist Voreinstellung: Die BASIC-ACL-Einträge für die Eigentümer sind kein Auswahlkriterium.
*NO-ACCESS
Selektiert Jobvariablen, auf die der Eigentümer nicht zugreifen darf.
zugriffsliste
Selektiert Jobvariablen, in deren BASIC-ACL-Eintrag für den Eigentümer mindestens eines der in der Liste angegebenen Zugriffsrechte vereinbart ist.
zugriffsliste hat folgendes Format:
[ { READ=*YES | R=*Y | READ=*NO | R=*N } ]
[, { WRITE=*YES | W=*Y | WRITE=*NO | W=*N } ]
Die einzelnen Elemente der Zugriffsliste haben folgende Bedeutung:
| READ=*YES bzw. R=*Y | Selektiert Jobvariablen, auf die der Eigentümer lesend zugreifen darf. |
| READ=*NO bzw. R=*N | Selektiert Jobvariablen, auf die der Eigentümer nicht lesend zugreifen darf. |
| WRITE=*YES bzw. W=*Y | Selektiert Jobvariablen, auf die der Eigentümer schreibend zugreifen darf. |
| WRITE=*NO bzw. W=*N | Selektiert Jobvariablen, auf die der Eigentümer nicht schreibend zugreifen darf. |
GROUPAR=
Selektiert Jobvariablen in Abhängigkeit von den Zugriffsrechten, die in ihren BASIC-ACL-Einträgen für die Mitglieder der Benutzergruppe des Eigentümers festgelegt sind.
*ANY
Die BASIC-ACL-Einträge für die Mitglieder der Benutzergruppe des Eigentümer sind kein Auswahlkriterium.
*NO-ACCESS
Selektiert Jobvariablen, auf die die Benutzergruppe des Eigentümers nicht zugreifen darf.
zugriffsliste
Selektiert Jobvariablen, in deren BASIC-ACL-Eintrag für die Benutzergruppe des Eigentümers mindestens eines der in der Liste angegebenen Zugriffsrechte vereinbart ist.
zugriffsliste hat folgendes Format:
[ { READ=*YES | R=*Y | READ=*NO | R=*N } ]
[, { WRITE=*YES | W=*Y | WRITE=*NO | W=*N } ]
Die einzelnen Elemente der Zugriffsliste haben folgende Bedeutung:
| READ=*YES bzw. R=*Y | Selektiert Jobvariablen, auf die die Benutzergruppe des Eigentümers lesend zugreifen darf. |
| READ=*NO bzw. R=*N | Selektiert Jobvariablen, auf die die Benutzergruppe des Eigentümers nicht lesend zugreifen darf. |
| WRITE=*YES bzw. W=*Y | Selektiert Jobvariablen, auf die die Benutzergruppe des Eigentümers schreibend zugreifen darf. |
| WRITE=*NO bzw. W=*N | Selektiert Jobvariablen, auf die die Benutzergruppe des Eigentümers nicht schreibend zugreifen darf. |
OTHERAR=
Selektiert Jobvariablen in Abhängigkeit von den Zugriffsrechten, die in ihren BASIC-ACL-Einträgen für Anwender außerhalb der Benutzergruppe des Eigentümers festgelegt sind.
*ANY
ist Voreinstellung: Die BASIC-ACL-Einträge für Anwender außerhalb der Benutzergruppe des Eigentümers sind kein Auswahlkriterium.
*NO-ACCESS
Selektiert Jobvariablen, auf die Anwender außerhalb der Benutzergruppe des Eigentümers nicht zugreifen dürfen.
zugriffsliste
Selektiert Jobvariablen, in deren BASIC-ACL-Eintrag für Anwender außerhalb der Benutzergruppe des Eigentümers mindestens eines der in der Liste angegebenen Zugriffsrechte vereinbart ist.
zugriffsliste hat folgendes Format:
[ { READ=*YES | R=*Y | READ=*NO | R=*N } ]
[, { WRITE=*YES | W=*Y | WRITE=*NO | W=*N } ]
Die einzelnen Elemente der Zugriffsliste haben folgende Bedeutung:
| READ=*YES bzw. R=*Y | Selektiert Jobvariablen, auf die die Anwender außerhalb der Benutzergruppe des Eigentümers lesend zugreifen dürfen. |
| READ=*NO bzw. R=*N | Selektiert Jobvariablen, auf die die Anwender außerhalb der Benutzergruppe des Eigentümers nicht lesend zugreifen dürfen. |
| WRITE=*YES bzw. W=*Y | Selektiert Jobvariablen, auf die die Anwender außerhalb der Benutzergruppe des Eigentümers schreibend zugreifen dürfen. |
| WRITE=*NO bzw. W=*N | Selektiert Jobvariablen, auf die die Anwender außerhalb der Benutzergruppe des Eigentümer nicht schreibend zugreifen dürfen. |
GUARDS=
Selektiert Jobvariablen abhängig von einem vereinbarten Zugriffsschutz mit GUARDS (siehe Handbuch „SECOS“ [9]).
*ANY
ist Voreinstellung: Der vereinbarte Zugriffsschutz mit GUARDS ist kein Auswahlkriterium.
*NONE
Selektiert Jobvariablen, die keinen Zugriffsschutz über GUARDS definiert haben.
*YES
Selektiert Jobvariablen, die einen Zugriffsschutz über GUARDS definiert haben.
(READ=...,WRITE=...)
Innerhalb einer Liste kann der Anwender angeben, wie der Zugriffschutz mit GUARDS für die auszuwählenden Jobvariablen vereinbart sein soll. Für jede Zugriffsart (Lesen und Schreiben) kann der vereinbarte Schutz genau angegeben werden. Wird für eine Zugriffsart keine Angabe gemacht, so erfolgt die Auswahl unabhängig von dem dafür vereinbarten Schutz.
Je Zugriffsart kann einer der folgenden Werte angegeben werden:
*ANY
Der vereinbarte GUARDS-Schutz ist kein Auswahlkriterium.
*NONE
Für die angegebene Zugriffsart ist kein Guard vereinbart, d.h. der entsprechende Zugriff wird untersagt.
fname
Für die angegebene Zugriffsart sind im Guard fname alle Bedingungen für die Zugriffserlaubnis enthalten.
MANCLAS=
Selektiert Jobvariablen entsprechend der HSMS-Management-Klasse zur Dateisicherung auf SM-Pubsets.
*ANY
ist Voreinstellung: Die HSMS-Management-Klasse ist kein Auswahlkriterium.
*NONE
Selektiert Jobvariablen, für die keine HSMS-Management-Klasse definiert ist.
<c-string 1..8>
Selektiert Jobvariablen mit der angegebenen HSMS-Management-Klasse.
MONJV=
Selektiert Jobvariablen in Abhängigkeit ihrer Verwendung als auftragsüberwachende Jobvariable.
*ANY
ist Voreinstellung: Die Verwendung als auftragsüberwachende Jobvariable ist kein Auswahlkriterium.
*NO
Selektiert Jobvariablen, die keinen Auftrag überwachen.
*YES
Selektiert Jobvariablen, die einen Auftrag überwachen (siehe auch Kommando SHOW-JV-ATTRIBUTES, Ausgabefeld JV-TYPE IS MONJV im Handbuch „Kommandos“ [1]).
CJC=
Selektiert Jobvariablen in Abhängigkeit ihrer Verwendung in CJC-Funktionen.
*ANY
ist Voreinstellung: Die Verwendung in CJC-Funktionen ist kein Auswahlkriterium.
*NO
Selektiert Jobvariablen, die nicht in CJC-Funktionen verwendet werden.
*YES
Selektiert Jobvariablen, die in CJC-Funktionen verwendet werden.
PROTACT
Selektiert Jobvariablen abhängig von der Schutzstufe der höchsten aktivierten Zugriffskontrolle.
Für Zugriffe auf die Jobvariable gilt der höchste aktivierte Zugriffsschutz. Die nachfolgende Tabelle zeigt Art der Zugriffskontrolle, Schutzmerkmal, das im CATJV-Makroaufruf anzugeben ist, und die Rangfolge (Schutzstufe):
Zugriffsschutz | Schutzmerkmal (Operand im CATJV) | Schutzstufe |
Standard-Zugriffskontrolle | ACCESS u. SHARE | 0 |
Einfache Zugriffskontroll-Liste | BASACL, OWNERAR, GROUPAR, OTHERAR | 1 |
Zugriffskontrolle über GUARDS | GUARDS | 2 |
Alle weiteren Schutzmerkmale der Jobvariablen (z.B. Kennwörter) werden unabhängig von der realisierten Schutzstufe ausgewertet.
*ANY
ist Voreinstellung: Selektiert Jobvariablen unabhängig von der Schutzstufe der höchsten aktivierten Zugriffskontrolle.
*LEVEL-0
Selektiert Jobvariablen, bei denen die Zugriffe über die Standard-Zugriffskontrolle erfolgen.
*LEVEL-1
Selektiert Jobvariablen, bei denen die Zugriffe über eine einfache Zugriffskontroll-Liste (BASIC-ACL-Schutz) erfolgen.
*LEVEL-2
Selektiert Jobvariablen, bei denen die Zugriffe über GUARDS erfolgen.
(list-of-protact)
Der Anwender kann in einer Liste maximal 3 Schutzstufen angeben. Selektiert Jobvariablen, bei denen die Zugriffe über eine Zugriffskontrolle erfolgen, die einer der angegebenen Schutzstufen entspricht.
SIZE=
Selektiert Jobvariablen in Abhängigkeit von der Länge des Jobvariablenwertes. Bereichsangaben gelten jeweils einschließlich der Bereichsgrenzen.
*ANY
ist Voreinstellung: Die Länge des Jobvariablenwertes ist kein Auswahlkriterium.
zahl
Selektiert Jobvariablen, deren Wert die angegebene Anzahl von Bytes lang ist. Mögliche Werte: 0 <= zahl <= 256
(zahl[,])
Informiert nur über Jobvariablen, deren Wert mindestens die angegebene Anzahl von Bytes lang ist (SIZE >= angegebener Wert).
(,zahl)
Informiert nur über Jobvariablen, deren Wert höchstens die angegebene Anzahl von Bytes lang ist (SIZE <= angegebener Wert).
(zahl1,zahl2)
Informiert über Jobvariablen, bei denen die Länge des Jobvariablenwertes im angegebenen Bereich liegt (zahl1 <= Länge <= zahl2).
TIMBASE=
Bestimmt die Zeitbasis, die bei Angaben zu Erstellungs- bzw. Freigabedatum verwendet wird.
*LTI
ist Voreinstellung: Datums- bzw. Zeitangaben werden als Angaben in lokaler Zeit interpretiert.
*UTC
Datums- bzw. Zeitangaben werden als Angaben in UTC-Zeit (Weltzeit) interpretiert.
MF=
PREFIX=
Zur Beschreibung der Operanden MF, PREFIX siehe "Allgemeine Makro-Operanden" .
Die gültigen Werte sind zu Beginn der Makrobeschreibung und aus dem Aufrufformat ersichtlich.
VERSION=
legt fest, welcher Version die Makroauflösung entsprechen soll.
1
ist Voreinstellung: Die Makroauflösung entspricht dem Stand JV V14.0.
Rückinformation und Fehleranzeigen
Die derzeit einzige Möglichkeit, eine JVSEL-Parameterliste zu verwenden, ist die Verwendung als SELADDR in einem ERAJV oder STAJV. Dieser liefert einen Returncode gemäß Kapitel "Meldungen" - "Makroebene" und speziell beim Returncode 0491 (Fehler beim Selektieren) hinterlegt er zusätzlich im Feld JSERC der JVSEL-Parameterliste die Angabe, welches Selektionskriterium fehlerhaft ist.
DSECT
JVSEL JVSEL MF=D 1 JVSEL MFCHK MF=D,SUPPORT=(D,C),PREFIX=J,MACID=SE,DMACID=JSE 2 JVSEL DSECT , 2 *,##### PREFIX=J, MACID=JSE ##### 1 * 1 * 1 DS 0A 1 JSETEXT DC C'SELECT' 1 JSEVERS DC X'01' 1 JSERC DC X'FF' 1 JSERCOK EQU X'00' NO ERROR 1 JSERCCRD EQU X'01' INVALID CRDATE 1 JSERCEXD EQU X'02' INVALID EXDATE 1 JSERCCRT EQU X'03' INVALID CRTIME 1 JSERCEXT EQU X'04' INVALID EXTIME 1 JSERCUND EQU X'FF' UNDEFINED 1 * 1 JSESELI0 DC B'00000000' SELECT IND0 1 JSESICRD EQU X'80' CREATION-DATE 1 JSESIEXD EQU X'40' EXPIRATION-DATE 1 JSESIPWP EQU X'20' PASSWORD-PROTECTED 1 JSESIPRO EQU X'10' PROTECTION-LEVEL 1 JSESIACC EQU X'08' ACCESS 1 JSESISHR EQU X'04' SHARE 1 JSESIBAC EQU X'02' BASIC-ACL 1 JSESIGUA EQU X'01' GUARDS 1 * 1 JSESELI1 DC B'00000000' SELECT IND1 1 JSESISIZ EQU X'80' SIZE 1 JSESIMON EQU X'40' MONJV 1 JSESIMCL EQU X'20' MANAGEMENT-CLASS 1 JSESICJC EQU X'10' CJC 1 JSESI5UU EQU X'0F' -- UNUSED, MUST BE 0 -- 1 * 1 JSEUNUS1 DC X'0000' 1 * 1 JSEBACL DC B'00000000' BASIC-ACL 1 JSEBACLY EQU X'80' YES 1 JSEBACLN EQU X'40' NONE 1 JSEBACLU EQU X'2F' -- UNUSED, MUST BE 0 -- 1 * 1 JSEBOW DC B'00000000' BASIC-ACL-OWNER 1 JSEBOWRS EQU X'80' READ-RIGHT-SPECIFIED 1 JSEBOWWS EQU X'40' WRITE-RIGHT-SPECIFIED 1 JSEBOWUN EQU X'20' -- UNUSED, MUST BE 0 -- 1 JSEBOWRY EQU X'10' READ = YES 1 JSEBOWWY EQU X'08' WRITE = YES 1 JSEBOWNU EQU X'04' -- UNUSED, MUST BE 0 -- 1 JSEBOWNO EQU X'02' NO-ACCESS 1 JSEBOWUU EQU X'01' -- UNUSED, MUST BE 0 -- 1 * 1 JSEBGR DC B'00000000' BASIC-ACL-GROUP 1 JSEBGRRS EQU X'80' READ-RIGHT-SPECIFIED 1 JSEBGRWS EQU X'40' WRITE-RIGHT-SPECIFIED 1 JSEBGRUN EQU X'20' -- UNUSED, MUST BE 0 -- 1 JSEBGRRY EQU X'10' READ = YES 1 JSEBGRWY EQU X'08' WRITE = YES 1 JSEBGRNU EQU X'04' -- UNUSED, MUST BE 0 -- 1 JSEBGRNO EQU X'02' NO-ACCESS 1 JSEBGRUU EQU X'01' -- UNUSED, MUST BE 0 -- 1 * 1 JSEBOT DC B'00000000' BASIC-ACL-OTHERS 1 JSEBOTRS EQU X'80' READ-RIGHT-SPECIFIED 1 JSEBOTWS EQU X'40' WRITE-RIGHT-SPECIFIED 1 JSEBOTUN EQU X'20' -- UNUSED, MUST BE 0 -- 1 JSEBOTRY EQU X'10' READ = YES 1 JSEBOTWY EQU X'08' WRITE = YES 1 JSEBOTNU EQU X'04' -- UNUSED, MUST BE 0 -- 1 JSEBOTNO EQU X'02' NO-ACCESS 1 JSEBOTUU EQU X'01' -- UNUSED, MUST BE 0 -- 1 * 1 JSECRD DC CL10' ' CREATION DATE - FROM DATE 1 JSECRT DC CL8' ' TIME 1 JSECRD2 DC CL10' ' - TO DATE 1 JSECRT2 DC CL8' ' TIME 1 * 1 JSEEXD DC CL10' ' EXPIRATION DATE - FROM DATE 1 JSEEXT DC CL8' ' TIME 1 JSEEXD2 DC CL10' ' - TO DATE 1 JSEEXT2 DC CL8' ' TIME 1 * 1 JSEGUA DC B'00000000' GUARDS SPECIFIED FLAG 1 JSEGUARS EQU X'80' 7-7 S READ-SPECIFIED 1 JSEGUAWS EQU X'40' 6-6 S WRITE-SPECIFIED 1 JSEGUAUN EQU X'20' 5-5 R -- UNUSED, MUST BE 0 -- 1 JSEGUUNU EQU X'10' 4-4 R -- UNUSED, MUST BE 0 -- 1 JSEGUANS EQU X'08' 3-3 S GUARDS=NONE SPECIFIED 1 JSEGUAYS EQU X'04' 2-2 S GUARDS=YES SPECIFIED 1 JSEGUAUU EQU X'03' 1-0 R -- UNUSED, MUST BE 0 -- 1 JSEGUAR DC CL18' ' GUARDS-READ 1 JSEGUAW DC CL18' ' GUARDS-WRITE 1 * 1 JSEPWP DC B'00000000' PW PROTECT FLAG - 1 JSEPWPRD EQU X'80' 7-7 S READ 1 JSEPWPWR EQU X'40' 6-6 S WRITE 1 JSEPWPUN EQU X'20' 5-5 R -- UNUSED, MUST BE 0 -- 1 JSEPWPNO EQU X'10' 4-4 S NONE 1 JSEPWPNU EQU X'0F' 3-0 R -- UNUSED, MUST BE 0 -- 1 * 1 JSEPROL DC B'00000000' PROTECTION-LEVEL-FLAG 1 JSEPROL0 EQU X'80' 7-7 S LEVEL 0 1 JSEPROL1 EQU X'40' 6-6 S LEVEL 1 1 JSEPROL2 EQU X'20' 5-5 S LEVEL 2 1 JSEPROUU EQU X'1F' 4-0 R -- UNUSED, MUST BE 0 -- 1 * 1 JSESELF1 DC B'00000000' SELECT FLAG 1 - 1 JSEACCRD EQU X'80' 7-7 S ACCESS = READ 1 JSEACCWR EQU X'40' 6-6 S ACCESS = WRITE 1 JSESHARY EQU X'20' 5-5 S SHARE = YES 1 JSESHARN EQU X'10' 4-4 S SHARE = NO 1 JSEMONY EQU X'08' 3-3 S MONJV = YES 1 JSEMONN EQU X'04' 2-2 S MONJV = NO 1 JSECJCY EQU X'02' 1-1 S CJC = YES 1 JSECJCN EQU X'01' 0-0 S CJC = NO 1 * 1 JSESELF2 DC B'00000000' SELECT FLAG 2 - 1 JSETLTI EQU X'80' 7-7 S TIME-BASE = LOCAL 1 JSESF2UU EQU X'7F' 6-0 R -- UNUSED, MUST BE 0 -- 1 * 1 JSEUNUS2 DC X'000000' 1 * 1 JSESIZE DC A(0) SIZE - FROM 1 JSESIZE2 DC A(0) - TO 1 * 1 JSEMGMCL DC CL8' ' MANAGEMENT-CLASS 1 JSEFUT4 DC 60X'00' SPACE FOR FUTURE USE, MUST BE 0 1 JSESPLLN EQU *-JVSEL