Routine: RAUTL0

Information

RAUTL0 ;HISC/CAH,FPT,GJC-Utility Routine ; 20 Apr 2011 7:15 PM

Source Information

Source file <RAUTL0.m>

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
Radiology Nuclear Medicine	9	($$ACTCODE,$$NAMCODE)^RACPTMSC $$ORVR^RAORDU ^RARTFLDS STUFF^RARTST $$SSN^RAUTL OENOTE^RAUTL00 UP1^RAUTL1 RASET^RAUTL2 $$PCE^RAWORK
Kernel	2	^%ZTLOAD $$FMTE^XLFDT
MailMan	1	^XMB
Scheduling	1	EN3^SDACS
VA Fileman	1	$$GET1^DIQ

Caller Graph

Caller Graph Total: 7

Package	Total	Caller Graph
Radiology Nuclear Medicine	7	RABTCH1 RAHLO1 RART RARTE4 RARTVER RASTED RAUTL1

Entry Points

Name	Comments	DBIA/ICR reference
STAT	;TASKMAN ENTRY POINT TO UPDATE STATUS OF ONE REPORT
EN	;Entry point to credit x-ray clinic stops
NOGO
STATM1	; Update statuses of multiple reports
UPSTAT	;QUEUE ONE REPORT TO UPDATE STATUS
EXIT
UPSTATM	;QUEUE MULTIPLE REPORTS TO UPDATE STATUSES
STPCDE(RA0,RA1,RA2,RA3,RA4)	; Bulletin for Stop Code Credit error ; RA0 -> stop code numbers seperated by "^"'s (if not null) ; RA1 -> Rad/Nuc Med user (DUZ) RA2 -> Patient (RADFN) ; RA3 -> Inverse Xam D/T (RADTI) RA4 -> Exam node (RACNI)
STATM	;TASKMAN ENTRY POINT TO UPDATE STATUSES OF MULTIPLE REPORTS
CON

External References

Name	Field # of Occurrence
^%ZTLOAD	UPSTAT+9, UPSTATM+4
$$GET1^DIQ	UPSTAT+4, UPSTATM+2
$$ACTCODE^RACPTMSC	STPCDE+18
$$NAMCODE^RACPTMSC	EN+5, STPCDE+17
$$ORVR^RAORDU	STAT+4, STATM1+4
^RARTFLDS	STAT+6, STATM1+5
STUFF^RARTST	STAT+2, STATM+1
$$SSN^RAUTL	STPCDE+9
OENOTE^RAUTL00	STAT+6, STATM1+6
UP1^RAUTL1	STAT+2, STATM+1
RASET^RAUTL2	STAT+2, STATM+1
$$PCE^RAWORK	EN+1
EN3^SDACS	EN+8
$$FMTE^XLFDT	STPCDE+44
^XMB	STPCDE+47

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?5,"Status update queued!",! Line Location: UPSTAT+10
Function Call: WRITE	Prompt: !,?5,"Status updates queued!",! Line Location: UPSTATM+4

