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

Package: Radiology Nuclear Medicine

Routine: RARTE4


Information

RARTE4 ;HISC/GJC - Edit/Delete Reports (cont) ;11/4/97 08:02

Source Information

Source file <RARTE4.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Radiology Nuclear Medicine 10 BTCH^RABTCH  ELOC^RABWRTE  START^RARTE  (ASKPRT,EDTRPT,STD)^RARTE1  (COPY,PTR)^RARTE2  Q^RARTR  UPSTAT^RAUTL0  UP1^RAUTL1  
($$LOCK,UNLOCK)^RAUTL12  $$EN3^RAUTL15  
VA FileMan 4 ^DIC  DO^DIC1  ^DIE  IX1^DIK  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Radiology Nuclear Medicine 2 RARTE  RARTE5  

Entry Points

Name Comments DBIA/ICR reference
LOCK ;Try to lock next avail IEN, if locked - fail, if used - increment again
IN ;lock rpt for the 1st time if editing existing rpt
IN0 ;skip to here if rpt created in this session and already locked
IN1 ;skip to here if div param disallows rpt copying
PRT
ASKREP
PRT1
Q
Q1
DICW ; Build DIC("W") string
INCRPT ; Kill extraneous variables to avoid collisions.
; Incomplete report information, select another case #.
UNLOCK2

External References

Name Field # of Occurrence
^DIC IN0+5
DO^DIC1 DICW+1
^DIE LOCK+8, IN1+7, ASKREP+3
IX1^DIK LOCK+4
BTCH^RABTCH Q
ELOC^RABWRTE IN1+8
START^RARTE LOCK+1, IN0+6, PRT+3, ASKREP+2, ASKREP+3, PRT1+1, PRT1+5
ASKPRT^RARTE1 Q
EDTRPT^RARTE1 IN1+17
STD^RARTE1 IN1+16
COPY^RARTE2 IN1+9
PTR^RARTE2 LOCK+10
Q^RARTR PRT1+5
UPSTAT^RAUTL0 PRT+7
UP1^RAUTL1 PRT+8
$$LOCK^RAUTL12 LOCK+1, IN+1
UNLOCK^RAUTL12 LOCK+2, LOCK+11, IN0+6, PRT, PRT+2, UNLOCK2
$$EN3^RAUTL15 IN0+6, PRT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,RAI
  • Line Location: IN1+1
Function Call: WRITE
  • Prompt: !,RAI
  • Line Location: IN1+10
Function Call: WRITE
  • Prompt: !,RAI
  • Line Location: IN1+17
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASKREP+0
Function Call: WRITE
  • Prompt: !!?3,"Enter 'YES' to place this report in the batch, or 'NO' not to."
  • Line Location: ASKREP+1
Function Call: WRITE
  • Prompt: !?5,"...report is already part of the '",RABTCHN,"' batch"
  • Line Location: ASKREP+2
Function Call: WRITE
  • Prompt: !?5,"...will now place report in the '",RABTCHN,"' batch"
  • Line Location: ASKREP+3
Function Call: READ
  • Formatting: !!
  • Prompt: "Do you wish to print this report? No// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: PRT1+0
Function Call: WRITE
  • Prompt: !!?3,"Enter 'YES' to print this report, or 'NO' not to."
  • Line Location: PRT1+2
Routine Call
  • DIC
  • Line Location:
    • IN0+5
