Z-FIL27

Dieses Dokument behandelt die folgenden Themen:


Beschreibung

Ein Referenzdokument in einem anderen Fach oder Ordner ablegen, oder ein Referenzdokument umbenennen.

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

Wenn Sie das Referenzdokument nicht umbenennen wollen, müssen Sie den Parameter Neuer-Name leer lassen.

Wenn Sie das Referenzdokument nicht ablegen wollen (d.h. wenn Sie es nur umbenennen wollen), müssen Sie die Parameter Neues-Fach und Neuer-Ordner leer lassen.

Wenn Sie ein Referenzdokument ablegen, das sich zur Zeit im Ordner Neu des Fachs Posteingang befindet, wird die dazugehörende Empfängerliste aktualisiert (d.h. der Empfangsstatus des Referenzdokuments weist nun darauf hin, dass das Referenzdokument gelesen wurde). In diesem Fall erfolgt automatisch ein END TRANSACTION.

Parameter

Parameter Format Ein Aus Bemerkung
Return-Code N2 O X Eingabe -1: kein ET.
Buero A8 E   Das Büro, in dem das Referenzdokument abgelegt ist.
Passwort A8 E   Das Passwort des o.g. Büros.
Referenzdokument-name A32 E*   Der Name des Referenzdokuments, das abgelegt werden soll. Entweder Referenzdokumentname oder ISN, nicht beides.
ISN P10 E* X Die ISN des Referenzdokuments, das abgelegt werden soll. Entweder ISN oder Referenzdokumentname, nicht beides.
Neuer-Name A32 O   Wenn angegeben, wird das Referenzdokument unter einem neuen Namen abgelegt.
Neues-Fach A15 O   Das Fach, in dem das Referenzdokument abgelegt werden soll. Sie dürfen kein Systemfach (außer dem Arbeitsfach) definieren.
Neuer-Ordner A15 O   Der Ordner im o.g. Fach, in dem das Referenzdokument abgelegt werden soll.

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
06 TRS konnte nicht aufgerufen werden
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
55 Das gewünschte Fach bzw. der gewünschte Ordner existiert nicht
73 Ungültiger Fach-/Ordnername
90 Das Objekt wurde bereits wie angegeben benannt und abgelegt

Subprogramme

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

Beispiel

0010 DEFINE DATA
0020 *
0030 LOCAL
0040 *
0050 1 RETURN-CODE            (N2)
0060 1 BUERO                  (A8)
0070 1 PASSWORT               (A8)
0080 1 REFERENZDOKUMENTNAME   (A32)
0090 1 ISN                    (P10)
0100 1 NEUER-NAME             (A32)
0110 1 NEUES-FACH             (A15)
0120 1 NEUER-ORDNER          (A15)
0130 *
0140 END-DEFINE
0150 *
0160 *
0170 INPUT (IP=OFF AD=A'_')
0180         'Buero            ' BUERO
0190      /  'Passwort         ' PASSWORT (AD=N)
0200      /  'Referenzdokument ' REFERENZDOKUMENTNAME
0210      // 'Neuer Name       ' NEUER-NAME
0220      // 'Neues Fach       ' NEUES-FACH
0230      /  'Neuer Ordner     ' NEUER-ORDNER
0240 *
0250 *
0260 IF   REFERENZDOKUMENTNAME NE ' '
0270      CALLNAT 'Z-FIL27'
0280           RETURN-CODE
0290           BUERO
0300           PASSWORT
0310           REFERENZDOKUMENTNAME
0320           ISN
0330           NEUER-NAME
0340           NEUES-FACH
0350           NEUER-ORDNER
0360 *
0370      IF   RETURN-CODE EQ 0
0380           WRITE 'Referenzdokument wurde abgelegt und umbenannt'
0390      ELSE
0400           WRITE 'Referenzdokument kann nicht geaendert werden' RETURN-CODE
0410      END-IF
0420 END-IF
0430 *
0440 END