.TITLE CMKT
	.IDENT /201083/

; Version: V3.0
; File: [22,310]CMKT.MAC
; Author: Jim Bostwick 25-Aug-83
; History: Cloned from V2.0
;	   20-Oct-83 JMB -- removed DSW parameter
;          06-Sep-84 RAB -- really removed DSW (IDS) paramter from call.
.REM |

PROCEDURE CMKT( EFN:Event_Flag
		);External;

{*USER*
 Pascal-3 procedure to cancel time-based requests. All currently
outstanding requests specifying EFN are cancelled. If EFN=f0
all requests are cancelled. Note that the AST support of CMKT$
is not implemented. 
 Directive status is available in $DSW upon return.
} 

|

; Assemble with PASMAC.MAC as prefix file.

	.MCALL CMKT$S
	PROC CMKT
	PARAM EFN,CHAR
	SAVE <R0 >
	BEGIN
	MOVB EFN(SP),R0
	CMKT$S R0
	ENDPR
	.END