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: RAUTL16

Package: Radiology Nuclear Medicine

Routine: RAUTL16


Information

RAUTL16 ;HISC/DAD-EXAM STATUS IMAGING TYPE INCONSISTENCIES REPORT ;1/26/95 08:55

Source Information

Source file <RAUTL16.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  ($$DT,$$FMTE)^XLFDT  
Registration 1 (DEM,KVA)^VADPT  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RA EXAM/STATUS ITYPE MISMATCH  

Entry Points

Name Comments DBIA/ICR reference
SORT ;
PAUSE ;
MISSING ;
ENTSK ;
HEADER ;
EXIT ;
PRINT ;

External References

Name Field # of Occurrence
^%ZIS RAUTL16+4
^%ZISC EXIT+1
^%ZTLOAD RAUTL16+7
^DIR PAUSE+1
DEM^VADPT SORT+1
KVA^VADPT EXIT+1, SORT+1
$$DT^XLFDT ENTSK+22
$$FMTE^XLFDT ENTSK+22, SORT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This report requires a 132 column output device."
  • Line Location: RAUTL16+3
Function Call: WRITE
  • Prompt: !
  • Line Location: RAUTL16+4
Function Call: WRITE
  • Prompt: !!,"The imaging type of the visit matches the imaging type"
  • Line Location: ENTSK+26
Function Call: WRITE
  • Prompt: !,"of the exam status for all current incomplete exams."
  • Line Location: ENTSK+27
Function Call: WRITE
  • Prompt: !!,RADFN(0),?34,RASSN(0)
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !?3,RAEXAMDT(0),?25,$J(RACASENO(0),5),?34,RAIMTYPE(0)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ?68,RAEXAMST(0),?102,RAIMEXAM(0)
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !?46,"EXAM STATUS IMAGING TYPE INCONSISTENCIES"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: ?102,"PAGE: ",RAPAGE,!?102,RATODAY
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"PATIENT",?34,"HRCN"
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !?3,"EXAM DATE/TIME",?25,"CASE#",?34,"IMAGING TYPE OF VISIT"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: ?68,"EXAM STATUS",?102,"IMAGING TYPE OF EXAM STATUS",!,RAUNDL
  • Line Location: HEADER+8
Routine Call
  • DIR
  • Line Location:
    • PAUSE+1
Routine Call
  • %ZIS
  • Line Location:
    • RAUTL16+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(72 - [#72] ENTSK+15, MISSING+1, SORT+6
^RA(79.2 - [#79.2] SORT+5, SORT+7
^RADPT - [#70] ENTSK+6, ENTSK+9, ENTSK+13
^RADPT("AS" ENTSK+3, ENTSK+5, ENTSK+8, ENTSK+12
^TMP("RAUTL16" ENTSK+1!, ENTSK+25, ENTSK+30, ENTSK+32, ENTSK+34, ENTSK+36, EXIT+4!, SORT+8*, PRINT+1

Label References

Name Line Occurrences
EXIT RAUTL16+4, RAUTL16+5, ENTSK+25
HEADER ENTSK+24, PRINT+9
MISSING ENTSK+14
PAUSE ENTSK+25, ENTSK+40, PRINT+9
PRINT ENTSK+36
SORT ENTSK+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS RAUTL16+4!*, EXIT+2!
DFN EXIT+2!, SORT+1*
DIR EXIT+2!, PAUSE+1!
DIR(0 PAUSE+1*
DIROUT EXIT+2!
DIRUT EXIT+4!
DTOUT EXIT+2!
DUOUT EXIT+2!
IO ENTSK+24
IO("Q" RAUTL16+5
IOF HEADER+2
IOP RAUTL16+4!
IOSL PRINT+9
IOST PAUSE+1, HEADER+2
POP RAUTL16+4, EXIT+2!
RA ENTSK+9*, ENTSK+10, ENTSK+13*, ENTSK+14, EXIT+2!, SORT+3*, PRINT+1*, PRINT+2, PRINT+3, PRINT+4
, PRINT+5
RACASENO ENTSK+14*, ENTSK+35*, ENTSK+36*, EXIT+2!, MISSING+1*, SORT+8, PRINT+1
RACASENO(0 PRINT+3*, PRINT+7
RAD0 ENTSK+4*, ENTSK+5*, ENTSK+6, ENTSK+8, ENTSK+9, ENTSK+12, ENTSK+13, EXIT+2!, SORT+8, PRINT+5*
RAD1 ENTSK+7*, ENTSK+8*, ENTSK+9, ENTSK+12, ENTSK+13, EXIT+2!, SORT+8, PRINT+5*
RAD2 ENTSK+11*, ENTSK+12*, ENTSK+13, EXIT+2!, SORT+8, PRINT+5*
RADFN ENTSK+6*, ENTSK+29*, ENTSK+30*, ENTSK+32, ENTSK+34, ENTSK+36, EXIT+2!, SORT+1, PRINT+1
RADFN(0 SORT+3*, SORT+8, PRINT+2*, PRINT+6
RAEXAMDT ENTSK+10*, ENTSK+33*, ENTSK+34*, ENTSK+36, EXIT+3!, SORT+4, SORT+8, PRINT+1
RAEXAMDT(0 SORT+4*, SORT+8, PRINT+2*, PRINT+7
RAEXAMST ENTSK+14*, ENTSK+15, EXIT+3!, MISSING+1*, SORT+6
RAEXAMST(0 SORT+6*, SORT+8, PRINT+4*, PRINT+8
RAEXIT ENTSK+22*, ENTSK+29*, ENTSK+30, ENTSK+32, ENTSK+34, ENTSK+36, ENTSK+40, EXIT+3!, PAUSE+1*, HEADER+1
RAIMAGE ENTSK+2*, ENTSK+3*, ENTSK+5, ENTSK+8, ENTSK+12, EXIT+3!
RAIMEXAM ENTSK+15*, ENTSK+16, EXIT+3!, MISSING+1*, SORT+7
RAIMEXAM(0 SORT+7*, SORT+8, PRINT+4*, PRINT+8
RAIMTYPE ENTSK+10*, ENTSK+16, EXIT+3!, SORT+5
RAIMTYPE(0 SORT+5*, SORT+8, PRINT+3*, PRINT+7
RAPAGE ENTSK+22*, EXIT+3!, HEADER+2, HEADER+4*
RASSN ENTSK+31*, ENTSK+32*, ENTSK+34, ENTSK+36, EXIT+3!, SORT+3*, SORT+8, PRINT+1
RASSN(0 SORT+3*, SORT+8, PRINT+2*, PRINT+6
RATODAY ENTSK+22*, EXIT+4!, HEADER+4
RAUNDL ENTSK+23!*, EXIT+4!, HEADER+8
U ENTSK+6, ENTSK+10, ENTSK+14, ENTSK+15, MISSING+1, SORT+3, SORT+5, SORT+6, SORT+7, SORT+8
, PRINT+2, PRINT+3, PRINT+4, PRINT+5
>> VA("PID" SORT+3
>> VADM(1 SORT+3
X EXIT+4!
Y EXIT+4!, PAUSE+1
ZTDESC RAUTL16+6*, EXIT+4!
>> ZTQUEUED EXIT+1
>> ZTREQ EXIT+1*
ZTRTN RAUTL16+7*, EXIT+4!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All