Routine: RAO7XX

Package	Total	Call Graph
Radiology Nuclear Medicine	6	EN1^RAO7NEW (SETALERT,SETNOTIF)^RAO7PC4 SVBEFOR^RAO7UTL $$ORVR^RAORDU (STR70,STR751)^RAUTL10 $$GETTCOM^RAUTL11
VA Fileman	4	EN^DDIOL FIELD^DID $$GET1^DIQ ^DIR
Kernel	1	$$PATCH^XPDUTL

Package	Total	Caller Graph
Radiology Nuclear Medicine	10	RACTEX7 RACTTK8 RAEDCN RAEDPT RAMAG06A RAO7NEW RAREG2 RASTED RAUTL1 RAUTL11

Entry Points

Name	Comments	DBIA/ICR reference
FNDIN70(RAPATN,RAORDN,RETRN)	;
MODIF70(RA18D1,RA18D2)	;P18 uses data of Modifiers from #70 for OBR(18)
B2P18
UPDTRA0	;P18 updates var RAO with data from file #70 and sets RAD70SB variable (D2^D3 of #70), called from RAO7NEW
FNDIN70M(RAPT,RADT,RACSN,RARET)
ZZ(RAPTID,RAPFIEN,RAPTIEN)	; Additional text for display when processing alert.
ORCSET
CMPEXIT	;
TCPROMPT()	;called from input templates to immitate prompt
SVBEFOR(RAPATN,RAINVDT,RACIEN)	;P18;send radfn,radti,racni (instead of racn and new sequencing of params
CHCK
DSCRP	;get field description
CMPAFTR(SNDALERT)	;P18
B1P18
QQQ
ISCHNGD(RAIEN751,SNDALERT)	;P18
EN1(RAOIFN1)	;P18 entry point for "Register exams" and "Add to last visit" options

External References

Name	Field # of Occurrence
EN^DDIOL	ZZ+13, ZZ+14, ZZ+15
FIELD^DID	TCPROMPT+3
$$GET1^DIQ	ZZ+8, ZZ+9, ZZ+10, ZZ+11
^DIR	TCPROMPT+10
EN1^RAO7NEW	CHCK+1, B2P18+3
SETALERT^RAO7PC4	ISCHNGD+23, CMPAFTR+28
SETNOTIF^RAO7PC4	ISCHNGD+22, CMPAFTR+27
SVBEFOR^RAO7UTL	SVBEFOR+1
$$ORVR^RAORDU	CHCK+1, B2P18+3
STR70^RAUTL10	ISCHNGD+16, CMPAFTR+20
STR751^RAUTL10	ISCHNGD+15
$$GETTCOM^RAUTL11	TCPROMPT+8
$$PATCH^XPDUTL	ISCHNGD+22, B1P18, CMPAFTR+27, B2P18

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,RA18B("DESCRIPTION",RA18D) Line Location: DSCRP+2
Routine Call	DIR Line Location: TCPROMPT+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RADPT - [#70]	GET1^DIQ
70.07	FIELD^DID
^RAMIS(71 - [#71]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RADPT - [#70]	FNDIN70M+4, FNDIN70M+6, FNDIN70M+8, FNDIN70+6, FNDIN70+8, UPDTRA0+6, MODIF70+1, MODIF70+3, MODIF70+4, CMPAFTR+9 , CMPEXIT+4, CMPEXIT+7
^RADPT("AO"	FNDIN70+2, FNDIN70+4
^RAMIS(71 - [#71]	EN1+3, EN1+4, UPDTRA0+9, CMPAFTR+12
^RAMIS(71.2 - [#71.2]	MODIF70+5
^RAO(75.1 - [#75.1]	EN1+2, EN1+3, EN1+4, ISCHNGD+2, CMPAFTR+12

Label References

Name	Line Occurrences
$$FNDIN70	ISCHNGD+5, ISCHNGD+6, UPDTRA0+4
$$ISCHNGD	EN1+6
CMPEXIT	CMPAFTR+10, CMPAFTR+11, CMPAFTR+13, CMPAFTR+22, B2P18
ORCSET	UPDTRA0+8
QQQ	CMPEXIT+2, CMPEXIT+5

Naked Globals

Name	Field # of Occurrence
^(	CMPEXIT+4, CMPEXIT+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	MODIF70+2, MODIF70+3, MODIF70+4
>> B(0	MODIF70+4*, MODIF70+5
>> B(1	MODIF70+5*, MODIF70+6, MODIF70+7
DA	TCPROMPT+1~
DIR	TCPROMPT+1~
DIR("?"	TCPROMPT+5*
DIR("??"	TCPROMPT+6*
DIR("A"	TCPROMPT+7*
DIR("B"	TCPROMPT+9*
DIR(0	TCPROMPT+4*
DIROUT	TCPROMPT+1~
DIRUT	TCPROMPT+1~
DTOUT	TCPROMPT+1~
DUOUT	TCPROMPT+1~
DUZ	ORCSET
I	CMPAFTR+2~
J	CMPAFTR+3~
>> RA("OBR"	MODIF70+6, MODIF70+7, MODIF70+9
RA0	UPDTRA0+4, UPDTRA0+8, UPDTRA0+9, UPDTRA0+10, UPDTRA0+11, ORCSET*, MODIF70+1, MODIF70+3, MODIF70+4, CMPAFTR+6~
RA1	CMPAFTR+6~
RA18A	FNDIN70+1~, FNDIN70+2, FNDIN70+3, FNDIN70+4, FNDIN70+6, FNDIN70+7, FNDIN70+8, TCPROMPT+1~, TCPROMPT+2, TCPROMPT+3
RA18B	FNDIN70+1~, FNDIN70+4*, FNDIN70+5, FNDIN70+6, FNDIN70+7, FNDIN70+8, TCPROMPT+1~
RA18B("DESCRIPTION"	DSCRP+2
RA18B("HELP-PROMPT"	TCPROMPT+5
RA18B("INPUT	TRANSFORM" , TCPROMPT+4
RA18C	TCPROMPT+1~, TCPROMPT+8*, TCPROMPT+9, TCPROMPT+11
RA18D	DSCRP+1~, DSCRP+2
RA18D1	MODIF70~, MODIF70+1, MODIF70+3, MODIF70+4
RA18D2	MODIF70~, MODIF70+1, MODIF70+3, MODIF70+4
RA2	CMPAFTR+6~
RA3	CMPAFTR+6~
RACHANGE	ISCHNGD+1~, ISCHNGD+11, ISCHNGD+12, ISCHNGD+14, ISCHNGD+17, ISCHNGD+18, CMPAFTR+6~, CMPAFTR+8, CMPAFTR+15, CMPAFTR+18* , CMPAFTR+21, CMPAFTR+22, CMPEXIT+2, CMPEXIT+4, CMPEXIT+5, CMPEXIT+7*, QQQ
RACIEN	SVBEFOR~, SVBEFOR+1
>> RACNI	TCPROMPT+8
RACSN	FNDIN70M~, FNDIN70M+4
RAD70	ISCHNGD+5~, ISCHNGD+7, ISCHNGD+10, ISCHNGD+14, UPDTRA0+1~, UPDTRA0+2, UPDTRA0+4, UPDTRA0+6, UPDTRA0+8, UPDTRA0+9 , UPDTRA0+10, UPDTRA0+11
RAD70SB	ISCHNGD+6~, ISCHNGD+16, ISCHNGD+19, UPDTRA0+4, UPDTRA0+6*
RAD751	ISCHNGD+2~*, ISCHNGD+3, ISCHNGD+4, ISCHNGD+8, ISCHNGD+9
RADATA	CMPAFTR+6~, CMPAFTR+9*, CMPAFTR+10, CMPAFTR+11, CMPAFTR+12, CMPAFTR+15, CMPAFTR+16, CMPAFTR+18, CMPAFTR+27, B2P18+3
>> RADFN	TCPROMPT+8
RADT	FNDIN70M~, FNDIN70M+4, FNDIN70M+6, FNDIN70M+7, FNDIN70M+8
>> RADTI	TCPROMPT+8
>> RAECH(2	MODIF70+7, MODIF70+9
RAIEN751	ISCHNGD~, ISCHNGD+2, ISCHNGD+5, ISCHNGD+6, ISCHNGD+15, ISCHNGD+22
RAINVDT	SVBEFOR~, SVBEFOR+1
RALFL	FNDIN70M+1~, FNDIN70M+2*
RALV	FNDIN70M+1~, FNDIN70M+2, FNDIN70M+4, FNDIN70M+5, FNDIN70M+6, FNDIN70M+7, FNDIN70M+8
RALVAR2	FNDIN70M+3~
>> RAOIFN	UPDTRA0+4
RAOIFN1	EN1~, EN1+2, EN1+3, EN1+4, EN1+6, CHCK+1
RAORDN	FNDIN70~, FNDIN70+2, FNDIN70+4
RAPAT	ISCHNGD+4~*, ISCHNGD+5, ISCHNGD+6, ISCHNGD+16, ISCHNGD+19
RAPATN	FNDIN70~, FNDIN70+2, FNDIN70+4, FNDIN70+6, FNDIN70+8, SVBEFOR~, SVBEFOR+1
RAPFIEN	ZZ~, ZZ+3*, ZZ+10
RAPHYSID	ISCHNGD+9~*, ISCHNGD+14, ISCHNGD+20
RAPNAM	ZZ+6~, ZZ+8*, ZZ+13
>> RAPR70	ISCHNGD+10*, ISCHNGD+12, ISCHNGD+13
RAPR751	ISCHNGD+8~*, ISCHNGD+12, ISCHNGD+13
RAPRFR	ZZ+6~, ZZ+10*, ZZ+14
RAPRIEN	CMPAFTR+5, CMPAFTR+15, CMPAFTR+16, QQQ!
RAPRIEN("CMOD"	CMPEXIT+4
RAPRIEN("TCOM"	CMPEXIT+7
RAPRIEN(1	UPDTRA0+6, CMPAFTR+9, CMPAFTR+20, CMPAFTR+23, CMPEXIT+4, CMPEXIT+7
RAPRIEN(2	UPDTRA0+6, CMPAFTR+9, CMPAFTR+20, CMPAFTR+23, CMPEXIT+4, CMPEXIT+7
RAPRIEN(3	UPDTRA0+6, CMPAFTR+9, CMPAFTR+20, CMPAFTR+23, CMPEXIT+4, CMPEXIT+7
RAPRIEN(4	CMPAFTR+18, CMPAFTR+24
RAPRIEN(5	CMPAFTR+21
RAPRTO	ZZ+6~, ZZ+11*, ZZ+15
RAPRTYPE	EN1+4~, EN1+5, ISCHNGD+12, ISCHNGD+13, CMPAFTR+6~, CMPAFTR+12, CMPAFTR+13, CMPAFTR+15, CMPAFTR+16
RAPSSN	ZZ+6~, ZZ+9*, ZZ+13
RAPT	FNDIN70M~, FNDIN70M+4, FNDIN70M+6, FNDIN70M+8
RAPTID	ZZ~, ZZ+2*, ZZ+8, ZZ+9
RAPTIEN	ZZ~, ZZ+4*, ZZ+11
RAREGMOD	EN1+1!, CHCK~, UPDTRA0+4, UPDTRA0+6, CMPAFTR+1!, B2P18+2~
RARET	FNDIN70M~, FNDIN70M+6, FNDIN70M+7
RASTRING	ISCHNGD+1~, ISCHNGD+2, ISCHNGD+12, ISCHNGD+13, ISCHNGD+14, ISCHNGD+17, ISCHNGD+19, ISCHNGD+20, CMPAFTR+6~, CMPAFTR+7 , CMPAFTR+15, CMPAFTR+16, CMPAFTR+18, CMPAFTR+21, CMPAFTR+23, CMPAFTR+24
RAVAL2	FNDIN70M+3~
RAX	CMPAFTR+6~, CMPAFTR+20, CMPAFTR+21, CMPEXIT+3, CMPEXIT+4, CMPEXIT+6, CMPEXIT+7
RAX70	ISCHNGD+1~, ISCHNGD+16, ISCHNGD+17
RAX751	ISCHNGD+1~, ISCHNGD+15, ISCHNGD+17
>> RAXIT	MODIF70+2, MODIF70+3, MODIF70+6
RETRN	FNDIN70~, FNDIN70+6, FNDIN70+7
SNDALERT	ISCHNGD~, ISCHNGD+21, CMPAFTR~, CMPAFTR+26
U	MODIF70+5
X	TCPROMPT+1~
Y	CMPAFTR+4~, TCPROMPT+1~, TCPROMPT+11, TCPROMPT+12

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RAO7XX

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: