By default, the supplied WTOEXIT code causes an archive log job to be submitted when it is at least 25% full.
This document describes how to change that.
Release : All supported releases.
Component: IDMS.
If using the WTOEXIT to automatically submit the archive log job, the % full at which the job will be submitted can be changed by making the following change to the code and re-assembling WTOEXIT. The code is provided in the *.CAGJSRC library.
TSTFULL LA R6,WTOMTEXT
LH R5,WTOMLEN
AR R6,R5
LA R5,WTOMTEXT+10
NEXCHAR LA R5,1(R5)
CR R5,R6
BH RETURN
CLI 0(R5),C'%'
BNE NEXCHAR
S R5,=F'2'
PACK PNUM,0(2,R5)
CP PNUM,=P'25'
BNL RUNPLOG
Change the 25 (in red) to the percentage at which the archive log job should be submitted. It should remain a two-digit number.