PXCA0 ;ISL/dee - Main routine for PCE Device Interface Module ;11/20/96
Source file <PXCA0.m>
| Package | Total | Call Graph |
|---|---|---|
| PCE Patient Care Encounter | 20 | PROC^PXCACPT DXPL^PXCADXPL PXKERROR^PXCAERR HFACTORS^PXCAHF PATED^PXCAPED PROBLEM^PXCAPL PROBLIST^PXCAPL1 PROBLIST^PXCAPL2 DIAG^PXCAPOV PROV^PXCAPRV SKINTEST^PXCASK SOURCE^PXCASOR IMMUN^PXCAVIMM ENCOUNT^PXCAVST EXAM^PXCAXAM (PATINFO,PATKILL)^PXCEPAT (EN1,EVENT)^PXKMAIN ($$DISPOSIT,$$PRIMVPOV,$$PRIMVPRV)^PXUTL1 $$LOOKVSIT^PXUTLVST $$PKG2IEN^VSIT |
| General Medical Record - Vitals | 1 | (STORE,VALIDATE)^GMRVPCE0 |
| Registration | 1 | KVA^VADPT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EXIT(PXCAGLB) | ;Done clean up and exit.
|
|
| EN | ;Entry called form PXCAEP.
|
|
| FINISH(PXCAGLB) | ;
|
|
| PROCESS(PXCA,PXCABULD,PXCAERRS) | ;
|
|
| BUILD(PXCAGLB,PXCAERRS) | ;Takes an PXCA array and builds the ^TMP(PXCAGLB,$J, array.
|
| Name | Field # of Occurrence |
|---|---|
| STORE^GMRVPCE0 | FINISH+3 |
| VALIDATE^GMRVPCE0 | PROCESS+41, FINISH+3 |
| PROC^PXCACPT | PROCESS+32 |
| DXPL^PXCADXPL | PROCESS+45 |
| PXKERROR^PXCAERR | EN+6 |
| HFACTORS^PXCAHF | PROCESS+34 |
| PATED^PXCAPED | PROCESS+36 |
| PROBLEM^PXCAPL | PROCESS+43 |
| PROBLIST^PXCAPL1 | FINISH+7 |
| PROBLIST^PXCAPL2 | FINISH+9 |
| DIAG^PXCAPOV | PROCESS+31 |
| PROV^PXCAPRV | PROCESS+30 |
| SKINTEST^PXCASK | PROCESS+37 |
| SOURCE^PXCASOR | PROCESS+28 |
| IMMUN^PXCAVIMM | PROCESS+35 |
| ENCOUNT^PXCAVST | PROCESS+27 |
| EXAM^PXCAXAM | PROCESS+38 |
| PATINFO^PXCEPAT | PROCESS+13 |
| PATKILL^PXCEPAT | EXIT+3 |
| EN1^PXKMAIN | FINISH+15 |
| EVENT^PXKMAIN | FINISH+20 |
| $$DISPOSIT^PXUTL1 | PROCESS+23 |
| $$PRIMVPOV^PXUTL1 | PROCESS+25 |
| $$PRIMVPRV^PXUTL1 | PROCESS+24 |
| $$LOOKVSIT^PXUTLVST | PROCESS+18 |
| KVA^VADPT | PROCESS+52 |
| $$PKG2IEN^VSIT | PROCESS+5 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PX(815 - [#815] | PROCESS+49 |
| ^SC - [#44] | PROCESS+17 |
| ^TMP( | BUILD+4!, FINISH+18, EXIT+2! |
| Name | Line Occurrences |
|---|---|
| BUILD | EN+4 |
| EXIT | EN+7 |
| FINISH | EN+5 |
| PROCESS | BUILD+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DUZ | EN+3, PROCESS+2 |
| PXCA | EN+1, BUILD+7, PROCESS~, PROCESS+27, PROCESS+28, PROCESS+30, PROCESS+31, PROCESS+32, PROCESS+34, PROCESS+35 , PROCESS+36, PROCESS+37, PROCESS+38, PROCESS+41, PROCESS+43, PROCESS+45, FINISH+3 |
| PXCA("ENCOUNTER" | PROCESS+10 |
| PXCA("ERROR" | EN+1*, EN+5, BUILD+9, PROCESS+23*, PROCESS+49* |
| PXCA("SOURCE" | PROCESS+6 |
| PXCA("WARNING" | PROCESS+50* |
| PXCABULD | PROCESS~, PROCESS+27, PROCESS+28, PROCESS+30, PROCESS+31, PROCESS+32, PROCESS+34, PROCESS+35, PROCESS+36, PROCESS+37 , PROCESS+38, PROCESS+43, PROCESS+45 |
| PXCACSTP | EN+2~, PROCESS+2~, PROCESS+17*, PROCESS+18 |
| PXCADNUM | EN+2~, PROCESS+2~ |
| PXCADT | EN+2~, PROCESS+2~, PROCESS+11*, PROCESS+18, PROCESS+23 |
| PXCAENC | PROCESS+9~, PROCESS+10*, PROCESS+11, PROCESS+12, PROCESS+14 |
| PXCAERRS | BUILD~, BUILD+7, PROCESS~, PROCESS+27, PROCESS+28, PROCESS+30, PROCESS+31, PROCESS+32, PROCESS+34, PROCESS+35 , PROCESS+36, PROCESS+37, PROCESS+38, PROCESS+43, PROCESS+45 |
| PXCAEVAL | PROCESS+1~*, PROCESS+27, PROCESS+32 |
| PXCAGLB | BUILD~, BUILD+4, FINISH~, FINISH+18, EXIT~, EXIT+2 |
| PXCAHLOC | EN+2~, PROCESS+2~, PROCESS+14*, PROCESS+17, PROCESS+18 |
| PXCANPRV | BUILD+2~, BUILD+5* |
| PXCAPAT | EN+2~, PROCESS+2~, PROCESS+12*, PROCESS+13, PROCESS+18, PROCESS+23 |
| PXCAPDX | EN+2~, PROCESS+2~, PROCESS+7*, PROCESS+25*, PROCESS+48 |
| PXCAPKG | PROCESS+3~, PROCESS+5* |
| PXCAPPRV | EN+2~, PROCESS+2~, PROCESS+7*, PROCESS+24* |
| PXCAPXKE | FINISH+13~, FINISH+14*, FINISH+16 |
| PXCASOR | PROCESS+3~, PROCESS+6* |
| >> PXCAVSIT | PROCESS+4*, PROCESS+18*, PROCESS+19*, PROCESS+21, PROCESS+23, PROCESS+24, PROCESS+25, FINISH+18* |
| PXKDUZ | EN+2~, EN+3*, PROCESS+2~* |
| PXKERROR | EN+6, BUILD+3!, FINISH+14, FINISH+16*, EXIT+1! |
| PXKERROR("PXCA" | BUILD+9* |
| >> ZTQUEUED | BUILD+9 |
| Name | Field # of Occurrence |
|---|---|
| $T(STORE^GMRVPCE0 | FINISH+3 |
| $T(VALIDATE^GMRVPCE0 | PROCESS+41, FINISH+3 |