Z-FIL11X

This document covers the following topics:


Description

File a document into another folder or file.

This subprogram is the same as Z-FIL11 with the one exception that the parameter ISN uses the format P10.

You can file a document into folder Work or any user-defined folder. You cannot file a document into a system folder such as the Inbasket or Outbasket.

You cannot specify a TRS folder or a TRS document. To file a document into a TRS folder, you must use Z-TRS11.

If you want to rename the document without filing it into another folder or file, you must specify New-document-name without specifing New-folder or New-file.

When you file a document which is currently stored in the Inbasket file New, the corresponding address list is updated so that the reception status of the document indicates that it has been read.

Parameters

Parameter Format In Out Remarks
Return-code N2 O X Input -1: no ET.
Cabinet A8 R   The cabinet in which the document is to be filed.
Password A8 R   The password of the above cabinet.
Document-name A32 R*   The name of the document to be filed. Either Document-name or ISN, not both. You must not specify the name of a TRS document.
ISN P10 R* X The ISN of the document to be filed. Input: either ISN or Document-name, not both. You must not specify the ISN of a TRS document. You can invoke Z-DIS11X prior to this subprogram to obtain the ISN for the desired document.
New-folder A15 O   The name of the folder in which the document is to be stored.You must not specify a system folder (except Work) or TRS folder.
New-file A15 O   The name of a file within the above folder in which the document is to be stored.
New-document-name A32 O   If specified the document is filed with a new name.
Keywords A15/1:6 O   Keywords are helpful when you search for an object. You can specify up to 6 keywords. A keyword must not contain an asterisk (*). When you specify at least one new keyword, all previously defined keywords are deleted. Thus, to retain the previously defined keywords you must specify them once more.

Return Codes

00 Success
02 Invalid cabinet name
03 Password incorrect
04 ISN was not found
08 Supply either ISN or name, not both
09 ISN does not point to correct object
10 Function not valid for a system folder
51 Invalid name
52 Document with specified name already exists
53 Requested object does not exist
54 At least one keyword was invalid
55 Requested folder/file does not exist
56 Requested folder is a TRS folder
90 TRS document may not be filed into any other folder

Subprograms

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

Example

0010 *
0020 * Example program to file a document into another folder or file.
0030 *
0040 DEFINE DATA
0050 LOCAL
0060 1 RETURN-CODE          (N2)
0070 1 CABINET              (A8)
0080 1 PASSWORD             (A8)
0090 1 DOCUMENT-NAME        (A32)
0100 1 ISN                  (P10)
0110 1 NEW-FOLDER           (A15)
0120 1 NEW-FILE             (A15)
0130 1 NEW-DOCUMENT-NAME    (A32)
0140 1 KEYWORDS             (A15/1:6)
0150 *
0160 END-DEFINE
0170 *
0180 RESET RETURN-CODE
0190 MOVE 'CABINET'      TO CABINET
0200 MOVE 'PASSWORD'     TO PASSWORD
0210 MOVE 1234567890     TO ISN
0220 MOVE 'Work'         TO NEW-FOLDER
0230 MOVE 'File-work'    TO NEW-FILE
0240 MOVE 'New-Document' TO NEW-DOCUMENT-NAME
0250 MOVE 'Keyword-1'    TO KEYWORDS(1)
0260 MOVE 'Keyword-2'    TO KEYWORDS(2)
0270 *
0280 CALLNAT 'Z-FIL11X'
0290   RETURN-CODE
0300   CABINET
0310   PASSWORD
0320   DOCUMENT-NAME
0330   ISN
0340   NEW-FOLDER
0350   NEW-FILE
0360   NEW-DOCUMENT-NAME
0370   KEYWORDS(*)
0380 *
0390 IF  RETURN-CODE EQ 0
0400   WRITE 'Document was filed'
0410 ELSE
0420   WRITE 'Return code' RETURN-CODE
0430 END-IF
0440 *
0450 END