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~ |