.TITLE DTRGPA
	.IDENT /121688/



;	Version:
;	File:[22,320]DTRGPA.MAC
;	Author: Peter Stadick 
;	History: 
;	Last Edit: 17-DEC-1988 13:18:59 
; 

.REM |

Procedure DTRGPA(VAR RDB:rdb_type);EXTERNAL;

{*USER*

This will attempt to detach a region given the address of the region
descriptor block (RDB).

Directive status is available in $DSW on return.

} 
|

;
; Assemble with PASMAC.MAC as prefix file.
;
;

         .MCALL  DTRG$S
	
	PROC DTRGPA
	PARAM RDB, ADDRESS	; Address of RDB
	BEGIN
	DTRG$S	RDB(SP)		; Detach region
	ENDPR
	.END