PXRMNTFY ;SLC/PKR - Routines for notifications. ;Jan 13, 2023@19:04
Source file <PXRMNTFY.m>
Package | Total | Call Graph |
---|---|---|
Clinical Reminders | 7 | (EVAL,MAINDF)^PXRM $$NEWDATE^PXRMDATE DEF^PXRMLDR SEND^PXRMMSG DELOPEN^PXRMNTFY $$STATMTCH^PXRMORCH ACOPY^PXRMUTIL |
Kernel | 2 | ($$FMDIFF,$$FMTE)^XLFDT (DELETE,PATIENT)^XQALERT |
Order Entry Results Reporting | 2 | EN^ORB3 $$GETNOTID^ORBSMART |
DRG Grouper | 1 | ($$CODEC,$$CODECS)^ICDEX |
VA FileMan | 1 | $$FIND1^DIC |
Womens Health | 1 | ($$SAVESRND,GETRECIPS)^WVRPCPT1 |
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 | 3 | PXRMNTFY PXRMPINF PXRMPLAB |
Name | Comments | DBIA/ICR reference |
---|---|---|
DELOPEN(DFN,ORN) | ;Delete open OE/RR Notifications.
|
|
SUICIDE(EVENT,DFN,VISIT) | ;Send an alert if the patient attempted or
|
|
TALERT(DFN,PROV,ATYPE,MUC) | ;Send pregnancy/lactation status change alert
|
|
WH(EVENT,DFN,VISIT,GMPLIFN) | ;Determine whether to send pregnancy/lactation status change
|
|
ERROR(ERROR) | ;Send an email that an error occurred
|
|
WHAPPL(DFN,PXRMSDT) | ;Determine if code is applicable for the given date
; $$WHAPPL: -1 => error ; 0 => not applicable ; 1 => applicable |
|
WHEVAL(CACHE,NAME,PXRMSDT) | ;Evaluate pregancy or lactation reminder
|
|
WHICD(CODELIST,PROVARR,EVENT,VISIT) | ;Retrieve data from ^XTMP
|
|
WHPBL(CODELIST,PROVARR,GMPLIFN) | ;Retrieve data from ^AUPNPROB
|
|
WHPTF(CODELIST,PROVARR,DFN) | ;Retrieve data from ^XTMP
|
|
ADDICD(CODELIST,CODEIEN,CODEDATE,OCCURDATE,DIVISION) | ;Add ICD code to the CODELIST array
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | SUICIDE+5, SUICIDE+6 |
$$CODEC^ICDEX | ADDICD+2 |
$$CODECS^ICDEX | ADDICD+4 |
EN^ORB3 | SUICIDE+24, TALERT+12 |
$$GETNOTID^ORBSMART | TALERT+7 |
EVAL^PXRM | WHAPPL+11 |
MAINDF^PXRM | WHEVAL+6 |
$$NEWDATE^PXRMDATE | WHEVAL+20, WHEVAL+22 |
DEF^PXRMLDR | WHAPPL+10 |
SEND^PXRMMSG | ERROR+11 |
DELOPEN^PXRMNTFY | SUICIDE+13 |
$$STATMTCH^PXRMORCH | WHAPPL+15, WHEVAL+15 |
ACOPY^PXRMUTIL | ERROR+5 |
$$SAVESRND^WVRPCPT1 | WH+67 |
GETRECIPS^WVRPCPT1 | WH+57 |
$$FMDIFF^XLFDT | SUICIDE+22 |
$$FMTE^XLFDT | SUICIDE+23 |
DELETE^XQALERT | DELOPEN+6 |
PATIENT^XQALERT | DELOPEN+2 |
FileNo | Call Tags |
---|---|
^AUTTHF - [#9999999.64] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNPROB - [#9000011] | WH+12, WHPBL+2, WHPBL+3, WHPBL+4, WHPBL+5, WHPBL+6, WHPBL+8, WHPBL+10 |
^AUPNVSIT - [#9000010] | SUICIDE+20 |
^PXD(811.2 - [#811.2] | WH+18, WH+21, WH+24 |
^PXD(811.9 - [#811.9] | WHAPPL+7, WHAPPL+8, WHEVAL+3, WHEVAL+4 |
^TMP("PXRHM" | WHAPPL+5!, WHAPPL+12, WHAPPL+13!, WHEVAL+2!, WHEVAL+7, WHEVAL+11, WHEVAL+12, WHEVAL+13, WHEVAL+19, WHEVAL+20 , WHEVAL+25, WHEVAL+26! |
^TMP("PXRMXMZ" | ERROR+9!, ERROR+10*, ERROR+12! |
^XTMP( | SUICIDE+8, SUICIDE+9, SUICIDE+10, WH+6, WH+9, WHICD+3, WHICD+4, WHICD+5, WHICD+6, WHICD+7 , WHICD+8, WHICD+13, WHICD+14, WHPTF+2, WHPTF+3, WHPTF+5, WHPTF+6, WHPTF+8, WHPTF+10, WHPTF+11 |
Name | Line Occurrences |
---|---|
$$WHAPPL | WH+25 |
ADDICD | WHICD+11, WHPBL+9, WHPTF+8 |
ERROR | WH+60, WH+68 |
TALERT | WH+73 |
WHEVAL | WH+35, WH+48 |
WHICD | WH+7 |
WHPBL | WH+13 |
WHPTF | WH+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACODE | WH+3~, WH+38*, WH+39, WH+40, WH+42*, WH+43, WH+44, WH+51*, WH+52, WH+53 |
AFTER | WHICD+1~, WHICD+7*, WHICD+9, WHICD+10, WHICD+14*, WHICD+15, WHPTF+1~, WHPTF+5*, WHPTF+7, WHPTF+8 |
ALIST | DELOPEN+1~, DELOPEN+3 |
ALIST( | DELOPEN+4 |
ATYPE | TALERT~, TALERT+4*, TALERT+6, TALERT+8, TALERT+11 |
BEFORE | WHICD+1~, WHICD+8*, WHICD+9, WHPTF+1~, WHPTF+6*, WHPTF+7 |
CACHE | WH+3~, WH+30, WH+35, WH+36, WH+48, WH+49, WHEVAL~, WHEVAL+8*, WHEVAL+9*, WHEVAL+10* , WHEVAL+27* |
CACHE( | WHEVAL+11*, WHEVAL+14*, WHEVAL+18, WHEVAL+21*, WHEVAL+22*, WHEVAL+23*, WHEVAL+24*, WHEVAL+25* |
CACHE("LACTATION" | WH+46, WH+50 |
CACHE("PREGNANCY" | WH+33, WH+37, WH+41, WH+73 |
CDATE | WHICD+1~, WHICD+3*, WHICD+11, WHPBL+1~, WHPBL+3*, WHPBL+7, WHPBL+9 |
CNT | ERROR+1~, ERROR+2*, ERROR+3*, ERROR+6*, ERROR+8* |
CODE | WH+3~, WH+22*, WH+23*, WH+24, WH+25, WH+28, WH+30*, WH+32, WH+34, WH+37 , WH+38, WH+40, WH+41, WH+42, WH+44, WH+45, WH+47, WH+51, WH+53, WH+54 , WH+57, WH+66, WHICD+1~, WHPBL+5*, WHPBL+7, ADDICD+1~, ADDICD+2*, ADDICD+3, ADDICD+4, ADDICD+7 |
CODEDATE | ADDICD~, ADDICD+4, ADDICD+7 |
CODEIEN | WHICD+1~, WHICD+10*, WHICD+11, WHPBL+1~, WHPBL+8*, WHPBL+9, ADDICD~, ADDICD+2 |
CODELIST | WH+2~, WH+7, WH+10, WH+13, WH+14, WHICD~, WHICD+11, WHPBL~, WHPBL+9, WHPTF~ , WHPTF+8, WHPTF+9, ADDICD~ |
CODELIST( | WH+20, WH+23, WH+25, WH+28, ADDICD+7* |
CODELIST("SCT" | WHPBL+7* |
CODESYS | WH+19*, WH+20*, WH+21, WH+23, WH+24, WH+25, WH+28, WHICD+1~, ADDICD+1~, ADDICD+4* , ADDICD+5*, ADDICD+6, ADDICD+7 |
DATA | ERROR+1~, ERROR+7! |
DATA( | ERROR+6 |
DATE | SUICIDE+4~, SUICIDE+20*, SUICIDE+22, SUICIDE+23, WHEVAL+1~, WHEVAL+13*, WHEVAL+22, WHPTF+1~, WHPTF+2*, WHPTF+8 |
DEFARR | WHAPPL+4~, WHAPPL+10, WHAPPL+11 |
DFN | DELOPEN~, DELOPEN+2, SUICIDE~, SUICIDE+13, SUICIDE+24, TALERT~, TALERT+12, WH~, WH+10, WH+25 , WH+57, WH+65, WH+73, WHAPPL~, WHAPPL+11, WHEVAL+6, WHPTF~ |
DIVISION | WHICD+2~, WHICD+5*, WHICD+11, WHPBL+1~, WHPBL+6*, WHPBL+7, WHPBL+9, ADDICD~, ADDICD+7 |
DOC | WHEVAL+1~, WHEVAL+12*, WHEVAL+15, WHEVAL+17, WHEVAL+23 |
DT | SUICIDE+22, WHEVAL+21, WHEVAL+22 |
EDD | WHEVAL+1~, WHEVAL+19*, WHEVAL+20*, WHEVAL+21 |
ERROR | WH+60, WH+68, ERROR~, ERROR+10 |
ERROR( | ERROR+2*, ERROR+3*, ERROR+6*, ERROR+8* |
ERROR("?" | ERROR+2 |
ERROR(1 | WH+59*, WH+68* |
EVENT | SUICIDE~, SUICIDE+8, SUICIDE+9, SUICIDE+10, WH~, WH+4, WH+6, WH+7, WH+9, WH+11 , WHICD~, WHICD+3, WHICD+4, WHICD+5, WHICD+6, WHICD+7, WHICD+8, WHICD+13, WHICD+14, WHPTF+2 , WHPTF+3, WHPTF+5, WHPTF+6, WHPTF+8, WHPTF+10, WHPTF+11 |
EXIT | WH+2~, WH+4, WH+5, WH+6*, WH+8, WH+9*, WH+11, WH+12* |
FIELD | WHPTF+1~, WHPTF+3*, WHPTF+4, WHPTF+5, WHPTF+6 |
FIEV | WHAPPL+4~, WHAPPL+11 |
FIND | WHEVAL+1~, WHEVAL+10*, WHEVAL+11, WHEVAL+12, WHEVAL+13, WHEVAL+19, WHEVAL+20 |
GMPLIFN | WH~, WH+11, WH+12, WH+13, WHPBL~, WHPBL+2, WHPBL+3, WHPBL+4, WHPBL+5, WHPBL+6 , WHPBL+8, WHPBL+10 |
HFAIEN | SUICIDE+4~, SUICIDE+9*, SUICIDE+13, SUICIDE+16, SUICIDE+17, SUICIDE+18 |
HFBIEN | SUICIDE+4~, SUICIDE+10*, SUICIDE+13, SUICIDE+16 |
HFSAIEN | SUICIDE+4~, SUICIDE+5*, SUICIDE+17 |
HFSCIEN | SUICIDE+4~, SUICIDE+6*, SUICIDE+18 |
IND | DELOPEN+1~, DELOPEN+3*, DELOPEN+4 |
INDEX | ERROR+1~, ERROR+6* |
MESSAGE | TALERT+5~, TALERT+9*, TALERT+10*, TALERT+11*, TALERT+12 |
MESSAGES | WH+2~ |
MESSAGES( | WH+55, WH+63*, WH+64, WH+69!, WH+70, WH+72 |
MSG | SUICIDE+4~, SUICIDE+7*, SUICIDE+17*, SUICIDE+18*, SUICIDE+19, SUICIDE+23*, SUICIDE+24 |
MUC | TALERT~, TALERT+4*, TALERT+9, TALERT+10 |
NAME | WHAPPL+4~, WHAPPL+6*, WHAPPL+7, WHEVAL~, WHEVAL+3, WHEVAL+9 |
NODE | WHAPPL+4~, WHAPPL+8*, WHAPPL+9, WHEVAL+4*, WHEVAL+5 |
NODE1 | WHPBL+1~, WHPBL+10*, WHPBL+11 |
OCCURDATE | ADDICD~, ADDICD+7 |
ODATE | WHICD+1~, WHICD+4*, WHICD+11, WHPBL+1~, WHPBL+4*, WHPBL+7, WHPBL+9 |
ORID | DELOPEN+1~, DELOPEN+5*, DELOPEN+6 |
ORN | DELOPEN~, DELOPEN+6 |
ORNOTIEN | TALERT+5~, TALERT+7*, TALERT+12 |
ORNOTNM | TALERT+5~, TALERT+6*, TALERT+7 |
PIECE | WHPBL+1~, WHPBL+11* |
POVIEN | WHICD+1~, WHICD+3*, WHICD+6*, WHICD+7, WHICD+8 |
PROV | TALERT~, TALERT+12 |
PROVARR | WH+2~, WH+7, WH+10, WH+13, WH+62, WHICD~, WHPBL~, WHPTF~ |
PROVARR( | WHICD+15*, WHPBL+11*, WHPTF+10*, WHPTF+11* |
PROVIEN | WHICD+1~, WHICD+15*, WHPBL+1~, WHPBL+11* |
PRVIEN | WHICD+1~, WHICD+12*, WHICD+13*, WHICD+14 |
>> PTYPE | ERROR+8 |
PXRMPROV | WH+56~, WH+57, WH+61!, WH+62*, WH+63, WH+71~, WH+72*, WH+73 |
PXRMPROV("" | WH+63 |
PXRMPROV(0 | WH+58, WH+59 |
PXRMSDT | WH+2~, WH+34*, WH+35, WH+47*, WH+48, WHAPPL~, WHAPPL+11, WHEVAL~, WHEVAL+6 |
RIEN | WHAPPL+4~, WHAPPL+7*, WHAPPL+8, WHAPPL+10, WHAPPL+12, WHEVAL+1~, WHEVAL+3*, WHEVAL+4, WHEVAL+6, WHEVAL+7 , WHEVAL+11, WHEVAL+12, WHEVAL+13, WHEVAL+19, WHEVAL+20, WHEVAL+25 |
RNAME | WHAPPL+4~, WHAPPL+9*, WHAPPL+12, WHEVAL+5*, WHEVAL+7 |
SEND | WH+2~, WH+31*, WH+38*, WH+39, WH+40, WH+42*, WH+43, WH+44, WH+51*, WH+52 , WH+53, WH+54, WH+55, WH+57, WH+63, WH+64, WH+65, WH+69, WH+70*, WH+72 , WH+73 |
SEND("ACODES1" | WH+39, WH+40*, WH+43, WH+44*, WH+52, WH+53* |
SEND("ACODES2" | WH+40*, WH+44*, WH+53*, WH+54 |
SENDMSG | WH+2~, WH+16*, WH+27*, WH+28, WH+29, WH+30 |
SENDMSG( | WH+28*, WH+32, WH+34, WH+37, WH+38, WH+41, WH+42, WH+45, WH+47, WH+51 , WH+57, WH+66 |
SOURCE | ERROR+1~, ERROR+4*, ERROR+5 |
STATUS | WH+2~, WH+16*, WH+17, WH+20, WH+23, WH+25*, WH+26, WH+29, WH+67*, WH+68 , WH+69, WHAPPL+4~, WHAPPL+12*, WHAPPL+14, WHAPPL+15, WHEVAL+1~, WHEVAL+7*, WHEVAL+8, WHEVAL+15 |
SUB | WHEVAL+1~, WHEVAL+9*, WHEVAL+10, WHEVAL+11, WHEVAL+14, WHEVAL+16, WHEVAL+18, WHEVAL+21, WHEVAL+22, WHEVAL+23 , WHEVAL+24, WHEVAL+25 |
TAX | WH+2~, WH+17*, WH+18, WH+28 |
TAXIEN | WH+2~, WH+18*, WH+21, WH+24 |
TYPE | WHPTF+1~, WHPTF+2*, WHPTF+3*, WHPTF+5, WHPTF+6 |
U | DELOPEN+4, SUICIDE+9, SUICIDE+10, SUICIDE+20, WH+25, WH+28, WH+34, WH+38, WH+42, WH+47 , WH+51, WH+57, WH+59, WH+65, WH+66, WH+68, WHAPPL+9, WHAPPL+12, WHEVAL+5, WHEVAL+7 , WHICD+3, WHICD+4, WHICD+5, WHICD+10, WHICD+15, WHPBL+2, WHPBL+3, WHPBL+4, WHPBL+5, WHPBL+6 , WHPBL+7, WHPBL+8, WHPBL+11, ADDICD+3, ADDICD+4, ADDICD+7 |
VAERR | WHPTF+1~ |
VAIN | WHPTF+1~ |
VHFIEN | SUICIDE+4~, SUICIDE+7*, SUICIDE+8*, SUICIDE+9, SUICIDE+10 |
VISIT | SUICIDE~, SUICIDE+8, SUICIDE+9, SUICIDE+10, SUICIDE+20, WH~, WH+5, WH+6, WH+7, WH+8 , WH+11, WHICD~, WHICD+3, WHICD+4, WHICD+5, WHICD+6, WHICD+7, WHICD+8, WHICD+13, WHICD+14 |
WHDATA | WH+2~, WH+67 |
WHDATA("CODE" | WH+66* |
WHDATA("ID" | WH+65* |
XQAID | DELOPEN+1~, DELOPEN+4*, DELOPEN+5 |