PXRMRULE ;SLC/PJH - Build Patient list from Rule Set ;08/16/2018
Source file <PXRMRULE.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CLEAR(RULE,NODE) | ;Clear workfile entries
|
|
INTR | ;Input transform for #810.4 fields
|
|
LOAD(NODE,LIEN) | ;Load Patient List
|
|
PATS(FRACT,FROUT,PNODE,LIST) | ;Process Patient List finding rule
|
|
START(RULESET,LIST,NODE,LBBDT,LBEDT,PAR,YEAR,PERIOD,INDP,INTP,EXTITR) | ;
|
|
UPDLST(NODE,LIST,EPIEN,RULE,INST,INDP,INTP) | ;Update patient list
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | PATS+8 |
UPDATE^DIE | UPDLST+80 |
DOCUMENT^PXRMEUT | START+79 |
RMPAT^PXRMEUT | START+74 |
RDATES^PXRMEUT1 | START+38 |
$$CRLST^PXRMRUL1 | START+68 |
ERR^PXRMRUL1 | UPDLST+82 |
LOCK^PXRMRUL1 | UPDLST+5 |
REM^PXRMRUL1 | START+58 |
TERM^PXRMRUL1 | START+56 |
UNLOCK^PXRMRUL1 | UPDLST+84 |
$$TESTPAT^VADPT | UPDLST+26 |
$$NOW^XLFDT | UPDLST+73 |
FileNo | Call Tags |
---|---|
^PXRMXP(810.5 - [#810.5] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | UPDLST+23 |
^PXRM(810.2 - [#810.2] | START+9 |
^PXRM(810.4 - [#810.4] | CLEAR+3, START+17, START+20, START+21, START+22, START+26, START+33 |
^PXRMXP(810.5 - [#810.5] | LOAD+3, LOAD+4, START+36, UPDLST+6, UPDLST+8*, UPDLST+9*, UPDLST+12!, UPDLST+27*, UPDLST+28*, UPDLST+37* , UPDLST+38*, UPDLST+39*, UPDLST+47*, UPDLST+48*, UPDLST+49*, UPDLST+50*, UPDLST+56*, UPDLST+57*, UPDLST+58*, UPDLST+64* , UPDLST+65*, UPDLST+66*, UPDLST+67* |
^TMP("PXRMDDOC" | START+14!, START+80! |
^TMP($J | CLEAR+4!, CLEAR+6!, LOAD+6*, PATS+18, PATS+20!, PATS+22!, START+54!, START+62!, UPDLST+17, UPDLST+18 , UPDLST+31, UPDLST+33, UPDLST+35, UPDLST+41, UPDLST+43, UPDLST+45 |
Name | Line Occurrences |
---|---|
CLEAR | START+3 |
LOAD | PATS+11, PATS+15, START+47 |
PATS | START+60 |
UPDLST | START+70, START+75 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CLASS | START+5~, START+9*, START+11*, START+68 |
CNT | UPDLST+1~, UPDLST+16*, UPDLST+27*, UPDLST+28, UPDLST+37, UPDLST+38, UPDLST+39, UPDLST+47, UPDLST+48, UPDLST+49 , UPDLST+50, UPDLST+67 |
DA | UPDLST+1~ |
DATA | LOAD+1~, LOAD+4*, LOAD+6, UPDLST+1~ |
DCNT | UPDLST+1~, UPDLST+42*, UPDLST+46*, UPDLST+47, UPDLST+48, UPDLST+49, UPDLST+61*, UPDLST+63*, UPDLST+64, UPDLST+65 , UPDLST+66 |
DECEASED | UPDLST+1~, UPDLST+15*, UPDLST+24*, UPDLST+27 |
DFN | LOAD+1~, LOAD+4*, LOAD+6, PATS+17*, PATS+18*, PATS+20, PATS+22, START+52~, UPDLST+1~, UPDLST+16* , UPDLST+17*, UPDLST+18, UPDLST+20, UPDLST+23, UPDLST+26, UPDLST+27, UPDLST+28, UPDLST+31, UPDLST+33, UPDLST+35 , UPDLST+41, UPDLST+43, UPDLST+45 |
DNAME | UPDLST+1~, UPDLST+42*, UPDLST+43*, UPDLST+44, UPDLST+45, UPDLST+47, UPDLST+48, UPDLST+61*, UPDLST+62*, UPDLST+64 , UPDLST+65 |
DNAMEL | UPDLST+1~ |
DNAMEL( | UPDLST+44*, UPDLST+62 |
DOD | UPDLST+1~, UPDLST+23*, UPDLST+24 |
DUE | UPDLST+1~ |
DUOUT | UPDLST+1~, UPDLST+5 |
DUZ | UPDLST+76 |
EPIEN | UPDLST~, UPDLST+74 |
EXTITR | START~, START+34 |
FDA | UPDLST+1~ |
FDA( | UPDLST+72*, UPDLST+73*, UPDLST+74*, UPDLST+75*, UPDLST+76*, UPDLST+77*, UPDLST+78*, UPDLST+79* |
FRACT | PATS~, PATS+11, PATS+20, PATS+22, START+5~, START+24*, START+56, START+58, START+60 |
FRDATA | START+5~, START+26*, START+27, START+29, START+31, START+35 |
FRDATES | START+5~, START+27*, START+38 |
FRIEN | START+5~, START+24*, START+26, START+33 |
FRLIEN | START+5~ |
FRLST | START+5~, START+33*, START+34*, START+36*, START+60 |
FROLST | START+5~, START+35*, START+36 |
FROUT | PATS~, PATS+11, PATS+18, PATS+20, PATS+22, START+5~, START+43*, START+45*, START+47*, START+60 , START+70, START+73, START+74, START+75 |
FRPAT | START+5~, START+41*, START+45, START+47 |
FRPERM | START+6~, START+49*, START+65, START+68 |
FRPIEN | START+66~, START+68*, START+70 |
FRSTRT | START+6~, START+41*, START+43, START+45, START+47 |
FRTIEN | START+6~, START+29*, START+56 |
FRTYP | START+6~, START+26*, START+29, START+31, START+33, START+56, START+58, START+60 |
FSEQ | START+6~, START+19*, START+45 |
INC | START+6~, START+16*, START+19* |
INDP | START~, START+70, START+74, START+75, START+79, UPDLST~, UPDLST+8, UPDLST+21 |
INST | START+6~, START+16*, START+56, START+70, START+75, UPDLST~, UPDLST+78 |
INSTNAM | UPDLST+2~, UPDLST+19*, UPDLST+20, UPDLST+27 |
INSTNUM | UPDLST+2~, UPDLST+19*, UPDLST+20, UPDLST+27 |
INTP | START~, START+70, START+74, START+75, START+79, UPDLST~, UPDLST+9, UPDLST+26 |
LAST | UPDLST+2~ |
LBBDT | START~, START+38, START+56, START+58, START+79 |
LBEDT | START~, START+38, START+39, START+56, START+58, START+79 |
LIEN | LOAD~, LOAD+3, LOAD+4, PATS+2~, PATS+8*, PATS+11, PATS+15 |
LIST | PATS~, PATS+4*, PATS+5*, PATS+7, START~, START+73, START+75, START+79, UPDLST~, UPDLST+6 , UPDLST+8, UPDLST+9, UPDLST+12, UPDLST+27, UPDLST+28, UPDLST+37, UPDLST+38, UPDLST+39, UPDLST+47, UPDLST+48 , UPDLST+49, UPDLST+50, UPDLST+56, UPDLST+57, UPDLST+58, UPDLST+64, UPDLST+65, UPDLST+66, UPDLST+67 |
LUVALUE | PATS+2~, PATS+8 |
LUVALUE(1 | PATS+7* |
MSG | UPDLST+2~, UPDLST+82 |
NAME | UPDLST+2~, UPDLST+7*, UPDLST+72 |
NODE | CLEAR~, CLEAR+4, LOAD~, LOAD+6, START~, START+3, START+43, START+45, START+47, UPDLST~ , UPDLST+17, UPDLST+18, UPDLST+31, UPDLST+33, UPDLST+35, UPDLST+41, UPDLST+43, UPDLST+45 |
ONODE | UPDLST+2~, UPDLST+18*, UPDLST+19 |
PAR | START~, START+9, START+70, START+75 |
PATCREAT | UPDLST+70, UPDLST+71! |
PERIOD | PATS+5, START~ |
>> PLISTPUG | UPDLST+79 |
PNODE | PATS~, PATS+15, PATS+20, PATS+22, START+52~, START+53*, START+54, START+56, START+58, START+60 , START+62 |
PXRMDATE | START+6~, START+39* |
PXRMDDOC | START+6~, START+13*, START+78* |
RBDT | START+7~, START+38, START+56, START+58 |
RCNT | UPDLST+3~, UPDLST+32*, UPDLST+36*, UPDLST+37, UPDLST+38, UPDLST+39, UPDLST+56 |
REDT | START+7~, START+38, START+56, START+58 |
RIEN | UPDLST+3~, UPDLST+32*, UPDLST+33*, UPDLST+34, UPDLST+35, UPDLST+38, UPDLST+53*, UPDLST+54*, UPDLST+56, UPDLST+57 |
RNAMEL | UPDLST+3~ |
RNAMEL( | UPDLST+34*, UPDLST+54 |
RNCNT | UPDLST+3~, UPDLST+32*, UPDLST+53*, UPDLST+55*, UPDLST+57, UPDLST+58 |
RRIEN | START+7~, START+31*, START+58 |
RSDATA | START+7~, START+21*, START+24, START+41, START+49 |
RSDATES | START+7~, START+22*, START+38 |
RULE | CLEAR~, CLEAR+3, UPDLST~, UPDLST+75 |
RULESET | START~, START+3, START+17, START+20, START+21, START+22, START+70, START+75, START+79 |
SEQ | CLEAR+1~, CLEAR+2*, CLEAR+3*, CLEAR+4, START+7~, START+16*, START+17*, START+19, START+20, START+47 |
SUB | LOAD+1~, LOAD+2*, LOAD+3*, LOAD+4, START+7~, START+20*, START+21, START+22, UPDLST+3~ |
TEMP | UPDLST+3~, UPDLST+6*, UPDLST+7, UPDLST+20* |
TEST | UPDLST+3~ |
>> TESTP | UPDLST+15*, UPDLST+26*, UPDLST+27 |
TYPE | UPDLST+3~, UPDLST+70*, UPDLST+77 |
U | LOAD+4, LOAD+6, START+9, START+24, START+26, START+27, START+29, START+31, START+33, START+35 , START+36, START+41, START+49, UPDLST+7, UPDLST+8, UPDLST+9, UPDLST+19, UPDLST+20, UPDLST+23, UPDLST+27 , UPDLST+39, UPDLST+47, UPDLST+49, UPDLST+50, UPDLST+58, UPDLST+66, UPDLST+67 |
VALUE | UPDLST+3~, UPDLST+35*, UPDLST+37, UPDLST+45*, UPDLST+47 |
YEAR | PATS+4, START~ |