Routine: RAXSTAT

Information

RAXSTAT ;HIRMFO/GJC-Examination Status List (Print) ;7/24/97 15:18

Source Information

Source file <RAXSTAT.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Kernel	5	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$FMTE,$$NOW)^XLFDT ($$CJ,$$UP)^XLFSTR
Radiology Nuclear Medicine	4	$$IMAGE^RARIC1 EN1^RASELCT $$EOS^RAUTL5 STOPCHK^RAUTL9
VA Fileman	1	$$GET1^DIQ

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Radiology Nuclear Medicine	2	RA EXAMSTATUSP RA VISTARAD CATEGORY P

Entry Points

Name	Comments	DBIA/ICR reference
START	; Display output
VEN1
HDR	; Header
FORMAT	; Format the output
REQ	; Display 'Required For Change To This Status' parameters (if any)
STARTV	;Display VistaRad Category only
DEV	; Device selection
VRADP
EN1	; Display Exam Status data by I-Type
EXIT	; Kill variables
ASK	; Display 'Ask on Status Tracking' parameters (if any)
SET(RA72)	; set TMP globals so we can display parameters 'Ask On Status ; Tracking' & 'Required For Change To This Status' in a column format ; (side by side) ; Input Variable: 'Y' ien of file 72
HDR3

External References

Name	Field # of Occurrence
^%ZIS	DEV+2
HOME^%ZIS	DEV+10, HDR+1
^%ZISC	EXIT+1
^%ZTLOAD	DEV+8
$$GET1^DIQ	FORMAT+11, FORMAT+12, FORMAT+14, FORMAT+16, FORMAT+17, FORMAT+19, FORMAT+20, FORMAT+22, STARTV+16
$$IMAGE^RARIC1	VRADP
EN1^RASELCT	VEN1+4
$$EOS^RAUTL5	START+13, EXIT+3, FORMAT+13, FORMAT+15, FORMAT+18, FORMAT+21, FORMAT+23, FORMAT+27, FORMAT+36, STARTV+15 , HDR3
STOPCHK^RAUTL9	HDR+5
$$FMTE^XLFDT	START+5, STARTV+4
$$NOW^XLFDT	START+5, STARTV+4
$$CJ^XLFSTR	START+23, HDR+4
$$UP^XLFSTR	FORMAT+39, SET+7, SET+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: !?5,"Request Queued, Task #: ",$G(ZTSK) Line Location: DEV+9
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("* No records to print! *",IOM) Line Location: START+23
Function Call: WRITE	Prompt: ! Line Location: EXIT+1
Function Call: WRITE	Prompt: !?10,"Type Of Imaging: ",RAIT Line Location: FORMAT+9
Function Call: WRITE	Prompt: !!,"Status: *",$P(RA72(0),"^")_"*",?54,"Order: ",RAORD Line Location: FORMAT+10
Function Call: WRITE	Prompt: !,"Default Next Status: ",$$GET1^DIQ(72,+$P(RA72(0),"^",2)_",",.01) Line Location: FORMAT+11
Function Call: WRITE	Prompt: ?54,"User Key Needed: ",$$GET1^DIQ(72,RAIEN_",",4) Line Location: FORMAT+12
Function Call: WRITE	Prompt: !,"Generate Examined HL7 Message: ",$$GET1^DIQ(72,RAIEN_",",8) Line Location: FORMAT+14
Function Call: WRITE	Prompt: !,"Generate Exam Alert: ",$$GET1^DIQ(72,RAIEN_",",1) Line Location: FORMAT+16
Function Call: WRITE	Prompt: ?54,"Allow Cancelling?: ",$$GET1^DIQ(72,RAIEN_",",6) Line Location: FORMAT+17
Function Call: WRITE	Prompt: !,"Appear On Status Tracking?: ",$$GET1^DIQ(72,RAIEN_",",5) Line Location: FORMAT+19
Function Call: WRITE	Prompt: ?54,"Print Dosage Ticket: ",$$GET1^DIQ(72,RAIEN_",",.611) Line Location: FORMAT+20
Function Call: WRITE	Prompt: !,"VistaRad Category: ",$$GET1^DIQ(72,RAIEN_",",9),! Line Location: FORMAT+22
Function Call: WRITE	Prompt: !,RASK,?39,RAREQ,!,RASKL,?39,RAREQL,! Line Location: FORMAT+24
Function Call: WRITE	Prompt: !,RASK,?39,RAREQ,!,RASKL,?39,RAREQL,! Line Location: FORMAT+28
Function Call: WRITE	Prompt: !?9,RAWORK,!?9,RAWORKL Line Location: FORMAT+32
Function Call: WRITE	Prompt: !?9,RAWORK,!?9,RAWORKL Line Location: FORMAT+37
Function Call: WRITE	Prompt: !?14,$P(RAFLD," REPORT?") Line Location: FORMAT+40
Function Call: WRITE	Prompt: ! Line Location: FORMAT+43
Function Call: WRITE	Prompt: ?4,$G(^TMP($J,"RA ASK",RAST)) Line Location: ASK+2
Function Call: WRITE	Prompt: !?(IOM-$L(RAHD1)\2),RAHD1 Line Location: HDR+2
Function Call: WRITE	Prompt: ?$S(IOM=132:120,1:68),"Page: ",RAPG Line Location: HDR+3
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(RAHD2,IOM),!,RALINE Line Location: HDR+4
Function Call: WRITE	Prompt: ?44,$G(^TMP($J,"RA REQ",RAR)) Line Location: REQ+2
Function Call: WRITE	Prompt: !,$P(RA72(0),"^"),?30,RAORD,?35,$$GET1^DIQ(72,RAIEN_",",9) Line Location: STARTV+16
Function Call: WRITE	Prompt: !!,"Current system is not running Vista Imaging -- nothing done.",! Line Location: VRADP+0
Function Call: WRITE	Prompt: !!?10,"Type Of Imaging: ",RAIT,!,"Status",?27,"Order",?35,"VistaRad Category",! Line Location: HDR3+1
Routine Call	%ZIS Line Location: DEV+10 HDR+1
Routine Call	%ZIS Line Location: DEV+2

