Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PXRMP19A

Package: Clinical Reminders

Routine: PXRMP19A


Information

PXRMP19A ;BP/WAT;post-install for patch 19 con't ;02/27/17 13:31

Source Information

Source file <PXRMP19A.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 5 ^%ZTLOAD  ($$FMADD,$$NOW)^XLFDT  $$REPEAT^XLFSTR  UPDATE^XPDID  (BMES,MES)^XPDUTL  
MailMan 2 XMZ^XMA2  ENT1^XMD  
Clinical Reminders 1 ^PXRMP19B  
Toolkit 1 (EN,GETLST)^XPAR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Clinical Reminders 1 PXRMP19I  

Entry Points

Name Comments DBIA/ICR reference
QUEUE(PXRMSG,ZTRTN,ZTDESC,PXRMITEM) ;CREATE A SPECIFIED TASK
SEND(NODE,SUBJECT,FROM) ;Send a MailMan message whose text is in ^TMP(NODE,$J,N,0).
RETRY ;Get the message number.
MAIN ; main module
CLNTMP ;need to check clean up of TMP arrays when done with them
LOCHF ;report out local CCHT HFs not used in HT reminder content
HTHFTMP ;build TMP array of HT HFs
COMPARE(PXRMA,PXRMB) ; compare list PXRMA and PXRMB. Remove duplicate items from PXRMB
HFLKUP ;find local HFs with "CCHT" or "CARE COORDINATION" in name or category
ORWPCE(PXRMITEM) ;set parameter value to true
TIURMDLG(PXRMITEM)
CHKLIST(IEN,LIST) ;see if parameter value is already set

External References

Name Field # of Occurrence
^%ZTLOAD QUEUE+11
^PXRMP19B HTHFTMP+4
$$FMADD^XLFDT QUEUE+9
$$NOW^XLFDT QUEUE+9
$$REPEAT^XLFSTR LOCHF+13, LOCHF+21
XMZ^XMA2 RETRY+1
ENT1^XMD RETRY+9
EN^XPAR ORWPCE+20, TIURMDLG+21
GETLST^XPAR ORWPCE+14, TIURMDLG+15
UPDATE^XPDID QUEUE+19, ORWPCE+24, TIURMDLG+25
BMES^XPDUTL QUEUE+8, QUEUE+14, QUEUE+18, ORWPCE+9, ORWPCE+22, TIURMDLG+12, TIURMDLG+23
MES^XPDUTL ORWPCE+10, ORWPCE+21, TIURMDLG+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "ERROR",!,"Unable to queue the "_PXRMSG_"; file a Remedy ticket for assistance.",!
  • Line Location: QUEUE+15
Function Call: WRITE
  • Prompt: "DONE",!,"Task #"_ZTSK,!
  • Line Location: QUEUE+21

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTTHF - [#9999999.64] LOCHF+11, LOCHF+12, LOCHF+14, HFLKUP+6, HFLKUP+7
^AUTTHF("B" HFLKUP+4, HFLKUP+5, ORWPCE+16
^PXRMD(801.41 - [#801.41] TIURMDLG+17
^TMP( RETRY+5, RETRY+6!, COMPARE+1, COMPARE+2, COMPARE+4, COMPARE+5, COMPARE+6, COMPARE+7, COMPARE+8!
^TMP("PXRM19HF" CLNTMP+1!, HTHFTMP+1!, HTHFTMP+6*
^TMP("PXRMPATS" MAIN+1!
^TMP("PXRM_CCHTHF" CLNTMP+2!, LOCHF+7*, LOCHF+9, LOCHF+10, LOCHF+15*, LOCHF+16*, LOCHF+17, LOCHF+19*, LOCHF+20*, LOCHF+21*
, HFLKUP+2!, HFLKUP+9*
^XMB("NETNAME" MAIN+2
^XMB(3.9 - [#3.9] RETRY+5*, RETRY+7, RETRY+8*
^XTMP( SEND+2, SEND+3
^XTMP("PXRM19RECIPS" CLNTMP+3!

Label References

Name Line Occurrences
$$CHKLIST ORWPCE+17, TIURMDLG+18
CLNTMP MAIN+5
COMPARE LOCHF+6
HFLKUP LOCHF+6
HTHFTMP LOCHF+6
LOCHF MAIN+3
RETRY RETRY+2
SEND MAIN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACOUNT COMPARE+3~*, COMPARE+6*, COMPARE+7
BCOUNT COMPARE+3~*, COMPARE+4*, COMPARE+5, COMPARE+8
CATEGORY LOCHF+4~, LOCHF+11*, LOCHF+12*, LOCHF+13*, LOCHF+16
CHECK CHKLIST+1~*, CHKLIST+2, CHKLIST+3, CHKLIST+4*, CHKLIST+5
CNT HFLKUP+3~*, HFLKUP+9*, ORWPCE+11~, ORWPCE+13*, TIURMDLG+11~, TIURMDLG+14*
COUNT LOCHF+4~, LOCHF+5*, LOCHF+9*, LOCHF+10, LOCHF+15, LOCHF+16, LOCHF+17*
DIEN TIURMDLG+11~, TIURMDLG+17*, TIURMDLG+18, TIURMDLG+21
DNAME TIURMDLG+11~, TIURMDLG+16*, TIURMDLG+17, TIURMDLG+22
DT RETRY+8
DUZ QUEUE+7, SEND+4, SEND+6
FLAG LOCHF+4~, LOCHF+14*, LOCHF+16
FROM SEND~, SEND+8, MAIN+2~*, MAIN+4
HFA COMPARE+3~, COMPARE+7*, COMPARE+8
HFB COMPARE+3~, COMPARE+5*, COMPARE+8
HFCAT HFLKUP+3~, HFLKUP+6*, HFLKUP+7*, HFLKUP+8
HFCATNAM ORWPCE+11~, ORWPCE+15*, ORWPCE+16, ORWPCE+21
HFIEN LOCHF+4~, LOCHF+10*, LOCHF+11, LOCHF+14, HFLKUP+3~*, HFLKUP+5*, HFLKUP+6, HFLKUP+9, ORWPCE+11~, ORWPCE+16*
, ORWPCE+17, ORWPCE+20
HFNAME HFLKUP+3~*, HFLKUP+4*, HFLKUP+5, HFLKUP+8, HFLKUP+9
I CHKLIST+1~*, CHKLIST+3*, CHKLIST+4
IEN CHKLIST~, CHKLIST+4
INACTIVE LOCHF+4~
INC MAIN+2~*
INDEX COMPARE+3~*
LASTVAL ORWPCE+11~, ORWPCE+18*, ORWPCE+19*, ORWPCE+20, TIURMDLG+11~, TIURMDLG+19*, TIURMDLG+20*, TIURMDLG+21
LIST CHKLIST~, CHKLIST+2
LIST( CHKLIST+3, CHKLIST+4
LVL ORWPCE+11~, ORWPCE+12*, ORWPCE+14, ORWPCE+20, TIURMDLG+11~, TIURMDLG+13*, TIURMDLG+15, TIURMDLG+21
NL SEND+1~, RETRY+7*, RETRY+8
NODE SEND~, RETRY+5, RETRY+6, MAIN+2~*, MAIN+4
NODEA LOCHF+4~, LOCHF+5*, LOCHF+6
NODEB LOCHF+4~, LOCHF+5*, LOCHF+6
PAR ORWPCE+11~, ORWPCE+12*, ORWPCE+14, ORWPCE+20, TIURMDLG+11~, TIURMDLG+13*, TIURMDLG+15, TIURMDLG+21
PXRMA COMPARE~, COMPARE+1, COMPARE+6, COMPARE+7
PXRMB COMPARE~, COMPARE+2, COMPARE+4, COMPARE+5, COMPARE+8
PXRMCNT HTHFTMP+2~, HTHFTMP+3*, HTHFTMP+6*
PXRMERR ORWPCE+11~, ORWPCE+14, ORWPCE+20, ORWPCE+21, ORWPCE+22, TIURMDLG+11~, TIURMDLG+15, TIURMDLG+21, TIURMDLG+22, TIURMDLG+23
PXRMFCTR HTHFTMP+2~, HTHFTMP+4*, HTHFTMP+5*, HTHFTMP+6
PXRMI HTHFTMP+2~, HTHFTMP+4*
PXRMITEM QUEUE~, QUEUE+19, QUEUE+20*, ORWPCE~, ORWPCE+24, ORWPCE+25*, TIURMDLG~, TIURMDLG+25, TIURMDLG+26*
PXRMPAR ORWPCE+11~, ORWPCE+14, ORWPCE+17, TIURMDLG+11~, TIURMDLG+15, TIURMDLG+18
PXRMPAR("" ORWPCE+18, TIURMDLG+19
>> PXRMPOST QUEUE+14, QUEUE+17, ORWPCE+23, TIURMDLG+24
PXRMSG QUEUE~, QUEUE+8, QUEUE+14, QUEUE+15
REF SEND+1~
SUBJ MAIN+2~*, MAIN+4
SUBJECT SEND~, SEND+7
SUBSCR SEND+1~*, SEND+2, SEND+3
U RETRY+8, LOCHF+15, COMPARE+5, HFLKUP+6, HFLKUP+7, ORWPCE+22, TIURMDLG+23
XMDUZ SEND+1~, SEND+8*
XMSUB SEND+1~, SEND+7*
XMY SEND+1~, SEND+3*
XMY( SEND+4*, SEND+6*
XMZ SEND+1~, RETRY+2, RETRY+5, RETRY+7, RETRY+8
ZTDESC QUEUE~
ZTDTH QUEUE+5~, QUEUE+9*
ZTIO QUEUE+5~, QUEUE+10*
>> ZTQUEUED SEND+5
>> ZTREQ QUEUE+12*
ZTRTN QUEUE~
ZTSAVE QUEUE+5~
ZTSAVE("DUZ" QUEUE+7*
ZTSAVE("^TMP(""PXRM_CCHTHF"",$J," QUEUE+6*
ZTSK QUEUE+5~, QUEUE+13, QUEUE+18, QUEUE+21

Marked Items

Name Field # of Occurrence
$T(HF+PXRMI^PXRMP19B HTHFTMP+4
$T(ORWPCE+CNT ORWPCE+15
$T(TIURMDLG+CNT TIURMDLG+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All