.TITLE	CHKP
	.MCALL	DSCP$S,ENCP$S

TEST::	DSCP$S			;Disable checkpointing
	ENCP$S			;Enable  checkpointing
	RETURN			;Return to caller

	.END