FileNo	Call Tags
^RA(72 - [#72]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(72	FORMAT+34, SET+5, SET+14
^RA(72 - [#72]	START+15, START+17, FORMAT+2, FORMAT+3, FORMAT+4, STARTV+9, STARTV+11, STARTV+13
^TMP($J	VEN1+3!, START+12, EXIT+1!, FORMAT+5!, FORMAT+43!, ASK+1, ASK+2, REQ+1, REQ+2, SET+10* , SET+18*, STARTV+6

Label References

Name	Line Occurrences
ASK	FORMAT+30
EXIT	DEV+11, DEV+14, STARTV+19
FORMAT	START+18
HDR	START+14, START+23, FORMAT+13, FORMAT+15, FORMAT+18, FORMAT+21, FORMAT+23, FORMAT+28, FORMAT+37, STARTV+8 , STARTV+15, HDR3
HDR3	STARTV+14
REQ	FORMAT+30
SET	FORMAT+6
START	DEV+14
STARTV	DEV+13
VEN1	VRADP+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%X	DEV+10!
%XX	DEV+10!, EXIT+2!
%Y	DEV+10!
%YY	DEV+10!, EXIT+2!
>> %ZIS	DEV+1*
>> %ZIS("A"	DEV+1*
DISYS	EXIT+2!
DTOUT	DEV+2!
DUOUT	DEV+2!
I	VEN1+5!, START+1~, EXIT+2!, SET+4*, SET+5, SET+6, SET+10
IO	START+4, STARTV+3
IO("Q"	DEV+3, DEV+10!
IOF	HDR+1
IOM	START+11, START+23, HDR+2, HDR+3, HDR+4, STARTV+5
IOSL	FORMAT+13, FORMAT+15, FORMAT+18, FORMAT+21, FORMAT+23, FORMAT+27, FORMAT+36, STARTV+15, HDR3
J	START+1~, SET+13*, SET+14, SET+15, SET+18
K	START+1~, FORMAT+33*, FORMAT+34, FORMAT+35
POP	VEN1+5!, DEV+2!, EXIT+2!
RA1	START+1~, START+11, START+13, FORMAT+9, STARTV+1~, STARTV+5, STARTV+7, STARTV+14
RA72	START+1~, FORMAT+6, SET~, STARTV+1~
RA72(	FORMAT+2, FORMAT+3, FORMAT+4*, FORMAT+39, SET+7, SET+16
RA72(0	FORMAT+2, FORMAT+10, FORMAT+11, STARTV+13, STARTV+16
RADIC	VEN1!, VEN1+1*, VEN1+4, VEN1+5!
RADIC("A"	VEN1+2*
RADIC(0	VEN1+1*
RAFF	START+1~, FORMAT+1, FORMAT+28, FORMAT+30*
RAFLD	START+1~, FORMAT+34, FORMAT+40, SET+5, SET+8, SET+9, SET+10, SET+14, SET+17, SET+18
RAFLG	START+1~, START+3, START+13, START+23, FORMAT+1, STARTV+1~, STARTV+2, STARTV+12
RAHD1	START+1~, START+4, HDR+2, STARTV+1~, STARTV+3
RAHD2	START+1~, START+5, HDR+4, STARTV+1~, STARTV+4
RAIEN	START+1~, START+16, START+17, FORMAT+2, FORMAT+3, FORMAT+4, FORMAT+12, FORMAT+14, FORMAT+16, FORMAT+17 , FORMAT+19, FORMAT+20, FORMAT+22, STARTV+1~, STARTV+10, STARTV+11, STARTV+13, STARTV+16
RAIT	START+1~, START+11, START+12, START+15, START+17, FORMAT+9, STARTV+1~, STARTV+5, STARTV+6, STARTV+9 , STARTV+11, HDR3+1
RALINE	START+1~, START+11, HDR+4, STARTV+1~, STARTV+5
RANODE	START+1~, FORMAT+35, FORMAT+39, SET+6, SET+7, SET+15*, SET+16
RAORD	START+2~, START+13, START+15, START+17, FORMAT+10, STARTV+1~, STARTV+7, STARTV+9, STARTV+11, STARTV+16
RAPCE	START+2~, FORMAT+35, FORMAT+39, SET+6, SET+7, SET+15*, SET+16
RAPG	START+2~, START+3, HDR+2, HDR+3, STARTV+1~, STARTV+2*, STARTV+8
RAQUIT	VEN1!, VEN1+5!, VEN1+6!
RAR	START+2~, FORMAT+25, FORMAT+26, FORMAT+30, REQ+1, REQ+2
RAREQ	START+2~, START+7*, START+8, FORMAT+24, FORMAT+28
RAREQL	START+2~, START+8*, FORMAT+24, FORMAT+28
RASK	START+2~, START+6*, FORMAT+24, FORMAT+28
RASKL	START+2~, START+6*, FORMAT+24, FORMAT+28
RAST	START+2~, FORMAT+25, FORMAT+26, FORMAT+30, ASK+1, ASK+2
RAUTIL	VEN1!, VEN1+2*, VEN1+3, VEN1+4, VEN1+5!
RAVRAD	EN1+1!, DEV+7, DEV+13, EXIT+2!, VRADP+1*
RAWORK	START+2~, START+9*, START+10, FORMAT+32, FORMAT+37
RAWORKL	START+2~, START+10*, FORMAT+32, FORMAT+37
RAXIT	START+3~, START+12, START+13, START+15, START+17, START+22, FORMAT+13, FORMAT+15, FORMAT+18, FORMAT+21 , FORMAT+23, FORMAT+26, FORMAT+27, FORMAT+32, FORMAT+33, FORMAT+36, HDR+5, STARTV+2~, STARTV+6, STARTV+9 , STARTV+11, STARTV+14, STARTV+15, HDR3*
X	DEV+10!, EXIT+3*!
Y	DEV+10!, EXIT+2!
>> ZTDESC	DEV+5, DEV+7
>> ZTQUEUED	START+4, HDR+5, STARTV+3
>> ZTREQ	START+4, STARTV+3
>> ZTRTN	DEV+4, DEV+7
>> ZTSAVE("RAVRAD"	DEV+7*
>> ZTSAVE("^TMP(	$J, ""RA XAM STAT"", " , DEV+6*
ZTSK	DEV+9, DEV+10!
ZTSK("D"	DEV+9
>> ZTSTOP	HDR+5

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RAXSTAT

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: