PXRMG2E1 ;SLC/JVS -GEC #2 Extract initial arrays ;7/14/05 08:10
Source file <PXRMG2E1.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 1 | ($$FMADD,$$FMTE)^XLFDT | 
| Registration | 1 | $$TESTPAT^VADPT | 
| Scheduling | 1 | GETAPPT^SDAMA201 | 
| VA Fileman | 1 | GETS^DIQ | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PAT | ||
| FIN(DATE,DFN) | ;Check to see if finished | |
| WORK | ; | |
| GEC | ;Get ien for GEC Date Sources | |
| KILL | ;Kill out unwanted Arrays | |
| E(ARY,FIN,BDT,EDT,CHK,DFNONLY,TPAT) | ;EXTRACT GEC REFERRALS | |
| ARAYS | ;Set the Arrays for different reports | |
| RANG(BDT,EDT,VDT,SDT,CHK) | ;Dates are in date range | 
| FileNo | Call Tags | 
|---|---|
| ^DPT - [#2] | GETS^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNVHF - [#9000010.23] | ARAYS+30, ARAYS+33 | 
| ^AUPNVHF("AED" | FIN+3, WORK+2, WORK+3, PAT+6, PAT+13 | 
| ^AUPNVSIT - [#9000010] | ARAYS+34 | 
| ^AUTTHF - [#9999999.64] | ARAYS+32, ARAYS+35, ARAYS+36 | 
| ^DPT - [#2] | PAT+8 | 
| ^PX(839.7 - [#839.7] | GEC+2, GEC+3, GEC+4, GEC+5 | 
| ^TMP("PXRMGEC" | E+7!, PAT+10*, PAT+11*, KILL+1!, ARAYS+37* | 
| ^TMP($J | ARAYS+27, ARAYS+28! | 
| Name | Line Occurrences | 
|---|---|
| $$FIN | WORK+5 | 
| $$RANG | WORK+8 | 
| ARAYS | PAT+15 | 
| GEC | E+27 | 
| WORK | E+29 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| AGE | ARAYS+14~, ARAYS+18*, ARAYS+19, ARAYS+38! | 
| AGE(2 | ARAYS+18 | 
| AGEF | ARAYS+14~, ARAYS+19*, ARAYS+37 | 
| ARY | E~, ARAYS+5 | 
| BDT | RANG~, RANG+5, RANG+7, E~, WORK+2, WORK+8 | 
| CAT | ARAYS+14~, ARAYS+36* | 
| CATDA | ARAYS+14~, ARAYS+35*, ARAYS+36 | 
| CHK | RANG~, RANG+4, RANG+6, RANG+9, E~, WORK+8 | 
| CNTREF | E+1~, E+26*, ARAYS+3*, ARAYS+37 | 
| COMPLETE | E+1~, WORK+5* | 
| DA | FIN+1~, E+1~, PAT+13*, ARAYS+30, ARAYS+33 | 
| DATE | FIN~, FIN+3, FIN+8, E+1~, WORK+2*, WORK+3, WORK+5, WORK+8, PAT+6, PAT+9 , PAT+10, PAT+11, PAT+13, ARAYS+3 | 
| DATE1 | E+3~, WORK+1*, ARAYS+3* | 
| DATEDA | ARAYS+14~, ARAYS+33*, ARAYS+34 | 
| DATEV | ARAYS+14~, ARAYS+34* | 
| DATEX | E+1~ | 
| DATEY | E+3~, PAT+9* | 
| DFN | FIN~, FIN+3, E+1~, WORK+3*, WORK+4, WORK+5, PAT+2, PAT+3, PAT+6, PAT+8 , PAT+10, PAT+11, PAT+13, ARAYS+3, ARAYS+17, ARAYS+18, ARAYS+21, ARAYS+22, ARAYS+26, ARAYS+37 | 
| 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* | 
| DOC | E+2~ | 
| DOCT | E+2~ | 
| DOCTN | E+2~ | 
| DOCTNA | E+2~ | 
| DOCTOR | E+3~ | 
| DONE | FIN+1~, FIN+2*, FIN+4*, FIN+9, E+3~, WORK+5*, WORK+6, WORK+7 | 
| DR | E+3~ | 
| DTCHK | E+3~ | 
| EDT | RANG~, RANG+5, RANG+7, E~, WORK+2, WORK+8 | 
| FIN | E~, WORK+6, WORK+7 | 
| 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 | 
| LOC | E+2~ | 
| LOCA | E+2~ | 
| LOCN | E+2~ | 
| NAME | ARAYS+14~, ARAYS+32* | 
| NAMEDA | ARAYS+14~, ARAYS+30*, ARAYS+32, ARAYS+35, ARAYS+37 | 
| OK | RANG+2~, RANG+3*, RANG+8*, RANG+9*, RANG+10 | 
| PXRMAPT | ARAYS+14~, ARAYS+25*, ARAYS+26, ARAYS+27*, ARAYS+37 | 
| REFERA | E+2~ | 
| REFERAL | E+2~ | 
| SDT | RANG~, RANG+5 | 
| SOK | RANG+2~, RANG+3*, RANG+5*, RANG+8, RANG+9 | 
| SSN | ARAYS+14~, ARAYS+22*, ARAYS+37 | 
| SSN(2 | ARAYS+22 | 
| TMPDFN | E+5~ | 
| TMPDOC | E+5~ | 
| TMPDT | E+5~ | 
| TMPLOC | E+5~ | 
| TPAT | E~, WORK+4 | 
| VDT | RANG~, RANG+7, FIN+1~, FIN+2*, FIN+8*, FIN+9, E+3~, WORK+5*, WORK+8, ARAYS+26 , ARAYS+37 | 
| VST | FIN+1~ | 
| ZALL | E+1~ |