Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

	TITLE	IPCTAB	- RETURN SPECIFIED ITEM IN IPCF GETTAB TABLE
	SUBTTL	MIKE BARNES UTHSCD(MCRC)
	ENTRY	IPCTAB

;IPCTAB
;
;RETURN ITEM FROM GETTAB TABLE 77 (IPCF MISCELLANEOUS DATA)
;
;CALL:
;	X = IPCTAB(ITEM)
;
;ITEM TYPES:
;	0	%IPCML	MAXIMUM PACKET LENGTH
;	1	%IPCSI	PID OF SYSTEM-WIDE [SYSTEM]INFO
;	2	%IPCDQ	DEFAULT QUOTA
;	3	%IPCTS	TOTAL PACKETS SENT
;	4	%IPCTO	TOTAL PACKETS OUTSTANDING
;	5	%IPCCP	PID OF [SYSTEM]IPCC
;	6	%IPCPM	PID MASK
;	7	%IPCMP	LENGTH OF PID TABLE
;      10	%IPCNP	NUMBER OF PID'S NOW DEFINED
;      11	%IPCTP	TOTAL PID'S DEFINED SINCE RELOAD
;

IPCTAB:	HRLZ	0,@(16)			;**[01] MOVE IN ITEM NUMBER
	HRRI	0,77			;MOVE IN TABLE NUMBER (77)
	GETTAB	0,			;DO THE GETTAB
	MOVEI	0,0			;ERROR - FORGET IT
	POPJ	17,
	END