IDENT  LIMITS
          ENTRY  ITL
          ENTRY  IIO
          TITLE  LIMITS - CHANGE TASK LIMITS.
*COMMENT  LIMITS - CHANGE TASK LIMITS.
          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
          SPACE  4
***       LIMITS - CHANGE TASK LIMITS.
*         G.R.HUNTER. 73/06/29.
          SPACE 4
*CALL     COMKMAC
*CALL     COMSPRD
          SPACE  4
***       ITL - CHANGE CPU TIME LIMIT.
*
*         CALL FORMAT
*
*         FORTRAN EXTENDED
*                CALL ITL(NTL)
*         COBOL
*                ENTER ITL USING NTL.
*
*         WHERE NTL = NEW TIME LIMIT IN XJ TIME UNITS


ITL       PS
          SX1    X1          GET NEW TIME LIMIT
          ITL    X1          CHANGE TIME LIMIT
          EQ     ITL         RETURN
 IIO      SPACE  4
***       IIO - CHANGE TASK I/O LIMIT.
*
*         CALL FORMAT
*
*         FORTRAN EXTENDED
*                CALL IIO(NIO)
*         COBOL
*                ENTER IIO USING NIO.
*
*         WHERE NIO = NEW I/O LIMIT


IIO       PS
          SX1    X1          GET NEW I/O LIMIT
          IIO    X1          CHANGE I/O LIMIT
          EQ     IIO         RETURN

          END