Routine: RABTCH

Package	Total	Call Graph
Radiology Nuclear Medicine	6	($$SSANVAL,$$USESSAN)^RAHLRU1 CRCHK^RAORD6 SET^RAPSET1 PRT^RARTR (CLOSE,D,ZIS)^RAUTL STOPCHK^RAUTL9
VA Fileman	3	^%DT ^DIC ^DIE
Kernel	1	$$REPEAT^XLFSTR

Package	Total	Caller Graph
Radiology Nuclear Medicine	6	RA BTCHLIST RA BTCHNEW RA BTCHPRINT RA BTCHREMOVE RARTE RARTE4

Entry Points

External References

Name	Field # of Occurrence
^%DT	START+1
^DIC	1+2, 2+1, 3+4, 4+1
^DIE	BTCH+1, 4+2
$$SSANVAL^RAHLRU1	START2+8
$$USESSAN^RAHLRU1	START2+10, START2+11, HDR2+6, HDR2+7, HDR2+8, HDR2+9
CRCHK^RAORD6	START2+4
SET^RAPSET1	3+3
PRT^RARTR	START+2
CLOSE^RAUTL	Q2+2, Q3+3
D^RAUTL	START2+10, START2+11, HDR2+3, HDR2+4, 3+5, 3+6
ZIS^RAUTL	2+1, BTCH+3
STOPCHK^RAUTL9	START2+4
$$REPEAT^XLFSTR	HDR2+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: 1+1
Function Call: WRITE	Prompt: !?1,RAFL,?2,RACNDSP Line Location: START2+10
Function Call: WRITE	Prompt: "+" Condition for execution: RA1]"" Line Location: START2+10
Function Call: WRITE	Prompt: ?22,Y,?35,$S($D(^DPT(RADFN,0)):$E($P(^(0),"^"),1,29),1:"Unknown") Line Location: START2+10
Function Call: WRITE	Prompt: !?2,RAFL,?3,$J(RACN,4) Line Location: START2+11
Function Call: WRITE	Prompt: " +" Condition for execution: RA1]"" Line Location: START2+11
Function Call: WRITE	Prompt: ?15,Y,?30,$S($D(^DPT(RADFN,0)):$E($P(^(0),"^"),1,29),1:"Unknown") Line Location: START2+11
Function Call: WRITE	Prompt: !,"Batch: ",$P(Y(0),"^"),?30,"Date Created: " Line Location: HDR2+3
Function Call: WRITE	Prompt: Y,?65,$S($D(^VA(200,+$P(Y(0),"^",3),0)):$E($P(^(0),"^"),1,14),1:"") Line Location: HDR2+3
Function Call: WRITE	Prompt: !?30,"Last Printed: ",Y,!!,"* indicates the report has been printed from batch",! Line Location: HDR2+4
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("=",79) Line Location: HDR2+5
Function Call: WRITE	Prompt: !!?1,"Case No.",?22,"Exam Date",?35,"Patient",?60,"Interpreting Phys." Line Location: HDR2+6
Function Call: WRITE	Prompt: !?1,"----------------",?22,"-----------",?35,"--------------------",?60,"------------------" Line Location: HDR2+7
Function Call: WRITE	Prompt: !!?1,"Case No.",?15,"Exam Date",?30,"Patient",?60,"Interpreting Phys." Line Location: HDR2+8
Function Call: WRITE	Prompt: !?1,"--------",?15,"---------",?30,"-------",?60,"------------------" Line Location: HDR2+9
Function Call: WRITE	Prompt: ! Line Location: 3+4
Function Call: WRITE	Prompt: !!,"Batch: ",$P(Y(0),"^"),?30,"Date Created: " Line Location: 3+5
Function Call: WRITE	Prompt: Y,?65,$S($D(^VA(200,+$P(Y(0),"^",3),0)):$E($P(^(0),"^"),1,14),1:"") Line Location: 3+5
Function Call: WRITE	Prompt: !?30,"Last Printed: ",Y Line Location: 3+6
Function Call: READ	Prompt: "Are you sure? No// " Formatting: !! Timeout: DTIME Variable: X Line Location: ASKPRT+0
Function Call: WRITE	Prompt: !!?3,"Enter 'YES' to print this batch, or 'NO' not to." Line Location: ASKPRT+0
Function Call: WRITE	Prompt: ! Line Location: BTCH+3
Function Call: WRITE	Prompt: ! Line Location: Q3+3
Function Call: WRITE	Prompt: ! Line Location: 4+1
Routine Call	DIE Line Location: BTCH+1 4+2
Routine Call	DIC Line Location: 1+2 2+1 3+4 4+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RABTCH(74.2 - [#74.2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	START2+10, START2+11
^RABTCH(74.2 - [#74.2]	START2+1, START2+3, START+2
^RADPT - [#70]	START2+12
^RADPT("ADC"	START2+7
^RADPT("ADC1"	START2+6
^RARPT - [#74]	START2+3
^VA(200 - [#200]	START2+13, HDR2+3, 3+5

Label References

Name	Line Occurrences
ASKPRT	ASKPRT
HDR2	START2+2, START2+4
Q1	1+2
Q2	2+2
Q3	3+4, ASKPRT, BTCH+3
Q4	4+1
START2	2+1

Naked Globals

Name	Field # of Occurrence
^(	START2+3, START2+12, START+2
^(0	START2+3, START2+10, START2+11, START2+12, START2+13, HDR2+3, 3+5, START+2*
^(1	START2+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	Q1!, Q2!, Q4!
%DT	Q1!, START+1*
%W	Q3+1!
%X	Q3+1!
%Y	Q4!
%Y1	Q3+1!
C	Q1!, Q2+1!, Q3!, Q4!
D	Q3+1!, Q4+1!
D0	Q1!, Q3!, Q4!
D1	Q4+1!
DA	Q1!, BTCH+1, Q3!, 4+1, Q4!
DDC	Q4+2!
DDH	Q1!, Q2+1!, Q3+2!, Q4+1!
DI	Q1!, Q3+1!, Q4+1!
DIC	1+1, Q1!, 2+1!, Q2!, 3+4!, Q3+1!, 4+1!, Q4+1!
DIC("A"	1+1, 2+1, 3+4, 4+1
DIC("DR"	1+1*
DIC("S"	1+1, 4+1
DIC(0	1+1, 2+1, 3+4, 4+1
DIE	Q1!, BTCH+1, Q3!, 4+2, Q4!
DISYS	Q2+1!, Q3+2!, Q4+2!
DIZ	Q4+1!
DLAYGO	1+1*, Q1!, Q4+1!
DQ	Q1!, Q3+1!, Q4+1!
DR	Q1!, BTCH+1, Q3!, 4+2, Q4!
DR(2	4+2*
DST	Q4+2!
DT	START+1*
DTIME	ASKPRT
DUZ	1+1
I	Q1!, START2+3*, Q2!, Q2+1!, Q3+2!, Q4+1!
IO	START2+1, START
IOF	HDR2+2
ION	BTCH*
>> IOP	BTCH*
IOSL	START2+4
IOST	START2+4
J	Q3!, Q4!
K	Q3!, Q4!
POP	Q1!, Q2+1!, Q3+2!, Q4+2!
RA0	START2+3*, START2+5, START2+6, START2+7, START2+10, START2+11, Q2!
RA1	START2+2~, START2+3*, START2+10, START2+11
RABT	START*, START+2, Q3!, Q4!
RABTCH	1+1!, 1+2, 2+1, START2+1, START2+3, Q2!, 3+4, BTCH+1, START, START+2 , Q3!, Q4!
>> RABTCHN	1+2*
RABTI	START+2*, Q3!, Q4!
RACN	START2+5*, START2+9, START2+11, START2+12, Q2!, Q3!, Q4!
RACNDSP	START2+8~, START2+9*, START2+10
>> RACNI	START2+6, START2+7, START2+8
RADFN	START2+5*, START2+6, START2+7, START2+8, START2+10, START2+11, START2+12, Q2!, Q3!, Q4!
RADTE	Q3!, Q4!
RADTI	START2+5*, START2+6, START2+7, START2+8, START2+12, Q2!, Q3!, Q4!
RAFL	START2+3*, START2+10, START2+11, Q2!
>> RAMLC	BTCH
RAPEAT	2+1*, 2+2!
RAPGE	START2+1, Q2!, HDR2+1
RAPOP	2+1, 2+2!, BTCH+3, Q3!
RARPT	START2+3, Q2!, START+2, Q3!, Q4!
RASSAN	START2+8~*, START2+9
RAX	2+1, 2+2!, START2+1, START2+3, START2+4
U	START2+6, START2+7, START*
W	Q3!, Q4!
X	Q1!, Q2!, ASKPRT, START+1, Q3+1!, Q4+1!
XQUIT	3+3!
Y	1+2, Q1!, 2+1, START2+10, START2+11, Q2!, HDR2+3, HDR2+4, 3+4, 3+5* , 3+6*, START+1, Q3+1!, 4+1
Y(0	START2+1*, HDR2+3, HDR2+4, 3+5, 3+6
Z	START2+12*, START2+13, Q2!
ZTQUEUED	START2+4, Q2!
>> ZTRTN	2+1, BTCH+2
>> ZTSAVE("RABTCH"	2+1, BTCH+2
ZTSTOP	START2+4, Q2!

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RABTCH

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
Q1
ASKPRT
BTCH
Q2
HDR2	; report header
Q4
START2	; start report processing
Q3
1	;;Select a Batch
START
3	;;Print a Batch
2	;;List Batch Entries
4	;;Remove/Add a Report from a Batch