保持期間を構成するには、DFHZJCL3 を編集および再コンパイルします。これは、ハウスキーピング プロセス中に実行されるプログラムの 1 つです。
たとえば、JESYSMSG および SYSPRINT の 2 つの出力がクラス B に生成された場合、クラス B の保持期間が 2 日、デフォルトの保持期間が 7 日で、クラス B が HELD であるとすると、SYSPRINT のみが 2 日後に削除されます。
クラス B が HELD でない場合は、どちらのスプール ファイルも 2 日後に削除されません。すべてのスプール出力が (JESYSMSG は HELD かどうかにかかわらず) 7 日後に削除されます。
DFHJCL3 は、実行頻度および保持期間の値が含まれる、ユーザーが編集可能なコピーブックを使用します。このコピーブックは、次に一部を再現した SPOOLHK.CPY です。必要に応じて値を設定し (次を参照)、DFHZJCL3 を再コンパイルします。
**********************************************************************************
* This copy book controls the spool housekeeping.
**********************************************************************************
* ws-run-frequency
* this field controls how often the spool clean-up is run
* it is stated in days
* ws-keep-for
* this field contains the default retention period in days for
* spooled output
**********************************************************************************
03 default-settings.
05 ws-version pic x(8)
value 'SPHK 1.0'.
05 ws-run-frequency pic 99999 value 1.
05 ws-keep-for pic 99999 value 6.
**********************************************************************************
* The following fields contain the retention periods for spooled output by class
* and a flag indicating whether spool files in this class should be archived on
* deletion. There are 36 entries, A through Z and 0 through 9.
* If the value is set to 99999 then the default value from ws-keep-for
* will be used. A Y indicates that spool files should be archived upon deletion.
* These ws-keep-for values are DAYS.
* To change the retention period edit the appropriate values and recompile
* DFHZJCL3.cbl
* e.g. to change the class A retention period to 1 week and specify that no
* archiving is required:
* edit the first filler for class A so that the value is 7
* edit the second filler for class A so that the value is N
* giving:
* class A
* 05 filler pic 99999 value 00007.
* 05 filler pic x value 'N' .
**********************************************************************************
03 ws-class-settings.
* class A
05 filler pic 99999 value 00001.
05 filler pic x value 'N' .
* class B
05 filler pic 99999 value 00002.
05 filler pic x value 'N' .