Routine: PXRM

Information

PXRM ;SLC/PKR - Clinical Reminders entry points. ;04/01/2022

Source Information

Source file <PXRM.m>

Package	Total	Call Graph
Clinical Reminders	11	($$NOW,DUE)^PXRMDATE INDXCHK^PXRMDIEV LOAD^PXRMDISC NODEF^PXRMERRH EVAL^PXRMEVFI DEF^PXRMLDR ($$CRSTATUS,$$SEX,EVALPCL,EVALRESL)^PXRMLOG OUTPUT^PXRMOUTD $$FERROR^PXRMOUTU DEM^PXRMPINF $$RECCHK^PXRMRCUR
Kernel	1	$$NOW^XLFDT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 26

Package	Total	Caller Graph
Clinical Reminders	17	PXRMCDEF PXRMCOVID19 PXRMCVTM PXRMDEV PXRMDLLB PXRMDLNK PXRMETXR PXRMGEVA PXRMHVET PXRMMHV PXRMNTFY PXRMORCH PXRMPLAB PXRMRPCA PXRMV2I PXRMXEVL PXRMXX
Order Entry Results Reporting	4	ORDV06C ORQQPX ORQQPXRM ORVIMM
Automated Information Collection System	1	IBDFN15
Enterprise Health Management Platform	1	HMPPXRM
PCE Patient Care Encounter	1	PXVWVMR
Scheduling	1	SDMHAD1
VA Point of Service	1	VPSPTCR

Entry Points

Name	Comments	DBIA/ICR reference
MAIN(DFN,PXRMITEM,OUTTYPE,DISC)	;Main driver for clinical reminders.	ICR #2182 Status: Active Usage: Controlled Subscription
MAINDF(DFN,PXRMITEM,OUTTYPE,EVALDT)	;Alternate entry point that allows	ICR #2182 Status: Active Usage: Controlled Subscription
DISABLE(PXRMITEM,RNAME)	;
EVAL(DFN,DEFARR,OUTTYPE,NODISC,FIEVAL,DATE)	;Reminder evaluation entry
OUTPUT	;Prepare the final output.
EXIT	;Kill the working arrays unless this was a test run.
FIDATA(DFN,PXRMITEM,FINDINGS)	;Return the finding evaluation array to the	ICR #2182 Status: Active Usage: Controlled Subscription
INACTIVE(PXRMITEM)	;Return the INACTIVE FLAG, which has a value of 1	ICR #2182 Status: Active Usage: Controlled Subscription

External References

