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

Package: Radiology Nuclear Medicine

Routine: RAOUT


Information

RAOUT ;HISC/CAH,FPT,GJC AISC/TMP,RMO-Outside Film Option ;9/12/94 11:13

Source Information

Source file <RAOUT.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 4 ^%DT  ^DIE  DT^DIO2  EN1^DIP  
Radiology Nuclear Medicine 3 ^RADPA  SET^RAPSET1  ($$SSN,CLOSE,ZIS)^RAUTL  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Radiology Nuclear Medicine 5 RA OUTADD  RA OUTEDIT  RA OUTFLAG  RA OUTPROF  RA OUTSIDERPT  

Entry Points

Name Comments DBIA/ICR reference
Q1
Q3
Q2
Q5
PRT
1 ;;Add Films to Registry
START
3 ;;Flag Film to Need 'OK' Before Return
2 ;;Edit Registry
5 ;;Outside Films Profile
4 ;;Delinquent Outside Film Report for Outpatients
REM
PROF
HD ; Header

External References

Name Field # of Occurrence
^%DT 4+1
^DIE 1+2, 2+2, 3+2
DT^DIO2 HD+3
EN1^DIP 4+2
^RADPA 1+2, 2+2, 3+2, 5+1
SET^RAPSET1 1+1, 2+1, 3+1
$$SSN^RAUTL START
CLOSE^RAUTL Q5
ZIS^RAUTL PROF

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: 1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: 2+2
Function Call: WRITE
  • Prompt: !
  • Line Location: 3+2
Function Call: WRITE
  • Prompt: !!,"No outside films have been registered for this patient."
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !,"Registered: ",$E(Y,4,5),"/",$E(Y,6,7),"/",$E(Y,2,3),?30,"Returned : ",$S($P(Y,"^",3):$E($P(Y,"^",3),4,5)_"/"_$E($P(Y,"^",3),6,7)_"/"_$E($P(Y,"^",3),2,3),1:"still on file"),?60,"'OK' Needed: ",$S($P(Y,"^",5)="Y":"Yes",1:"No")
  • Line Location: PRT+0
Function Call: WRITE
  • Prompt: !,"Source : ",$P(Y,"^",4)
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: !,I
  • Line Location: PRT+2
Function Call: READ
  • Prompt: "Press RETURN to continue. "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: !,$S(J=1:"Remarks : ",1:""),?12,Y
  • Line Location: REM+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: "Patient: ",RANME," ",RASSN,?55,"Run Date: "
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !!?15,"***** Outside Films Profile *****",$S(RALL=0:" (Films NOT Returned only)",1:"")
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HD+4
Routine Call
  • DIE
  • Line Location:
    • 1+2
    • 2+2
    • 3+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RADPT - [#70] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] START
^RADPT - [#70] START+1, START+2, PRT+1

Label References

Name Line Occurrences
1 1+2
2 2+2
3 3+2
HD START+1, PRT+3
PRT START+2
Q1 1+2
Q2 2+2
Q3 3+2
Q5 5+1, PROF, START, START+1
REM PRT+1

Naked Globals

Name Field # of Occurrence
^( START+2
^(0 START, START+2
^(1 PRT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% Q1!, Q2!, Q3!
%DT Q1!, Q2!, Q3!, 4+1*!
%DT("A" 4+1*
%DUZ Q2!, Q3!
%W Q1!, Q2!, Q3!
%X Q2!, Q3!
%Y Q1!, Q2!, Q3!
%Y1 Q1!, Q2!, Q3!
A Q1!
>> BY 4+2*
C Q1!, Q2!, Q3!, Q5!
D Q1!, Q2!, Q3!
D0 Q1!, Q2!, Q3!
D1 Q1!, Q2!, Q3!
D2 Q1!, Q2!, Q3!
DA 1+2*, Q1!, 2+2*!, Q2!, 3+2*!, Q3!
DDER Q1!, Q2!, Q3!
DDH Q1!
DE 1+2!
DI Q1!, 2+2!, 3+2!
DIC 1+2!, 2+2!, 3+2!, 4+2*, 5+1!
DIC(0 1+2*, 2+2*, 3+2*, 5+1*
DIE 1+2*!, 2+2*!, Q2!, 3+2*!, Q3!
>> DIS(0 4+2*
DQ 1+2!, 2+2!, 3+2!
DR 1+2*!, 2+2*!, Q2!, 3+2*!, Q3!
DT START+2, HD+3
DTIME PRT+3
>> FLDS 4+2*
>> FR 4+2*
I Q3!, Q5!, PRT+2, HD+4*
IO START+1, PRT+3
IO(0 PRT+3
IOF HD+1, HD+2
IOP PROF!
IOSL PRT+3
IOST HD+1, HD+2
J Q5!, REM*
>> L 4+2*
POP Q5!
RADFN 1+2*, Q1!, 2+2*, Q2!, 3+2*, Q3!, 5+1*, START, START+1, START+2
, Q5!, PRT+1
RAI START+2*, Q5!, PRT+1
RALL 5+1*, START+2, Q5!, HD+4
RAMES Q5+1!
RANME START*, Q5!, HD+3
RAPG START+1*, Q5!, HD+1*, HD+2
RAPOP PROF, Q5!
RAPTFL Q1!
RASSN START*, Q5!, HD+3
>> TO 4+2*
X Q1!, Q2!, Q3!, Q5!, PRT+1*, PRT+3*, REM
XQUIT 1+1!, 2+1!, 3+1!
Y 1+2, Q1!, 2+2, Q2!, 3+2, Q3!, 4+1, 4+2, 5+1, START+2*
, Q5!, PRT, PRT+1, REM*, HD+3*
>> ZTRTN PROF*
>> ZTSAVE("RADFN" PROF*
>> ZTSAVE("RALL" PROF*
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