Routine: RADPA

Information

RADPA ;HISC/GJC AISC/MJK,RMO-Look-up Rad/Nuc Med Patients ;4/17/96 11:41

Source file <RADPA.m>

Package	Total	Call Graph
VA Fileman	2	^DIC ^DIE

Package	Total	Caller Graph
Radiology Nuclear Medicine	13	RACNLU RADEM2 RAEDPT RAERRPT RAJAC RAOUT RAPAST RAPROQ RAPROS RAPTLU RAREG RART1 RART2

Name	Line Occurrences
Function Call: WRITE	Prompt: !?5,"Enter patient name in 'Last,First Middle' format [3-30 characters].",$C(7) Line Location: PAT+15
Function Call: WRITE	Prompt: ! Line Location: PAT+26
Routine Call	DIE Line Location: 1
Routine Call	DIC Line Location: PAT+26

Name	Line Occurrences (* Changed, ! Killed)
^DIC(195.4	Q
^DISV(	PAT+1, PAT+2, Q
^DPT - [#2]	PAT+12
^RADPT("B"	PAT+6, PAT+20, PAT+27

Name	Field # of Occurrence
%	1!
%Y	1!
C	1!
D	1!
D0	1!
DA	1*!
DE	1!
DIC	PAT+23*, 1!
DIC("A"	PAT+24*, Q+1!
DIC("DR"	PAT+23*, Q+1!
DIC("W"	PAT+10, PAT+12, PAT+17*, PAT+20
DIC(0	PAT, PAT+10, PAT+12, PAT+17, PAT+21, PAT+23, PAT+24, 1*
DIE	1*!
DIERR	PAT+25!
DLAYGO	PAT+23*, PAT+26!
DQ	1!
DR	1*!
DTIME	PAT+8
DUZ	PAT+1, PAT+2, PAT+23, Q
>> RA("RA REG"	PAT+6
RAFLG	PAT+1~*, PAT+2, PAT+6, PAT+12, PAT+20, PAT+27
RAIC	Q+1!, 1!
RAIC(0	PAT+23*, PAT+26
>> RAOPT("REG"	PAT+20, PAT+27
RAPTFL	PAT+26*, 1!
RAY	PAT+1~, PAT+6, PAT+7, PAT+9
X	PAT+7, PAT+8, PAT+9, PAT+10, PAT+11, PAT+12*, PAT+14, PAT+15!, PAT+27
>> Y	PAT*, PAT+26, PAT+27, Q, 1