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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: RAPROS

Package: Radiology Nuclear Medicine

Routine: RAPROS


Information

RAPROS ;HISC/GJC AISC/MJK,RMO-Exam Profile (sort) ;6/19/97 09:12

Source Information

Source file <RAPROS.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Radiology Nuclear Medicine 6 ^RADPA  ($$SSANVAL,$$USESSAN)^RAHLRU1  ^RAPROD  $$IMGDISP^RAPTLU  ($$SSN,CLOSE,D,DATE,ZIS)^RAUTL  EN1^RAUTL20  
VA Fileman 3 ^DIC  DT^DIO2  ^DIR  
Kernel 1 $$UP^XLFSTR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RA PROFSORT  

Entry Points

Name Comments DBIA/ICR reference
SORT
Q1
PRT1
PAT
ZIS ; Device selection
PRT ; Begin output
ASKSRT
HLP ; Generic help
Q ; Kill and quit
START
HD ; Generic header output
ST1
ST2
RACN ; Get the case numbers.
PROC ; Select Procedure
PRT3
STORE ; Store data in the ^TMP global
PRT2

External References

Name Field # of Occurrence
^DIC PROC+3
DT^DIO2 HD+2
^DIR ASKSRT+4
^RADPA PAT
$$SSANVAL^RAHLRU1 PRT3+4
$$USESSAN^RAHLRU1 PRT3+6, PRT3+12, HD+3, HD+4
^RAPROD ST2+1
$$IMGDISP^RAPTLU PRT3+8, PRT3+14
$$SSN^RAUTL PAT
CLOSE^RAUTL START+10
D^RAUTL START+5
DATE^RAUTL SORT+2
ZIS^RAUTL ZIS+2
EN1^RAUTL20 PRT3+3
$$UP^XLFSTR SORT+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: !!
  • Timeout: ",!?10,"P
  • Variable: "Sort by one of the following
  • Line Location: SORT+0
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: SORT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKSRT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ZIS+1
Function Call: WRITE
  • Prompt: !!?5,"For the above criteria, no registered exams filed for patient...",!?30,"...",RANME," ",RASSN,".",!
  • Line Location: START+9
Function Call: READ
  • Timeout: DTIME
  • Variable: RAX
  • Line Location: ST1+0
Function Call: WRITE
  • Prompt: !,"CHOOSE FROM 1-",RASEQ,": "
  • Line Location: ST1+0
Function Call: WRITE
  • Prompt: !,*7,"You may only select one exam at a time. Choose a number between 1 and ",RASEQ,"."
  • Line Location: ST1+1
Function Call: READ
  • Timeout: DTIME
  • Variable: RAX
  • Line Location: PRT1+0
Function Call: WRITE
  • Prompt: !,"Type '^' to STOP, or",!,"CHOOSE FROM 1-",RASEQ,": "
  • Line Location: PRT1+0
Function Call: WRITE
  • Prompt: !,*7,"You may only select one exam at a time. Choose a number between 1 and ",RASEQ,"."
  • Line Location: PRT1+1
Function Call: WRITE
  • Prompt: "Profile for ",RANME," ",RASSN,?55,"Run Date: "
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !!,?20,"***** Registered Exams Profile *****"
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !?4,"Case No.",?22,"Procedure",?49,"Exam Dt",?58,"Exam Status",?70,"Img Loc",!?4,"-----------------",?22,"-------------",?49,"--------",?58,"-----------",?70,"----------"
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !?3,"Case No.",?13,"Procedure",?41,"Exam Date",?52,"Status of Exam",?69,"Imaging Loc",!?3,"--------",?13,"-------------",?41,"---------",?52,"------------",?69,"-----------"
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !!?3,"Enter the number corresponding to the exam you wish to select.",!
  • Line Location: HLP+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: PROC+3
Routine Call
  • DIC
  • Line Location:
    • PROC+3
