Routine: RACPTCSV

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Kernel	1	$$FMTE^XLFDT
Radiology Nuclear Medicine	1	($$ACTCODE,$$ACTMOD,$$NAMCODE)^RACPTMSC
VA Fileman	1	EN^DDIOL

Package	Total	Caller Graph
Radiology Nuclear Medicine	4	RACTEX2 RACTEX3 RACTTK5 RACTTK8

Package

Total

Caller Graph

Radiology Nuclear Medicine

RACTEX2 RACTEX3 RACTTK5 RACTTK8

Entry Points

Name	Comments	DBIA/ICR reference
ACTC()	; find out if CPT CODE is active ; called from file 70.03 field 2's DIC("S") ; Y = ien file 71 ; DA(2) = RADFN ; DA(1) = RADTI
FUTCMOD()	; called from input templates [RA EXAM EDIT], [RA STATUS CHANGE] ; IF exam date is future to first Log Date: ; check CPT Modifier when/after that date arrives ; and last Log Date isn't later than Exam Date ; assumes existing RADFN,RADTI,RACNI,RADTE ; RETURNS 0=at least one CPT Mod is inactive, 1=all CPT Mods active
FUTCQ	;
FUTCMODQ	;
FUTC()	; called from input templates [RA EXAM EDIT], [RA STATUS CHANGE] ; IF exam date is future to first Log Date: ; check CPT CODE when/after that date arrives ; and last Log Date isn't later than Exam Date ; assumes existing RADFN,RADTI,RACNI,RADTE ; RETURNS 0=inact.CPT Code, 1=active CPT Code

