
{
{  The purpose of this procedure is to set the interval in the JCB
{  at which a flag is to be sent to the job monitor of the current
{  job to invoke the statistics facility to collect job statistics.
{
{    TMP$SET_FLAG_INTERVAL (INTERVAL)
{
{  INTERVAL : (INPUT) This parameter specifies the cptime interval
{                     at which the flag is to be sent.
{
