Routine: BLRROLLD

Name	Field # of Occurrence
EEP^BLRGMENU	EEP+1
HEADERDT^BLRGMENU	EP+7
PRESSKEY^BLRGMENU	EP+24, EP+30, EP+49, EP+57, YESDOIT+9
EP^BLRROLLD	TESTIT+4
FILE^DIE	EP+44
$$GET1^DIQ	EP+26
^DIR	YESDOIT+5
^XBFMK	YESDOIT+1
$$CJ^XLFSTR	EP+6
$$LJ^XLFSTR	EP+16, EP+21, EP+22

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?14,$TR($J("",MAXLINE)," ","*"),! Line Location: EP+18
Function Call: WRITE	Prompt: ?14,LINE1,! Line Location: EP+19
Function Call: WRITE	Prompt: ?14,LINE2,! Line Location: EP+20
Function Call: WRITE	Prompt: ?14,$$LJ^XLFSTR("* ",MAXLINE-4)," *",! Line Location: EP+21
Function Call: WRITE	Prompt: ?14,$$LJ^XLFSTR("* Routine Ends.",MAXLINE-4)," *",! Line Location: EP+22
Function Call: WRITE	Prompt: ?14,$TR($J("",MAXLINE)," ","*"),! Line Location: EP+23
Function Call: WRITE	Prompt: ?4,"LABORATORY SITE (#69.9) file's ROLLOVER RUNNING (#521) field is Null.",!! Line Location: EP+28
Function Call: WRITE	Prompt: ?4,"No need to delete anything. Routine Ends." Line Location: EP+29
Function Call: WRITE	Prompt: ?4,"LABORATORY SITE (#69.9) file's ROLLOVER RUNNING (#521) field = ",ROLLRUNF,! Line Location: EP+32
Function Call: WRITE	Prompt: !,?4,"This routine will delete the ",ROLLRUNF," from the field.",! Line Location: EP+34
Function Call: WRITE	Prompt: !,?4,"Errors trying to clear the ROLLOVER RUNNING field.",! Line Location: EP+47
Function Call: WRITE	Prompt: !,?14,"Deleting" Line Location: EP+51
Function Call: WRITE	Prompt: "." Line Location: EP+52
Function Call: WRITE	Prompt: !,?14,"Done." Line Location: EP+53
Function Call: WRITE	Prompt: !!,?4,"LABORATORY SITE (#69.9) file's ROLLOVER RUNNING (#521) field cleared." Line Location: EP+55
Function Call: WRITE	Prompt: !!,?14,"NO/Null/Invalid Entry. Routine ends." Line Location: YESDOIT+8
Function Call: WRITE	Prompt: ! Line Location: YESDOIT+11
Function Call: WRITE	Prompt: !,?9,ARRY,! Line Location: ARRYDUMP+4
Function Call: WRITE	Prompt: ?14,STR1,"=",@STR1,! Line Location: ARRYDUMP+5
Function Call: WRITE	Prompt: ?14,STR1,"=",@STR1,! Line Location: ARRYDUMP+7
Routine Call	DIE Line Location: EP+44
Routine Call	DIR Line Location: YESDOIT+5

FileNo	Call Tags
^LAB(69.9 - [#69.9]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^LAB(69.9 - [#69.9]	TESTIT+2*
^VA(200 - [#200]	EP+10, EP+16
^XUSEC("LRSUPER"	EP+9

Name	Line Occurrences
$$YESDOIT	EP+36, EP+38, EP+40
ARRYDUMP	EP+48

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRY	ARRYDUMP~, ARRYDUMP+3, ARRYDUMP+4
>> BLRVERN	EP+3*
>> DILOCKTM	EP+1
>> DIR("A"	YESDOIT+3*
>> DIR("B"	YESDOIT+4*
>> DIR(0	YESDOIT+2*
>> DISYS	EP+1
DT	EP+1
DTIME	EP+1
DUZ	EP+1, EP+9, EP+10, EP+16
ERRS	EP+43!, EP+46
>> FDA(	EP+42*
>> HEADER(1	EP+4*
>> HEADER(2	EP+5*
>> HEADER(3	EP+6*
IO	EP+1
>> IOBS	EP+1
IOF	EP+1
IOM	EP+1, EP+6
ION	EP+1
>> IOS	EP+1
IOSL	EP+1
IOST	EP+1
>> IOT	EP+1
>> IOXY	EP+1
>> LINE1	EP+10, EP+13, EP+16, EP+19
>> LINE2	EP+11*, EP+14, EP+15, EP+20
>> MAXLINE	EP+13, EP+14, EP+15, EP+16, EP+18, EP+21, EP+22, EP+23
MESSAGE	YESDOIT~, YESDOIT+3
>> NUM	EP+52*
>> ROLLRUNF	EP+26*, EP+27, EP+32, EP+34
STR1	ARRYDUMP+1~, ARRYDUMP+3, ARRYDUMP+5, ARRYDUMP+6, ARRYDUMP+7
U	EP+1
>> XPARSYS	EP+1
>> XQXFLG	EP+1
>> Y	YESDOIT+7

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRROLLD

Information

Source Information

Call Graph

Call Graph Total: 7

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:

Marked Items