This document covers the following topics:
Return the history of a meeting.
This subprogram should be called iteratively until the return code is 77. Return code 77 indicates that the history of the meeting has been read.
Provided that the Work-parameter is not corrupted by the calling program, this subprogram can be invoked iteratively to return successive meeting versions (history).
This subprogram requires that you specify the ISN of the desired meeting. To get the ISN, invoke Z-GET06B prior to this subprogram.
Parameter | Format | In | Out | Remarks |
---|---|---|---|---|
Return-code | N2 | O | X | Input -1: no ET. |
Cabinet | A8 | R | The cabinet which contains the meeting for which you want to return information. | |
Password | A8 | R | The password of the above cabinet. | |
Calendar-ISN | P10 | R | The ISN of the meeting. | |
Version | N3 | X | The meeting version. | |
Start-date | A8 | X | Format yyyymmdd. | |
Start-time | A8 | X | Format hhmm. | |
End-date | A8 | X | Format yyyymmdd. | |
End-time | A8 | X | Format hhmm. | |
Subject | A20 | X | The subject of the meeting. | |
Description | A60/1:3 | X | The description of the meeting. | |
Location | A60 | X | The location of the meeting. | |
Agenda | A32 | X | The name of a document which has been linked to the meeting. | |
Private-flag | A1 | X | If marked, the meeting is a private object. | |
Security-flags | A1/1:4 | X | The security levels for Read, Modify, Copy and Print. Values 0 to 9. | |
Range-type | A1 | X | 1=the whole time range, 2=separate daily entries, 3=only a starting time. | |
No-occupation | A1 | X | Blank=the meeting occupies time; left parenthesis=the meeting does not occupy time. | |
History-ISN | P10 | X | The ISN of the meeting version. | |
Work-parameter | A40 | For internal use. See The Work Parameter. |
00 | Success |
02 | Invalid cabinet name or - in batch mode only - locked cabinet |
03 | Password incorrect |
04 | ISN was not found |
09 | ISN does not point to correct object |
77 | End of list |
Z-120
Z-122
Z-123
Z-711
Z-1200&0
0010 * 0020 * Return information about the history of a meeting 0030 * 0040 DEFINE DATA 0050 LOCAL 0060 1 RETURN-CODE (N2) 0070 1 CABINET (A8) 0080 1 PASSWORD (A8) 0090 1 CALENDAR-ISN (P10) 0100 1 VERSION (N3) 0110 1 START-DATE (A8) 0120 1 START-TIME (A8) 0130 1 END-DATE (A8) 0140 1 END-TIME (A8) 0150 1 SUBJECT (A20) 0160 1 DESCRIPTION (A60/1:3) 0170 1 LOCATION (A60) 0180 1 AGENDA (A32) 0190 1 PRIVATE-FLAG (A1) 0200 1 SECURITY-FLAGS (A1/1:4) 0210 1 RANGE-TYPE (A1) 0220 1 NO-OCCUPATION (A1) 0230 1 HISTORY-ISN (P10) 0240 1 WORK-PARAMETER (A40) 0250 END-DEFINE 0260 * 0270 MOVE 'LS' TO CABINET 0280 MOVE 'LS' TO PASSWORD 0290 MOVE 84847 TO CALENDAR-ISN 0300 * 0310 RESET RETURN-CODE WORK-PARAMETER 0320 REPEAT UNTIL RETURN-CODE NE 0 0330 CALLNAT 'Z-GET06D' 0340 RETURN-CODE 0350 CABINET 0360 PASSWORD 0370 CALENDAR-ISN 0380 VERSION 0390 START-DATE 0400 START-TIME 0410 END-DATE 0420 END-TIME 0430 SUBJECT 0440 DESCRIPTION(*) 0450 LOCATION 0460 AGENDA 0470 PRIVATE-FLAG 0480 SECURITY-FLAGS(*) 0490 RANGE-TYPE 0500 NO-OCCUPATION 0510 HISTORY-ISN 0520 WORK-PARAMETER 0530 * 0540 IF RETURN-CODE EQ 0 0550 NEWPAGE 0560 WRITE 0570 '=' CABINET / 0580 '=' PASSWORD / 0590 '=' CALENDAR-ISN / 0600 '=' VERSION / 0610 '=' START-DATE / 0620 '=' START-TIME / 0630 '=' END-DATE / 0640 '=' END-TIME / 0650 '=' SUBJECT / 0660 '=' DESCRIPTION(1) / 0670 '=' DESCRIPTION(2) / 0680 '=' DESCRIPTION(3) / 0690 '=' LOCATION / 0700 '=' AGENDA / 0710 '=' PRIVATE-FLAG / 0720 '=' SECURITY-FLAGS(*) / 0730 '=' RANGE-TYPE / 0740 '=' NO-OCCUPATION / 0750 '=' HISTORY-ISN / 0760 END-IF 0770 END-REPEAT 0780 WRITE 'Return code' RETURN-CODE 0790 END