LIMITS
          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 
