PXAIPOV ;ISL/JVS,PKR,ESW - SET THE DIAGNOSIS/PROBLEM LIST NODES ;09/14/2021
Source file <PXAIPOV.m>
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 |
---|---|---|
PCE Patient Care Encounter | 1 | PXAI |
Name | Comments | DBIA/ICR reference |
---|---|---|
POV | ;--CREATE DIAGNOSIS
|
|
SET | ;--SET AND NEW VARIABLES
|
|
SETVARA | ;--SET VISIT VARIABLES
|
|
SETPXKA | ;--SET PXK ARRAY AFTER
|
|
SETVARB | ;--SET VARIABLES BEFORE
|
|
BEFOR | ;
|
|
SETPXKB | ||
MISC | ;--MISCELLANEOUS NODE
|
|
PRIM | ;--SET A PROVIDER AS PRIMARY
|
|
SPOVPRIM(PXADATA,VISITIEN,PXAERR) | ;If there is an exisiting primary diagnosis
|
Name | Field # of Occurrence |
---|---|
FILE^DIE | SPOVPRIM+18 |
ERR^PXAI | SETVARA+7, SETVARA+29 |
PL^PXAIPL | SETVARA+57 |
ERRSET^PXAIPOVV | SPOVPRIM+23 |
VAL^PXAIPOVV | SET+15 |
VAL04^PXAIPOVV | SETVARA+7 |
VAL802^PXAIPOVV | SETVARA+29 |
$$PROVNARR^PXAPI | SETVARA+6, SETVARA+27 |
POV^PXBGPOV | SETVARB+3 |
PRV^PXBGPRV | PRIM+3 |
EN1^PXKMAIN | PRIM+14 |
SCC^PXUTLSCC | SETVARA+43 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVPOV - [#9000010.07] | BEFOR+2, SPOVPRIM+15 |
^AUPNVPOV("AD" | SPOVPRIM+14 |
^AUPNVPRV - [#9000010.06] | PRIM+7, PRIM+12 |
^AUPNVSIT - [#9000010] | SETVARA+43, PRIM+8 |
^TMP("PXAIADDPRV" | SETVARA+21*, SETVARA+23* |
^TMP("PXBGPOVMATCH" | SETVARB+4, SETVARB+5, SETVARB+6!, PRIM+16! |
^TMP("PXK" | SETPXKA+1*, SETPXKA+2*, SETPXKA+3*, SETPXKA+4*, SETPXKA+5*, SETPXKA+6*, SETVARB+5*, BEFOR+2*, SETPXKB+1*, SETPXKB+2* , SETPXKB+3*, SETPXKB+4*, SETPXKB+5*, SETPXKB+6*, SETPXKB+7*, SETPXKB+10, SETPXKB+15*, PRIM+11*, PRIM+12*, PRIM+13* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AFTER0 | SET+1~, SETVARA+1*, SETVARA+2*, SETVARA+3*, SETVARA+4*, SETVARA+6*, SETVARA+7, SETVARA+10*, SETVARA+12*, SETVARA+13* , SETVARA+14*, SETPXKA+1, PRIM+7*, PRIM+8*, PRIM+9*, PRIM+10*, PRIM+11 |
AFTER12 | SET+1~, SETVARA+16*, SETVARA+17*, SETVARA+18*, SETPXKA+2 |
AFTER800 | SET+1~, SETVARA+34*, SETVARA+35*, SETVARA+36*, SETVARA+37*, SETVARA+38*, SETVARA+39*, SETVARA+40*, SETVARA+41*, SETVARA+43 , SETVARA+45*, SETVARA+46*, SETVARA+47*, SETVARA+48*, SETVARA+49*, SETVARA+50*, SETVARA+51*, SETVARA+52*, SETPXKA+3 |
AFTER801 | SET+1~ |
AFTER802 | SET+1~, SETVARA+25*, SETVARA+27*, SETVARA+28, SETVARA+30*, SETPXKA+4 |
AFTER811 | SET+1~, SETVARA+32*, SETPXKA+5 |
AFTER812 | SET+1~, SETVARA+54*, SETVARA+55*, SETPXKA+6, SETPXKB+12, SETPXKB+13*, SETPXKB+14*, SETPXKB+15 |
AFTER8A | SET+1~ |
BEFOR0 | SET+2~, BEFOR+4*, SETPXKB+1 |
BEFOR12 | SET+2~, BEFOR+4*, SETPXKB+2 |
BEFOR800 | SET+2~, BEFOR+4*, SETPXKB+3 |
BEFOR801 | SET+2~ |
BEFOR802 | SET+2~, BEFOR+4*, SETPXKB+4 |
BEFOR811 | SET+2~, BEFOR+4*, SETPXKB+5 |
BEFOR812 | SET+2~, BEFOR+4*, SETPXKB+6, SETPXKB+10*, SETPXKB+11, SETPXKB+12, SETPXKB+13, SETPXKB+14 |
DIAG | SPOVPRIM+2~, SPOVPRIM+5*, SPOVPRIM+6, SPOVPRIM+7 |
EVENTDT | SET+3~ |
FDA | SPOVPRIM+12~ |
FDA( | SPOVPRIM+17* |
FPRI | SET+2~, PRIM+2~, PRIM+3 |
GMPSAVED | SET+3~ |
IENB | SET+3~, SETVARB+5*, BEFOR+1, BEFOR+2 |
IENS | SPOVPRIM+12~, SPOVPRIM+16*, SPOVPRIM+17, SPOVPRIM+22 |
IND | SPOVPRIM+2~, SPOVPRIM+3*, SPOVPRIM+4*, SPOVPRIM+5, SPOVPRIM+7, SPOVPRIM+13*, SPOVPRIM+14*, SPOVPRIM+15, SPOVPRIM+16 |
J | SET+3~ |
LNARR | SET+3~ |
MSG | SPOVPRIM+12~, SPOVPRIM+19 |
MSG("DIERR" | SPOVPRIM+21 |
NOPLLIST | SET+3~ |
>> PATIENT | SETVARA+3, SETVARA+43 |
PDNEW | SPOVPRIM+2~, SPOVPRIM+3*, SPOVPRIM+7*, SPOVPRIM+8 |
PIECE | SET+3~, BEFOR+2* |
POVI | SET+3~ |
PRI | SET+3~, SETVARA+9*, SETVARA+10 |
PRVDR | SET+3~, PRIM+2~, PRIM+3, PRIM+4 |
PXAA | SET+3~ |
PXAA( | SET+12* |
PXAA("CATEGORY" | SETVARA+25, SETVARA+27 |
PXAA("COMMENT" | SETVARA+32 |
PXAA("DELETE" | SETVARA+2, SETVARA+20, SETVARA+22 |
PXAA("DIAGNOSIS" | SETVARA+1, SETVARB+4, SETVARB+5 |
PXAA("ENC PRO | VIDER" , SETVARA+18, SETVARA+20, SETVARA+21 |
PXAA("EVENT D | /T" , SETVARA+16 |
PXAA("LEXICON | TERM" , SETVARA+12 |
PXAA("NARRATIVE" | SETVARA+6 |
PXAA("ORD PRO | VIDER" , SETVARA+17, SETVARA+22, SETVARA+23 |
PXAA("ORD/RES" | SETVARA+14 |
PXAA("PATIENT" | SETVARA+3* |
PXAA("PKG" | SETVARA+54 |
PXAA("PL AO" | SETVARA+35, SETVARA+46 |
PXAA("PL CV" | SETVARA+40, SETVARA+51 |
PXAA("PL EC" | SETVARA+37, SETVARA+48 |
PXAA("PL HNC" | , SETVARA+39, SETVARA+50 |
PXAA("PL IEN" | , SETVARA+13 |
PXAA("PL IR" | SETVARA+36, SETVARA+47 |
PXAA("PL MST" | , SETVARA+38, SETVARA+49 |
PXAA("PL SC" | SETVARA+34, SETVARA+45 |
PXAA("PL SHAD | " , SETVARA+41, SETVARA+52 |
PXAA("PRIMARY" | SETVARA+9 |
PXAA("SOURCE" | SETVARA+55 |
PXAAX | SET+3~ |
PXAB | SET+3~ |
PXADATA | SET+11, SET+12, SPOVPRIM~, SPOVPRIM+4, SPOVPRIM+5, SPOVPRIM+7 |
PXAERR | SET+7!, SPOVPRIM~ |
PXAERR(12 | SPOVPRIM+21* |
PXAERR(13 | SPOVPRIM+22* |
PXAERR(7 | SET+9* |
PXAERR(8 | SET+8* |
PXAERR(9 | SPOVPRIM+20* |
PXAIVDT | SET+4~ |
>> PXAK | SET+8, SET+11, SET+12, SETPXKA+1, SETPXKA+2, SETPXKA+3, SETPXKA+4, SETPXKA+5, SETPXKA+6, SETVARB+5 , BEFOR+2, SETPXKB+1, SETPXKB+2, SETPXKB+3, SETPXKB+4, SETPXKB+5, SETPXKB+6, SETPXKB+7, SETPXKB+10, SETPXKB+15 |
>> PXAPKG | SETVARA+54 |
>> PXASOURC | SETVARA+55 |
>> PXAVISIT | SETVARA+4, SETVARA+43, SETVARB+3, PRIM+3, PRIM+8, PRIM+9 |
PXBCNT | SET+4~, PRIM+2~, PRIM+3 |
PXBCNTPL | SET+4~ |
PXBKY | SET+4~, PRIM+2~, PRIM+3 |
PXBPMT | SET+4~ |
PXBSAM | SET+4~, PRIM+2~, PRIM+3 |
PXBSKY | SET+4~, PRIM+2~, PRIM+3, PRIM+5 |
PXBSKY(1 | PRIM+7, PRIM+12, PRIM+13 |
PXDIGNS | SET+4~ |
PXKDONE | SET+4~ |
PXRDR | PRIM+15! |
STOP | SET+5~, SET+15, SETVARA+7 |
SUB | SET+5~, SET+11*, SET+12 |
U | SETVARA+1, SETVARA+2, SETVARA+3, SETVARA+4, SETVARA+6, SETVARA+7, SETVARA+10, SETVARA+12, SETVARA+13, SETVARA+14 , SETVARA+16, SETVARA+17, SETVARA+18, SETVARA+25, SETVARA+27, SETVARA+28, SETVARA+30, SETVARA+32, SETVARA+34, SETVARA+35 , SETVARA+36, SETVARA+37, SETVARA+38, SETVARA+39, SETVARA+40, SETVARA+41, SETVARA+43, SETVARA+45, SETVARA+46, SETVARA+47 , SETVARA+48, SETVARA+49, SETVARA+50, SETVARA+51, SETVARA+52, SETVARA+54, SETVARA+55, SETPXKB+13, SETPXKB+14, PRIM+7 , PRIM+8, PRIM+9, PRIM+10, SPOVPRIM+15 |
VAR | SET+5~ |
VISITIEN | SPOVPRIM~, SPOVPRIM+14 |