Routine: RAORD

Information

RAORD ;HISC/CAH,FPT,GJC AISC/RMO-Rad/NM Order Entry Main Menu ;3/13/98 12:16

Source Information

Source file <RAORD.m>

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
Radiology Nuclear Medicine	7	^RAORD5 CRCHK^RAORD6 ^RAORDS (,$$ORVR)^RAORDU (CLOSE,ZIS)^RAUTL ($$LK,ULK)^RAUTL19 CHKUSR^RAUTL2
VA Fileman	4	^%DT ^DIC $$GET1^DIQ ^DIR
Kernel	2	HOME^%ZIS ^%ZTLOAD
Health Summary	1	ENX^GMTSDVR

Caller Graph

Caller Graph Total: 6

Package	Total	Caller Graph
Radiology Nuclear Medicine	6	RA ORDERCANCEL RA ORDERHOLD RA ORDERPRINTPAT RA ORDERSCHEDULE RAORD1 RAORR

Entry Points

Name	Comments	DBIA/ICR reference
Q3	; unlock if appropriate, kill variables
Q2	; Unlock if appropriate, kill vars
21	; Patient lookup
START9	; Start printing requests
ENCAN	;OE/RR Entry Point for the CANCEL ACTION Option
31	; Patient lookup
REASON	; Select a Cancel Reason
40	; Patient lookup
41	; Select a Hold Reason
Q9
3	;;Cancel a Request
2	;;Schedule a Request
KILL	; kill variables - called from RAORD1
4	;;Hold a Request
Q35
9	;;Print Selected Requests by Patient
PCR	; Print Cancelled Requests. Called from the 'Cancel A Request' option.
CHECK	; Check on the status of the order
Q4	; unlock if appropriate, kill variables

External References

