Routine: LRDIDLE0

Package	Total	Call Graph
VA Fileman	2	$$GET1^DIQ ^DIWP
IHS Changes To Lab	1	SENDMAIL^BLRUTIL8
Kernel	1	$$FMTE^XLFDT
Lab Service	1	FILECOM^LRVR4
Toolkit	1	$$GET^XPAR

Package	Total	Caller Graph
Lab Service	1	LRVER3

Entry Points

Name	Comments	DBIA/ICR reference
INIT	; ; This code controls the automatic audit trail entries for CH subscripted ; tests which are reported and subsequently changed. Modification of this ; code by local stations may have Medical/Legal ramifications. Local ; stations are STRONGLY advised to NOT make changes.
STORE	; Store comments in file #63, field #99 COMMENTS
EVAL	; EP
USERID(LRDUZ)	; Create user id for comment text

External References

Name	Field # of Occurrence
SENDMAIL^BLRUTIL8	STORE+40
$$GET1^DIQ	STORE+31, USERID+12
^DIWP	STORE+10
FILECOM^LRVR4	STORE+21
$$FMTE^XLFDT	INIT+8
$$GET^XPAR	STORE+26

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,LRX Line Location: STORE+22

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY($J	STORE+9!, STORE+11, STORE+12, STORE+16!

Label References

Name	Line Occurrences
$$USERID	INIT+8, EVAL+6, EVAL+15, EVAL+29, EVAL+38
STORE	EVAL+42

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CHNGRI	STORE+28~, STORE+30*, STORE+31, STORE+39
CHNGRN	STORE+28~, STORE+31, STORE+32, STORE+39
DIWF	STORE+2~, STORE+8*
DIWL	STORE+2~, STORE+8*, STORE+11, STORE+12
DIWR	STORE+2~, STORE+8*
DUZ	INIT+8
DUZ("AG"	USERID+9
DUZ(2	USERID+10
>> J	STORE+14*
>> LRACC	STORE+36, STORE+40
LRCHDT7	INIT+6~, INIT+8*, EVAL+8, EVAL+18, EVAL+19, EVAL+31, EVAL+40
>> LRDFN	STORE+21
LRDUZ	USERID~, USERID+7
LRDUZ("AG"	USERID+9*, USERID+12
LRDUZ(2	USERID+10*, USERID+12
LRI	INIT+6~, EVAL+23~, EVAL+34, EVAL+35, EVAL+36, EVAL+37, STORE+2~, STORE+5, STORE+6, STORE+7 , STORE+8, STORE+9, STORE+12, STORE+18, STORE+19, STORE+20, STORE+29, STORE+30, STORE+33, STORE+34 , STORE+35, STORE+36, STORE+37, STORE+38, STORE+39
>> LRIDT	STORE+21
LRJ	INIT+6~, INIT+8, EVAL+7, EVAL+8, EVAL+16, EVAL+17, EVAL+18, EVAL+19, EVAL+30, EVAL+31* , EVAL+39, EVAL+40, EVAL+42, STORE+2~, STORE+8, STORE+11, STORE+12
LRK	STORE+2~, STORE+12*, STORE+13, STORE+14, STORE+15
LRNEW	INIT+6~, EVAL+4, EVAL+8, EVAL+12, EVAL+13, EVAL+18, EVAL+19, EVAL+27, EVAL+31, EVAL+35* , EVAL+40
>> LRNOW7	INIT+8
>> LROK	INIT+8*
LROLD	INIT+6~, EVAL+5, EVAL+6, EVAL+14, EVAL+15, EVAL+28, EVAL+29, EVAL+36, EVAL+38
>> LRSA(	EVAL+3, EVAL+5, EVAL+6, EVAL+7, EVAL+11, EVAL+14, EVAL+15, EVAL+16, EVAL+22, EVAL+24 , EVAL+29, EVAL+30, EVAL+38, EVAL+39
>> LRSB	EVAL+3, EVAL+4, EVAL+5, EVAL+6, EVAL+7, EVAL+11, EVAL+12, EVAL+13, EVAL+14, EVAL+15 , EVAL+16, EVAL+22, EVAL+24, EVAL+29, EVAL+30, EVAL+38, EVAL+39
>> LRSB(	EVAL+4, EVAL+12, EVAL+13, EVAL+24
LRSQ9	INIT+6~, EVAL+6, EVAL+7, EVAL+15, EVAL+16, EVAL+29, EVAL+30, EVAL+38, EVAL+39
LRTXT	INIT+6~, STORE+40
LRTXT(	EVAL+7, EVAL+8, EVAL+16, EVAL+18, EVAL+19, EVAL+30, EVAL+31, EVAL+39, EVAL+40, STORE+6 , STORE+7, STORE+8, STORE+9!, STORE+12, STORE+13, STORE+14, STORE+15, STORE+19, STORE+20, STORE+30 , STORE+34, STORE+35, STORE+36, STORE+37, STORE+38, STORE+39
LRTXT("A"	STORE+29
>> LRUID	STORE+37
LRUSER	INIT+6~, INIT+8*, EVAL+8, EVAL+18, EVAL+19, EVAL+31, EVAL+40
LRX	EVAL+23~, EVAL+24, EVAL+26, EVAL+27, EVAL+34, EVAL+35, STORE+2~, STORE+20, STORE+21, STORE+22
LRY	EVAL+23~, EVAL+24, EVAL+26, EVAL+28, EVAL+34, EVAL+36, USERID+6~, USERID+7, USERID+12*, USERID+13
LRZ	EVAL+23~, EVAL+37*, EVAL+39
LRZ(0	EVAL+33*, EVAL+37
>> VADM(1	STORE+35
X	STORE+2~, STORE+8*

Customize PDF page

Package: Lab Service

Routine: LRDIDLE0

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: