AD	Spaltenbereiche für die Anzeige auswählen/umorganisieren

AD { [col | konst | seq] ["text"] } {, ... } ... [, FC= X'cc' | C'c']

Arrange Data. Der Anzeigemodus der Display-Datei wird dahingehend verändert, daß nur bestimmte Spaltenbereiche der Datensätze ausgewählt und in einer festgelegten Reihenfolge am Bildschirm dargestellt werden. Zwischen den Spaltenbereichen können konstante Strings eingefügt werden. Die Darstellung jeder einzelnen Spalte kann in character und hexadezimaler Form erfolgen. Zu den ausgewählten Spaltenbereichen können Beschreibungstexte für die Überschriftszeile (Scale) definiert werden. Durch das Kommando AD wird ausschließlich die Darstellung der in der Display-Datei gespeicherten Datensätze beeinflußt. Die Datei selbst bleibt unverändert bestehen.

	Ein evtl. aktiver Offset-Modus für die Datei (z.B. O-4) wird durch das AD-Kommando zurückgesetzt.

	col	Angabe des auszuwählenden Spaltenbereichs. Es sind zwei verschiedene Darstellungsweisen möglich.

		:col1: len [ B[S] | C | H | P[n] | Z | STCK]

		Anfangsspalte des auszuwählenden Bereichs. Die Spaltenzählung beginnt mit 1.

		Es kann auch eine negative Spaltenangabe gemacht werden ( :-col1: ). Damit kann z.B. das Längenfeld eines Satzes mit variabler Länge angezeigt werden: :-4:2B bzw. :-4:4X

		len

		Länge des Spaltenbereichs.

		:col1-col2: [B[S]|C|H|P[n]|Z|STCK]

		Definition des Spaltenbereichs durch die Anfangs- und Endespalte. Als Endespalte (col2) kann auch das Zeichen $ (= Satzende) angegeben werden.

		Beispiel: :1-20: Es wird der Bereich von Spalte 1 bis Spalte 20 ausgewählt. Äquivalent hierzu ist die Angabe der Anfangsspalte :1: und der Länge 20 (:1:20).

	B[S]	Im ausgewählten Spaltenbereich steht eine Binärzahl mit (BS) oder ohne Vorzeichen (B). Die Länge des Spaltenbereichs darf nur 1, 2, 3 oder 4 betragen.

	C	Ausgabe des Spaltenbereichs im Characterformat (Standard).

	H	Ausgabe des Spaltenbereichs im hexadezimalen Format. H bewirkt einen auf die Spalte bezogenen Hexadezimalmodus (siehe Display-Kommando H/NH). Anstelle von H kann auch X angegeben werden.

	P[n]	Im ausgewählten Spaltenbereich steht eine gepackte Zahl mit oder ohne Vorzeichen.

	n	Anzahl der Kommastellen. Standard: n = 0

		Beispiel: :35-38:P2 liefert z.B. folgendes Zahlenformat: 99999,50

	Z	Im ausgewählten Spaltenbereich steht eine Dezimalzahl mit Vorzeichen. Eine Zahl des Formats Z entspricht in COBOL der Definition "PIC S9" und ist hexadezimal in folgender Form gespeichert: FaFb ... FnZm. Hierbei stehen a, b, ... ,n, m für Ziffern 0, ..., 9. Z enthält das Vorzeichen der Zahl: Die Sedezimalzeichen A, C, E, F stehen für positive und B, D für negative Werte.

		Beispiel: F1C2 entspricht +12, F1D2 entspricht -12

	STCK Im ausgewählten Spaltenbereich steht eine binär im STCK (Store Clock) Format gespeicherte Datums- und Zeitangabe. Das STCK-Feld kann vier oder acht Bytes lang sein. In der Ausgabe wird das Feld in der Form YYYY-MM-DD HH:MM:SS:MMMMMM angezeigt. MMMMMM entspricht hierbei dem Milli- und Mikrosekundenwert der Zeitangabe.

	Standard: Die Spalte wird im Characterformat angezeigt.

	konst	Konstanter String, der in der aufbereiteten Satzdarstellung vor der nächsten Spalte, bzw. nach der zuletzt ausgewählten Spalte eingefügt wird.

	[len] C'string' | X'string'

	len

	Gesamtlänge der Konstanten. Der in Form von C'...'/X'...' angegebene String wird solange wiederholt, bis die gewünschte Länge erreicht ist.

	Standard: len = Länge des angegebenen Strings.

	C'string' | X'string'

	Wert der einzufügenden Konstanten. C'string' kann zu 'string' abgekürzt werden.

	seq	Sequentielle Nummerierung. Bei SAM- und PAM-Dateien wird ein fortlaufendes Numerierungsfeld in die Anzeige eingefügt.

		Bei ISAM-Dateien ist eine korrekte Ausgabe der Nummerierung nur garantiert, falls vom Anfang der Datei aus ein Write-Kommando oder ein Suche-kommando mit Wegschreiben der Treffer ausgeführt wird.

		Falls mehrere SEQ-Einfügungen in einem Datensatz vorgenommen werden, muß für alle SEQ-Anweisungen die gleiche Länge und Stepsize angegeben werden.

	SEQ(len [, step])

	len

	Länge des Numerierungsfeldes. 1 <= len <= 10.

	step

	Schrittweite der Numerierung. 1 <= step <= 30000.

	Standard: 1

	"text"	Der angegebene Text definiert eine Spaltenüberschrift, die in der Scale-Zeile des Display-Bildschirms angezeigt wird.

	Es können beliebig viele Spalten-/Konstantenbereiche aneinandergereiht werden. Die einzelnen Bereiche werden durch Kommas getrennt. Die ausgewählten Spalten /Konstanten werden in der Darstellung lückenlos aneinandergereiht. Mit dem Kommando AD können auch Spalten dupliziert oder vertauscht werden.

	FC=	Fill-Character. Spaltenbereiche, die ganz oder teilweise außerhalb eines Datensatzes liegen, werden mit diesem Zeichen aufgefüllt. Ausnahme: Der letzte Spaltenbereich wird nicht aufgefüllt, sondern entsprechend der Länge der vorhandenen Daten verkürzt. Für weitere Einzelheiten siehe Hinweise.

		Standard: FC=C' '.