Routine: LRIPRE2

Package	Total	Call Graph
VA Fileman	1	^DIR

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
CLNEX	;
PURGE	;
INIT	;
CLNET	;
WRAPUP	;
CLNCS	;

External References

Name	Field # of Occurrence
^DIR	INIT+13, INIT+22

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This task is optional. It is intended for test sites who have workload ",! Line Location: INIT+2
Function Call: WRITE	Prompt: "code entries in a format which is now obsolete. If you select this task, ",! Line Location: INIT+3
Function Call: WRITE	Prompt: "files 64.03, 64.1, 64.2 and 67.9 will be erased. In addition the workload ",! Line Location: INIT+4
Function Call: WRITE	Prompt: "code entries for the following files will also be erased: Execute Code ",! Line Location: INIT+5
Function Call: WRITE	Prompt: "(62.07), Etiology (61.2) & Collection Sample (62).",! Line Location: INIT+6
Function Call: WRITE	Prompt: !! Line Location: INIT+7
Function Call: WRITE	Prompt: !!,"I think I heard you wrong, wouldn't you rather skip this and go for a",! Line Location: INIT+15
Function Call: WRITE	Prompt: "soda or something?",! Line Location: INIT+16
Function Call: WRITE	Prompt: !!,"OK, OK, but remember, you asked for this...(twice even)",! Line Location: INIT+24
Function Call: WRITE	Prompt: !,"Deleting file 67.9, LAB Monthly Workloads.....",! Line Location: PURGE+1
Function Call: WRITE	Prompt: !,"Deleting file 64.1, Workload [WKLD] Data.....",! Line Location: PURGE+4
Function Call: WRITE	Prompt: !,"Deleting file 64.2, WKLD Suffix Codes.....",! Line Location: PURGE+7
Function Call: WRITE	Prompt: !,"Deleting file 64.03, WKLD LOG FILE.....",! Line Location: PURGE+10
Function Call: WRITE	Prompt: !,"Cleaning file 62.07, Execute Code.....",! Line Location: PURGE+13
Function Call: WRITE	Prompt: !,"Cleaning file 61.2, Etiology.....",! Line Location: PURGE+15
Function Call: WRITE	Prompt: !,"Cleaning file 62, Collection Sample.....",! Line Location: PURGE+17
Function Call: WRITE	Prompt: !,"Workload data cleaning task completed.",! Line Location: PURGE+19
Function Call: WRITE	Prompt: ! Line Location: CLNEX+3
Function Call: WRITE	Prompt: ! Line Location: CLNET+3
Function Call: WRITE	Prompt: ! Line Location: CLNCS+5
Routine Call	DIR Line Location: INIT+13 INIT+22

Name	Line Occurrences (* Changed, ! Killed)
^LAB(61.2 - [#61.2]	CLNET+2!
^LAB(62 - [#62]	CLNCS+2, CLNCS+3, CLNCS+4!
^LAB(62.07 - [#62.07]	CLNEX+2!
^LAB(64.2 - [#64.2]	PURGE+8!*
^LRO(64.03 - [#64.03]	PURGE+11!*
^LRO(64.1 - [#64.1]	PURGE+5!*
^LRO(67.9 - [#67.9]	PURGE+2!*

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DIFQ	EN+1
DIR	INIT+8!, INIT+17!, WRAPUP+1!
DIR("?"	INIT+10, INIT+11, INIT+12, INIT+19, INIT+20, INIT+21
DIR("A"	INIT+9, INIT+18
DIR("B"	INIT+8, INIT+17
DIR(0	INIT+8, INIT+17
>> DTOUT	INIT+14, INIT+23
>> DUOUT	INIT+14, INIT+23
J	CLNEX+1~, CLNEX+2, CLNET+1~, CLNET+2, CLNCS+1~, CLNCS+2*, CLNCS+3, CLNCS+4
K	CLNCS+1~, CLNCS+3*, CLNCS+4
>> L	CLNCS+4*
LREND	EN+2~, EN+4, INIT+1, INIT+14, INIT+23*
X	INIT+8!, INIT+17!, WRAPUP+1!
Y	INIT+8!, INIT+14, INIT+17!, INIT+23, WRAPUP+1!

Customize PDF page

Package: Lab Service

Routine: LRIPRE2

Information

Source Information

Call Graph

Call Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Line Occurrences
CLNCS	PURGE+18
CLNET	PURGE+16
CLNEX	PURGE+14
INIT	EN+3
PURGE	EN+4
WRAPUP	EN+5