Name	Field # of Occurrence
$$NOW^PXRMDATE	EXIT+6
DUE^PXRMDATE	EVAL+95
INDXCHK^PXRMDIEV	DISABLE+14
LOAD^PXRMDISC	EXIT+11
NODEF^PXRMERRH	EVAL+9
EVAL^PXRMEVFI	EVAL+79
DEF^PXRMLDR	MAIN+36, MAINDF+4, FIDATA+18
$$CRSTATUS^PXRMLOG	EVAL+92
$$SEX^PXRMLOG	EVAL+70
EVALPCL^PXRMLOG	EVAL+86
EVALRESL^PXRMLOG	EVAL+89
OUTPUT^PXRMOUTD	OUTPUT+1
$$FERROR^PXRMOUTU	EVAL+41
DEM^PXRMPINF	EVAL+51
$$RECCHK^PXRMRCUR	EVAL+35
$$NOW^XLFDT	MAIN+39

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PXD(811.9 - [#811.9]	INACTIVE+2, INACTIVE+3
^TMP(	EVAL+31, EVAL+38, EVAL+53, EVAL+62, EVAL+63, EVAL+75, EVAL+76, EVAL+82, EXIT+7, EXIT+8!
^TMP("PXRHM"	MAINDF+6, DISABLE+2, DISABLE+3, DISABLE+7, DISABLE+18, EVAL+30, EVAL+39*, FIDATA+20!
^TMP("PXRM"	FIDATA+20!
^TMP($J	EXIT+1!
^VA(200 - [#200]	DISABLE+16
^XTMP("PXRM_DISEV"	DISABLE+5, DISABLE+9, EVAL+21

Label References

Name	Line Occurrences
DISABLE	EVAL+21
EVAL	MAIN+40, MAINDF+5, FIDATA+19
EXIT	EVAL+21, EVAL+29, EVAL+36, EVAL+52
OUTPUT	EVAL+66, EVAL+73, EVAL+82

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CRSTATUS	EVAL+44~, EVAL+46, EVAL+92, OUTPUT+1
D00	EVAL+15~, EVAL+16*, EVAL+17, EVAL+19
DATE	EVAL~, EVAL+12, EVAL+50
DEFARR	MAIN+34~, MAIN+36, MAIN+40, MAINDF+3~, MAINDF+4, MAINDF+5, EVAL~, EVAL+70, EVAL+79, EVAL+86 , EVAL+89, EVAL+92, EVAL+95, OUTPUT+1, FIDATA+16~, FIDATA+18, FIDATA+19
DEFARR("DNE"	EVAL+9
DEFARR("E"	EVAL+29
DEFARR("IEN"	EVAL+9, EVAL+13
DEFARR(0	EVAL+16
DEFARR(20	EVAL+29
DEFARR(80	EVAL+92
DEFARR(90	EVAL+92
DFN	MAIN~, MAIN+40, MAINDF~, MAINDF+5, EVAL~, EVAL+51, EVAL+53, EVAL+79, EXIT+1, EXIT+5 , FIDATA~, FIDATA+19
DISC	MAIN~, EXIT+11
DT	EVAL+50
DUE	EVAL+44~, EVAL+45, EVAL+83, EVAL+95, OUTPUT+1
DUEDATE	EVAL+44~, EVAL+45, EVAL+83, EVAL+95, OUTPUT+1
ERROR	EVAL+37~, EVAL+41*
EVALDT	MAIN+34~, MAIN+39*, MAIN+40, MAINDF~, MAINDF+5
FI	FIDATA+16~, FIDATA+22, FIDATA+23, FIDATA+24, FIDATA+25, FIDATA+26, FIDATA+27, FIDATA+28, FIDATA+29, FIDATA+30 , FIDATA+31, FIDATA+32
FIEVAL	MAIN+34~, MAIN+40, MAINDF+3~, MAINDF+5, MAINDF+6, EVAL~, EVAL+79, EVAL+86, EVAL+89, EVAL+92 , EVAL+95, OUTPUT+1, FIDATA+16~, FIDATA+19
FIEVAL(	FIDATA+23, FIDATA+24, FIDATA+25, FIDATA+26, FIDATA+27, FIDATA+28, FIDATA+29, FIDATA+30, FIDATA+31, FIDATA+32
FIEVAL("DFN"	EXIT+5*
FIEVAL("EVAL	DATE/TIME" , EXIT+6*
FIEVAL("PATIE	NT AGE" , EXIT+4*
FIEVAL("SEX"	EVAL+71*
FINDINGS	FIDATA~
FINDINGS(	FIDATA+24, FIDATA+26, FIDATA+27, FIDATA+28, FIDATA+29, FIDATA+30, FIDATA+31, FIDATA+32
FREQ	EVAL+44~, EVAL+45*, EVAL+86, EVAL+95, OUTPUT+1
LAST	EVAL+6~
MNAME	DISABLE+1~, DISABLE+16*, DISABLE+17
NODISC	MAIN+38*, MAIN+40, EVAL~
NTXT	DISABLE+1~, DISABLE+4, DISABLE+6, DISABLE+7, DISABLE+10, DISABLE+18, EVAL+37~, EVAL+40, EVAL+41
OUTTYPE	MAIN~, MAIN+40, MAINDF~, MAINDF+5, EVAL~, EVAL+66, OUTPUT+1
PCLOGIC	EVAL+44~, EVAL+46, EVAL+54, EVAL+74, EVAL+83, EVAL+86, EVAL+95, OUTPUT+1
PXRMAGE	EVAL+6~, EVAL+57*
PXRMDATE	EVAL+6~, EVAL+12*
>> PXRMDEBG	EXIT+2
PXRMDOB	EVAL+6~, EVAL+57*
PXRMDOD	EVAL+6~, EVAL+57*
>> PXRMID	EXIT+3*
>> PXRMIDOD	EVAL+66
PXRMITEM	MAIN~, MAIN+36, MAINDF~, MAINDF+4, MAINDF+6, DISABLE~, DISABLE+2, DISABLE+3, DISABLE+7, DISABLE+18 , EVAL+7~, EVAL+13*, EVAL+14, EVAL+21, EVAL+30, EVAL+31, EVAL+35, EVAL+38, EVAL+39, EVAL+53 , EVAL+62, EVAL+63, EVAL+75, EVAL+76, EVAL+82, EXIT+7, FIDATA~, FIDATA+18, INACTIVE~, INACTIVE+2 , INACTIVE+3
PXRMLAD	EVAL+6~, EVAL+58*
PXRMPDEM	EVAL+6~, EVAL+51, EVAL+86, OUTPUT+1
PXRMPDEM("AGE"	EVAL+57, EXIT+4
PXRMPDEM("DOB"	EVAL+57
PXRMPDEM("DOD"	EVAL+57, EVAL+61, EVAL+66
PXRMPDEM("LAD"	EVAL+58
PXRMPDEM("PATIENT"	EVAL+52
PXRMPDEM("SEX"	EVAL+58, EVAL+70
PXRMPDEM("SIG"	EVAL+58
PXRMPID	EVAL+6~, EVAL+14*, EVAL+31, EVAL+38, EVAL+53, EVAL+62, EVAL+63, EVAL+75, EVAL+76, EVAL+82 , EXIT+3, EXIT+7, EXIT+8
PXRMRM	EVAL+7~, EVAL+11*
PXRMRNAM	EVAL+7~, EVAL+17, EVAL+19, EVAL+21, EVAL+30, EVAL+39, EXIT+7
PXRMSEX	EVAL+7~, EVAL+58*
PXRMSIG	EVAL+7~, EVAL+58*
RDATA	DISABLE+1~, DISABLE+8, DISABLE+9, DISABLE+12, DISABLE+14, DISABLE+16
REASON	DISABLE+1~, DISABLE+4, DISABLE+5, DISABLE+7, DISABLE+9, DISABLE+11, DISABLE+14, DISABLE+15
RECUR	EVAL+34~, EVAL+35*, EVAL+36, EVAL+38
RESDATE	EVAL+44~, EVAL+45*, EVAL+89, EVAL+95, OUTPUT+1
RESLOGIC	EVAL+44~, EVAL+46*, EVAL+89, OUTPUT+1
RNAME	DISABLE~, DISABLE+2, DISABLE+3, DISABLE+7, DISABLE+18
SEXOK	EVAL+69~, EVAL+70*, EVAL+71, EVAL+73
TEXT	DISABLE+1~, DISABLE+12, DISABLE+17, DISABLE+18
TODAY	EVAL+49~, EVAL+50*, EVAL+51
U	DISABLE+16, EVAL+17, EVAL+19, EVAL+30, INACTIVE+3

Customize PDF page

Package: Clinical Reminders