C*	BPSB8 - CLEAR PARITY BIT ON READ PASS ALL
C
	BYTE FUNCTION BPSB8 (BCH)
C
	IMPLICIT BYTE (B)
C
	ICH = BCH
	ICH = IAND (ICH, "177)
	BPSB8 = ICH
	RETURN
	END