Call Graph
Call Graph Total: 7
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | ^DIC $$GET1^DIQ |
| DRG Grouper | 1 | $$CODEC^ICDEX |
| DSS Extracts | 1 | $$ECXYM^ECXUTL |
| Kernel | 1 | $$FMADD^XLFDT |
| Lexicon Utility | 1 | $$CHKCODE^LEXLR |
| Registration | 1 | IN5^VADPT |
ECXUTL6 ;ALB/JRC - Utilities for DSS Extracts ;4/8/19 11:11
Source file <ECXUTL6.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | ^DIC $$GET1^DIQ |
| DRG Grouper | 1 | $$CODEC^ICDEX |
| DSS Extracts | 1 | $$ECXYM^ECXUTL |
| Kernel | 1 | $$FMADD^XLFDT |
| Lexicon Utility | 1 | $$CHKCODE^LEXLR |
| Registration | 1 | IN5^VADPT |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| DSS Extracts | 7 | ECXADM ECXALAR2 ECXLARPT ECXMOV ECXNUT1 ECXSURG ^ECX(728.44 |
| Lab Service | 1 | LRCAPDAR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NUTKEY(P,D) | ;Generate n&fs feeder key
|
|
| NUTLOC(P,D,FPD,FDD,FPF,DLT,DFL) | ;Define nutrition fields
|
|
| GETDIV | ;Get divisions and food production facility
|
|
| SUR(CRST,STCD,CLINIC) | ;Surgery stop codes and clinic (outpatients only)
|
|
| SURPODX(PRODX,PODX1,PODX2,PODX3,PODX4,PODX5) | ;Get postop diagnosis codes
|
|
| LOINC(ARRAY) | ;Get DSS lab test information out of DSS LOINC CODE (#727.29) file
|
|
| EXT | ||
| INPUTT | ;
|
|
| ISASIH(MVMT,TYPE) | ;170 Section added to determine if patient is ASIH other facility at movement date/time
|
|
| NEEDADR(TYPE,MVMT,EXTRACT) | ;170 Section added to determine if an admission or discharge record for the ASIH other facility episode of care is needed
|
|
| NEXTMO(DATE) | ;173 Given a date, determine the following month and return in year_month format (ex. 201811 for 11/2018)
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | INPUTT+2 |
| $$GET1^DIQ | NUTKEY+14, NUTLOC+28, NUTLOC+29, NUTLOC+41, NUTLOC+52, NUTLOC+61, NUTLOC+70, NUTLOC+81, NUTLOC+90, NUTLOC+91 , NUTLOC+109, NUTLOC+111, NUTLOC+115, NUTLOC+116, NUTLOC+119, NUTLOC+122, NUTLOC+126, GETDIV+5, GETDIV+10, GETDIV+11 , GETDIV+15, GETDIV+16, GETDIV+17, SUR+3, SUR+5, SUR+6, EXT+9, EXT+10, EXT+22, EXT+23 |
| $$ECXYM^ECXUTL | NEEDADR+12, NEXTMO+8 |
| $$CODEC^ICDEX | SURPODX+7, SURPODX+10 |
| $$CHKCODE^LEXLR | EXT+12 |
| IN5^VADPT | NUTLOC+24, ISASIH+6, NEEDADR+6 |
| $$FMADD^XLFDT | ISASIH+4, NEXTMO+5, NEXTMO+6, NEXTMO+7 |
| FileNo | Call Tags |
|---|---|
| ^FH(119.6 - [#119.6] | GET1^DIQ |
| ^FH(119.72 - [#119.72] | GET1^DIQ |
| ^SRO(137.45 - [#137.45] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^DIC(40.7 - [#40.7] | Classic Fileman Calls, GET1^DIQ |
| ^DIC(42 - [#42] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^LAB(60 - [#60] | GET1^DIQ |
| ^LAB(61 - [#61] | GET1^DIQ |
| ^LAM - [#64] | GET1^DIQ |
| 728.451 | GET1^DIQ |
| ^ECX(728.46 - [#728.46] | GET1^DIQ |
| ^LAB(95.3 - [#95.3] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | EXT+8, EXT+11 |
| ^DGPM - [#405] | ISASIH+4, ISASIH+5, NEEDADR+5 |
| ^ECX(727.29 - [#727.29] | LOINC+32, EXT, EXT+1, EXT+2, EXT+3 |
| ^ECX(728.44 - [#728.44] | SUR+5, SUR+6 |
| ^ECX(728.45 - [#728.45] | NUTKEY+10, NUTKEY+12 |
| ^ECX(728.46 - [#728.46] | NUTLOC+118, GETDIV+9, GETDIV+14 |
| ^FH(119.6 - [#119.6] | NUTLOC+26, NUTLOC+124 |
| ^FHPT - [#115] | NUTLOC+22 |
| ^LAB(60 - [#60] | EXT+22 |
| ^LAM - [#64] | EXT+19, EXT+20 |
| ^LAM("AI" | EXT+16, EXT+17 |
| ^SRO(136 - [#136] | SURPODX+9, SURPODX+10 |
| ^TMP($J | NUTLOC+40, NUTLOC+51, NUTLOC+69, LOINC+28!, EXT*, EXT+2*, EXT+4*, EXT+15*, EXT+23* |
| ^UTILITY("VAIP" | NUTLOC+21!, NUTLOC+25 |
| ^XTMP("ECXMOV" | NEEDADR+9*, NEEDADR+12* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | LOINC~, LOINC+27 |
| ARRAY( | LOINC+34 |
| ARRAY("ALL" | LOINC+31 |
| ASIH | ISASIH+1~, ISASIH+2*, ISASIH+7*, ISASIH+8 |
| CLINIC | SUR~, SUR+3*, SUR+5, SUR+6 |
| CODE | NUTKEY+8~, NUTKEY+9*, NUTKEY+11*, NUTKEY+12, SURPODX+2~, SURPODX+3*, SURPODX+9*, SURPODX+10 |
| CRST | SUR~, SUR+6* |
| CRSVP | NUTLOC+10~, NUTLOC+11*, NUTLOC+29*, NUTLOC+116, GETDIV+4 |
| D | NUTKEY~, NUTKEY+6, NUTKEY+11, NUTLOC~, NUTLOC+14, NUTLOC+39, NUTLOC+50, NUTLOC+60, NUTLOC+68, NUTLOC+79 , NUTLOC+89, NUTLOC+106, NUTLOC+108, NUTLOC+110, NUTLOC+125 |
| >> DATAOP | SURPODX+5, SURPODX+7 |
| DATE | NUTLOC+40, NUTLOC+51, NUTLOC+69, NEXTMO~, NEXTMO+3, NEXTMO+4 |
| DFL | NUTLOC~, NUTLOC+11*, NUTLOC+115*, NUTLOC+122*, NUTLOC+124*, NUTLOC+126* |
| DFN | NUTLOC+22*, ISASIH+1~, ISASIH+5*, NEEDADR+1~, NEEDADR+5* |
| DIC | INPUTT+1~*, INPUTT+3! |
| DIC("S" | INPUTT+1* |
| DIC(0 | INPUTT+1* |
| DIET | NUTKEY+8~, NUTKEY+9*, NUTKEY+12*, NUTKEY+13 |
| DLT | NUTLOC~, NUTLOC+11*, NUTLOC+107*, NUTLOC+109*, NUTLOC+111*, NUTLOC+114, NUTLOC+120, NUTLOC+125 |
| DTSTR | NEXTMO+1~, NEXTMO+4*, NEXTMO+5*, NEXTMO+6*, NEXTMO+7*, NEXTMO+8 |
| EC0 | SUR+3, LOINC+29~, EXT+3*, EXT+4 |
| >> ECD0 | SURPODX+9, SURPODX+10 |
| >> ECED | NEEDADR+2, NEEDADR+11, NEEDADR+12 |
| >> ECNO | SUR+3, SUR+5 |
| >> ECSD | NEEDADR+10 |
| >> ECXA | SUR+2 |
| EXTRACT | NEEDADR~, NEEDADR+7, NEEDADR+8, NEEDADR+14 |
| FDD | NUTLOC~, GETDIV+3*, GETDIV+9*, GETDIV+10*, GETDIV+11* |
| >> FHDFN | NUTLOC+14, NUTLOC+22, NUTLOC+40, NUTLOC+51, NUTLOC+69 |
| FPD | NUTLOC~, GETDIV+3*, GETDIV+15*, GETDIV+16* |
| FPF | NUTLOC~, NUTLOC+91*, NUTLOC+118*, NUTLOC+119*, GETDIV+3*, GETDIV+14*, GETDIV+15, GETDIV+17* |
| I | SURPODX+2~, SURPODX+9*, SURPODX+10* |
| IEN | NUTLOC+116*, NUTLOC+117*, NUTLOC+118, GETDIV+2~, GETDIV+5*, GETDIV+6, GETDIV+13*, GETDIV+14 |
| IENS | NUTKEY+8~, NUTKEY+9*, NUTKEY+13*, NUTKEY+14 |
| LIEN | LOINC+29~, EXT+1*, EXT+2, EXT+3 |
| LLNC | LOINC+29~ |
| LLNCP | LOINC+29~ |
| LOINCCK | LOINC+29~, LOINC+30*, LOINC+32*, LOINC+34*, EXT, EXT+1, EXT+2, EXT+4, EXT+9, EXT+10 , EXT+12, EXT+15, EXT+23 |
| LOINCPTR | LOINC+29~, EXT+5*, EXT+10*, EXT+12*, EXT+14, EXT+15, EXT+16, EXT+17 |
| LRASSV | LOINC+29~ |
| LTEST | LOINC+29~, EXT+21*, EXT+22, EXT+23 |
| MASWARD | NUTLOC+10~, NUTLOC+11*, NUTLOC+25*, NUTLOC+26, NUTLOC+122 |
| MVMT | ISASIH~, ISASIH+3, ISASIH+4, ISASIH+5, NEEDADR~, NEEDADR+4, NEEDADR+5, NEEDADR+9, NEEDADR+12, NEEDADR+14 |
| NEXT | NEXTMO+1~, NEXTMO+2*, NEXTMO+3, NEXTMO+8*, NEXTMO+9 |
| NEXTMO | NEEDADR+1~, NEEDADR+2*, NEEDADR+9, NEEDADR+12 |
| >> NODE | NUTLOC+61, NUTLOC+80, NUTLOC+90, NUTLOC+107, NUTLOC+109, NUTLOC+111 |
| >> NUMBER | NUTLOC+40, NUTLOC+51, NUTLOC+69 |
| OPLOC | NUTLOC+10~, NUTLOC+12*, NUTLOC+40*, NUTLOC+41, NUTLOC+51*, NUTLOC+52, NUTLOC+61*, NUTLOC+69*, NUTLOC+70, NUTLOC+80* , NUTLOC+81, NUTLOC+90*, NUTLOC+124 |
| P | NUTKEY~, NUTKEY+6, NUTKEY+10, NUTKEY+11, NUTLOC~, NUTLOC+14, NUTLOC+19, NUTLOC+39, NUTLOC+50, NUTLOC+60 , NUTLOC+68, NUTLOC+79, NUTLOC+89, NUTLOC+106, NUTLOC+108, NUTLOC+110, NUTLOC+121, NUTLOC+123 |
| PODX | SURPODX+2~, SURPODX+10* |
| PODX1 | SURPODX~, SURPODX+3* |
| PODX2 | SURPODX~, SURPODX+3* |
| PODX3 | SURPODX~, SURPODX+3* |
| PODX4 | SURPODX~, SURPODX+3* |
| PODX5 | SURPODX~, SURPODX+3* |
| PRO | NUTKEY+8~, NUTKEY+9*, NUTKEY+10*, NUTKEY+12, NUTKEY+13 |
| PRODX | SURPODX~, SURPODX+3*, SURPODX+7* |
| REC | NEEDADR+1~, NEEDADR+3*, NEEDADR+7*, NEEDADR+9*, NEEDADR+10*, NEEDADR+11*, NEEDADR+12*, NEEDADR+13*, NEEDADR+14 |
| >> SDATE | NUTLOC+23 |
| SIEN | GETDIV+2~, GETDIV+8*, GETDIV+9 |
| SPEC | LOINC+29~, EXT+17*, EXT+19, EXT+20, EXT+23 |
| SPECD | LOINC+29~, EXT+20*, EXT+21 |
| STCD | SUR~, SUR+5* |
| SVP | GETDIV+2~, GETDIV+4*, GETDIV+5, GETDIV+8 |
| TA | LOINC+29~, EXT+18*, EXT+19*, EXT+20 |
| TRSVP | NUTLOC+10~, NUTLOC+11*, NUTLOC+28*, NUTLOC+41*, NUTLOC+52*, NUTLOC+61*, NUTLOC+70*, NUTLOC+81*, NUTLOC+90*, NUTLOC+91 , NUTLOC+126, GETDIV+4 |
| TYPE | ISASIH~, ISASIH+3, ISASIH+4, NEEDADR~, NEEDADR+7, NEEDADR+8, NEEDADR+13, NEEDADR+14 |
| U | NUTLOC+22, NUTLOC+40, NUTLOC+51, NUTLOC+61, NUTLOC+69, NUTLOC+80, NUTLOC+90, NUTLOC+107, NUTLOC+109, NUTLOC+111 , SUR+3, SUR+5, SUR+6, SURPODX+7, SURPODX+10, EXT+2, INPUTT+3, ISASIH+4, ISASIH+5, NEEDADR+5 , NEEDADR+7, NEEDADR+10, NEEDADR+11, NEEDADR+12, NEEDADR+13 |
| VAHOW | NUTLOC+20~, NUTLOC+23* |
| VAIP | ISASIH+1~, NEEDADR+1~ |
| VAIP("D" | NUTLOC+23*, ISASIH+4* |
| VAIP("E" | ISASIH+3*, NEEDADR+4* |
| VAIP(15 | NEEDADR+7, NEEDADR+13 |
| VAIP(16 | NEEDADR+9, NEEDADR+10, NEEDADR+11, NEEDADR+12, NEEDADR+14 |
| VAIP(4 | ISASIH+7 |
| WARD | NUTLOC+10~, NUTLOC+11*, NUTLOC+26*, NUTLOC+27*, NUTLOC+28, NUTLOC+29, NUTLOC+115, NUTLOC+126 |
| WKLD | LOINC+29~, EXT+16*, EXT+17, EXT+19, EXT+20, EXT+22, EXT+23 |
| WKLD0 | LOINC+29~ |
| X | EXT+8*, EXT+11*, INPUTT+2!, INPUTT+3*! |
| >> Y | INPUTT+2 |
| >> Y(0 | INPUTT+3 |