Name	Field # of Occurrence
^%DT	21+9
HOME^%ZIS	PCR+6
^%ZTLOAD	PCR+5
^DIC	21+1, 31+1, REASON+2, 40+1, 41+1, 9+2
$$GET1^DIQ	ENCAN+15
^DIR	9+8
ENX^GMTSDVR	START9+9
^RAORD5	START9+3
CRCHK^RAORD6	START9+4
^RAORDS	21+7, 31+8, 40+7, 9+2
^RAORDU	21+11, ENCAN+5, 41+7
$$ORVR^RAORDU	21+2, Q2+1, 31+2, Q3+1, 40+2, Q4+1
CLOSE^RAUTL	Q9+6
ZIS^RAUTL	9+11
$$LK^RAUTL19	21+3, 31+3, 40+3
ULK^RAUTL19	Q2+2, Q3+2, Q4+2
CHKUSR^RAUTL2	31+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: 21+1
Function Call: WRITE	Prompt: ! Line Location: 21+9
Function Call: WRITE	Prompt: ! Line Location: 31+1
Function Call: WRITE	Prompt: !?3,"...will now 'CANCEL' selected request(s)..." Line Location: ENCAN+2
Function Call: WRITE	Prompt: !?10,"...",$P(^(0),"^")," cancelled..." Line Location: ENCAN+6
Function Call: WRITE	Prompt: ! Line Location: REASON+2
Function Call: WRITE	Prompt: !!?3,"A Cancel Reason is required to proceed." Line Location: REASON+4
Function Call: WRITE	Prompt: ! Line Location: 40+1
Function Call: WRITE	Prompt: ! Line Location: 41+1
Function Call: WRITE	Prompt: !!?3,"A Hold Reason is required to proceed." Line Location: 41+3
Function Call: WRITE	Prompt: !?3,"...will now 'HOLD' selected request(s)..." Line Location: 41+5
Function Call: WRITE	Prompt: !?10,"...",$P(^(0),"^")," held..." Line Location: 41+8
Function Call: WRITE	Prompt: ! Line Location: 9+4
Function Call: WRITE	Prompt: ! Line Location: 9+11
Function Call: WRITE	Prompt: ! Line Location: Q9+6
Routine Call	%ZIS Line Location: PCR+6
Routine Call	DIC Line Location: 21+1 31+1 REASON+2 40+1 41+1 9+2
Routine Call	DIR Line Location: 9+8

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^%ZIS(1 - [#3.5]	GET1^DIQ
^RA(75.2 - [#75.2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	21+5, 31+5, 40+5, 9+2
^RA(79.1 - [#79.1]	ENCAN+9, ENCAN+10, ENCAN+14
^RAMIS(71 - [#71]	ENCAN+6, 41+8, START9+7
^RAO(75.1 - [#75.1]	ENCAN+6, ENCAN+8, 41+8, START9+6
^TMP("XQORS"	KILL+4
^TMP($J	Q2+6!, Q4+5!, 9+1!, START9+8, START9+10*, Q9+2!, Q9+5!, KILL+5!

Name	Line Occurrences
21	21+2, 21+13
31	31+2
40	40+2, 41+10
41	41+3
PCR	ENCAN+16
Q2	21+1, 21+7, 21+9, 21+13
Q3	31+1, 31+8, 31+9
Q35	Q3+6
Q4	40+1, 40+7, 41+2, 41+10
Q9	9+2, 9+8, 9+11
REASON	31+9, REASON+4

Name	Field # of Occurrence
^("TOT"	KILL+4
^("XQALSET"	Q4+5!
^(0	21+5, 31+5, ENCAN+6, 40+5, 41+8, 9+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	Q3+3!, KILL+1!
%DT	21+8*, 21+9!, Q2+3!, Q3+3!, Q4+3!, Q9!, KILL+1!
%DT("A"	21+8*
A1	Q2+6!
C	Q2+3!, Q3+3!, Q4+3!, Q9!
D	Q2+3!, Q3+3!, Q4+3!, Q9!, KILL+1!
D0	Q2+3!, Q3+3!, Q4+3!, Q9!, KILL+1!
D1	Q2+6!, Q4+5!, KILL+1!
DA	Q2+3!, Q3+3!, Q4+3!, Q9!, KILL+1!
DDER	Q2+6!, Q4+5!
DDH	Q2+6!
DFN	Q9!, KILL+1!
DI	Q2+6!, Q4+5!
DIC	21+1!, 31+1!, REASON+1, REASON+2!, 40+1!, 41+1!, 9+2!, KILL+1!
DIC("A"	REASON+1, 41+1
DIC("S"	REASON+1, 41+1
DIC(0	21+1, 31+1, REASON+1, 40+1, 41+1, 9+2
DIK	KILL+1!
DIPGM	Q2+6!, Q35!, Q4+5!, Q9+5!
DIR	9+4!, Q9+4!
DIR("?"	9+6*
DIR("A"	9+7*
DIR("B"	9+5*
DIR(0	9+5*
DIROUT	9+4!, Q9+4!, KILL+1!
DIRUT	9+4!, 9+8, Q9+4!, KILL+1!
DISYS	Q4+5!, Q9+5!
DIV	KILL+1!
DIW	Q9+5!
DIWT	Q9+5!
DN	Q9+5!
DR	KILL+1!
DTOUT	9+4!, Q9+4!, KILL+1!
DUOUT	Q4+5!, 9+4!, Q9+4!, KILL+1!
DWPK	KILL+1!
GMTSTYP	START9+7*, START9+8, START9+9, START9+10, Q9!
I	Q2+3!, Q35!, Q4+3!, Q9!, PCR+1~, PCR+4*
IO	START9+1
IOF	START9+9
J	KILL+1!
N	Q3+5, Q3+6, Q3+7!
ORCOST	ENCAN+1!
OREND	31+9, Q3+4!, CHECK+1, REASON+5, KILL+1!
>> ORIFN	REASON+5
ORIT	ENCAN+1!
>> ORPK	REASON+5
ORPURG	ENCAN+1!
ORSTOP	ENCAN+1!
ORSTRT	ENCAN+1!
>> ORSTS	CHECK+1
ORTO	ENCAN+1!
ORTX	ENCAN+1!
POP	Q2+6!, Q3+3!, Q4+3!, Q9!
RA6	Q9+5!
RA7	Q9+5!
RA751	ENCAN+8!*, ENCAN+9, ENCAN+13, ENCAN+19!, START9+1~
RA751(0	START9+6*
RA751(2	START9+6*, START9+7
RA791	ENCAN+8!, ENCAN+9*, ENCAN+10, ENCAN+14, ENCAN+19!
RAACI	KILL+3!
RABLNK	KILL+1!
RACNI	Q9!
RACNT	KILL+1!
RACRHD	ENCAN+11!*, ENCAN+17!
RACT	KILL+1!
RADFN	21+5, Q2+1, Q2+2, Q2+3!, 31+5, ENCAN+13~, Q3+1, Q3+2, Q3+3!, 40+5 , Q4+1, Q4+2, Q4+3!, 9+2*, START9+8, START9+9, START9+10, Q9!
RADIV	Q2+3!, Q3+3!, Q4+3!, Q9!, KILL+1!
RADTI	Q9!
RAEXMUL	KILL+1!
RAFIN	KILL+1!
RAFIN1	KILL+1!
RAGMTS	9+8*, START9+5, Q9+2!
RAI	KILL+1!
RAILOC	KILL+1!
RAIMGTYI	KILL+1!
RAION	ENCAN+11!, ENCAN+14, ENCAN+15, ENCAN+17!, PCR+2, PCR+5
RAIP	KILL+1!
RAJ	KILL+1!
RAL0	KILL+1!
RALIFN	KILL+1!
RALOC	KILL+1!
RALOCFLG	KILL+1!
RAMES	Q9+3!
RAMOD	KILL+2!
RAMSG	31+7, Q3+3!
RAMT	KILL+2!
RANME	21+5, Q2+3!, 31+5, Q3+3!, 40+5, Q4+3!, 9+2, Q9!
RANUM	KILL+2!
RAOFNS	21+6, Q2+3!, 31+6, Q3+3!, 40+6, Q4+3!, 9+2, Q9!
RAOIFN	21+11, Q2+3!, ENCAN+5, ENCAN+6, ENCAN+8, Q3+3!, 41+7, 41+8, Q4+3!, START9+2 , START9+6, Q9+1!, KILL+2!
RAOIFNS	9+3*, START9+2, Q9+1!
RAOLP	21+9, 21+10, 21+11, Q2+3!, ENCAN+3, ENCAN+4, ENCAN+5, Q3+3!, 41+5, 41+6 , 41+7, Q4+3!, 9+3, START9+2, Q9+1!
>> RAOPT	9+10
RAOPTN	21+6, Q2+4!, 31+6, Q3+4!, 40+6*, Q4+4!
RAORD0	KILL+2!
RAORDS	21+7, Q2+3!, 31+8, Q3+4!, 40+7, Q4+3!, 9+2, Q9+1!
RAORDS(	21+10, 21+11, ENCAN+4, ENCAN+5, 41+6, 41+7, 9+3
RAOREA	Q3+5, Q3+6!, Q3+7!, 41+4*, Q4+4!
RAOREA(	Q3+7!, REASON+5*
RAOSCH	21+9*, Q2+3!
RAOSTS	21+11, Q2+4!, ENCAN+5, Q3+4!, 41+7*, Q4+4!, Q9+1!
RAOUT	KILL+2!
RAOVSTS	21+6, Q2+4!, 31+7, Q3+4!, 40+6, Q4+4!, 9+2, Q9+1!
RAPARENT	Q2+5!, Q3+5!, Q3+8!, Q4+5!, Q9+1!
RAPGE	ENCAN+11!, ENCAN+17!, START9+3, Q9+1!
RAPIFN	KILL+2!
RAPKG	3+1*, ENCAN+2, ENCAN+6, Q3+4!, KILL+4
RAPOP	9+11, Q9+1!
RAPRC	KILL+2!
RAPREG	KILL+2!
RAPREOP1	KILL+2!
RAPRI	KILL+2!
RAPTLOCK	2+1~, 21+2, 21+3, Q2+1, 3+1~, 31+2, 31+3, Q3+1, 4+1~, 40+2 , 40+3*, Q4+1
RAREASK	KILL+2!
RAREQDT	KILL+2!
RAREQPRT	KILL+2!
RARU	KILL+2!
RARX	KILL+2!
RAS3	KILL+2!
RASEQ	KILL+2!
RASEX	KILL+2!
RASKPREG	KILL+2!
RASTOP	KILL+2!
RASX	KILL+2!
RAWHEN	KILL+2!
RAX	ENCAN+11!, ENCAN+17!, START9+1, START9+2, START9+3, START9+4, Q9+1!, KILL+2!
RAXIT	3+1~, 31+9, REASON+3
VA200	KILL+2!
VAERR	KILL+2!
VAI	Q9+2!, KILL+2!
VAIN	Q9+2!
VAIP	KILL+2!
X	Q2+4!, Q3+5!, Q3+8!, REASON+3, 41+2, Q4+4!, Q9+2!, KILL+2!
>> XQORS	KILL+4
Y	21+1, 21+3, 21+5, 21+9, Q2+4!, 31+1, 31+3, 31+5, Q3+5!, Q3+8! , REASON+3, REASON+4, REASON+5, 40+1, 40+3, 40+5, 41+2, 41+3, 41+4, Q4+4! , 9+2, 9+8, Q9+2!, KILL+2!
Z	Q9+2!
ZTDESC	Q9+3!, PCR+1~, PCR+2*
ZTDTH	PCR+1~, PCR+2*
ZTIO	PCR+1~, PCR+2*
ZTRTN	9+9, Q9+3!, PCR+1~, PCR+3
ZTSAVE	Q9+3!, PCR+1~
ZTSAVE(	PCR+4*
ZTSAVE("RADFN"	9+9*
ZTSAVE("RAGMTS"	9+10*
ZTSAVE("RAOIFNS"	9+9*
ZTSAVE("RAOPT("	9+10*
ZTSK	PCR+1~, PCR+5

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RAORD

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: