Routine: ORB3U1

Information

ORB3U1 ;SLC/CLA - Utilities which support OE/RR 3 Notifications ;Nov 03, 2020@14:21

Package	Total	Call Graph
Kernel	7	(,HOME)^%ZIS ^%ZISC (,KILL)^%ZTLOAD $$FMTE^XLFDT ($$LJ,$$REPEAT)^XLFSTR (AHISTORY,ALERTDAT)^XQALBUTL PATIENT^XQALERT
Order Entry Results Reporting	4	UTL^ORB3 $$ORDIV^ORB31 ($$WHRECIP,LABTHR)^ORB3U2 WRAP^ORUTL
List Manager	3	EN^VALM (CLEAR,FULL)^VALM1 (CLEAN,CNTRL)^VALM10
VA FileMan	3	^%DT ^DIC ^DIR
Toolkit	1	$$GET^XPAR

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

Package	Total	Caller Graph
Order Entry Results Reporting	4	OR PATIENT ALERTS OR SELECT ALERTS ORB3 ALERT RECIPIENTS ORB3 DETERMINE RECIPIENTS
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
LIST(Y)	;return list of notifications from Notification File [#100.9] ; RETURN IEN^NAME^URGENCY
ALRTHX	;report the recipients for an alert, when received, action taken
SELECT	;if one or more alerts selected, display/print recipient data:
LMHDR	; header for ListMgr display
LMHELP	; help for List Mgr display
LMEXIT	; exit code for List Mgr display
LMALT	; alternative selection code
LMENTRY	; entry code for List Mgr display
GETRECS(ORBAID)
RECIPS	;determine/report the list of recipients for a notification
OUTPUT(ORY,ORBDESC,ORBHDR)	;prompt for device and send report
PRINT	;print body of Determine Notification Recipients Report
HDR	;print header of report
HDR1
HDR2

External References

Name	Field # of Occurrence
^%DT	ALRTHX+8, ALRTHX+12
^%ZIS	OUTPUT+4
HOME^%ZIS	OUTPUT+14
^%ZISC	PRINT+12
^%ZTLOAD	OUTPUT+10
KILL^%ZTLOAD	PRINT+13
^DIC	ALRTHX+3, RECIPS+3, RECIPS+9, RECIPS+40, RECIPS+46
^DIR	RECIPS+24
UTL^ORB3	RECIPS+53
$$ORDIV^ORB31	RECIPS+27
$$WHRECIP^ORB3U2	RECIPS+36
LABTHR^ORB3U2	RECIPS+33
WRAP^ORUTL	SELECT+11, LMENTRY+31
EN^VALM	ALRTHX+20
CLEAR^VALM1	LMEXIT+1
FULL^VALM1	SELECT+4, LMHELP+2, LMALT+1
CLEAN^VALM10	LMENTRY+4
CNTRL^VALM10	LMENTRY+36
$$FMTE^XLFDT	LMENTRY+22, GETRECS+8, GETRECS+9, GETRECS+10, GETRECS+11, GETRECS+12, GETRECS+14
$$LJ^XLFSTR	LMENTRY+35, LMENTRY+39
$$REPEAT^XLFSTR	LMENTRY+39
$$GET^XPAR	RECIPS+14, RECIPS+28
AHISTORY^XQALBUTL	GETRECS+2
ALERTDAT^XQALBUTL	LMENTRY+13
PATIENT^XQALERT	ALRTHX+17

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Processing..." Line Location: ALRTHX+18
Function Call: WRITE	Prompt: !!,"Enter the display number of the alert whose recipients you wish to review in detail." Line Location: LMHELP+3
Function Call: WRITE	Prompt: !!,"Press <return> to continue ..." Line Location: LMHELP+4
Function Call: WRITE	Prompt: !,"Processing, please stand by..." Line Location: RECIPS+50
Function Call: WRITE	Prompt: !!?5,"Report canceled!" Line Location: OUTPUT+12
Function Call: WRITE	Prompt: !!?5,"Report queued." Line Location: OUTPUT+13
Function Call: WRITE	Prompt: !!," - Report Interrupted -",! Line Location: PRINT+9
Function Call: WRITE	Prompt: !!!," - End of Report -",! Line Location: PRINT+10
Function Call: WRITE	Prompt: !,"Press RETURN to continue: " Line Location: PRINT+11
Function Call: WRITE	Prompt: ?10,$E(ORBHDR,1,(IOM-20)) Line Location: HDR2+0
Function Call: WRITE	Prompt: ?(IOM-10),"Page: ",$J(PAGE,3),!! Line Location: HDR2+1
Routine Call	DIC Line Location: ALRTHX+3 RECIPS+3 RECIPS+9 RECIPS+40 RECIPS+46
Routine Call	DIR Line Location: RECIPS+24
Routine Call	%ZIS Line Location: OUTPUT+4
Routine Call	%ZIS Line Location: OUTPUT+14
Routine Call	VALM Line Location: ALRTHX+20

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ORD(100.9 - [#100.9]	Classic Fileman Calls
^DPT - [#2]	Classic Fileman Calls
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ORD(100.9 - [#100.9]	LIST+4
^ORD(101 - [#101]	LMENTRY+43
^TMP("OR"	SELECT+9, LMEXIT+2!, LMENTRY+22, LMENTRY+25, LMENTRY+26, LMENTRY+30, LMENTRY+35, LMENTRY+39, LMENTRY+42, LMENTRY+43
^TMP("ORB"	LMEXIT+2!, LMENTRY+6, LMENTRY+7
^VA(200 - [#200]	GETRECS+7, GETRECS+13, GETRECS+15

Label References

Name	Line Occurrences
@(	PRINT+4
GETRECS	SELECT+14
HDR	PRINT+6
OUTPUT	SELECT+18, RECIPS+61

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	ALRTHX+8, ALRTHX+9!, ALRTHX+12, ALRTHX+13!
%DT("A"	ALRTHX+8, ALRTHX+12
%DT("B"	ALRTHX+8, ALRTHX+12
%ZIS	OUTPUT+3*, OUTPUT+15!
DESC	SELECT+1~, SELECT+16, SELECT+18, RECIPS+1~, RECIPS+59, RECIPS+61
DIC	ALRTHX+3!, ALRTHX+4!, ALRTHX+6!, RECIPS+3!, RECIPS+6!, RECIPS+9, RECIPS+12!, RECIPS+40!, RECIPS+42!, RECIPS+46!* , RECIPS+48!
DIC("A"	ALRTHX+3, RECIPS+3, RECIPS+9, RECIPS+40, RECIPS+46*
DIC(0	ALRTHX+3, RECIPS+3, RECIPS+9, RECIPS+40, RECIPS+46*
DIR	RECIPS+18!, RECIPS+30!
DIR("?"	RECIPS+19, RECIPS+20, RECIPS+21, RECIPS+23
DIR("A"	RECIPS+18*
DIR(0	RECIPS+18*
DIRUT	RECIPS+30!
DTIME	LMHELP+5, PRINT+11, HDR+3
DTOUT	ALRTHX+6!, RECIPS+6!, RECIPS+12!, RECIPS+30!, RECIPS+42!, RECIPS+48!
DUOUT	ALRTHX+6!, RECIPS+5, RECIPS+6!, RECIPS+11, RECIPS+12!, RECIPS+29, RECIPS+30!, RECIPS+41, RECIPS+42!, RECIPS+47 , RECIPS+48!
END	PRINT+1~, PRINT+2, PRINT+5, PRINT+7, PRINT+9, HDR+3, HDR+4
HDR	SELECT+1~, SELECT+17, SELECT+18, RECIPS+1~, RECIPS+60, RECIPS+61
I	LIST+2~, LIST+3, LIST+4, PRINT+2, PRINT+5, PRINT+8
IO	PRINT+3
IO("Q"	OUTPUT+6, OUTPUT+16!
IOF	HDR1
>> IOINHI	LMENTRY+36
>> IOINORM	LMENTRY+36
IOM	HDR2, HDR2+1
IOSL	PRINT+6
IOST	PRINT+4, PRINT+11, HDR+1, HDR1
J	LIST+2~, LIST+4*
LCNT	LMENTRY+1~, LMENTRY+24, LMENTRY+29, LMENTRY+35, LMENTRY+36, LMENTRY+38*, LMENTRY+39, LMENTRY+42, LMENTRY+45
NUM	LMENTRY+1~, LMENTRY+24, LMENTRY+29, LMENTRY+30, LMENTRY+35, LMENTRY+42, LMENTRY+43
ORAD	LMENTRY+1~
ORAD(	LMENTRY+14, LMENTRY+15
ORAD(2	LMENTRY+16
ORADD	RECIPS+1~, RECIPS+36, RECIPS+54, RECIPS+57*, RECIPS+58
ORADD(	RECIPS+57, RECIPS+58
ORBA	LMENTRY+1~, LMENTRY+6*, LMENTRY+7
ORBADUZ	RECIPS+1~, RECIPS+33, RECIPS+36, RECIPS+53
ORBADUZ(	RECIPS+40, RECIPS+46
ORBAID	SELECT+1~, SELECT+10, SELECT+14, LMENTRY+1~, LMENTRY+8, LMENTRY+9, LMENTRY+13, LMENTRY+22, GETRECS~, GETRECS+2
ORBAL	SELECT+1~, SELECT+9*, SELECT+10, SELECT+11
ORBDESC	OUTPUT~, OUTPUT+9
ORBDFN	ALRTHX+1~, ALRTHX+5, ALRTHX+17, RECIPS+1~, RECIPS+4, RECIPS+33, RECIPS+36, RECIPS+53
ORBDT	LMENTRY+1~, LMENTRY+15, LMENTRY+22, LMENTRY+28, LMENTRY+35
ORBEDT	ALRTHX+1~, ALRTHX+14*, ALRTHX+17
ORBHDR	OUTPUT~, HDR2
ORBHX	GETRECS+1~
ORBHX(20	GETRECS+3, GETRECS+5
ORBI	GETRECS+1~, GETRECS+4*, GETRECS+5
ORBMSG	LMENTRY+1~, LMENTRY+14, LMENTRY+20, LMENTRY+21, LMENTRY+22, LMENTRY+27, LMENTRY+31
ORBPR	RECIPS+1~, RECIPS+14, RECIPS+17, RECIPS+28
ORBPT	ALRTHX+5*, SELECT+17, LMHDR+1, LMEXIT+2!
ORBR	GETRECS+1~, GETRECS+5*, GETRECS+7, GETRECS+8, GETRECS+9, GETRECS+10, GETRECS+11, GETRECS+12, GETRECS+13, GETRECS+14 , GETRECS+15
ORBSDT	ALRTHX+1~, ALRTHX+10*, ALRTHX+17
ORBX	LMENTRY+1~, LMENTRY+7*, LMENTRY+8
ORDATA	LMENTRY+1~, LMENTRY+16*, LMENTRY+18
ORDIV	RECIPS+1~, RECIPS+27*, RECIPS+28
ORI	SELECT+1~, SELECT+7*, SELECT+8
ORJ	SELECT+1~, SELECT+6, SELECT+12, SELECT+15, GETRECS+6, GETRECS+7, GETRECS+8, GETRECS+9, GETRECS+10, GETRECS+11* , GETRECS+12, GETRECS+13, GETRECS+14, GETRECS+15
ORLINE	SELECT+1~, SELECT+12, LMENTRY+2~, LMENTRY+32, LMENTRY+33, LMENTRY+34, LMENTRY+35, LMENTRY+37, LMENTRY+39, RECIPS+1~ , RECIPS+55, RECIPS+56, RECIPS+58*
ORLINES	SELECT+1~, SELECT+12, SELECT+13!, LMENTRY+2~, LMENTRY+32, LMENTRY+40!
ORLINES(	SELECT+12, LMENTRY+33, LMENTRY+35, LMENTRY+39
ORN	SELECT+1~, SELECT+8, SELECT+9, RECIPS+1~, RECIPS+10, RECIPS+14, RECIPS+17, RECIPS+28, RECIPS+33, RECIPS+36 , RECIPS+39, RECIPS+45, RECIPS+53
ORNUM	LMENTRY+1~, LMENTRY+17, LMENTRY+18, LMENTRY+19, LMENTRY+21, RECIPS+1~, RECIPS+25, RECIPS+26, RECIPS+27, RECIPS+33 , RECIPS+53
ORNUMS	SELECT+1~, SELECT+2*, SELECT+3, SELECT+7, SELECT+8
ORX	LMENTRY+2~, LMENTRY+25, LMENTRY+26, GETRECS+1~, GETRECS+3, GETRECS+4
ORY	SELECT+1~, SELECT+18, LMENTRY+2~, LMENTRY+26, LMENTRY+27, LMENTRY+28, LMENTRY+30, RECIPS+1~, RECIPS+52, RECIPS+53 , RECIPS+61, OUTPUT~
ORY(	SELECT+12, SELECT+15, GETRECS+6, GETRECS+7, GETRECS+8, GETRECS+9, GETRECS+10, GETRECS+11, GETRECS+12, GETRECS+13 , GETRECS+14, GETRECS+15, RECIPS+55, RECIPS+56, RECIPS+58*, PRINT+5, PRINT+8
ORY("?"	RECIPS+55
PAGE	PRINT+1~, PRINT+2, HDR+1, HDR1, HDR2, HDR2+1
POP	OUTPUT+1~, OUTPUT+5
U	ALRTHX+5, SELECT+10, SELECT+11, LMENTRY+8, LMENTRY+15, LMENTRY+22, LMENTRY+27, LMENTRY+28, LMENTRY+42, GETRECS+3 , GETRECS+7, GETRECS+8, GETRECS+9, GETRECS+10, GETRECS+11, GETRECS+12, GETRECS+13, GETRECS+14, GETRECS+15
V	LIST+2~, LIST+4*
>> VALMBCK	SELECT+19, LMHELP+2, LMALT+2, LMENTRY+45
>> VALMBG	LMENTRY+45*
>> VALMCNT	LMENTRY+45*
VALMHDR	LMENTRY+44!
VALMHDR(1	LMHDR+1*
X	LMHELP+1~, LMHELP+5, RECIPS+30!, PRINT+1~, PRINT+11, HDR+3*
>> XQORM("ALT"	LMEXIT+2!
>> XQORNOD(0	SELECT+2
Y	LIST~, ALRTHX+4!, ALRTHX+5, ALRTHX+6!, ALRTHX+9!, ALRTHX+10, ALRTHX+13!, ALRTHX+14, RECIPS+3, RECIPS+4 , RECIPS+6!, RECIPS+9, RECIPS+10, RECIPS+12!, RECIPS+25, RECIPS+30!, RECIPS+40!, RECIPS+42!, RECIPS+46!, RECIPS+48!
Y(	LIST+4*
ZTDESC	OUTPUT+9*, OUTPUT+11!
ZTRTN	OUTPUT+7*, OUTPUT+11!
ZTSAVE	OUTPUT+11!
ZTSAVE("ORBHDR"	OUTPUT+8*
ZTSAVE("ORY("	OUTPUT+8*
>> ZTSK	OUTPUT+12, PRINT+13

Customize PDF page

Package: Order Entry Results Reporting