Name	Field # of Occurrence
EN^DDIOL	ACTC+53, ACTC+55, ACTC+57, FUTC+23, FUTC+25, FUTC+27, FUTC+28, FUTCMOD+23, FUTCMOD+25, FUTCMOD+28
$$ACTCODE^RACPTMSC	ACTC+30, FUTC+19
$$ACTMOD^RACPTMSC	FUTCMOD+20
$$NAMCODE^RACPTMSC	ACTC+31, FUTC+21
$$FMTE^XLFDT	ACTC+21, ACTC+29

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RADPT - [#70]	ACTC+15, ACTC+25, FUTC+8, FUTC+10, FUTC+11, FUTC+14, FUTC+15, FUTCMOD+8, FUTCMOD+10, FUTCMOD+11 , FUTCMOD+14, FUTCMOD+15, FUTCMOD+18, FUTCMOD+19
^RAMIS(71 - [#71]	ACTC+9, ACTC+20, ACTC+21, ACTC+35, ACTC+46, FUTC+18
^RAO(75.1 - [#75.1]	ACTC+35

Name	Line Occurrences
FUTCMODQ	FUTCMOD+8, FUTCMOD+10, FUTCMOD+11, FUTCMOD+12, FUTCMOD+13, FUTCMOD+14, FUTCMOD+15, FUTCMOD+16
FUTCQ	FUTC+8, FUTC+10, FUTC+11, FUTC+12, FUTC+13, FUTC+14, FUTC+16

Name	Field # of Occurrence
^("I"	ACTC+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA(1	ACTC+15, ACTC+25
>> DA(2	ACTC+15, ACTC+25
DT	ACTC+20, FUTC+13, FUTCMOD+13
RA0	FUTCMOD+6~, FUTCMOD+20*, FUTCMOD+21
RA1	FUTCMOD+6~, FUTCMOD+18*, FUTCMOD+19
RA71	FUTC+6~, FUTC+18*, FUTC+19, FUTC+21
RA710	ACTC+5~, ACTC+9*, ACTC+10, ACTC+11, ACTC+16, ACTC+25, ACTC+45, ACTC+52
RA813	FUTCMOD+6~
RAACTIV	ACTC+5~, ACTC+7, ACTC+11, ACTC+16, ACTC+20, ACTC+25, ACTC+30, ACTC+42, ACTC+43, ACTC+45 , ACTC+46, ACTC+51, ACTC+58
>> RACNI	FUTC+8, FUTC+10, FUTC+11, FUTC+14, FUTC+15, FUTCMOD+8, FUTCMOD+10, FUTCMOD+11, FUTCMOD+14, FUTCMOD+15 , FUTCMOD+18, FUTCMOD+19
RACPT	ACTC+5~, ACTC+10*, ACTC+11, ACTC+30, ACTC+31
RACPTNAM	ACTC+5~, ACTC+31, ACTC+33, FUTC+6~, FUTC+21, FUTC+24
RADATE	ACTC+5~, ACTC+15*, ACTC+29, ACTC+30, ACTC+31
RADATV	ACTC+5~, ACTC+21, ACTC+23, ACTC+29, ACTC+33
>> RADFN	FUTC+8, FUTC+10, FUTC+11, FUTC+14, FUTC+15, FUTCMOD+8, FUTCMOD+10, FUTCMOD+11, FUTCMOD+14, FUTCMOD+15 , FUTCMOD+18, FUTCMOD+19
RADT0	ACTC+5~, ACTC+15*
>> RADTE	FUTC+9, FUTC+19, FUTC+21, FUTCMOD+9, FUTCMOD+20
RADTEX	FUTC+6~, FUTC+9, FUTC+12, FUTC+13, FUTC+16, FUTCMOD+6~, FUTCMOD+9, FUTCMOD+12, FUTCMOD+13, FUTCMOD+16
>> RADTI	FUTC+8, FUTC+10, FUTC+11, FUTC+14, FUTC+15, FUTCMOD+8, FUTCMOD+10, FUTCMOD+11, FUTCMOD+14, FUTCMOD+15 , FUTCMOD+18, FUTCMOD+19
RAI	ACTC+6~, ACTC+8, ACTC+12, ACTC+13, ACTC+17, ACTC+18, ACTC+22, ACTC+23, ACTC+26, ACTC+27 , ACTC+32, ACTC+33, ACTC+36, ACTC+37, ACTC+38, ACTC+39, ACTC+54, ACTC+55
RALOG1	FUTC+6~, FUTC+10, FUTC+11, FUTC+12, FUTCMOD+6~, FUTCMOD+10, FUTCMOD+11, FUTCMOD+12
RALOGL	FUTC+6~, FUTC+14, FUTC+15, FUTC+16, FUTCMOD+6~, FUTCMOD+14, FUTCMOD+15, FUTCMOD+16
RAMODSTR	FUTCMOD+6~, FUTCMOD+24
RAMSG	ACTC+5~, ACTC+52, ACTC+53, ACTC+55, ACTC+56, ACTC+57, FUTC+6~, FUTC+22, FUTC+23, FUTC+24* , FUTC+25, FUTC+26, FUTC+27, FUTCMOD+6~, FUTCMOD+22, FUTCMOD+23, FUTCMOD+24*, FUTCMOD+25
>> RAOPT("REG"	ACTC+35, ACTC+51
>> RAORDS(1	ACTC+35
>> RAPRC	ACTC+51
>> RAPROCI	ACTC+51
RARET	FUTC+6~, FUTC+7, FUTC+19, FUTC+20, FUTCQ+1, FUTCMOD+6~, FUTCMOD+7, FUTCMOD+21, FUTCMOD+28, FUTCMODQ+1
RATXT	ACTC+6~, ACTC+43
RATXT(	ACTC+13, ACTC+18, ACTC+23, ACTC+27, ACTC+33, ACTC+37, ACTC+39*, ACTC+55
RAX	ACTC+6~, FUTC+6~, FUTC+8, FUTC+18, FUTCMOD+6~, FUTCMOD+19, FUTCMOD+20
U	ACTC+10, ACTC+11, ACTC+15, ACTC+16, ACTC+21, ACTC+25, ACTC+31, ACTC+35, ACTC+46, ACTC+52 , FUTC+18, FUTC+21
>> X	ACTC+45, ACTC+46, ACTC+51
>> Y	ACTC+9, ACTC+20, ACTC+21, ACTC+46, ACTC+51

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RACPTCSV

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: