Routine: BEHORXF3

Information

BEHORXF3 ;MSC/IND/PLS - Support for Lab Test lookup when ordering meds;13-Feb-2014 12:09;PLS

Source Information

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
VA Fileman	5	BLD^DIALOG $$FIND1^DIC MIX^DIC1 $$GET1^DIQ ^DIR
Registration	3	EN^VALM ($$SETFLD,CLEAR,FULL)^VALM1 CLEAN^VALM10
Kernel	2	($$FMADD,$$FMTE)^XLFDT DISP^XQORM1
IHS Electronic Health Record	1	$$LOOKUP^BEHUTIL
Lab Service	1	RR^LR7OR1
Toolkit	1	(DEL,EN,GETWP)^XPAR

Entry Points

Name	Comments	DBIA/ICR reference
UNMAP	;EP-
HDR	; -- header code
SETARR(LINE,TEXT,IEN,DAYS,SPEC,SEQN)	;EP-
LABRSLT(DFN,TST,DAYS,SPEC)	;EP-
ADDITEM(TST,DAYS,SPEC,SEQ)	;EP-
EXPND	; -- expand code
SAVELST	;EP-
HELP	; -- help code
BUILDLST	;EP-
EDTITEM2
ADD(VAL)	;EP-
INIT	; -- init variables and list array
CHKDUP(VAL,POS,EDT)	;EP-
DIR(BEHODTP,BEHOPMT,BEHODFL,BEHOHLP,BEHOPOP,BEHOSCN)	; EP
LTEN	;-- main entry point for BEHORX LAB TESTS
ADDRES(VAL)	;EP-
GETTEXT(BEHODG,BEHOAR)	;
GETIEN1(BEHOFILE,BEHOPMPT,BEHODFLD,D,BEHOSCRN,BEHODFLT)	; EP
EDTITEM1(IDX)	;
ADDTEST	;EP-
UPDITM(ITM,TST,DAYS,SPEC,SEQ)	;EP-
CHGPOI	;EP-
EDTITEM	;EP-
TSTASSOC(DATA,OI)	;EP-
ADDTEST2
EXIT	; -- exit code
DELITEM	;EP-
LABTESTS(DATA,DFN,OI)	;EP-

External References

Name	Field # of Occurrence
$$LOOKUP^BEHUTIL	LTEN+2, CHGPOI+1
BLD^DIALOG	GETTEXT+5
$$FIND1^DIC	GETIEN1+7
MIX^DIC1	GETIEN1+11
$$GET1^DIQ	GETIEN1+7
^DIR	DELITEM+3, EDTITEM+3, DIR+8
RR^LR7OR1	LABRSLT+3
EN^VALM	LTEN+4
$$SETFLD^VALM1	ADDITEM+3, ADDITEM+4, ADDITEM+5, ADDITEM+6, ADDITEM+7, UPDITM+2, UPDITM+3, UPDITM+4, UPDITM+5, UPDITM+6
CLEAR^VALM1	LTEN+5
FULL^VALM1	LTEN+6, ADDTEST+1, DELITEM+5, EDTITEM+5
CLEAN^VALM10	INIT+1
$$FMADD^XLFDT	LABRSLT+3
$$FMTE^XLFDT	ADDRES+9
DEL^XPAR	SAVELST+7, UNMAP+3
EN^XPAR	SAVELST+8
GETWP^XPAR	LABTESTS+5, TSTASSOC+4, BUILDLST+3
DISP^XQORM1	HELP+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: LTEN+4
Routine Call	DIALOG Line Location: GETTEXT+5
Routine Call	DIC Line Location: GETIEN1+7
Routine Call	DIR Line Location: DELITEM+3 EDTITEM+3 DIR+8

RPC Name	Call Tags
BEHORXF3 LABTESTS	LABTESTS
BEHORXF3 TSTASSOC	TSTASSOC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	LABRSLT+9, ADDITEM+4, UPDITM+3, SAVELST+4, EDTITEM1+10
^LAB(61 - [#61]	ADDITEM+7, UPDITM+6, EDTITEM2+7
^ORD(101.43 - [#101.43]	LABTESTS+3, TSTASSOC+2
^PS(50.7 - [#50.7]	HDR+2
^TMP("LRRR"	LABRSLT+2!, LABRSLT+4, LABRSLT+5, LABRSLT+6, LABRSLT+7

Label References

Name	Line Occurrences
$$CHKDUP	ADDTEST+6, ADDTEST2+2, EDTITEM1+16, EDTITEM2+3
$$DIR	ADDTEST+7, ADDTEST2, EDTITEM1+10, EDTITEM1+17, EDTITEM2, EDTITEM2+7
$$GETIEN1	ADDTEST+4, ADDTEST2+4
ADD	LABRSLT+9, LABRSLT+10, LABRSLT+11, ADDRES+8, ADDRES+9, ADDRES+10, ADDRES+11
ADDITEM	BUILDLST+7, ADDTEST2+7
ADDRES	LABRSLT+7
ADDTEST2	ADDTEST2+2
BUILDLST	INIT+2
EDTITEM1	EDTITEM+7
EDTITEM2	EDTITEM2+3
GETTEXT	DIR+4, DIR+6
INIT	ADDTEST2+9, DELITEM+10, UNMAP+4, CHGPOI+2, EDTITEM+9
LABRSLT	LABTESTS+19
SAVELST	ADDTEST2+8, DELITEM+9, EDTITEM+8
SETARR	ADDITEM+8, UPDITM+7
UNMAP	SAVELST+10
UPDITM	EDTITEM2+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARY	LABTESTS+1~, SAVELST+1~, SAVELST+5, SAVELST+6, SAVELST+8, UNMAP+1~, UNMAP+2
ARY(	LABTESTS+12, LABTESTS+16, LABTESTS+17, SAVELST+4
ARY("X"	LABTESTS+15*
ARYC	LABTESTS+1~, LABTESTS+2, LABTESTS+14, LABTESTS+15
BEHOAR	GETTEXT~, GETTEXT+2, GETTEXT+5
BEHOD	GETIEN1+1~, GETIEN1+5, GETIEN1+7, GETIEN1+8*, GETIEN1+9
BEHODFL	DIR~, DIR+2
BEHODFLD	GETIEN1~, GETIEN1+4*, GETIEN1+7, GETIEN1+8
BEHODFLT	GETIEN1~, GETIEN1+8
BEHODG	GETTEXT~, GETTEXT+3, GETTEXT+4*, GETTEXT+5
BEHODTP	DIR~, DIR+2
BEHOFILE	GETIEN1~, GETIEN1+7, GETIEN1+9
BEHOHLP	DIR~, DIR+5, DIR+6
BEHOPM	GETTEXT+1~, GETTEXT+5
BEHOPM(	GETTEXT+3*
BEHOPMPT	GETIEN1~, GETIEN1+9
BEHOPMT	DIR~, DIR+3, DIR+4
BEHOPOP	ADDTEST+2~, ADDTEST+3, ADDTEST+5, ADDTEST+7, ADDTEST2, ADDTEST2+1, ADDTEST2+5, EDTITEM1+1~, EDTITEM1+7, EDTITEM1+10 , EDTITEM1+11, EDTITEM1+12, EDTITEM1+17, EDTITEM1+18, EDTITEM1+19, EDTITEM2, EDTITEM2+2, EDTITEM2+7, EDTITEM2+8, EDTITEM2+9 , DIR~, DIR+9, GETIEN1+12, GETIEN1+13*
BEHOSCN	DIR~, DIR+7
BEHOSCRN	GETIEN1~, GETIEN1+6
CNT	LABTESTS+1~, LABTESTS+2, LABTESTS+20, ADDRES+7, ADD+1*, ADD+2
D	GETIEN1~, GETIEN1+2, GETIEN1+3, GETIEN1+7, GETIEN1+10
DA	DELITEM+1~, EDTITEM+1~
DATA	LABTESTS~, LABTESTS+4!, TSTASSOC~, TSTASSOC+5*
DATA(	ADD+2*
DATA(0	LABTESTS+20*
DAYS	LABRSLT~, LABRSLT+3, LABRSLT+10, SETARR~, SETARR+4, ADDITEM~, ADDITEM+5, ADDITEM+8, UPDITM~, UPDITM+4 , UPDITM+7, EDTITEM1+1~, EDTITEM1+4*, EDTITEM1+17
DAYSNUM	ADDTEST+2~, ADDTEST+7, ADDTEST2+7, EDTITEM1+17, EDTITEM1+19*, EDTITEM2+11
DFN	LABTESTS~, LABTESTS+19, LABRSLT~, LABRSLT+3, LABRSLT+4, LABRSLT+5, LABRSLT+6, LABRSLT+7
DIC	GETIEN1+1~, GETIEN1+9*
DIC("A"	GETIEN1+9*
DIC("B"	GETIEN1+9*
DIC("S"	GETIEN1+6*, GETIEN1+7
DIC(0	GETIEN1+9, GETIEN1+10
DIE	DELITEM+1~, EDTITEM+1~
DIR	ADDTEST+2~, DIR+1~
DIR("?"	DIR+5*, DIR+6
DIR("A"	DELITEM+3, EDTITEM+3, DIR+3*, DIR+4
DIR("B"	DIR+2*
DIR("S"	DIR+7*
DIR(0	DELITEM+3, EDTITEM+3, DIR+2*
DIRUT	ADDTEST+2~, ADDTEST+5, DELITEM+1~, EDTITEM+1~
DR	DELITEM+1~, EDTITEM+1~
DT	LABRSLT+3
DTOUT	DELITEM+1~, EDTITEM+1~, DIR+1~, DIR+9, GETIEN1+12
DUOUT	ADDTEST+2~, ADDTEST+5, DELITEM+1~, DELITEM+4, EDTITEM+1~, EDTITEM+4, DIR+1~, DIR+9, GETIEN1+12
EDT	CHKDUP~, CHKDUP+2*, CHKDUP+5
ERR	SAVELST+1~, SAVELST+7, SAVELST+8, UNMAP+3
IDT	LABRSLT+1~, LABRSLT+5*, LABRSLT+6, LABRSLT+7, ADDRES+6
IDX	EDTITEM1~, EDTITEM1+2, EDTITEM1+13, EDTITEM1+14, EDTITEM1+16, EDTITEM2+3, EDTITEM2+11
IEN	SETARR~, SETARR+2, SETARR+3, SETARR+4, ADDTEST+2~
IOF	LTEN+7
ITM	UPDITM~, UPDITM+7, DELITEM+1~, DELITEM+6, EDTITEM+1~, EDTITEM+6
LINE	SETARR~, SETARR+1, SETARR+2, SETARR+3, SETARR+4, ADDITEM+1~, ADDITEM+3, ADDITEM+4, ADDITEM+5, ADDITEM+6 , ADDITEM+7, ADDITEM+8, UPDITM+1~, UPDITM+2, UPDITM+3, UPDITM+4, UPDITM+5, UPDITM+6, UPDITM+7
LP	LABTESTS+1~, LABTESTS+7, LABTESTS+8, LABTESTS+16, LABTESTS+17, BUILDLST+1~, BUILDLST+5, BUILDLST+6, SAVELST+1~, SAVELST+2 , SAVELST+3, SAVELST+4, CHKDUP+1~, CHKDUP+4*, CHKDUP+5, CHKDUP+6
LST	BUILDLST+1~, BUILDLST+3, BUILDLST+4, DELITEM+1~, DELITEM+2, DELITEM+5, DELITEM+6, EDTITEM+1~, EDTITEM+2, EDTITEM+5 , EDTITEM+6
LST(	BUILDLST+5, BUILDLST+6
OI	LABTESTS~, LABTESTS+3, TSTASSOC~, TSTASSOC+2
POI	LABTESTS+1~, LABTESTS+3, LABTESTS+5, TSTASSOC+1~, TSTASSOC+2, TSTASSOC+4, LTEN+1~, LTEN+2, LTEN+3, HDR+2 , BUILDLST+3, SAVELST+7, SAVELST+8, UNMAP+3, CHGPOI+1
POS	CHKDUP~, CHKDUP+7
>> RES	CHKDUP+3, CHKDUP+4, CHKDUP+7, CHKDUP+8
SAVE	EXIT+1!
SEQ	ADDITEM~, ADDITEM+6, ADDITEM+8, UPDITM~, UPDITM+5, UPDITM+7
SEQN	LABTESTS+1~, LABTESTS+10, LABTESTS+11, LABTESTS+12, SETARR~, SETARR+4, ADDTEST+2~, ADDTEST2, ADDTEST2+2, ADDTEST2+7 , EDTITEM1+1~, EDTITEM1+6, EDTITEM2, EDTITEM2+5, EDTITEM2+11
SEQNT	EDTITEM1+1~, EDTITEM2*, EDTITEM2+3, EDTITEM2+5
SPEC	LABRSLT~, LABRSLT+3, SETARR~, SETARR+4, ADDITEM~, ADDITEM+7, ADDITEM+8, UPDITM~, UPDITM+6, UPDITM+7
SPECIEN	ADDTEST+2~, ADDTEST2+4, ADDTEST2+6, ADDTEST2+7, EDTITEM1+1~, EDTITEM1+5, EDTITEM2+7, EDTITEM2+9, EDTITEM2+10, EDTITEM2+11
STR	LABTESTS+1~, LABTESTS+8, LABTESTS+9, LABTESTS+10, LABTESTS+12, LABTESTS+15, LABTESTS+17, LABTESTS+18, LABTESTS+19, CHKDUP+6* , CHKDUP+7
SUB	LABRSLT+1~, LABRSLT+6*, LABRSLT+7
TDT	ADDRES+1~, ADDRES+6*, ADDRES+9
TEXT	SETARR~, SETARR+1
TRES	ADDRES+1~, ADDRES+2*, ADDRES+9
TRNG	ADDRES+1~, ADDRES+4*, ADDRES+10
TST	LABRSLT~, LABRSLT+3, LABRSLT+9, ADDITEM~, ADDITEM+4, ADDITEM+8, UPDITM~, UPDITM+3, UPDITM+7
TSTIEN	ADDTEST+2~, ADDTEST+4, ADDTEST+6, ADDTEST2+7, EDTITEM1+1~, EDTITEM1+3, EDTITEM1+10, EDTITEM1+15, EDTITEM1+16, EDTITEM2+11
TSTN	ADDRES+1~, ADDRES+3*, ADDRES+8
TSTS	LABTESTS+1~, LABTESTS+4!, LABTESTS+5, LABTESTS+6, TSTASSOC+1~, TSTASSOC+3!, TSTASSOC+4, TSTASSOC+5
TSTS(	LABTESTS+7, LABTESTS+8
TUNIT	ADDRES+1~, ADDRES+5*, ADDRES+9, ADDRES+10
U	LABTESTS+3, LABTESTS+10, LABTESTS+19, LABRSLT+9, ADDRES+2, ADDRES+3, ADDRES+4, ADDRES+5, TSTASSOC+2, HDR+2 , SETARR+3, SETARR+4, BUILDLST+7, ADDITEM+4, ADDITEM+7, UPDITM+3, UPDITM+6, SAVELST+4, EDTITEM1+3, EDTITEM1+4 , EDTITEM1+5, EDTITEM1+6, EDTITEM1+10, EDTITEM1+12, EDTITEM1+19, EDTITEM2+7, EDTITEM2+9, CHKDUP+7, DIR+9, GETIEN1+10 , GETIEN1+13, GETTEXT+3
VAL	ADDRES~, ADDRES+2, ADDRES+3, ADDRES+4, ADDRES+5, ADD~, ADD+2, BUILDLST+1~, BUILDLST+6, BUILDLST+7 , SAVELST+1~, SAVELST+3, SAVELST+4, DELITEM+1~, DELITEM+6, DELITEM+7, DELITEM+8, EDTITEM+1~, EDTITEM+6, EDTITEM+7 , EDTITEM1+1~, EDTITEM1+2*, EDTITEM1+3, EDTITEM1+4, EDTITEM1+5, EDTITEM1+6, CHKDUP~, CHKDUP+7
>> VALMAR	SETARR+1, SETARR+2, SETARR+3, SETARR+4, SAVELST+2, SAVELST+3, DELITEM+7, DELITEM+8, EDTITEM1+2, EDTITEM1+13 , EDTITEM1+14, CHKDUP+4, CHKDUP+6
>> VALMBCK	ADDTEST+5, ADDTEST+6, ADDTEST2+1, ADDTEST2+5, SAVELST+12, DELITEM+4, UNMAP+5, CHGPOI+3, EDTITEM+4, EDTITEM+10 , EDTITEM1+16*
>> VALMCNT	BUILDLST+2, ADDITEM+2, ADDITEM+3, ADDITEM+8, UPDITM+2, DELITEM+3, EDTITEM+3
>> VALMHDR(1	HDR+1*
>> VALMHDR(2	HDR+2*
>> VALMSG	ADDTEST+6, SAVELST+9, EDTITEM1+16*
>> X	HELP+1, DIR+9, GETIEN1+13, GETTEXT+3
Y	ADDTEST+2~, DELITEM+1~, DELITEM+5, EDTITEM+1~, EDTITEM+5, DIR+1~, DIR+10, GETIEN1+1~, GETIEN1+13, GETIEN1+18

Customize PDF page

Package: IHS Electronic Health Record

Routine: BEHORXF3

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

Used in RPC

Global Variables Directly Accessed

Label References

Local Variables

Legend: