Routine: RAUTL15

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Radiology Nuclear Medicine	6	$$NAMCODE^RACPTMSC ($$SSANVAL,$$USESSAN)^RAHLRU1 $$ORVR^RAORDU DEL17^RARTE2 UPDTPNT^RAUTL9 ENKILL^RAXREF
Kernel	2	($$LOW,$$RJ,$$UP)^XLFSTR MES^XPDUTL
VA Fileman	2	^DIK $$GET1^DIQ

Package	Total	Caller Graph
Radiology Nuclear Medicine	4	RAORD2 RAPROD RARTE4 RASTEXT

Package

Total

Caller Graph

Radiology Nuclear Medicine

RAORD2 RAPROD RARTE4 RASTEXT

Entry Points

Name	Comments	DBIA/ICR reference
INV(X,X1)	; invalid action message called from the schedule/cancel or hold ; request options. ; X -> point of orgin (option) X1 -> procedure name ; Called from: CZECH subroutine
KMV	; kill miscellaneous variables
VALORD	; validate order data, i.e, has OE/RR order # and the site is running ; a version of OE/RR > 2.5 Called from: 2^RAORD, 3^RAORD & 4^RAORD
EN3(IEN74)	;Delete the skeleton report and pointer from Rad Pt file to ; report if user has not entered any report data (i.e. user ^'d out ; of report entry/edit after the system created a skeleton record). ; If the report is deleted, a bulletin will not be generated!
CZECH(Y)	; check if an order can be cancelled, held, or scheduled. ; Y -> ien of the Rad/Nuc Med Orders file. ; Y1 -> if OE/RR > 2.5 & no order number: 1, else 0 ; Called from: VALORD subroutine
DPROC(RADFN,RADTI,RACNI,RAOIFN)	; Determine if the ordered procedure is ; different from the registered procedure. ; Input Variables: RADFN-Patient DFN ; RADTI-inverse DT of exam (if exists) ; RACNI-IEN on the case node (if exists) ; RAOIFN-IEN of the order ; Output: null-procedures don't differ -OR- no order/exam ; not null-ordered proc_"^"_registered proc data ; registered procedure data includes imaging type, procedure ; type and CPT codes (if any)

External References

Name	Field # of Occurrence
^DIK	EN3+34
$$GET1^DIQ	DPROC+29, DPROC+30, DPROC+31
$$NAMCODE^RACPTMSC	DPROC+28
$$SSANVAL^RAHLRU1	DPROC+25
$$USESSAN^RAHLRU1	DPROC+34, DPROC+35
$$ORVR^RAORDU	CZECH+6
DEL17^RARTE2	EN3+17
UPDTPNT^RAUTL9	EN3+32
ENKILL^RAXREF	EN3+25
$$LOW^XLFSTR	DPROC+32
$$RJ^XLFSTR	DPROC+24
$$UP^XLFSTR	INV+4
MES^XPDUTL	EN3+37

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"Sorry, can't "_$S(X="SCH":"schedule",X="CAN":"cancel",1:"hold") Line Location: INV+5
Function Call: WRITE	Prompt: " this request until OE/RR assigns an order number" Line Location: INV+6
Function Call: WRITE	Prompt: !?3,"for procedure: ",X1,!?3,"Please try later!" Line Location: INV+7

FileNo	Call Tags
^RAMIS(71 - [#71]	GET1^DIQ
^RARPT - [#74]	Classic Fileman Calls
^RA(79.2 - [#79.2]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^RA(72 - [#72]	DPROC+36
^RADPT - [#70]	EN3+23, EN3+28*, DPROC+19
^RAMIS(71 - [#71]	CZECH+8, DPROC+27
^RAO(75.1 - [#75.1]	CZECH+5, DPROC+20
^RARPT - [#74]	EN3+5, EN3+6, EN3+7, EN3+8, EN3+9

Name	Line Occurrences
$$CZECH	VALORD+4
INV	CZECH+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN3+12~
%DT	KMV+1!
%I	KMV+1!
%RET	KMV+1!
%T	KMV+1!
D	EN3+12~, KMV+2!
D0	EN3+12~, KMV+2!
D1	KMV+2!
D2	KMV+2!
D3	KMV+2!
DA	EN3+12~, EN3+24, EN3+25, EN3+28!, EN3+34, KMV+2!
DA(1	EN3+24*
DA(2	EN3+24*
DDER	KMV+2!
DDH	KMV+2!
DG	KMV+2!
DI	KMV+2!
DIC	EN3+12~
DIE	EN3+12~, KMV+2!
DIFLD	KMV+2!
DIG	KMV+2!
DIH	KMV+2!
DIK	EN3+12~, EN3+34*
DISYS	KMV+2!
DIU	KMV+2!
DIW	KMV+2!
DIWF	KMV+2!
DIWL	KMV+2!
DIWR	KMV+2!
DIWT	KMV+2!
DK	KMV+2!
DL	KMV+2!
DM	KMV+2!
DN	KMV+2!
DQ	EN3+12~
DR	EN3+12~, KMV+2!
DT	DPROC+28
G1	VALORD+2~, VALORD+3, VALORD+4
G2	VALORD+2~, VALORD+4*
IEN74	EN3~, EN3+5, EN3+6, EN3+7, EN3+8, EN3+9, EN3+17, EN3+25, EN3+32, EN3+34
POP	KMV+3!
RA	EN3+4~
RA("I"	EN3+7*, EN3+11
RA("P"	EN3+8*, EN3+11
RA("R"	EN3+9*, EN3+11
RA(0	EN3+5*, EN3+10, EN3+11, EN3+21, EN3+22, EN3+23
RA(5	EN3+10*, EN3+11
RA7003	DPROC+18~, DPROC+19*, DPROC+21, DPROC+22, DPROC+24, DPROC+27, DPROC+29, DPROC+31, DPROC+36
RA71	DPROC+23~, DPROC+27*, DPROC+28, DPROC+30
RA751	VALORD+2~, DPROC+18~, DPROC+20*, DPROC+21, DPROC+22
RACNDSP	DPROC+25~, DPROC+26*, DPROC+34
RACNI	EN3+23*, EN3+24, EN3+28, DPROC~, DPROC+19, DPROC+25
RACPT	DPROC+23~, DPROC+28*, DPROC+34, DPROC+35
RACSE	DPROC+23~, DPROC+24*, DPROC+26, DPROC+35
RADFN	EN3+21*, EN3+23, EN3+24, EN3+28, DPROC~, DPROC+19, DPROC+25
RADTI	EN3+22*, EN3+23, EN3+24, EN3+28, DPROC~, DPROC+19, DPROC+25
RAITY	DPROC+23~, DPROC+30*, DPROC+34, DPROC+35
RAOIFN	DPROC~, DPROC+20
>> RAOPT("ORDERPRINTPAT"	DPROC+22
>> RAOPT("ORDERPRINTS"	DPROC+22
>> RAOPTN	CZECH+9
RAORDER	CZECH+4~
RAORDER(0	CZECH+5*, CZECH+6, CZECH+8
>> RAORDS(	VALORD+3, VALORD+4!
RAPRC	DPROC+23~, DPROC+29*, DPROC+34, DPROC+35
RAPRG74	EN3+4~
RASSAN	DPROC+25~*, DPROC+26
RATXT	EN3+4~, EN3+37
RATXT(1	EN3+35*
RATXT(2	EN3+36*
RATXT(3	EN3+37*
RATY	DPROC+23~, DPROC+31, DPROC+32, DPROC+34, DPROC+35
U	CZECH+6, CZECH+8
X	EN3+12~, EN3+28!, INV~, INV+4, INV+5, DPROC+23~, DPROC+34, DPROC+35, DPROC+37, DPROC+38
X1	INV~, INV+4*, INV+7
Y	EN3+12~, CZECH~, CZECH+5, DPROC+23~, DPROC+34, DPROC+35, DPROC+37
Y(0	DPROC+34, DPROC+35, DPROC+36*, DPROC+37
Y1	CZECH+4~, CZECH+8, CZECH+11
Y2	CZECH+7~, CZECH+8*, CZECH+9

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RAUTL15

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: