This document covers the following topics:
Modify the print defaults in the user profile of a specific cabinet.
This subprogram can be used only by a supervisor or cabinet administrator. It is not possible to use this subprogram to modify the user profile of the cabinet SYSCNT.
To get the ISN for the wanted cabinet, you can invoke either Z-ADD05 or Z-DIS05 prior to this subprogram.
Parameters which are not completed in the parameter list are deleted from the user profile. Thus, to retain the existing values, you must specify them once more before you invoke this subprogram.
Successful termination of Z-MOD05D always results in an END TRANSACTION. You are not able to control transaction handling.
| Parameter | Format | In | Out | Remarks |
|---|---|---|---|---|
| Return-code | N2 | X | ||
| Cabinet | A8 | R | The cabinet ID of a supervisor or cabinet administrator. | |
| Password | A8 | R | The password of the above cabinet. | |
| Cabinet-name | A8 | R* | The name of the cabinet to be modified. Either Cabinet-name or Cabinet-ISN, not both. | |
| Cabinet-ISN | P8 | R* | The ISN of the cabinet to be modified. Either Cabinet-ISN or Cabinet-name, not both. | |
| Printer-name | A32 | R | The name of a logical printer. | |
| Printer-profile | A32 | O | The name of a printer profile | |
| Format-profile | A32 | O | The name of a formatting profile. | |
| Page-length | N2 | R | The number of lines ( 1 to 80) per page of printout. | |
| Page-width | N3 | R | The number of characters (1 to 249) per line. | |
| Print-banner | A1 | O | If marked, the "Info" screen information is printed. | |
| Print-notes | A1 | O | If marked, attached notes, cover notes and enclosures are printed. | |
| Print-address | A1 | O | If marked, the addressee list of a mail item is printed. |
| 00 | Success |
| 02 | Invalid cabinet name |
| 03 | Password incorrect |
| 08 | Supply either ISN or name, not both |
| 15 | Invalid administrator status |
| 91 | Supply Cabinet-name or Cabinet-ISN |
| 92 | Page-length is 1 to 80 lines per page; Page-width is 1 to 249 characters per line |
| 93 | No printer defined with this name |
| 94 | Printer-profile not found |
| 95 | Format-profile must be alphanumeric |
| 96 | Cabinet-name is not valid |
| 97 | Cabinet-ISN is not valid |
| 98 | Printer-name can not be blank |
| 99 | Cabinet SYSCNT cannot be modified |
Z-120
Z-122
Z-123
Z-1200&0
0010 * 0020 * Example program to modify print profile of a cabinet 0030 * 0040 * 0050 DEFINE DATA 0060 LOCAL 0070 1 RETURN-CODE (N2) 0080 1 CABINET (A8) 0090 1 PASSWORD (A8) 0100 1 CABINET-NAME (A8) 0110 1 CABINET-ISN (P8) 0120 1 PRINTER-NAME (A32) 0130 1 PRINTER-PROFILE (A32) 0140 1 FORMAT-PROFILE (A32) 0150 1 PAGE-LENGTH (N2) 0160 1 PAGE-WIDTH (N3) 0170 1 PRINT-BANNER (A1) 0180 1 PRINT-NOTES (A1) 0190 1 PRINT-ADDRESS (A1) 0200 END-DEFINE 0210 * 0220 RESET RETURN-CODE 0230 MOVE 'CABINET' TO CABINET 0240 MOVE 'PASSWORD' TO PASSWORD 0250 MOVE 'CAB-NAME' TO CABINET-NAME 0260 MOVE 'PRINTER-NAME' TO PRINTER-NAME 0270 MOVE 'PRINTER-PROFILE' TO PRINTER-PROFILE 0280 MOVE 'FORMAT-PROFILE' TO FORMAT-PROFILE 0290 MOVE 60 TO PAGE-LENGTH 0300 MOVE 132 TO PAGE-WIDTH 0310 MOVE 'X' TO PRINT-BANNER 0320 MOVE 'X' TO PRINT-NOTES 0330 MOVE 'X' TO PRINT-ADDRESS 0340 * 0350 CALLNAT 'Z-MOD05D' 0360 RETURN-CODE 0370 CABINET 0380 PASSWORD 0390 CABINET-NAME 0400 CABINET-ISN 0410 PRINTER-NAME 0420 PRINTER-PROFILE 0430 FORMAT-PROFILE 0440 PAGE-LENGTH 0450 PAGE-WIDTH 0460 PRINT-BANNER 0470 PRINT-NOTES 0480 PRINT-ADDRESS 0490 * 0500 IF RETURN-CODE = 0 0510 WRITE 'CABINET WAS MODIFIED' 0520 ELSE 0530 WRITE 'RETURN CODE' RETURN-CODE 0540 END-IF 0550 * 0560 END