.MACRO	CKDSW$S RETRY,ERR
	.IIF	B <RETRY> .ERROR ;NO RETRY ROUTINE SPECIFIED
	.IIF	B <ERR>   .ERROR ;NO ERROR ROUTINE SPECIFIED
	JSR	R5,$CKDSW
	.WORD	RETRY
	.WORD	ERR
	.ENDM