Routine: RASITE

Package	Total	Call Graph
VA FileMan	6	^%DT ^DIC YN^DICN ^DIE EN1^DIP ^DIR
Kernel	1	HOME^%ZIS

Package	Total	Caller Graph
Radiology Nuclear Medicine	9	PROCEDURE MODIFIERS RA DEVICE RA FAILSOFT RA IMGLOG RA OERR EDIT RA QUICK EXAM ORDER RACTRG2 RAORD1 RARTST2A

Entry Points

Name	Comments	DBIA/ICR reference
2	;;Device Specifications
21	; Select an existing imaging location & answer the default printer prompts. ; * INC27764882: P205/Ski Removes LAYGO access & references to the variable 'DLAYGO'. *
Q2
3	;;Failsoft Parameters
Q3
5	;;Imaging Type Activity Log
ITYPE(X)	;get image type for procedure in 71
IMAG(X)	;set string of passed image type
DEVHLP	; Display printer assignment help text to the user.
ARP	;Set After Hours Request Printer parameters.
SETIME(DA,RAFLD)	;called from [RA SITE MANAGER] input template
SCRX(RAFLD,X)	;input transform (cannot add to DD)
DEL	;Required field missing - delete all

External References

Name	Field # of Occurrence
^%DT	SCRX+3
HOME^%ZIS	DEVHLP+3
^DIC	21+2, 3+1
YN^DICN	2+3
^DIE	21+3, 3+1, DEL+2, DEL+6
EN1^DIP	5+1
^DIR	SETIME+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Do you want to see a 'help' message on printer assignment" Line Location: 2+2
Function Call: WRITE	Prompt: !!?3,"Enter 'Yes' to see the help message, or 'No' not to." Line Location: 2+4
Function Call: WRITE	Prompt: ! Line Location: 21+2
Function Call: WRITE	Prompt: @IOF Line Location: DEVHLP+3
Function Call: WRITE	Prompt: !,"Default Printer Assignments:",!,"----------------------------" Line Location: DEVHLP+4
Function Call: WRITE	Prompt: !,"There are seven imaging location parameters that the coordinator will" Line Location: DEVHLP+5
Function Call: WRITE	Prompt: !,"not be able to enter. They are the default printers; specifically, the" Line Location: DEVHLP+6
Function Call: WRITE	Prompt: !,"default flash card/exam label, jacket label, request, registered request," Line Location: DEVHLP+7
Function Call: WRITE	Prompt: !,"alternate request, request cancellation, radiopharmaceutical dosage ticket," Line Location: DEVHLP+8
Function Call: WRITE	Prompt: !,"and report printers. Once you have assigned these printer names to a location," Line Location: DEVHLP+9
Function Call: WRITE	Prompt: !,"the module will automatically route output to the appropriate printer" Line Location: DEVHLP+10
Function Call: WRITE	Prompt: !,"without having to ask the user. NOTE: If you have more than one imaging" Line Location: DEVHLP+11
Function Call: WRITE	Prompt: !,"location within an imaging type the Division parameter 'Ask Imaging Location'" Line Location: DEVHLP+12
Function Call: WRITE	Prompt: !,"must be set to 'yes' in order to print cancelled requests on the request" Line Location: DEVHLP+13
Function Call: WRITE	Prompt: !,"cancellation printer." Line Location: DEVHLP+14
Function Call: WRITE	Prompt: !,"Usage required - must delete..." Line Location: ARP+18
Function Call: WRITE	Prompt: !,"Time entries required - must delete..." Line Location: ARP+20
Function Call: WRITE	Prompt: !,"Category required - must delete..." Line Location: ARP+21
Function Call: WRITE	Prompt: !,"Category or location required - must delete..." Line Location: ARP+24
Routine Call	DIC Line Location: 21+2 3+1
Routine Call	DIE Line Location: 21+3 3+1 DEL+2 DEL+6
Routine Call	DIR Line Location: SETIME+5
Routine Call	%ZIS Line Location: DEVHLP+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RA(79.1 - [#79.1]	Classic Fileman Calls
^RA(79.2 - [#79.2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RA(79.1 - [#79.1]	ARP+16, ARP+20, ARP+24, DEL+4
^RA(79.2 - [#79.2]	IMAG+4
^RAMIS(71 - [#71]	ITYPE+3, ITYPE+4

Label References

Name	Line Occurrences
$$IMAG	ITYPE+5
21	21+5
ARP	21+4
DEL	ARP+17, ARP+18, ARP+20, ARP+21, ARP+24
DEVHLP	2+7
Q2	2+6, 21+2, 21+5
Q3	3+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	2+1, 2+3*, 2+4, 2+6, 2+7, Q2!, 3+1!
%DT	3+1!, SCRX+1~, SCRX+2*
%W	Q2!
%X	Q2!, 3+1!
%Y	Q2!, 3+1!
BY	5+1*!
C	Q2!
D	Q2!, 3+1!
D0	Q2!, 3+1!
D1	Q2!, 3+1!
DA	21+3, Q2!, 3+1!, ARP+14, ARP+16, ARP+20, ARP+24, SETIME~, SETIME+2, DEL+5*
DA(1	DEL+6*
DDER	Q3!
DDH	Q3!
DE	21+5!, 3+1!
DHD	5+1!
DI	Q2!, 3+1!
DIC	21+2!, 3+1!, 5+1*
DIC("A"	21+2*
DIC(0	21+2, 3+1
DIE	21+3, 21+5!, 3+1!, ARP+15!, DEL+1!, DEL+3!, DEL+6*
DIE("NO^"	3+1*
DIR	SETIME+3~
DIR(0	SETIME+4*
DISYS	Q2+1!, Q3!
DIW	Q2!
DIWF	Q2!
DIWL	Q2!
DIWR	Q2!
DIWT	Q2!
DLAYGO	3+1!
DN	Q2!
DQ	21+5!, 3+1!
DR	21+3, 21+5!, 3+1!, ARP+15!, DEL+1!, DEL+2, DEL+3!, DEL+6
FLDS	5+1*!
FR	5+1*!
I	Q2!, Q3!
IOF	DEVHLP+3
>> L	5+1*
POP	Q2!, Q3!, 5+1!
RA791	Q2+1!
RA792	Q2+1!
RADA	ARP+14~, DEL+4*, DEL+5
RADA1	ARP+14~*, DEL+4, DEL+6
RAFLD	SETIME~, SETIME+2, SETIME+4, SCRX~, SCRX+5, SCRX+6
RAI	Q2!
RAJ	Q2!
RAPU	ARP+14~, ARP+18*, ARP+19, ARP+23
RARP	ARP+14~, ARP+16*, ARP+17, ARP+18, ARP+21
>> RASERIES	ITYPE+3*
TO	5+1*!
U	ITYPE+3, ITYPE+4, IMAG+5, ARP+18, ARP+20, ARP+21, ARP+24
X	Q2!, 3+1!, ITYPE~, ITYPE+3, ITYPE+4, ITYPE+5, IMAG~, IMAG+4, IMAG+5, SCRX~ , SCRX+2, SCRX+4*, SCRX+5, SCRX+6
Y	21+2, 21+3, Q2!, 3+1, IMAG+3~, IMAG+4*, IMAG+5, SETIME+3~, SETIME+6, SCRX+1~ , SCRX+3, SCRX+4
Z	Q2!

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RASITE

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: