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 |