Routine: RABWORD2

Package	Total	Call Graph
VA Fileman	3	Y^DIQ EN^DIQ1 ^DIR
Kernel	2	HOME^%ZIS $$FMTE^XLFDT
Registration	1	(DEM,ELIG,SVC)^VADPT

Package

Total

Call Graph

VA Fileman

Y^DIQ EN^DIQ1 ^DIR

Kernel

HOME^%ZIS $$FMTE^XLFDT

Registration

(DEM,ELIG,SVC)^VADPT

Package	Total	Caller Graph
Radiology Nuclear Medicine	1	RAORD1

Package

Total

Caller Graph

Radiology Nuclear Medicine

RAORD1

Entry Points

Name	Comments	DBIA/ICR reference
PREV	;Prompt for Copying a previous Order's DX/SC/EC values.
ELIG	;List the Service Connected ratios for the patient
ORDER	; List Exam Orders to select to copy ICD-9 SC/EC Indicator values from
ADDEXAM	;Add DX/SC/EI data to new order when adding order to Last Visit
HDR	; Header

Name	Field # of Occurrence
HOME^%ZIS	HDR+1
Y^DIQ	ORDER+8, ORDER+9
EN^DIQ1	ELIG+5
^DIR	ORDER+15, PREV+14, PREV+17, PREV+20
DEM^VADPT	ELIG+2
ELIG^VADPT	ELIG+2
SVC^VADPT	ELIG+2
$$FMTE^XLFDT	ORDER+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: ORDER+16
Function Call: WRITE	Prompt: !!,"#",?10,"Last Procedures/New Orders",?39,"Order Date",?52,"Imaging Loc." Line Location: HDR+2
Function Call: WRITE	Prompt: !,"------",?10,"----------------------------",?39,"------------",?52,"------------" Line Location: HDR+3
Function Call: WRITE	Prompt: !,"*Invalid selection" Line Location: PREV+21
Function Call: WRITE	Prompt: !,"*No Previous ICD codes entered for this order" Line Location: PREV+23
Function Call: WRITE	Prompt: @IOF,!,VADM(1)_" ("_VA("PID")_") ",$P(VAEL(6),"^",2),!!," * * * Eligibility Information and Service Connected Conditions * * *" Line Location: ELIG+7
Function Call: WRITE	Prompt: !!,?5,"Primary Eligibility: "_RAELIG,!,?5,"A/O Exp.: "_RAAO,?22,"ION Rad.: "_RAIR,?40,"SWAC: "_RAEC,?57,"SHAD: "_RASHAD,! Line Location: ELIG+8
Routine Call	%ZIS Line Location: HDR+1
Routine Call	DIR Line Location: ORDER+15 PREV+14 PREV+17 PREV+20

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(75.1	ORDER+8, ORDER+9
^RADPT - [#70]	ADDEXAM+12
^RAO(75.1 - [#75.1]	ORDER+3, ORDER+4, PREV+23, PREV+24, PREV+25, PREV+26, ADDEXAM+13, ADDEXAM+14, ADDEXAM+15, ADDEXAM+16
^TMP("RACOPY"	PREV+24, PREV+26, ADDEXAM+14, ADDEXAM+16
^XUSEC("PROVIDER"	PREV+7, ADDEXAM+7

Name	Line Occurrences
HDR	ORDER+1, ORDER+16
ORDER	PREV+19
PREV	PREV+27

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> C	ORDER+8, ORDER+9
DA	ELIG+5*!
DIC	ELIG+5*!
DIQ	ELIG+5*!
DIQ(0	ELIG+5*
DIR	ORDER+15!, PREV+11!, PREV+20!
DIR("?"	PREV+14, PREV+17
DIR("A"	PREV+13, PREV+16, PREV+20*
DIR("B"	PREV+13, PREV+16
DIR(0	ORDER+15, PREV+13, PREV+16, PREV+20
DIROUT	ORDER+2~
DIRUT	ORDER+2~
DR	ELIG+5*!
DTOUT	ORDER+2~
DUOUT	ORDER+2~
DUZ	PREV+7, ADDEXAM+7
IOF	ORDER+16, HDR+1, ELIG+7
IOSL	ORDER+14
IOST	ORDER+14
RA751	ORDER+2~
RA751(0	ORDER+4*, ORDER+6, ORDER+7
RA751(16	ORDER+6*, ORDER+12
RA751(2	ORDER+4, ORDER+5, ORDER+8, ORDER+11
RA751(20	ORDER+6, ORDER+9, ORDER+13
RA751(5	ORDER+7*
RAAO	ELIG+1~, ELIG+4*, ELIG+8
RABASEC	PREV+25~, PREV+26, ADDEXAM+11~, ADDEXAM+15, ADDEXAM+16
RACOPY	ORDER+1, ORDER+10, ORDER+11, PREV+19~, ADDEXAM+11~
RACOPY(	ORDER+10*, PREV+21, PREV+23, PREV+24, PREV+25, PREV+26
>> RADFN	ORDER+3, ELIG+5, ELIG+6, ADDEXAM+12
RAEC	ELIG+1~, ELIG+6*, ELIG+8
RAELIG	ELIG+1~, ELIG+3*, ELIG+8
RAIR	ELIG+1~, ELIG+4*, ELIG+8
RALP	ORDER+2~, ORDER+3, ORDER+4, ORDER+10
RAOIEN	ADDEXAM+11~, ADDEXAM+12*, ADDEXAM+13, ADDEXAM+14, ADDEXAM+15, ADDEXAM+16
>> RAOPT("ORDEREXAM"	HDR+1
RAPERC	ELIG+1~, ELIG+3*
RAPREV	PREV+11~, PREV+21, PREV+27
RASC	ELIG+1~, ELIG+3*
RASHAD	ELIG+1~, ELIG+4*, ELIG+8
>> RAVLECNI	ADDEXAM+12
>> RAVLEDTI	ADDEXAM+12
>> RAXIT	ORDER+1, ORDER+2, ORDER+3, ORDER+15*, ORDER+16
RAY	ELIG+1~
RAY(2	ELIG+6
U	ORDER+4, ORDER+6, ORDER+7, ORDER+8, ORDER+9, PREV+26, ADDEXAM+12, ADDEXAM+16
>> VA("PID"	ELIG+7
>> VADM(1	ELIG+7
>> VAEL(1	ELIG+3
>> VAEL(3	PREV+12, PREV+15, ELIG+3
>> VAEL(6	ELIG+7
>> VASV(11	ELIG+4
>> VASV(2	ELIG+4
>> VASV(3	ELIG+4
>> Y	ORDER+8, ORDER+9, ORDER+15, PREV+18, PREV+21, PREV+22, PREV+23, PREV+24, PREV+25, PREV+26

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RABWORD2

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: