PXRMGECV ;SLC/JVS -Extract data for GEC Reports ;7/14/05 10:46
Source file <PXRMGECV.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GEC | ;Get ien for GEC Date Sources
 | 
|
| RANG(BDT,EDT,VDT,SDT,CHK) | ;Dates are in date range
 | 
|
| FIN(DATE,DFN) | ;Check to see if finished
 | 
|
| E(ARY,FIN,BDT,EDT,CHK,DFNONLY) | ;EXTRACT GEC REFERRALS
 | 
 
  | 
| WORK | ;
 | 
|
| PAT | ||
| KILL | ;Kill out unwanted Arrays
 | 
|
| VDOC(DA) | ;Get Dr's and locationS
 | 
|
| ARAYS | ;Set the Arrays for different reports
 | 
| FileNo | Call Tags | 
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |