HMPDJ04A ;ASMR/MKB - Admissions,PTF;Nov 12, 2015 16:42:22
Source file <HMPDJ04A.m>
| Package | Total | Call Graph |
|---|---|---|
| Enterprise Health Management Platform | 7 | $$FAC^HMPD ADD^HMPDJ ($$CPT,$$POV)^HMPDJ04 ($$AMIS,$$CATG,$$PTF,$$SERV)^HMPDVSIT ADD^HMPMETA $$EN^HMPSTMP ($$JSONDT,$$SETNCS,$$SETUID,FACILITY)^HMPUTILS |
| VA FileMan | 3 | FIND^DIC $$EXTERNAL^DILFD $$GET1^DIQ |
| CPT HCPCS Codes | 1 | $$CPT^ICPTCOD |
| DRG Grouper | 1 | $$ICDDX^ICDEX |
| Registration | 1 | (IN5,INP)^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 |
|---|---|---|
| Enterprise Health Management Platform | 2 | HMPDJ0 HMPDJ04 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADM(ID,DATE) | ; -- admission [from VSIT1]
|
|
| TIU(VISIT,ARR) | ; -- add notes to ARR("document")
|
|
| PROV(ARR,I,IEN,ROLE,PRIM) | ; -- add providers
|
|
| MVT(CA) | ; -- add movements to ADM("movement",i,"attribute")
|
|
| PTFA(HMPLID) | ; -- find ID in ^PXRMINDX(45) and call PTF1 if successful
|
|
| PTF1 | ; Set PTF data into PTF array
|
|
| VISIT(DFN,DATE) | ; -- Return visit# for admission
|
| Name | Field # of Occurrence |
|---|---|
| FIND^DIC | TIU+2 |
| $$EXTERNAL^DILFD | MVT+7, MVT+12 |
| $$GET1^DIQ | ADM+12, ADM+14, ADM+19, ADM+22, ADM+23, ADM+24, TIU+7, PROV+2, MVT+10, MVT+14 , MVT+17, PTF1+25, PTF1+29 |
| $$FAC^HMPD | ADM+19, MVT+14, PTF1+32 |
| ADD^HMPDJ | ADM+45, PTF1+44 |
| $$CPT^HMPDJ04 | ADM+37 |
| $$POV^HMPDJ04 | ADM+34 |
| $$AMIS^HMPDVSIT | ADM+24 |
| $$CATG^HMPDVSIT | ADM+37 |
| $$PTF^HMPDVSIT | ADM+34 |
| $$SERV^HMPDVSIT | ADM+17 |
| ADD^HMPMETA | ADM+44, PTF1+43 |
| $$EN^HMPSTMP | ADM+41, PTF1+33 |
| $$JSONDT^HMPUTILS | ADM+9, ADM+31, MVT+6, PTF1+30, PTF1+31 |
| $$SETNCS^HMPUTILS | ADM+36, PTF1+40 |
| $$SETUID^HMPUTILS | ADM+7, ADM+20, TIU+8, PROV+1, MVT+9, MVT+15, PTF1+15, PTF1+26 |
| FACILITY^HMPUTILS | ADM+28, PTF1+32 |
| $$ICDDX^ICDEX | PTF1+39 |
| $$CPT^ICPTCOD | ADM+37 |
| IN5^VADPT | ADM+5 |
| INP^VADPT | PTF1+22 |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^DGPM - [#405] | EXTERNAL^DILFD |
| ^DIC(42 - [#42] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^DGPT - [#45] | GET1^DIQ |
| ^TIU(8925 - [#8925] | FIND^DIC, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVSIT("AAH" | VISIT+3 |
| ^DGPM - [#405] | MVT+4 |
| ^DGPM("APCA" | MVT+3 |
| ^PXRMINDX(45 | PTFA+18, PTFA+19, PTFA+20, PTFA+21, PTFA+22 |
| ^TMP("HMPPX" | PTFA+26*, PTFA+27, PTFA+29!, PTF1+13 |
| Name | Line Occurrences |
|---|---|
| $$VISIT | ADM+8 |
| MVT | ADM+38 |
| PROV | ADM+32, ADM+33 |
| PTF1 | PTFA+28 |
| Name | Field # of Occurrence |
|---|---|
| ^( | MVT+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADM | ADM+1~ |
| ADM("categoryCode" | ADM+29* |
| ADM("categoryName" | ADM+29* |
| ADM("current" | ADM+13* |
| ADM("dateTime" | ADM+9* |
| ADM("lastUpdateTime" | ADM+41*, ADM+42 |
| ADM("localId" | ADM+7* |
| ADM("locationName" | ADM+23*, ADM+27 |
| ADM("locationUid" | ADM+20* |
| ADM("movements" | MVT+5*, MVT+6*, MVT+7*, MVT+9*, MVT+10*, MVT+12*, MVT+15*, MVT+17* |
| ADM("patientClassCode" | ADM+30* |
| ADM("patientClassName" | ADM+30* |
| ADM("reasonName" | ADM+35*, ADM+36* |
| ADM("reasonUid" | ADM+36* |
| ADM("roomBed" | ADM+10*, ADM+14* |
| ADM("service" | ADM+17*, ADM+27 |
| ADM("shortLocationName" | ADM+22* |
| ADM("specialty" | ADM+16* |
| ADM("stampTime" | ADM+42*, ADM+44 |
| ADM("stay" | ADM+9*, ADM+31* |
| ADM("stopCodeName" | ADM+26* |
| ADM("stopCodeUid" | ADM+26* |
| ADM("summary" | ADM+27* |
| ADM("typeName" | ADM+37* |
| ADM("uid" | ADM+7*, ADM+44 |
| ARR | TIU~, PROV~, PROV+1, PROV+2, PROV+3, PROV+4 |
| ARR("documents" | TIU+8*, TIU+9*, TIU+10* |
| CA | MVT~, MVT+3 |
| CNT | TIU+1~, TIU+3*, TIU+8*, TIU+9, TIU+10, MVT+1~*, MVT+4*, MVT+5, MVT+6, MVT+7 , MVT+9, MVT+10, MVT+12, MVT+15, MVT+17 |
| DA | TIU+1~, TIU+6*, TIU+7, TIU+8, MVT+1~, MVT+3*, MVT+4, MVT+5 |
| DATE | ADM~, ADM+2*, ADM+3, ADM+8*, ADM+9, MVT+1~*, MVT+3*, MVT+6, VISIT~, VISIT+2 |
| DFN | ADM+7, ADM+8, ADM+12, ADM+14, ADM+34, TIU+8, MVT+3, PTFA+19, PTFA+20, PTFA+21 , PTFA+22, PTF1+15, PTF1+26, VISIT~, VISIT+3 |
| FAC | ADM+1~, ADM+19*, ADM+28, MVT+14* |
| HLOC | ADM+1~, ADM+19*, ADM+20, ADM+22, ADM+23, ADM+24, MVT+14*, MVT+15, MVT+17 |
| HMPADM | PTF1+12~, PTF1+27*, PTF1+30 |
| HMPADMIT | ADM+15! |
| HMPDIS | PTF1+12~, PTF1+20*, PTF1+21, PTF1+31 |
| HMPDT | PTFA+14~, PTFA+21*, PTFA+22, PTFA+24, PTFA+25 |
| HMPDX | PTFA+14~, PTFA+20*, PTFA+21, PTFA+22, PTFA+25, PTF1+36*, PTF1+39 |
| HMPFAC | PTF1+12~, PTF1+32* |
| HMPID | PTFA+14~, PTFA+15*, PTFA+23 |
| HMPISYS | PTFA+14~, PTFA+18*, PTFA+19, PTFA+20, PTFA+21, PTFA+22, PTFA+25, PTF1+12~, PTF1+37*, PTF1+38* , PTF1+39 |
| HMPITEM | PTFA+14~, PTFA+22*, PTFA+23 |
| HMPLEN | PTFA+14~, PTFA+15* |
| HMPLID | PTFA~, PTFA+15, PTFA+26, PTF1+13, PTF1+14, PTF1+15, PTF1+16, PTF1+17, PTF1+25 |
| HMPLOC | PTF1+12~, PTF1+29*, PTF1+32 |
| >> HMPMETA | ADM+44, PTF1+43 |
| HMPP | PTF1+12~, PTF1+16*, PTF1+17 |
| HMPRDT | PTFA+14~, PTFA+24*, PTFA+26, PTF1+13 |
| HMPTMP | PTF1+12~, PTF1+13*, PTF1+20, PTF1+36, PTF1+37 |
| HMPTYP | PTFA+14~, PTFA+15*, PTFA+19, PTFA+20, PTFA+21, PTFA+22, PTF1+12~, PTF1+17*, PTF1+18, PTF1+19 |
| HMPX | TIU+1~, PTFA+14~, PTFA+25*, PTFA+26, PTF1+12~, PTF1+39*, PTF1+40, PTF1+41 |
| HMPX("DILIST" | TIU+4, TIU+5, TIU+6 |
| HMPY | TIU+1~ |
| I | ADM+1~, ADM+12*, ADM+32*, ADM+33*, TIU+1~, TIU+3*, TIU+4*, TIU+5, TIU+6, PROV~ , PROV+1, PROV+2, PROV+3, PROV+4 |
| ICD | ADM+1~, ADM+34*, ADM+35, ADM+36 |
| ID | ADM~, ADM+2*, ADM+3, ADM+4, ADM+6*, ADM+7 |
| IEN | PROV~, PROV+1, PROV+2 |
| LT | TIU+1~, TIU+5*, TIU+9 |
| MVT | ADM+1~, ADM+12*, ADM+13*, ADM+16, ADM+19, ADM+33, ADM+35 |
| NT | TIU+1~, TIU+7*, TIU+10 |
| PRIM | PROV~, PROV+4 |
| PTF | PTF1+12~ |
| PTF("admissionUid" | PTF1+26* |
| PTF("arrivalDateTime" | PTF1+30* |
| PTF("dischargeDateTime" | PTF1+31* |
| PTF("drg" | PTF1+25* |
| PTF("icdCode" | PTF1+40* |
| PTF("icdName" | PTF1+41* |
| PTF("lastUpdateTime" | PTF1+33*, PTF1+34 |
| PTF("localId" | PTF1+14* |
| PTF("principalDx" | PTF1+18* |
| PTF("stampTime" | PTF1+34*, PTF1+43 |
| PTF("uid" | PTF1+15*, PTF1+43 |
| ROLE | PROV~, PROV+3 |
| SPEC | ADM+1~, ADM+16*, ADM+17 |
| U | ADM+10, ADM+16, ADM+26, ADM+36, ADM+37, MVT+7, MVT+8, MVT+11, MVT+14, PTFA+25 , PTF1+20, PTF1+36, PTF1+37, PTF1+40, PTF1+41 |
| VADMVT | ADM+1~, ADM+6*, ADM+12, ADM+38 |
| VAERR | ADM+1~ |
| VAIN | PTF1+12~ |
| VAIN(1 | PTF1+23, PTF1+26 |
| VAIN(4 | PTF1+29 |
| VAIN(7 | PTF1+27 |
| VAINDT | PTF1+12~, PTF1+21* |
| VAIP | ADM+1~ |
| VAIP( | ADM+16, ADM+19, ADM+33, ADM+35 |
| VAIP("D" | ADM+3* |
| VAIP("E" | ADM+4* |
| VAIP(1 | ADM+5 |
| VAIP(12 | ADM+34 |
| VAIP(13 | ADM+6, ADM+8 |
| VAIP(17 | ADM+31 |
| VAIP(18 | ADM+32 |
| VAIP(6 | ADM+10 |
| VISIT | TIU~, TIU+2 |
| >> VST | ADM+3*, ADM+4*, ADM+8*, ADM+34, ADM+37 |
| X | ADM+14*, ADM+17*, ADM+22*, ADM+24*, ADM+26, ADM+37*, TIU+1~, MVT+1~, MVT+8*, MVT+9 , MVT+10, MVT+11*, MVT+12, VISIT+1~, VISIT+2*, VISIT+3 |
| >> X0 | MVT+4*, MVT+7, MVT+8, MVT+11, MVT+14 |
| Y | TIU+1~, TIU+3*, VISIT+1~, VISIT+3*, VISIT+4 |
