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 |
| 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 |