Routine: RGRSBUL1

Information

RGRSBUL1 ;ALB/RJS,CML-RGRSTEXT BULLETIN ROUTINE (PART 2) ;07/24/98

Source file <RGRSBUL1.m>

Name	Comments	DBIA/ICR reference
SSNBULL(DFN,ARRAY,NAME,SSN,ICN,CMOR)	;
NOT2(ARRAY)	;
SENSTIVE(DFN,ARRAY,NAME)	;FIRES WHEN PT. IS FLAGGED AS SENSITIVE AT ANOTHER SITE
RMTDOD(DFN,ARRAY,NAME,RDOD,LDOD)	;Fires when patient has a Date of Death at another site
RMTMSG	;S RGRSTEXT(6)=" "
INST(SITENUM)	;
FORMAT(DATA1,DATA2)	;
FREE(DATA)	;