Routine: LRMISEZA

Package	Total	Call Graph
VA Fileman	2	^DIC YN^DICN
Lab Service	1	^LRDPA

Package	Total	Caller Graph
Lab Service	1	LRMISEZ

Entry Points

Name	Comments	DBIA/ICR reference
PROMPT
AP
INFO1
SAMPLE
LOS
SINGLE
ASK
ASK1
CHECK

External References

Name	Field # of Occurrence
^DIC	ASK1+2, AP+2, SINGLE, SINGLE+1, SINGLE+2
YN^DICN	ASK1, AP
^LRDPA	SINGLE+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Do you want all survey data for just one organism?" Line Location: ASK1+0
Function Call: READ	Prompt: "// " Timeout: DTIME Variable: X Line Location: SAMPLE+0
Function Call: WRITE	Prompt: !!,"Will all reports be by (S)ite/specimen or (C)ollection sample? ",LRSIT(1) Line Location: SAMPLE+0
Function Call: WRITE	Prompt: !,"Select 'S' or 'C', or '^' to exit." Line Location: SAMPLE+0
Function Call: WRITE	Prompt: ! Line Location: SAMPLE+1
Function Call: READ	Prompt: "to be excluded from all reports. 0// " Timeout: DTIME Variable: X Line Location: LOS+0
Function Call: WRITE	Prompt: !!,"Number of days from patient's admission date to collection date of specimen",! Line Location: LOS+0
Function Call: WRITE	Prompt: !,"Enter number of days to exclude." Line Location: LOS+0
Function Call: WRITE	Prompt: ! Line Location: LOS+1
Function Call: WRITE	Prompt: !!,"Will all reports require a specific antibiotic pattern" Line Location: AP+0
Function Call: WRITE	Prompt: !,"You may restrict all reports to only those that have specific antibiotic",!,"interpretations." Line Location: AP+0
Function Call: READ	Prompt: "Select Interpretation: " Formatting: ! Timeout: DTIME Variable: X Line Location: AP+2
Function Call: WRITE	Prompt: !,"Survey by: ",LRPROMPT Line Location: ASK+0
Function Call: READ	Prompt: "// " Timeout: DTIME Variable: X Line Location: ASK+1
Function Call: WRITE	Prompt: !,"You must use:" Line Location: CHECK+0
Function Call: WRITE	Prompt: !,?5,J Line Location: CHECK+0
Function Call: WRITE	Prompt: !,"Select 'A' to obtain a survey grouped by all ",LRPROMPT,"s.",!,"Select 'S' to obtain a survey for only one ",LRPROMPT,".",!,"Select 'N' if you DO NOT want a survey grouped by ",LRPROMPT,".",!,"'^' to exit",! Line Location: INFO1+0
Routine Call	DIC Line Location: ASK1+2 AP+2 SINGLE SINGLE+1 SINGLE+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(62.06 - [#62.06]	CHECK, CHECK+1
^SC - [#44]	SINGLE
^VA(200 - [#200]	SINGLE+2

Label References

Name	Line Occurrences
ASK	PROMPT
CHECK	AP+2
INFO1	ASK+1
SINGLE	ASK+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	ASK1, ASK1+1, ASK1+2, AP, AP+1, AP+2
DFN	SINGLE+3!
DIC	ASK1+2!, AP+2, PROMPT!, SINGLE!, SINGLE+1!, SINGLE+2!*, SINGLE+3!
DIC("A"	ASK1+2, AP+2, SINGLE, SINGLE+1, SINGLE+2*
DIC("S"	ASK1+2, AP+2, SINGLE+1, SINGLE+2
DIC(0	ASK1+2, AP+2, SINGLE, SINGLE+1, SINGLE+2, SINGLE+3
DTIME	SAMPLE, LOS, AP+2, ASK+1
>> DTOUT	SINGLE+3
>> DUOUT	SINGLE+3
>> I	ASK1, SAMPLE, LOS, AP, AP+2, ASK+1, CHECK*
>> J	CHECK*
LRAP	AP!
LRAP(	CHECK+1*
>> LRASK	PROMPT*, ASK, ASK+1, SINGLE, SINGLE+1, SINGLE+2, SINGLE+3
>> LRBN	AP+2*, CHECK, CHECK+1
>> LRDFN	SINGLE+3
>> LREND	ASK1+1, ASK1+2, SAMPLE+1, LOS+1, AP+1, PROMPT, ASK+2
>> LRLOS	LOS+2*
>> LRM(	ASK+1, SINGLE, SINGLE+1, SINGLE+2, SINGLE+3*
>> LRM("O"	ASK1+2*
>> LROK	AP+2, CHECK+1
>> LRPROMPT	ASK*, ASK+1, INFO1
>> LRSGL	ASK1+2*, PROMPT
>> LRSIT(1	SAMPLE*
>> PNM	SINGLE+3*
U	ASK1+2, SAMPLE, SAMPLE+1, LOS, LOS+1, AP+2, ASK+1, ASK+2, SINGLE, SINGLE+2
>> X	ASK1+2, SAMPLE, SAMPLE+1, LOS, LOS+1, LOS+2, AP+2, ASK+1, ASK+2, CHECK , CHECK+1
>> Y	ASK1+2, AP+2, SINGLE, SINGLE+1, SINGLE+2
>> Y(0	AP+2

Customize PDF page

Package: Lab Service

Routine: LRMISEZA

Information

Source Information

Call Graph

Call Graph Total: 3

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: