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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: RARTUVR

Package: Radiology Nuclear Medicine

Routine: RARTUVR


Information

RARTUVR ;HISC/FPT,SWM AISC/RMO-Unverified Reports ;8/19/97 11:01

Source Information

Source file <RARTUVR.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Radiology Nuclear Medicine 9 132^RAMAINP  SETVARS^RAPSET1  (BTG,DIVSUM)^RARTUVR1  PRINT^RARTUVR2  EN1^RARTUVR3  (CLOSE,D,DATE,ZIS)^RAUTL  RASET^RAUTL2  ($$DIVLOC,$$SETUPDI)^RAUTL7  
STOPCHK^RAUTL9  
VA Fileman 2 ^%DT  ^DIR  
Kernel 1 $$UP^XLFSTR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RA DAIUVR  

Entry Points

Name Comments DBIA/ICR reference
EN ; unverified reports report
START ; start processing
ASKTHRU
IT ; imaging type
DEVICE ; select device
KILL ; kill variables & close device
ASKBD
DIV ; walk through tmp global, start with 'division'
ASKCUT

External References

Name Field # of Occurrence
^%DT DIV+2
^DIR ASKBD+6, ASKCUT+4, ASKCUT+6
132^RAMAINP ASKBD+9
SETVARS^RAPSET1 EN+5
BTG^RARTUVR1 START+29
DIVSUM^RARTUVR1 DIV+4
PRINT^RARTUVR2 IT+2
EN1^RARTUVR3 START+2
CLOSE^RAUTL KILL+5
D^RAUTL DIV+2
DATE^RAUTL ASKTHRU+1
ZIS^RAUTL DEVICE+2
RASET^RAUTL2 START+21
$$DIVLOC^RAUTL7 EN+7
$$SETUPDI^RAUTL7 EN+6
STOPCHK^RAUTL9 START+20
$$UP^XLFSTR ASKBD+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,?5,"There are no Unverified Reports."
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKBD+9
Function Call: WRITE
  • Prompt: !!,"(The date range refers to DATE "_RAFILE_")"
  • Line Location: ASKTHRU+0
Function Call: WRITE
  • Prompt: !!,"Default cut-off limits (in hours) for aging of reports are :"
  • Line Location: ASKCUT+1
Function Call: WRITE
  • Prompt: !!?35
  • Line Location: ASKCUT+2
Function Call: WRITE
  • Prompt: RACUT(RA1)," "
  • Line Location: ASKCUT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKCUT+4
Function Call: WRITE
  • Prompt: !!,"Try again "
  • Line Location: ASKCUT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+2
Routine Call
  • DIR
  • Line Location:
    • ASKBD+6
    • ASKCUT+4
    • ASKCUT+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RARPT - [#74] START+17, START+18
^RARPT("ASTAT" EN+2, START+12, START+14
^TMP($J EN+1!, EN+9, EN+11*, START+4, START+5*, START+6*, START+7*, DIV+4, KILL+1!, IT+2

Label References

Name Line Occurrences
ASKCUT ASKCUT+7
DEVICE ASKTHRU+4, ASKCUT+4
IT DIV+4
KILL EN+7, ASKBD+6, ASKTHRU+2, ASKCUT+4, DEVICE+2, START+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DIV+2*!
BEGDATE ASKTHRU+2, START+19, KILL+4!
DIR ASKBD!, ASKBD+7!, ASKCUT+3!, ASKCUT+4!, ASKCUT+7!, KILL+4!
DIR("?" ASKBD+1*, ASKBD+2*, ASKBD+3*, ASKBD+4*, ASKCUT+3*, ASKCUT+5*
DIR("??" ASKCUT+3*
DIR("A" ASKCUT+3*, ASKCUT+6*
DIR("B" ASKBD*, ASKCUT+3*
DIR(0 ASKBD+5*, ASKCUT+3*, ASKCUT+6*
DIROUT ASKBD+7!
DIRUT ASKBD+6, ASKBD+7!, KILL+4!
DTOUT ASKBD+7!
DUOUT ASKBD+7!, KILL+4!
DUZ EN+5, EN+8, EN+10
ENDDATE ASKTHRU+2, ASKTHRU+3*, START+19, KILL+4!
I KILL+4!
IO START+1
IOM DIV+3
POP KILL+1!
RA1 ASKCUT+2*, ASKCUT+6*, KILL+2!
RA2 KILL+2!
RA3 KILL+2!
RA4 KILL+2!
RABD ASKBD+7*, ASKBD+8, ASKTHRU+4, START+2, KILL+2!
RACCESS KILL+3!
RACCESS( EN+5, EN+8, EN+10
RACN KILL+1!
RACNI KILL+1!
RACNT EN+8*, EN+11*, KILL+1!
RACNT(0 DIV+1*
RACUT KILL+2!
RACUT( ASKCUT+2, ASKCUT+6*
RACUT(1 ASKCUT*
RACUT(2 ASKCUT*
RACUT(3 ASKCUT*
RAD KILL+1!
RADASH DIV+3*, KILL+2!
RADATE KILL+1!
RADFN KILL+1!
RADIVNME START+3*, START+4*, START+5, START+6, START+7, DIV+1*, DIV+4*, KILL+1!, IT+2
RADIVNUM KILL+1!
RADTE KILL+1!
RADTI KILL+1!
RAEQUAL DIV+3*, KILL+2!
RAFILE ASKBD+9*, ASKBD+11*, ASKTHRU, ASKTHRU+1!
RAFL KILL+1!
RAFLG KILL+1!
RAHOURS KILL+2!
RAIP START+25*, START+26*, START+27*, START+28*, KILL+1!
RAIPNAME KILL+1!
RAITNAME START+4*, START+5, START+6, START+7, KILL+1!, IT+1*, IT+2*
RAITNUM KILL+1!
RAMES KILL+4!
RAOUT START+11*, START+12, START+13*, START+14, START+20*, DIV+1*, DIV+4, KILL+1!, IT+2
RAPAGE DIV+1*, KILL+1!
RAPOP DEVICE+2, KILL+1!
RAPRES START+22*, START+24*, START+26, KILL+1!
RAPSTF START+22*, START+24, START+27, KILL+1!
RAPSTX EN+5*, KILL+3!
RAQUIT KILL+1!
RARAD KILL+1!
RARE KILL+1!
RARPT START+13*, START+14*, START+17, START+18, START+21, KILL+1!
RARPTENT START+18*, START+19, KILL+2!
RARS KILL+1!
RARUNDAT DIV+2*, KILL+2!
RASKTIME ASKTHRU*, ASKTHRU+1!
RASSN KILL+2!
RASTATUS START+11*, START+12*, START+14, KILL+1!
RASTRING KILL+1!
RAX START+21*, START+22, KILL+1!
RAXIT EN+6*!, KILL+1!
U START+17, START+18
X EN+7*, EN+8*, EN+9, EN+10, EN+11, ASKTHRU+2, ASKCUT+4, DIV+2*, KILL+1!
Y EN+9*, EN+10*, EN+11, ASKBD+7, ASKCUT+4, ASKCUT+6, ASKCUT+7, START+21*, DIV+2, KILL+1!
ZTDESC KILL+4!
ZTQUEUED START+1, START+20, KILL+1!
>> ZTREQ START+1*
ZTRTN DEVICE+1*, KILL+4!
ZTSAVE KILL+4!
ZTSAVE("BEGDATE" DEVICE+1*
ZTSAVE("ENDDATE" DEVICE+1*
ZTSAVE("RABD" DEVICE+1*
ZTSAVE("RACNT" DEVICE+1*
ZTSAVE("RACUT*" DEVICE+1*
ZTSAVE("^TMP( $J, ""RA D-TYPE"", " , DEVICE+1*, $J, ""RA I-TYPE"", " , DEVICE+1*
ZTSAVE("^TMP($J,""RAUVR""," DEVICE+1*
ZTSTOP START+20, KILL+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All