;
; Known variables: BRNRPT=ien of temp report, BRNBD & BRNED = date range
SUBPAT
; tally # of patients by sort value on detailed/subtotal
SCREENS
; Check screen logic for this disclosure request
; loop through all selection criteria; BRNSKIP means does not meet criteria
V1
; Within each date, find all disclosure requests
SINGLE
; Logic sets X if this record (BRNVIEN) meets this criteria (BRNI)
; BRNRANG can be set by screen logic if screen is a range and not
; stored individually in the Temp Report global (ex. Age Range)
XIT
;EP - CALLED FROM BRNVL
END
;
PROC
; For each disclosure request, does it pass the selection criteria?
MULT
; Logic creates array of possible matches then loops thru multiple in temp report to see if any do