Routine: ORCDRA1

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Interaction Calls
Global Variables Directly Accessed
Local Variables

Information

ORCDRA1 ;SLC/MKB-Utility functions for RA dialogs ; 08 May 2002 2:12 PM

Source Information

Source file <ORCDRA1.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Order Entry Results Reporting	2	($$PTR,$$VAL)^ORCD $$DIV^OREVNTX
Radiology Nuclear Medicine	1	EN4^RAO7PC1
Registration	1	$$SITE^VASITE
VA Fileman	1	^DIR

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Order Entry Results Reporting	2	ORCDRA ORWDXM2

Entry Points

Name	Comments	DBIA/ICR reference
CKPTYPE	; -- Check procedure for Series type
DIV()	; -- Returns division of ordering location
VALIDWP(ROOT)	; -- Validate wp field (borrowed from VALWP^RAUTL5) ; Pass back '1' is data is valid, '0' if not valid.
DEFLOC()	; -- Returns default imaging location
CHNGCAT	; -- Kill dependent values if Category changes
MATCH(CATG)	; -- Category match pt location type?
MODE()	; -- Returns default mode of transport
ILOC	; -- Get allowable imaging locations
DIVQ
SCHEDULD()	; -- Returns 1 or 0, if patient is scheduled for pre-op

Name	Field # of Occurrence
^DIR	SCHEDULD+4
$$PTR^ORCD	MATCH+5
$$VAL^ORCD	CKPTYPE+1
$$DIV^OREVNTX	DIV+2
EN4^RAO7PC1	ILOC+2
$$SITE^VASITE	DIV+1

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!,"This procedure modifier may not be selected with a procedure series!",! Line Location: CKPTYPE+3
Routine Call	DIR Line Location: SCHEDULD+4

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101.41 - [#101.41]	CHNGCAT+3, MODE+2
^ORD(101.43 - [#101.43]	CKPTYPE+1
^RAMIS(71.2 - [#71.2]	CKPTYPE+2, MODE+3
^SC - [#44]	DIV+1, MATCH+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CATG	MATCH~, MATCH+3, MATCH+4
CHAR	VALIDWP+3~, VALIDWP+10*, VALIDWP+11
CNT	VALIDWP+3~, VALIDWP+6, VALIDWP+10, VALIDWP+11, ILOC+1~, ILOC+3, ILOC+4*, ILOC+6
DIR	SCHEDULD+1~
DIR("A"	SCHEDULD+3*
DIR("B"	SCHEDULD+4*
DIR(0	SCHEDULD+3*
DIROUT	SCHEDULD+1~
DIRUT	SCHEDULD+1~
DONE	CKPTYPE+4!
DT	DIV+1
DTOUT	SCHEDULD+1~, SCHEDULD+4
DUOUT	SCHEDULD+1~, SCHEDULD+4
DUZ(2	DIV+3
I	MODE+1~, MODE+2, MODE+4, DEFLOC+1~, DEFLOC+2*
IFN	ILOC+1~, ILOC+3*, ILOC+4, ILOC+5
ITYPE	ILOC+1~, ILOC+2*
M	MODE+1~, MODE+2*, MODE+4
>> ORDG	ILOC+2
>> ORDIALOG(	CKPTYPE+4!, CHNGCAT+4!, MATCH+5, SCHEDULD+2, MODE+4, ILOC+1!, ILOC+4, ILOC+5, ILOC+6, DEFLOC+1 , DEFLOC+2
>> ORDIV	DEFLOC+2
>> OREVENT	DIV+1, DIV+2, MATCH+1
>> ORI	CKPTYPE+4
>> ORL	DIV+1, MATCH+2
>> ORQUIT	SCHEDULD+4*
>> ORTYPE	MODE+1
>> ORWARD	MODE+5
ORY	ILOC+1~
ORY(	ILOC+3, ILOC+4, ILOC+5
P	CHNGCAT+1~, CHNGCAT+2, CHNGCAT+3, MODE+1~, MODE+3, MODE+4
>> PROMPT	CKPTYPE+4, SCHEDULD+2, ILOC+1, ILOC+4, ILOC+5, ILOC+6, DEFLOC+1, DEFLOC+2
PTR	CHNGCAT+1~, CHNGCAT+3*, CHNGCAT+4
PTYPE	CKPTYPE+1~*, CKPTYPE+2
ROOT	VALIDWP~, VALIDWP+2, VALIDWP+5, VALIDWP+7
SCREEN	MATCH+2~, MATCH+3, MATCH+4, MATCH+5
TYPE	MATCH+2~*, MATCH+3, MATCH+4
U	DIV+1, CKPTYPE+1, CKPTYPE+2, MATCH+2, ILOC+2, ILOC+4, ILOC+5, DEFLOC+2
WL	VALIDWP+3~, VALIDWP+6, VALIDWP+8, VALIDWP+9
WPFLG	VALIDWP+3~, VALIDWP+4, VALIDWP+5, VALIDWP+9, VALIDWP+11, VALIDWP+12
X	VALIDWP+3~, VALIDWP+4, VALIDWP+5, VALIDWP+7, SCHEDULD+1~, DEFLOC+1~, DEFLOC+2, DEFLOC+3
Y	DIV+1~, DIV+2, DIV+3, DIVQ, CKPTYPE+2, VALIDWP+3~, VALIDWP+7, VALIDWP+8, VALIDWP+10, MATCH+2~* , MATCH+5, MATCH+6, SCHEDULD+1~, SCHEDULD+5, MODE+4, MODE+5, MODE+6, ILOC+6
Z	VALIDWP+3~, VALIDWP+9*, VALIDWP+10

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORCDRA1

Call Graph Total: 5

Caller Graph Total: 2