PXRMPLST ;SLC/PKR - Build a patient list from a reminder definition. ;08/17/2017
Source file <PXRMPLST.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 |
---|---|---|
Clinical Reminders | 4 | PXRMEVFI PXRMFF PXRMRUL1 PXRMVLST |
Name | Comments | DBIA/ICR reference |
---|---|---|
BLDPLST(DEFARR,PLIST,DFNONLY) | ;
|
|
AGEFI(DEFARR,LNAME,SEX,ONLYFREQ) | ;Check for patients that need to be
|
|
CFSAA(STACK) | ;Check for the first three elements on the stack being
|
|
DOBR(DEFARR,NDR,DOBS,DOBE) | ;Build the date of birth range.
|
|
GENTERM(FINDING,FINUM,TERMARR) | ;Given a reminder finding generate a term
|
|
GETDOB(AGE,TYPE) | ;Given an age in years return the corresponding date of
|
|
LOGOP(LIST1,LIST2,LOGOP) | ;Given LIST1 and LIST2 apply the logical
|
|
LSA(SEX,NDR,DOBS,DOBE,LNAME) | ;Build a list from a SEX & AGE finding.
|
|
LSEX(SEX,LNAME,LSTACK) | ;Build a list from a SEX finding.
|
Name | Field # of Occurrence |
---|---|
$$FRQINDAY^PXRMDATE | AGEFI+12 |
$$NOW^PXRMDATE | AGEFI+33, DOBR+10, GETDOB+5 |
EVALPL^PXRMEVFI | BLDPLST+36, AGEFI+36 |
EVALPL^PXRMFF | BLDPLST+43, AGEFI+37 |
TERM^PXRMLDR | GENTERM+8 |
$$POP^PXRMSTAC | BLDPLST+49, BLDPLST+50, BLDPLST+67, CFSAA+10, CFSAA+11, CFSAA+12, LSEX+4 |
POSTFIX^PXRMSTAC | BLDPLST+17 |
PUSH^PXRMSTAC | BLDPLST+29, BLDPLST+37, BLDPLST+44, BLDPLST+53, BLDPLST+59, BLDPLST+64, CFSAA+13, LSEX+5 |
$$STRREP^PXRMUTIL | BLDPLST+16 |
$$FMADD^XLFDT | GETDOB+7 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | AGEFI+43 |
^DPT("ADOB" | LSA+5, LSA+7 |
^DPT("ASX" | LSA+8, LSEX+8 |
^TMP($J | BLDPLST+54!, BLDPLST+74, BLDPLST+75*, BLDPLST+76*, BLDPLST+77!, AGEFI+35!, AGEFI+39, AGEFI+40, AGEFI+46!, AGEFI+53! , LOGOP+5, LOGOP+6*, LOGOP+7!, LOGOP+12, LOGOP+13!, LOGOP+17, LOGOP+18*, LSA+9*, LSEX+7, LSEX+8* |
Name | Line Occurrences |
---|---|
$$GETDOB | AGEFI+33, AGEFI+34, DOBR+10, DOBR+11 |
AGEFI | BLDPLST+30, BLDPLST+65, BLDPLST+70 |
CFSAA | BLDPLST+19 |
DOBR | BLDPLST+14 |
LOGOP | BLDPLST+52, AGEFI+50, AGEFI+52 |
LSA | BLDPLST+28, BLDPLST+63 |
LSEX | BLDPLST+58 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AGE | GETDOB~, GETDOB+6, GETDOB+7 |
DATE | GETDOB+4~, GETDOB+5*, GETDOB+6, GETDOB+7 |
DEFARR | BLDPLST~, BLDPLST+14, BLDPLST+30, BLDPLST+36, BLDPLST+43, BLDPLST+65, BLDPLST+70, AGEFI~, AGEFI+36, AGEFI+37 , DOBR~ |
DEFARR(0 | BLDPLST+12 |
DEFARR(20 | AGEFI+9, AGEFI+27, GENTERM+11 |
DEFARR(25 | AGEFI+9, AGEFI+27 |
DEFARR(31 | BLDPLST+8 |
DEFARR(40 | AGEFI+4, AGEFI+6 |
DEFARR(7 | DOBR+3, DOBR+4 |
DEL | AGEFI+2~, AGEFI+41*, AGEFI+44*, AGEFI+45*, AGEFI+46 |
DFN | BLDPLST+1~, BLDPLST+73*, BLDPLST+74*, BLDPLST+75, AGEFI+2~, AGEFI+39*, AGEFI+40*, AGEFI+43, AGEFI+46, LSA+2~ , LSA+6*, LSA+7*, LSA+8, LSA+9, LSEX+6*, LSEX+7*, LSEX+8 |
DFN1 | LOGOP+2~, LOGOP+4*, LOGOP+5*, LOGOP+6, LOGOP+7, LOGOP+11*, LOGOP+12*, LOGOP+13 |
DFN2 | LOGOP+2~, LOGOP+16*, LOGOP+17*, LOGOP+18 |
DFNONLY | BLDPLST~, BLDPLST+72 |
DOB | AGEFI+2~, AGEFI+43*, AGEFI+45, GETDOB+4~, GETDOB+6*, GETDOB+7*, GETDOB+8 |
DOBE | BLDPLST+1~, BLDPLST+14, BLDPLST+28, BLDPLST+63, AGEFI+2~, AGEFI+33*, AGEFI+45, DOBR~, LSA~ |
DOBE( | DOBR+10*, LSA+5 |
DOBS | BLDPLST+1~, BLDPLST+14, BLDPLST+28, BLDPLST+63, AGEFI+2~, AGEFI+34*, AGEFI+45, DOBR~, LSA~ |
DOBS( | DOBR+11*, LSA+4 |
DS | LSA+2~, LSA+4*, LSA+5*, LSA+7 |
EL1 | CFSAA+3~, CFSAA+5*, CFSAA+6, CFSAA+7, CFSAA+10*, CFSAA+11*, CFSAA+12* |
EL2 | CFSAA+3~, CFSAA+5*, CFSAA+6, CFSAA+7 |
EL3 | CFSAA+3~, CFSAA+5*, CFSAA+6, CFSAA+7 |
ELE | BLDPLST+1~, BLDPLST+22*, BLDPLST+23, BLDPLST+24, BLDPLST+51*, BLDPLST+52 |
ELIST | LSEX+2~, LSEX+4*, LSEX+5, LSEX+7 |
ERROR | BLDPLST+1~, BLDPLST+20*, BLDPLST+21, BLDPLST+34*, BLDPLST+41* |
ERRSTR | BLDPLST+1~, BLDPLST+34*, BLDPLST+41* |
FILIST | AGEFI+2~, AGEFI+6*, AGEFI+8 |
FINDING | GENTERM~, GENTERM+4 |
FINUM | AGEFI+2~, AGEFI+8*, AGEFI+9, AGEFI+14, AGEFI+19*, AGEFI+20*, AGEFI+21, AGEFI+25*, AGEFI+26, AGEFI+27 , AGEFI+36, AGEFI+37, GENTERM~, GENTERM+11 |
FNUM | BLDPLST+1~, BLDPLST+33*, BLDPLST+34, BLDPLST+36, BLDPLST+40*, BLDPLST+41, BLDPLST+43 |
FREQ | AGEFI+2~, AGEFI+12*, AGEFI+14, AGEFI+17*, AGEFI+18*, AGEFI+20, AGEFI+28*, AGEFI+29, AGEFI+30, AGEFI+39 , DOBR+1~, DOBR+5*, DOBR+6 |
IEN | GENTERM+2~, GENTERM+5*, GENTERM+8, GENTERM+12 |
IND | BLDPLST+1~, BLDPLST+20*, BLDPLST+21, BLDPLST+22*, BLDPLST+27, BLDPLST+33*, BLDPLST+35, BLDPLST+40*, BLDPLST+42, BLDPLST+57 , BLDPLST+62, AGEFI+2~, AGEFI+7*, AGEFI+8, AGEFI+15*, AGEFI+21*, AGEFI+22, AGEFI+24*, AGEFI+25, AGEFI+29 , AGEFI+30, AGEFI+49*, AGEFI+50, AGEFI+51*, AGEFI+52, AGEFI+53, DOBR+1~, DOBR+2*, DOBR+3*, DOBR+4 , GENTERM+2~, LSA+2~, LSA+3*, LSA+4, LSA+5 |
JND | AGEFI+2~, AGEFI+50* |
LIST1 | BLDPLST+2~, BLDPLST+50*, BLDPLST+52, BLDPLST+53, BLDPLST+67*, BLDPLST+70, BLDPLST+74, BLDPLST+76, BLDPLST+77, LOGOP~ , LOGOP+5, LOGOP+6, LOGOP+7, LOGOP+12, LOGOP+13, LOGOP+18 |
LIST2 | BLDPLST+2~, BLDPLST+49*, BLDPLST+52, BLDPLST+54, LOGOP~, LOGOP+6, LOGOP+13, LOGOP+17, LOGOP+18 |
LNAME | BLDPLST+2~, BLDPLST+27*, BLDPLST+28, BLDPLST+29, BLDPLST+30, BLDPLST+35*, BLDPLST+36, BLDPLST+37, BLDPLST+42*, BLDPLST+43 , BLDPLST+44, BLDPLST+57*, BLDPLST+58, BLDPLST+59, BLDPLST+62*, BLDPLST+63, BLDPLST+64, BLDPLST+65, AGEFI~, AGEFI+52 , LSA~, LSA+9, LSEX~, LSEX+8 |
LOGOP | AGEFI+2~, LOGOP~, LOGOP+3, LOGOP+10, LOGOP+15 |
LOGOP( | AGEFI+29*, AGEFI+30*, AGEFI+52 |
LSP | BLDPLST+2~, BLDPLST+20* |
LSTACK | BLDPLST+2~, BLDPLST+29, BLDPLST+37, BLDPLST+44, BLDPLST+49, BLDPLST+50, BLDPLST+53, BLDPLST+58, BLDPLST+59, BLDPLST+64 , BLDPLST+67, LSEX~, LSEX+4, LSEX+5 |
LSTACK(0 | BLDPLST+20* |
MAXAGE | AGEFI+3~, AGEFI+32*, AGEFI+34, DOBR+1~, DOBR+8*, DOBR+11 |
MINAGE | AGEFI+3~, AGEFI+31*, AGEFI+33, DOBR+1~, DOBR+7*, DOBR+10 |
NDR | BLDPLST+3~, BLDPLST+14, BLDPLST+28, BLDPLST+63, DOBR~, DOBR+2*, DOBR+9*, DOBR+10, DOBR+11, LSA~ , LSA+3 |
NOT | BLDPLST+3~, BLDPLST+20*, BLDPLST+23*, BLDPLST+46*, BLDPLST+51* |
NUMAFI | AGEFI+3~, AGEFI+4*, AGEFI+5, AGEFI+7, AGEFI+22, AGEFI+24, AGEFI+49, AGEFI+50, AGEFI+51 |
ONLYFREQ | AGEFI~, AGEFI+29 |
OPER | BLDPLST+3~, BLDPLST+10*, BLDPLST+17, BLDPLST+24 |
PCLOG | BLDPLST+3~, BLDPLST+8*, BLDPLST+9, BLDPLST+12, BLDPLST+14, BLDPLST+16*, BLDPLST+17, BLDPLST+70 |
PFSTACK | BLDPLST+3~, BLDPLST+17, BLDPLST+19 |
PFSTACK( | BLDPLST+22, BLDPLST+33, BLDPLST+40 |
PFSTACK(0 | BLDPLST+21 |
PLIST | BLDPLST~, BLDPLST+75, BLDPLST+76 |
PSEX | AGEFI+3~, AGEFI+43*, AGEFI+44 |
RANK | AGEFI+3~, AGEFI+10*, AGEFI+11*, AGEFI+14, AGEFI+15*, AGEFI+16*, AGEFI+18, AGEFI+20 |
RANKARR | AGEFI+3~ |
RANKARR( | AGEFI+14*, AGEFI+16, AGEFI+18, AGEFI+20 |
RF | AGEFI+3~ |
RF( | AGEFI+21*, AGEFI+25, AGEFI+50, AGEFI+52, AGEFI+53 |
SAA | CFSAA+3~, CFSAA+4*, CFSAA+6*, CFSAA+7*, CFSAA+8 |
SEX | BLDPLST+3~, BLDPLST+12*, BLDPLST+30, BLDPLST+58, BLDPLST+63, BLDPLST+65, AGEFI~, AGEFI+44, LSA~, LSA+8 , LSEX~, LSEX+8 |
SEXOK | LSA+2~, LSA+8*, LSA+9 |
STACK | CFSAA~, CFSAA+10, CFSAA+11, CFSAA+12, CFSAA+13 |
STACK(1 | CFSAA+5 |
STACK(2 | CFSAA+5 |
STACK(3 | CFSAA+5 |
TEMP | AGEFI+3~, AGEFI+9*, AGEFI+10, AGEFI+12, AGEFI+27*, AGEFI+28, AGEFI+31, AGEFI+32, DOBR+1~, DOBR+4* , DOBR+5, DOBR+7, DOBR+8, GENTERM+2~, GENTERM+4*, GENTERM+5, GENTERM+6 |
TERMARR | GENTERM~, GENTERM+3!, GENTERM+8 |
TERMARR("E" | GENTERM+12* |
TERMARR("IEN" | GENTERM+10* |
TERMARR(0 | GENTERM+9* |
TERMARR(20 | GENTERM+11* |
TGLIST | AGEFI+3~, AGEFI+26*, AGEFI+35, AGEFI+36, AGEFI+37, AGEFI+39, AGEFI+40, AGEFI+46 |
TYPE | BLDPLST+3~, BLDPLST+24*, BLDPLST+26, BLDPLST+32, BLDPLST+39, BLDPLST+46, BLDPLST+48, BLDPLST+56, BLDPLST+61, GENTERM+2~ , GENTERM+6*, GENTERM+8, GENTERM+12, GETDOB~, GETDOB+6, GETDOB+7 |
U | BLDPLST+12, AGEFI+4, AGEFI+6, AGEFI+10, AGEFI+12, AGEFI+28, AGEFI+31, AGEFI+32, AGEFI+43, DOBR+5 , DOBR+7, DOBR+8, GENTERM+4 |