DGPFRPI1 ;ALB/RBS - PRF PRINCIPAL INVEST REPORT CONT. ; 6/8/04 5:07pm
Source file <DGPFRPI1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ; compile and print report
|
|
| LOOP(DGSORT,DGLIST) | ;use sort var's for record searching to build list
; Input: ; DGSORT - array of user selected report parameters ; DGLIST - temp global name |
|
| BLDTMP(DGBEG,DGEND,DGSTAT,DGPI,DGPINAME,DGDFNLST,DGLIST) | ; list global builder
; Input: ; DGBEG - sort beginning date ; DGEND - sort ending date ; DGSTAT - status of assignment ; DGPI - principal investigator person ien ; DGPINAME - name of principal investigator ; DGDFNLST - array of patient dfn's assigned to the flag ; DGLIST - temp global name used for report list |
|
| EXIT | ;
|
