Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: RAXSTAT

Package: Radiology Nuclear Medicine

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

FileMan Files Accessed Via FileMan Db Call

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All