Routine Call
  • DIE
  • Line Location:
    • LOCK+8
    • IN1+7
    • ASKREP+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RARPT - [#74] Classic Fileman Calls
^RABTCH(74.2 - [#74.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DISV( LOCK+3*
^RABTCH(74.2 - [#74.2] PRT+5, ASKREP+2, Q
^RADPT - [#70] UNLOCK2
^RARPT - [#74] LOCK+2, LOCK+3*, LOCK+4*, IN0+8!, IN0+9*
^RARPT("B" LOCK+2
^RARPT(0 LOCK+3
^TMP($J Q1+3!

Label References

Name Line Occurrences
ASKREP ASKREP+1
DICW IN0+5
IN0 LOCK+12
IN1 IN0+1, IN0+7
INCRPT LOCK+1, IN0+6, PRT+3, ASKREP+2, ASKREP+3, PRT1+1, PRT1+5
LOCK LOCK+2
PRT IN1+10, IN1+16
PRT1 PRT+5, ASKREP, PRT1+2
Q IN+1
UNLOCK2 LOCK+1, LOCK+11, IN+1, IN0+6, PRT+3

Naked Globals

Name Field # of Occurrence
^("T" LOCK+3*
^(0 LOCK+3*, IN0+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LOCK+5!, LOCK+9!, Q1!, INCRPT+2!
%DT Q1!, INCRPT+2!
%W Q1!
%Y Q1!
%Y1 Q1!
C Q1!
D LOCK+5!, LOCK+9!, Q1+2!, INCRPT+2!
D0 LOCK+5!, LOCK+9!, Q1!, INCRPT+2!
D1 Q1!, INCRPT+2!
D2 Q1+2!, INCRPT+2!
DA LOCK+4*, LOCK+5!, LOCK+6*, LOCK+9!, IN1+7*, ASKREP+3*, Q1!
DA(1 LOCK+6*, IN1+7*
DA(2 LOCK+6*
DDER Q1+2!
DE IN1+7!, ASKREP+3!
DI LOCK+5!, LOCK+9!, Q1+2!, INCRPT+2!
DIC LOCK+5!, LOCK+9!, IN0+4*, Q1!, INCRPT+2!
DIC("A" IN0+4*, IN0+5!
DIC("S" IN0+2*, IN0+5!
DIC("W" DICW+2*
DIC(0 IN0+4*
DIE LOCK+5!, LOCK+7*, LOCK+9!, IN1+7*, ASKREP+3*, Q1!
>> DIK LOCK+4*
DIPGM Q1+2!
DIWT INCRPT+2!
DLAYGO Q1+2!
DN INCRPT+2!
DO DICW+1~
DQ LOCK+5!, LOCK+9!, IN1+7!, ASKREP+3!
DR LOCK+5!, LOCK+8*, LOCK+9!, IN1+3*, ASKREP+3*, Q1!
DR(2 IN1+4*, IN1+5*, IN1+6*, ASKREP+3*
DTIME ASKREP, PRT1
DUOUT Q1+4!
DUZ LOCK+3
I LOCK+1*, LOCK+2, LOCK+3, IN0+9*, INCRPT+2!
ION PRT1+3*
>> IOP PRT1+3*
J IN0+8*, IN0+9*, Q1+2!, INCRPT+2!
OREND Q1!
POP Q1+4!
RAAB PRT+5!
RABTCH PRT+5, ASKREP+2, ASKREP+3, Q, Q1!
RABTCHN ASKREP, ASKREP+2, ASKREP+3, Q1!
RACN LOCK+4, IN1+3, ASKREP+3, Q1!, INCRPT+2!
RACNI LOCK+6, PRT, Q1!, INCRPT+2!, UNLOCK2
RACOPY IN0+1!, IN0+11*, IN1+16, Q1!
RACS Q1!
RACT PRT+7, PRT+8, Q1!, INCRPT+2!
RADATE Q1!, INCRPT+2!
RADFN LOCK+4, LOCK+6, LOCK+7, IN1+7, Q1!, UNLOCK2
>> RADRS IN1+9*
RADTE LOCK+4, ASKREP+3, Q1!, INCRPT+2!
RADTI LOCK+6, LOCK+7, IN1+7, Q1!, INCRPT+3!, UNLOCK2
RADUZ Q1!
RAELESIG Q1!
RAEND Q1+2!
RAF5 Q1+2!
RAFIN IN1+2!, IN1+10, Q1!, INCRPT+3!
RAFL Q1+2!
RAFST Q1+2!
RAHEAD Q1!
RAHLTCPB PRT+7~*
RAI IN1+1, IN1+10, IN1+17, Q1!, INCRPT+3!
RAIX Q1+2!
RAJ1 Q1!
RALI Q1+1!, INCRPT+3!
RALR Q1+1!, INCRPT+3!
>> RAMDV IN0+1, IN1+1, IN1+5, IN1+16
>> RAMES PRT1+4*
>> RAMLC PRT1+3
RANME Q1+1!, INCRPT+3!
RANUM Q1+1!
RAOR Q1+1!
RAORDIFN Q1+1!
RAPNODE PRT, Q1+1!, UNLOCK2
RAPOP Q1+2!
RAPRC Q1+1!, INCRPT+3!
RAPRIT Q1+1!
>> RAPRTSET LOCK+10, IN1+9
RAQUIT Q1+1!
RAREPORT Q1+1!
RARES Q1+1!
RARPDT Q1+1!
RARPT LOCK+3*, LOCK+4, LOCK+8, LOCK+11, IN+1, IN0+6, IN0+8, IN0+9, PRT+2, ASKREP+2
, Q1+1!, INCRPT+3!
RARPTN LOCK+3, LOCK+4, Q1+1!, INCRPT+3!
RARPTZ Q1+1!
RARTPN Q1+1!
RASET Q1+1!
RASI Q1+1!
RASIG Q1+1!
RASN Q1+1!
RASSN Q1+1!, INCRPT+3!
RAST Q1+1!, INCRPT+3!
RAST1 Q1+1!
RASTFF Q1+1!
RASTI Q1+1!
RAVW Q1+1!, INCRPT+3!
>> RAXIT LOCK+1*, LOCK+11, IN+1*, IN0+6*, PRT+2*, PRT+3*
RAY1 LOCK+9!, IN0+5*, IN0+7, Q1+2!
W Q1+1!
X LOCK+5!, LOCK+9!, IN0+6, IN1+16, ASKREP*, ASKREP+1, PRT1*, PRT1+1, PRT1+2, Q
, Q1+1!, INCRPT+3!
XQUIT Q1+1!
Y LOCK+5!, LOCK+9!, IN0+5, IN0+9, Q1+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