FileNo	Call Tags
^%ZIS(1 - [#3.5]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(40.7 - [#40.7]	CON, STPCDE+31
^DPT - [#2]	STPCDE+11
^RA(79 - [#79]	UPSTAT+3, UPSTATM+1
^RA(79.1 - [#79.1]	EN+6, STPCDE+24, STPCDE+26
^RADPT - [#70]	EN+9*, STPCDE+5, STPCDE+9, STPCDE+10
^RAMIS(71 - [#71]	EN+4, EN+7, STPCDE+12
^SC - [#44]	STPCDE+26
^TMP($J	STATM+1, STATM1+2
^VA(200 - [#200]	STPCDE+4, STPCDE+8
^XMB(3.6 - [#3.6]	STPCDE+47

Name	Line Occurrences
CON	EN+7
EXIT	EN+9
NOGO	EN+2, EN+4, EN+6, EN+8
STATM1	STATM+1
STPCDE	NOGO+2

Name	Field # of Occurrence
^("PC"	EN+6
^(0	EN+4, EN+7, CON

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> D0	STAT+5, STATM1+5
>> DFN	EN+3*
DT	EN+5
DUZ	UPSTAT+5, UPSTATM+3, NOGO+1, NOGO+2
I	UPSTAT+5, UPSTATM+3, EN+7*, EXIT!
J	EN+7*, CON, EXIT!
K	CON*, EXIT!
>> ORBXDATA	STAT+4, STATM1+4
ORIFN	STATM1+6!
ORNOTE	STATM1+6!
>> ORVP	STAT+4, STATM1+4
RA0	STPCDE~, STPCDE+23, STPCDE+29, STPCDE+30
RA1	STATM+1*, STATM1+2, STPCDE~, STPCDE+4, STPCDE+8
RA2	STPCDE~, STPCDE+5, STPCDE+8, STPCDE+9, STPCDE+10, STPCDE+11
RA3	STPCDE~, STPCDE+5, STPCDE+9, STPCDE+10
RA4	STPCDE~, STPCDE+5, STPCDE+10
RAAB	STATM1+2*, STATM1+6!
RACASE	STPCDE+6~, STPCDE+10*, STPCDE+44
>> RACNI	STAT+3, STATM1+3, EN+9, NOGO+1, NOGO+2
RACPT	STPCDE+6~, STPCDE+17, STPCDE+19, STPCDE+20*, STPCDE+45
RACPT(0	STPCDE+16*, STPCDE+17, STPCDE+18
RACPT(4	STPCDE+18*, STPCDE+20
RADFN	STAT+3, STAT+4, STATM1+3, STATM1+4, EN+2, EN+3, EN+9, NOGO+1, NOGO+2, STPCDE+6~ , STPCDE+8*
>> RADTE	EN+2, EN+3
>> RADTI	STAT+3, STATM1+3, EN+9, NOGO+1, NOGO+2
>> RADUZ	UPSTAT+5, UPSTAT+6, UPSTATM+3
>> RAEXFLD	STAT+5, STATM1+5
>> RAF1	STAT+2, STATM+1
>> RAHLTCPB	UPSTAT+8
RAI	STPCDE+6~, STPCDE+29*, STPCDE+30
RAIO	UPSTAT+3~, UPSTAT+4, UPSTATM+1~, UPSTATM+2
RALENFLG	STPCDE+6~, STPCDE+7, STPCDE+29, STPCDE+33
>> RAMDIV	UPSTAT+3, UPSTATM+1, EN+2, EN+3
>> RAMLC	EN+2, EN+6, STPCDE+24, STPCDE+26
RAPAT	STPCDE+6~, STPCDE+11*, STPCDE+44
RAPC	STPCDE+24~*, STPCDE+25, STPCDE+26
RAPR	EXIT!
>> RAPRIT	EN+2, EN+4, EN+7
RAPROC	STPCDE+6~, STPCDE+21, STPCDE+22, STPCDE+45
RAPROC(0	STPCDE+12*, STPCDE+16, STPCDE+21
>> RAQUEUED	UPSTAT+10
RAREGX	STPCDE+6~, STPCDE+9*, STPCDE+11
>> RARPT	STAT+2, STAT+4, STAT+5, STATM+1*, STATM1+4, STATM1+5
>> RARTDT	STATM+1*, STATM1+2
RASAVE	STAT+1~, STATM1+1~
RASAVE("RACNI"	STAT+3, STATM1+3
RASAVE("RADFN"	STAT+3, STATM1+3
RASAVE("RADTI"	STAT+3, STATM1+3
RASDC	EN+2, CON, NOGO+1, NOGO+2, EXIT!
RASSN	STPCDE+6~, STPCDE+9*, STPCDE+44
RASTOP	STPCDE+6~, STPCDE+25, STPCDE+26, STPCDE+29, STPCDE+33, STPCDE+34, STPCDE+36, STPCDE+37*, STPCDE+45
RASTOP(1	STPCDE+31*, STPCDE+32
RASTOP(2	STPCDE+30*, STPCDE+31, STPCDE+32
RASTOP(3	STPCDE+32*, STPCDE+33, STPCDE+34
RAUSER	STPCDE+7~, STPCDE+8*, STPCDE+45
RAXAM	STPCDE+7~, STPCDE+10*, STPCDE+12
RAXDT	STPCDE+7~, STPCDE+11*, STPCDE+17, STPCDE+18, STPCDE+44
SDATE	EN+3*, EXIT!
SDC	EN+3, CON, EXIT!
SDCPT	EXIT!
SDCPT(1	EN+6*, EN+8
SDCTYPE	EN+8*, EXIT!
SDERR	EN+8, EXIT!
SDIV	EN+3*, EXIT!
>> SDMSG	EN+3*
SDUZ	UPSTAT+5, UPSTAT+9!, UPSTATM+3, UPSTATM+4!
X	UPSTAT+10, EN+4, EN+5*, EN+6, EXIT!
X1	EN+6*, EXIT!
XMB	STPCDE+7~, STPCDE+46*, STPCDE+47
XMB(1	STPCDE+44*
XMB(2	STPCDE+44*
XMB(3	STPCDE+44*
XMB(4	STPCDE+44*
XMB(5	STPCDE+45*
XMB(6	STPCDE+45*
XMB(7	STPCDE+45*
XMB(8	STPCDE+45*
XMB0	STPCDE+48!
XMC0	STPCDE+48!
XMDT	STPCDE+48!
XMM	STPCDE+48!
XMMG	STPCDE+48!
>> Y	STAT+2, STATM+1
>> ZTDESC	UPSTAT+5, UPSTATM+3
>> ZTDTH	UPSTAT+5, UPSTATM+3
>> ZTIO	UPSTAT+4, UPSTATM+2
>> ZTQUEUED	STAT+7, STATM+2, EN+8, EN+9, NOGO
>> ZTREQ	STAT+7, STATM+2
>> ZTRTN	UPSTAT+4, UPSTATM+2
>> ZTSAVE(	UPSTAT+5, UPSTATM+3
>> ZTSAVE("RADUZ"	UPSTAT+6*
>> ZTSAVE("RAHLTCPB"	UPSTAT+8*
>> ZTSK	UPSTAT+10, UPSTATM+4

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RAUTL0

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: