Routine: RARTE3

Customize PDF page

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

Information

RARTE3 ;HISC/GJC-Create a skeletal report, store in Error Reports multiple ;2/4/97 09:39

Source Information

Source file <RARTE3.m>

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
Kernel	1	$$NOW^XLFDT
VA FileMan	1	UPDATE^DIE

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Radiology Nuclear Medicine	1	RARTE1

Entry Points

Name	Comments	DBIA/ICR reference
EN1(RADA)	; Create the 'Error Reports' sub-record. ; Input: 'RADA': IEN of the report in file 74. ; Create the record, enter when the report was unverified.
ZERO	; setup the ^TMP($J,"RA AUTOE" global with a zero node
CHK17	; called from routine RARTE1 ; check 17th piece of exam with same pat/dttm/longcn ; values of RAOK: ; 1 = unknown case no. or unknown case ien, CAN'T DELETE REPORT ; 2 = exm doesn't point to this rpt, CAN DELETE BUT NOT UPGRADE EXM STAT ; 3 = all okay
WARN1
WARN2
WARNQ
PRESS

External References

Name	Field # of Occurrence
UPDATE^DIE	EN1+6
$$NOW^XLFDT	EN1+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3," Cannot determine internal or external case number. " Line Location: WARN1+0
Function Call: WRITE	Prompt: !!?3," You may NOT delete this report. " Line Location: WARN1+1
Function Call: WRITE	Prompt: !!?3," This report refers to an exam that isn't pointing back to this report. " Line Location: WARN2+0
Function Call: WRITE	Prompt: !!?3," You may delete this report if it is indeed the report you don't want. " Line Location: WARNQ+0
Function Call: WRITE	Prompt: !?3," Or call IRM for help. " Line Location: WARNQ+1
Routine Call	DIE Line Location: EN1+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RADPT - [#70]	CHK17+12, CHK17+14
^RARPT - [#74]	ZERO+1, ZERO+4
^TMP($J	EN1+3, EN1+9, EN1+10!, ZERO+3, ZERO+4

Label References

Name	Line Occurrences
PRESS	CHK17+11, CHK17+13, CHK17+14
WARN1	CHK17+11, CHK17+13
WARN2	CHK17+14
ZERO	EN1+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DTIME	PRESS
I	ZERO+2~, ZERO+3, ZERO+4
>> RA0	CHK17+7, CHK17+10
>> RACN	CHK17+10*, CHK17+11, CHK17+12
>> RACNI	CHK17+12*, CHK17+13, CHK17+14
RACNT	EN1+4~, EN1+9*, ZERO+1
RADA	EN1~, EN1+5, EN1+8*, ZERO+1, ZERO+4
RADA(1	EN1+8*, ZERO+1, ZERO+4
>> RADFN	CHK17+7*, CHK17+12, CHK17+14
>> RADTI	CHK17+7*, CHK17+12, CHK17+14
RAIEN	EN1+4~, CHK17+14
RAIEN(1	EN1+8
RANEW	EN1+4~
RANEW(	EN1+5*
RANOW	EN1+4~*, EN1+5, ZERO+1
>> RAOK	CHK17+6, WARN1+2, WARN2+1*
X	EN1+4~, PRESS*