Z-FIL11X

Dieses Dokument behandelt die folgenden Themen:

Beschreibung

Ein Dokument in einem anderen Fach oder Ordner ablegen.

Dieses Subprogramm entspricht Z-FIL11 mit der Ausnahme, dass der Parameter ISN das Format P10 hat.

Sie können ein Dokument im Arbeitsfach oder einem beliebigen selbstdefinierten Fach ablegen. Sie können ein Dokument jedoch nicht im einem Systemfach wie z.B. Posteingang oder Tageskopien ablegen.

Sie können kein TRS-Fach und kein TRS-Dokument angeben. Um ein Dokument in einem TRS-Fach abzulegen, müssen Sie Z-TRS11 benutzen.

Wenn Sie das Dokument umbenennen wollen, ohne es in einem anderen Fach oder Ordner abzulegen, müssen Sie den Parameter Neuer-Dokumentname angeben. Die Parameter Neues-Fach und Neuer-Ordner dürfen Sie hierbei nicht angeben.

Wenn Sie ein Dokument ablegen, das sich zur Zeit im Ordner Neu des Fachs Posteingang befindet, wird die dazugehörende Empfängerliste aktualisiert (d.h. der Empfangsstatus des Dokuments weist nun darauf hin, dass das Dokument gelesen wurde).

Parameter

Parameter Format Ein Aus Bemerkung
Return-Code N2 O X Eingabe -1: kein ET.
Buero A8 E   Das Büro, in dem sich das Dokument befindet, das Sie ablegen wollen.
Passwort A8 E   Das Passwort des o.g. Büros.
Dokumentname A32 E*   Der Name des Dokuments, das ablegt werden soll. Entweder Dokumentname oder ISN, nicht beides. Sie dürfen nicht den Namen eines TRS-Dokuments angeben.
ISN P10 E* X Die ISN des Dokuments, das ablegt werden soll. Eingabe: entweder ISN oder Dokumentname, nicht beides. Sie dürfen nicht die ISN eines TRS-Dokuments angeben. Vor dem Aufruf dieses Subprogramms können Sie Z-DIS11X aufrufen, um die ISN des gewünschten Dokuments auszugeben.
Neues-Fach A15 O   Das Fach, in dem das Dokument abgelegt werden soll. Sie dürfen kein TRS-Fach und kein Systemfach (außer dem Arbeitsfach) definieren.
Neuer-Ordner A15 O   Der Ordner im o.g. Fach, in dem das Dokument abgelegt werden soll.
Neuer-Dokumentname A32 O   Wenn angegeben, wird das Dokument unter einem neuen Namen abgelegt.
Suchbegriffe A15/1:6 O   Suchbegriffe sind hilfreich, wenn Sie ein Objekt suchen. Sie können bis zu 6 Suchbegriffe angeben. Ein Suchbegriff darf keinen Stern (*) enthalten. Sobald Sie einen neuen Suchbegriff angeben, werden alle vorher definierten Suchbegriffe gelöscht. Um die alten Suchbegriffe zu erhalten, müssen Sie sie in diesem Fall erneut angeben.

Return-Codes

00 Erfolg
02 Ungültiger Büroname oder - nur im Batch-Betrieb - Büro gesperrt
03 Falsches Passwort
04 ISN wurde nicht gefunden
08 Geben Sie entweder ISN oder Name ein - nicht beides
09 ISN zeigt nicht auf das richtige Objekt
10 Funktion ist für Systemfach nicht gültig
51 Ungültiger Name
52 Es existiert bereits ein Objekt mit dem angegebenen Namen
53 Das gewünschte Objekt existiert nicht
54 Mindestens ein Suchbegriff war ungültig
55 Das gewünschte Fach bzw. der gewünschte Ordner existiert nicht
56 Das gewünschte Fach ist ein TRS-Fach
90 Ein TRS-Dokument kann nicht in einem anderen Fach abgelegt werden

Subprogramme

Z-120
Z-122
Z-123
Z-147
Z-150
Z-165
Z-175
Z-177
Z-190
Z-194
Z-197
Z-222
Z-223
Z-400
Z-401
Z-1200&0

Beispiel

0010 *
0020 * Dokument in einem anderen Fach oder Ordner ablegen
0030 *
0040 DEFINE DATA
0050 LOCAL
0060 1 RETURN-CODE         (N2)
0070 1 BUERO               (A8)
0080 1 PASSWORT            (A8)
0090 1 DOKUMENTNAME        (A32)
0100 1 ISN                 (P10)
0110 1 NEUES-FACH          (A15)
0120 1 NEUER-ORDNER        (A15)
0130 1 NEUER-DOKUMENTNAME  (A32)
0140 1 SUCHBEGRIFFE        (A15/1:6)
0150 *
0160 END-DEFINE
0170 *
0180 RESET RETURN-CODE
0190 MOVE 'BUERO'          TO BUERO
0200 MOVE 'PASSWORT'       TO PASSWORT
0210 MOVE 1234567890       TO ISN
0220 MOVE 'Arbeitsfach'    TO NEUES-FACH
0230 MOVE 'Arbeitsordner'  TO NEUER-ORDNER
0240 MOVE 'Neues-Dokument' TO NEUER-DOKUMENTNAME
0250 MOVE 'Suchbegriff-1'  TO SUCHBEGRIFFE(1)
0260 MOVE 'Suchbegriff-2'  TO SUCHBEGRIFFE(2)
0270 *
0280 CALLNAT 'Z-FIL11X'
0290   RETURN-CODE
0300   BUERO
0310   PASSWORT
0320   DOKUMENTNAME
0330   ISN
0340   NEUES-FACH
0350   NEUER-ORDNER
0360   NEUER-DOKUMENTNAME
0370   SUCHBEGRIFFE(*)
0380 *
0390 IF  RETURN-CODE EQ 0
0400   WRITE 'Dokument wurde abgelegt'
0410 ELSE
0420   WRITE 'Return-Code' RETURN-CODE
0430 END-IF
0440 *
0450 END