Routine Call
  • DIR
  • Line Location:
    • ASKSRT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RAMIS(71 - [#71] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PAT
^RA(72 - [#72] PRT3+10, PRT3+16
^RA(79.1 - [#79.1] START+3
^RADPT - [#70] START+1, START+2, START+3, ST2+1, RACN+1
^RAMIS(71 - [#71] STORE+1
^SC - [#44] START+3
^TMP($J START!, START+9, ST1+1, ST2, Q1!, STORE+3, PRT+1, PRT1+1, PRT3*

Label References

Name Line Occurrences
HD PRT+1, PRT2
HLP ST1, PRT1
PAT ST2+1
PROC ASKSRT+5
PRT START+10
PRT1 PRT+1, PRT1, PRT1+1
PRT2 PRT1
PRT3 PRT1
Q PAT, SORT+1, SORT+2, ASKSRT+4, ASKSRT+5, ZIS+2, START+10
Q1 START+9, ST2, ST2+1
RACN START+6
SORT SORT+1
ST1 ST1, ST1+1
ST2 START+10
STORE RACN+1
ZIS SORT+2

Naked Globals

Name Field # of Occurrence
^( RACN+1, STORE+3*, PRT+1
^("RASEQ" START!, Q1!
^(0 PAT, START+2, RACN+1, STORE+1, PRT3+10, PRT3+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% Q+1!, PROC+1~
%W Q+1!
%Y Q+1!, PROC+1~
%Y1 Q+1!
BEG SORT+2*, ASKSRT+5*, Q+1!, STORE+3, PROC+4*
BEGDATE SORT+2, Q+1!
C Q+1!, PROC+1~
DA PROC+1~
DDH PROC+1~
DIC PAT!, PROC+1~, PROC+2*
DIC("A" PROC+2*
DIC(0 PAT*, PROC+2*
DIR ASKSRT+1!, ASKSRT+4!
DIR("?" ASKSRT+2*
DIR("A" ASKSRT+3*
DIR("B" ASKSRT+1*
DIR(0 ASKSRT+1*
DIROUT Q+1!
DIRUT ASKSRT+4, Q+1!
DT HD+2
DTIME SORT, ST1, PRT1
DTOUT Q+1!
DUOUT Q+1!
END SORT+2*, ASKSRT+5*, Q+1!, STORE+3, PROC+4*
ENDDATE SORT+2, Q+1!
>> I ST2*
IO ZIS+3, START+10
IO(0 ZIS+3
IOF HD+1
IOSL PRT2
IOST HD+1
POP Q+1!
RAA Q+2!, PRT+1*
RACN Q+2!, STORE+2*, STORE+3
RACNDSP PRT3+4~, PRT3+5*, PRT3+8
RACNI ST2+1, Q+2!, RACN+1*, STORE+3, PRT3+1~, PRT3+2*, PRT3+4
RADATE START+5*, Q+2!, STORE+3
RADFN PAT*, START+1, START+2, START+3, ST2+1, Q+2!, RACN+1, STORE+3, PRT3+1~, PRT3+2*
, PRT3+4
RADTE START+5*, Q+2!, STORE+3
RADTI START+1*, START+2, START+3, ST2+1, Q+2!, RACN+1, STORE+3, PRT3+1~, PRT3+2*, PRT3+4
RADTPRT START+4*, Q+4!, STORE+3
RAELOC START+3*, Q+4!, STORE+3
RAI Q+2!, STORE+3*, PRT+1*
RAII Q+2!, PRT+1*
RAMEMLOW PRT3+3~, PRT3+7, PRT3+13
RAMES Q+5!
RANME PAT*, START+9, Q+2!, STORE+3, HD+2
RAPAG START*, Q+3!, HD+1
RAPOP SORT+2, ZIS+2, Q+2!
RAPRC Q+3!, STORE+1*, STORE+3
RAPRI Q+3!, STORE+1*
RAPRT ZIS+1*, ZIS+3*, START+10, Q+3!, PRT1, PRT2
RAPRTSET PRT3+3~, PRT3+7, PRT3+13
RARPT Q+3!, STORE+2*, STORE+3
RASEQ START*, ST1, ST1+1, Q+3!, PRT1, PRT1+1, PRT3*, PRT3+7, PRT3+13
RASORT SORT+2*, ASKSRT*, Q+3!, STORE+3, PRT3+7, PRT3+13
RASSAN PRT3+4~*, PRT3+5
RASSN PAT*, START+9, Q+2!, STORE+3, HD+2
RAST Q+3!, STORE+2*, STORE+3
RASV ZIS+1*, Q+3!
RAX START*, START+10, ST1*, ST1+1, ST2, Q1!, PRT+1, PRT1*, PRT1+1, PRT1+2*
RAXIT Q+5!
RAXX SORT*, SORT+1*, SORT+2, Q+3!, STORE+3
RAY Q+3!, PRT+1*, PRT3, PRT3+2, PRT3+5, PRT3+8, PRT3+9, PRT3+10, PRT3+11, PRT3+14
, PRT3+15, PRT3+16, PRT3+17
RAZERO START+2*, START+4, START+5, Q+3!
U START+3, START+4, PRT3+9, PRT3+11, PRT3+15, PRT3+17
X Q+4!, PROC+1~
Y PAT, ASKSRT+5, START+5*, ST2*, Q+4!, RACN+1*, STORE+1, STORE+2, HD+2*, PROC+4
Y(0 ST2+1*
ZTDESC ZIS+2*, Q+4!
ZTRTN ZIS+1*, Q+4!
ZTSAVE Q+4!
ZTSAVE( ZIS+1*
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 |  Naked Globals |  Local Variables |  All