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