Routine: RABTCH1

Package	Total	Call Graph
Radiology Nuclear Medicine	7	($$SSANVAL,$$USESSAN)^RAHLRU1 SET^RAPSET1 31^RART ^RASIGU D^RAUTL UPSTATM^RAUTL0 RASET^RAUTL2
VA Fileman	2	^DIC ^DIK

Package

Total

Call Graph

Radiology Nuclear Medicine

($$SSANVAL,$$USESSAN)^RAHLRU1 SET^RAPSET1 31^RART ^RASIGU D^RAUTL UPSTATM^RAUTL0 RASET^RAUTL2

VA Fileman

^DIC ^DIK

Package	Total	Caller Graph
Radiology Nuclear Medicine	1	RA BTCHVERIFY

Package

Total

Caller Graph

Radiology Nuclear Medicine

RA BTCHVERIFY

Name	Field # of Occurrence
^DIC	VERIFY+2
^DIK	ASKBAT+1
$$SSANVAL^RAHLRU1	CHK
$$USESSAN^RAHLRU1	CHK+2, CHK+3, CHK+4, CHK+5
SET^RAPSET1	VERIFY+1
31^RART	CHK+3, CHK+5
^RASIGU	ASKVER+2
D^RAUTL	VERIFY+3, VERIFY+4
UPSTATM^RAUTL0	Q1
RASET^RAUTL2	ASKVER+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: VERIFY+2
Function Call: WRITE	Prompt: !!,"Batch: ",$P(Y(0),"^"),?30,"Date Created: " Line Location: VERIFY+3
Function Call: WRITE	Prompt: Y,?65,$S($D(^VA(200,+$P(Y(0),"^",3),0)):$E($P(^(0),"^"),1,14),1:"") Line Location: VERIFY+3
Function Call: WRITE	Prompt: !?30,"Last Printed: ",Y Line Location: VERIFY+4
Function Call: READ	Prompt: "Is this the batch you want to verify? No// " Formatting: !! Timeout: DTIME Variable: X Line Location: ASKVER+0
Function Call: WRITE	Prompt: !!,?3,"Enter 'YES' to verify this batch, or 'NO' not to." Line Location: ASKVER+0
Function Call: WRITE	Prompt: !,LINE Line Location: ASKVER+6
Function Call: READ	Prompt: "Can this batch now be deleted? No// " Formatting: !! Timeout: DTIME Variable: X Line Location: ASKBAT+0
Function Call: WRITE	Prompt: !!?3,"Enter 'YES' to delete this batch, or 'NO' not to." Line Location: ASKBAT+0
Function Call: WRITE	Prompt: !?3,"...deletion complete." Line Location: ASKBAT+1
Function Call: WRITE	Prompt: !?3,"...report for case no. ",RACNDSP," is already verified" Line Location: CHK+2
Function Call: WRITE	Prompt: !,LINE Line Location: CHK+2
Function Call: WRITE	Prompt: !,"Report for case no. ",RACNDSP," for ",$S($D(^DPT(RADFN,0)):$P(^(0),"^"),1:"UNKNOWN") Line Location: CHK+3
Function Call: WRITE	Prompt: !?3,"...report for case no. ",RACN," is already verified" Line Location: CHK+4
Function Call: WRITE	Prompt: !,LINE Line Location: CHK+4
Function Call: WRITE	Prompt: !,"Report for case no. ",RACN," for ",$S($D(^DPT(RADFN,0)):$P(^(0),"^"),1:"UNKNOWN") Line Location: CHK+5
Function Call: WRITE	Prompt: !,LINE Line Location: NXT+1
Routine Call	DIC Line Location: VERIFY+2

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

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	CHK+3, CHK+5
^RABTCH(74.2 - [#74.2]	ASKVER+6
^RARPT - [#74]	CHK+2, CHK+4
^TMP($J	Q1, Q!, NXT+1*
^VA(200 - [#200]	VERIFY+3, ASKVER+3

Name	Line Occurrences
ASKBAT	ASKBAT
ASKVER	ASKVER
CHK	ASKVER+6
Q	VERIFY+2, ASKVER, ASKVER+2
Q1	ASKVER+7, ASKBAT

Name	Field # of Occurrence
^(	ASKVER+6
^(0	VERIFY+3, ASKVER+6, CHK+3, CHK+5

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ASKVER+2, Q!
%W	Q+1!
%X	Q!, Q+1!
%Y1	Q+1!
C	Q+1!
D	Q!
D0	Q!
D1	Q!
DA	ASKBAT+1*, Q!
DDH	Q+2!
DIC	VERIFY+2*!, Q!
DIC("A"	VERIFY+2*
DIC("S"	VERIFY+2*
DIC(0	VERIFY+2*
DIE	Q!
DIK	ASKBAT+1*, Q!
DISYS	Q+2!
DR	Q!
DTIME	ASKVER, ASKBAT
LINE	VERIFY+2*, ASKVER+6, Q!, CHK+2, CHK+4, NXT+1
POP	Q+2!
RA	Q!
RA0	Q!
RAAB	NXT!, NXT+1, NXT+2!
RABTCH	VERIFY+2*, ASKVER+6, ASKBAT+1, Q!
RACN	Q!, CHK+1, CHK+4, CHK+5
RACNDSP	CHK~, CHK+1*, CHK+2, CHK+3
RACNI	Q!, CHK
RACT	ASKVER+6, ASKVER+7, Q!, CHK+2, CHK+4, NXT, NXT+1
RADATE	Q!
RADFN	Q!, CHK, CHK+3, CHK+5
RADTE	Q!, NXT+1
RADTI	Q!, CHK
RAI	ASKVER+6*, Q!
RAONLINE	ASKVER+4*, Q+3!
RAOR	Q!
RAPGM	VERIFY+2*, Q!
RARPT	ASKVER+6*, Q!, CHK+2, CHK+4, NXT+1
RASIG	Q+3!
RASIG("PER"	ASKVER+3
RASN	Q!
RASSAN	CHK~*, CHK+1
RASTI	Q!
RAUP	ASKVER+6, Q1, Q!
RAVER	ASKVER+3*, Q!, Q+3!
U	ASKVER+3
X	ASKVER, ASKBAT, Q+1!
XQUIT	VERIFY+1!
Y	VERIFY+2, VERIFY+3, VERIFY+4, ASKVER+6*, Q+1!
Y(0	VERIFY+3, VERIFY+4

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RABTCH1

Information

Source Information

Call Graph

Call Graph Total: 9

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

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
Q1
NXT
ASKVER
VERIFY	;Verify Batch
CHK
Q
ASKBAT