_SUBROUTINE ADMIN.OBJ EXECTCL.SUB CMD
*
*
*
*
*
*
      _INCLUDE ADMIN.COMMON
*
      EXECUTE CMD CAPTURING X
*
      IF X[1,1] = AM THEN X = X[2,999999]
      IF X[1,LEN(@(-1))] = @(-1) THEN X = X[LEN(@(-1))+1,999999]
*
      _PAGE REPORT.HTM
*
      _RETURN