PXRMGECV ;SLC/JVS -Extract data for GEC Reports ;7/14/05 10:46
Source file <PXRMGECV.m>
| Package | Total | Call Graph | 
|---|---|---|
| Clinical Reminders | 1 | (DATECNT,DOCCNT,LOCCNT,PATIENT)^PXRMGECW | 
| Kernel | 1 | $$FMTE^XLFDT | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| Clinical Reminders | 6 | PXRMGECM PXRMGECN PXRMGECQ PXRMGECR PXRMGECS PXRMGECT | 
| Health Summary | 1 | GMTSGEC | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| E(ARY,FIN,BDT,EDT,CHK,DFNONLY) | ;EXTRACT GEC REFERRALS | 
 
 | 
| FIN(DATE,DFN) | ;Check to see if finished | |
| WORK | ; | |
| GEC | ;Get ien for GEC Date Sources | |
| KILL | ;Kill out unwanted Arrays | |
| PAT | ||
| VDOC(DA) | ;Get Dr's and locationS | |
| ARAYS | ;Set the Arrays for different reports | |
| RANG(BDT,EDT,VDT,SDT,CHK) | ;Dates are in date range | 
| FileNo | Call Tags | 
|---|---|
| ^VA(200 - [#200] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNVHF - [#9000010.23] | VDOC+5, VDOC+6, VDOC+12, VDOC+19, ARAYS+15, ARAYS+18, ARAYS+36, ARAYS+38, ARAYS+46, ARAYS+49 | 
| ^AUPNVHF("AED" | FIN+3, WORK+2, WORK+3, PAT+6, PAT+13 | 
| ^AUPNVSIT - [#9000010] | VDOC+13, VDOC+14, ARAYS+19, ARAYS+39, ARAYS+50 | 
| ^AUTTHF - [#9999999.64] | ARAYS+17, ARAYS+21, ARAYS+22, ARAYS+37, ARAYS+41, ARAYS+42, ARAYS+48, ARAYS+52, ARAYS+54 | 
| ^DPT - [#2] | PAT+8 | 
| ^PX(839.7 - [#839.7] | GEC+2, GEC+3, GEC+4, GEC+5, VDOC+20 | 
| ^PXRMD(801.41 - [#801.41] | VDOC+22 | 
| ^PXRMD(801.55 - [#801.55] | FIN+5, FIN+6 | 
| ^SC - [#44] | VDOC+15 | 
| ^TMP("PXRMGEC" | E+7!, PAT+10*, PAT+11*, KILL+1!, VDOC+9*, VDOC+16*, VDOC+23*, VDOC+24*, VDOC+27*, VDOC+28* , ARAYS+23*, ARAYS+43*, ARAYS+55* | 
| Name | Line Occurrences | 
|---|---|
| $$FIN | WORK+4 | 
| $$RANG | WORK+7 | 
| ARAYS | PAT+16 | 
| GEC | E+27 | 
| VDOC | PAT+15 | 
| WORK | E+29 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ARY | E~, PAT+18, PAT+19, PAT+20, PAT+21, PAT+22, PAT+23, VDOC+1, VDOC+2, VDOC+17 , VDOC+25, ARAYS+5, ARAYS+25, ARAYS+45 | 
| BDT | RANG~, RANG+5, RANG+7, E~, WORK+7 | 
| CAT | ARAYS+14~, ARAYS+22*, ARAYS+23, ARAYS+35~, ARAYS+42*, ARAYS+43, ARAYS+54*, ARAYS+55 | 
| CATDA | ARAYS+14~, ARAYS+21*, ARAYS+22, ARAYS+35~, ARAYS+41*, ARAYS+42, ARAYS+52*, ARAYS+53, ARAYS+54 | 
| >> CATIEN( | ARAYS+53 | 
| CHK | RANG~, RANG+4, RANG+6, RANG+9, E~, WORK+7 | 
| CNTREF | E+1~, E+26*, ARAYS+3*, ARAYS+23, ARAYS+43 | 
| COMPLETE | E+1~, WORK+4* | 
| DA | FIN+1~, FIN+2*, FIN+5*, FIN+6, E+1~, PAT+13*, PAT+15, VDOC~, VDOC+4, VDOC+5 , VDOC+6, VDOC+12, VDOC+19, ARAYS+15, ARAYS+18, ARAYS+23, ARAYS+36, ARAYS+38, ARAYS+43, ARAYS+46 , ARAYS+49, ARAYS+55 | 
| DATE | FIN~, FIN+3, FIN+5, E+1~, WORK+2*, WORK+3, WORK+4, WORK+7, PAT+6, PAT+9 , PAT+10, PAT+11, PAT+13, ARAYS+3, ARAYS+23, ARAYS+43 | 
| DATE1 | E+3~, WORK+1*, ARAYS+3* | 
| DATEDA | VDOC+18~, ARAYS+14~, ARAYS+18*, ARAYS+19, ARAYS+35~, ARAYS+38*, ARAYS+39, ARAYS+49*, ARAYS+50 | 
| DATEV | VDOC+18~, ARAYS+14~, ARAYS+19*, ARAYS+20, ARAYS+23, ARAYS+35~, ARAYS+39*, ARAYS+40, ARAYS+43, ARAYS+50* , ARAYS+51, ARAYS+55 | 
| DATEX | E+1~ | 
| DATEY | E+3~, PAT+9* | 
| DFN | FIN~, FIN+3, FIN+5, E+1~, WORK+3*, WORK+4, PAT+2, PAT+3, PAT+6, PAT+8 , PAT+10, PAT+11, PAT+13, VDOC+23, VDOC+24, ARAYS+3, ARAYS+23, ARAYS+55 | 
| DFN1 | E+3~, WORK+1*, ARAYS+3* | 
| >> DFNARY | PAT+2, PAT+3 | 
| >> DFNARY( | PAT+2 | 
| DFNFLAG | E+4~, PAT+1*, PAT+2*, PAT+3* | 
| DFNONLY | E~, PAT+1, PAT+3 | 
| DFNX | E+1~ | 
| DFNXX | E+3~, PAT+8*, VDOC+27, ARAYS+43 | 
| DIADA | VDOC+18~, VDOC+22*, VDOC+23 | 
| DIANAME | VDOC+18~ | 
| DOC | E+2~ | 
| DOCT | E+2~, VDOC+6*, VDOC+7, VDOC+9, VDOC+21, VDOC+23, VDOC+24 | 
| DOCTN | E+2~, VDOC+7*, VDOC+8, VDOC+9 | 
| DOCTNA | E+2~ | 
| DOCTOR | E+3~ | 
| DONE | FIN+1~, FIN+2*, FIN+4*, FIN+11, E+3~, WORK+4*, WORK+5, WORK+6 | 
| DR | E+3~ | 
| DSRC | VDOC+18~, VDOC+19*, VDOC+20 | 
| DTCHK | E+3~ | 
| EDT | RANG~, RANG+5, RANG+7, E~, WORK+7 | 
| FIN | E~, WORK+5, WORK+6 | 
| FLAG | E+3~ | 
| FOK | RANG+2~, RANG+3*, RANG+7*, RANG+8, RANG+9 | 
| GEC | FIN+1~, FIN+3*, FIN+4, E+1~, PAT+6*, PAT+7, PAT+13 | 
| GEC1DA | GEC+1*, GEC+3*, E+4~, PAT+7 | 
| GEC2DA | GEC+1*, GEC+4*, E+4~, PAT+7 | 
| GEC3DA | GEC+1*, GEC+5*, E+4~, PAT+7 | 
| GECFDA | GEC+1*, GEC+2*, FIN+4, E+4~, PAT+7 | 
| IDENT | VDOC+18~, VDOC+20*, VDOC+22 | 
| LOC | E+2~, VDOC+14*, VDOC+15 | 
| LOCA | E+2~ | 
| LOCN | E+2~, VDOC+15*, VDOC+16, VDOC+27, VDOC+28 | 
| NAME | ARAYS+14~, ARAYS+17*, ARAYS+35~, ARAYS+37*, ARAYS+48*, ARAYS+55 | 
| NAMEDA | ARAYS+14~, ARAYS+15*, ARAYS+17, ARAYS+21, ARAYS+35~, ARAYS+36*, ARAYS+37, ARAYS+41, ARAYS+46*, ARAYS+48 , ARAYS+52 | 
| OK | RANG+2~, RANG+3*, RANG+8*, RANG+9*, RANG+10 | 
| REFERA | E+2~ | 
| REFERAL | E+2~ | 
| SDT | RANG~, RANG+5 | 
| SOK | RANG+2~, RANG+3*, RANG+5*, RANG+8, RANG+9 | 
| VDT | RANG~, RANG+7, FIN+1~, FIN+2*, FIN+6*, FIN+11, E+3~, WORK+4*, WORK+7, VDOC+9 , VDOC+16, VDOC+23, VDOC+24, VDOC+27, VDOC+28, ARAYS+23, ARAYS+43 | 
| VST | FIN+1~, VDOC+12*, VDOC+13, VDOC+14 | 
| ZALL | E+1~ |