ASMB,R,Q HED G0QIP * NAME: G0QIP * SOURCE: 92067-18430 * RELOC: 92067-16425 * PGMR: G.A.A. * * *************************************************************** * * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1979. ALL RIGHTS * * * RESERVED. NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED, * * * REPRODUCED OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITHOUT* * * THE PRIOR WRITTEN CONSENT OF HEWLETT-PACKARD COMPANY. * * *************************************************************** * NAM G0QIP,8 92067-16425 REV.1903 781215 ENT G0PCA,G0NJB,G0NLO,G0SZF,G0NSP ENT G0KIL,G0END,G0MXP,G0SLU,G0INT * SUP G0PCA DEC -49 ASC 25,CAPABILITY LEVEL FOR PRIVILEDGED GASP COMMANDS? _ GUARD G0NJB DEC -35 ASC 18,MAX NUMBER OF JOBS,JOB FILE DISC? _ GUARD G0NLO DEC -33 ASC 17,NUMBER,LOCATION OF SPOOL FILES? _ GUARD G0MXP DEC -48 ASC 20,MAXIMUM NUMBER ACTIVE AND PENDING SPOOL ASC 4,FILES? _ GUARD G0NSP DEC -34 ASC 17,NUMBER OF SPOOL FILES (5 TO 80)? _ GUARD G0SZF DEC -34 ASC 17,SIZE OF SPOOL FILES (IN BLOCKS)? _GUARD G0SLU DEC -31 ASC 16,ENTER OUTSPOOL DESTINATION LU _ GUARD G0END DEC 4 ASC 4,END GASP G0KIL DEC -47 ASC 24,MAY ABORT PROGRAM OR JOB, OK TO KILL ? _ GUARD G0INT DEC -40 ASC 20,/GASP: IRRECOVERABLE INITIALIZE ERROR ! * END