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

Package: Radiology Nuclear Medicine

Routine: RAMAINP


Information

RAMAINP ;HISC/GJC AISC/TMP,RMO-Utility Files Print ;9/22/98 15:26

Source Information

Source file <RAMAINP.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  
Radiology Nuclear Medicine 2 KILL^RAMAINP  $$IMG^RAUTL12  
VA FileMan 1 EN1^DIP  

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

Package Total Caller Graph
Radiology Nuclear Medicine 19 RA ALPHALIST  RA COMPRINT  RA DIAGP  RA DISTP  RA FILMP  RA FLASHFORMP  RA INACPRCLONG  RA INACPRCSHORT  
RA MAJORAMISP  RA MODIFIERP  RA PROCLONG  RA PROCMSGPRINT  RA PROCSERIES  RA PROCSHORT  RA SHARINGP  RA STANDPRINT  
RAMAINP  RAMAINP1  RARTUVR  

Entry Points

Name Comments DBIA/ICR reference
2 ;;Long Active Procedure List
3 ;;Major AMIS Code Print
4 ;;Film Sizes Print
5 ;;Diagnostic Code Print
6 ;;Flash Card/Label Formatter Print
7 ;;Complication Type Print
8 ;;Contract/Sharing Agreements Print
9 ;;Short Active Procedure List
10 ;;Long Inactive Procedure List
11 ;;Short Inactive Procedure List
12 ;;Series Procedures Only
13 ;;Standard Reports List
14 ;;Procedure Modifiers Print
15 ;;Alpha List of Active Procedures
16 ;;Reports Distribution List
17 ;;Rad/Nuc Med Procedure Message List
132
KILL ; Kill locals, and set ZTREQ if applicable.
IMG(RA) ; Screens procedures by I-Type. Called from the following
; subroutines: 2,9,10,11,12 & 15. Contained in variable DIS(0)!
; 'RA' is the ien of file 71.
; return '1' if procedure is correct I-Type, else '0'!
ENTASK ; Entry point for tasked job.
; All necessary variables are defined by the code calling ENTASK.
ZIS(RA) ; Select a device
; RAPOP=device selection successful ^ '^%ZTLOAD' called 1-yes
ZTSAVE ; Save variables for tasked job

External References

Name Field # of Occurrence
^%ZIS ZIS+3
HOME^%ZIS 2+9, 9+8, 10+9, 11+9, 12+9, 15+7, ZIS+9
^%ZTLOAD ZIS+7
EN1^DIP 3+1, 4+2, 5+1, 6+1, 7+1, 8+1, 13+1, 14+2, 16+1, 17+1
ENTASK+3
KILL^RAMAINP ENTASK+4
$$IMG^RAUTL12 2+1, 9+1, 10+1, 11+2, 12+2, 15+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: 2+8
Function Call: WRITE
  • Prompt: !
  • Line Location: 9+7
Function Call: WRITE
  • Prompt: !
  • Line Location: 10+8
Function Call: WRITE
  • Prompt: !
  • Line Location: 11+8
Function Call: WRITE
  • Prompt: !
  • Line Location: 12+8
Function Call: WRITE
  • Prompt: !
  • Line Location: 15+6
Function Call: WRITE
  • Prompt: !,"This report requires a 132 column output device."
  • Line Location: 132+0
Function Call: WRITE
  • Prompt: !
  • Line Location: ZIS+3
Function Call: WRITE
  • Prompt: !?3,"Request Queued, Task #: ",$G(ZTSK)
  • Line Location: ZIS+8
Routine Call
  • %ZIS
  • Line Location:
    • ZIS+3
Routine Call
  • %ZIS
  • Line Location:
    • 2+9
    • 9+8
    • 10+9
    • 11+9
    • 12+9
    • 15+7
    • ZIS+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(34 - [#34] Classic Fileman Calls
^RAMIS(71 - [#71] Classic Fileman Calls
^RAMIS(71.1 - [#71.1] Classic Fileman Calls
^RAMIS(71.2 - [#71.2] Classic Fileman Calls
^RAMIS(71.4 - [#71.4] Classic Fileman Calls
^RA(74.1 - [#74.1] Classic Fileman Calls
^RABTCH(74.3 - [#74.3] Classic Fileman Calls
^RA(78.1 - [#78.1] Classic Fileman Calls
^RA(78.2 - [#78.2] Classic Fileman Calls
^RA(78.3 - [#78.3] Classic Fileman Calls
^RA(78.4 - [#78.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(79.2 - [#79.2] IMG+6
^RAMIS(71 - [#71] IMG+4
^TMP($J KILL+1!, IMG+7, ZTSAVE+5

Label References

Name Line Occurrences
$$ZIS 2+8, 9+7, 10+8, 11+8, 12+8, 15+6
132 2+8, 9+7, 10+8, 11+8, 12+8, 15+6
ENTASK 2+11, 9+10, 10+11, 11+11, 12+11, 15+9
KILL 2+1, 2+9, 2+10, 9+1, 9+8, 9+9, 10+1, 10+9, 10+10, 11+1
11+2, 11+9, 11+10, 12+1, 12+9, 12+10, 15+1, 15+7, 15+8
ZTSAVE ZIS+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT 7+1!
%X 7+1!, KILL+1!
%XX KILL+1!
%Y 7+1!, KILL+1!
%YY KILL+1!
%ZIS KILL+2!, ZIS+3!*
%ZIS("A" ZIS+3*
BY 2+4*, 3+1*!, 4+1*, 4+2!, 5+1*!, 6+1*!, 7+1*!, 8+1*!, 9+4*, 10+4*
11+5*, 12+4*, 13+1*, 13+2!, 14+1*, 14+3!, 15+4*, 16+1*!, 17+1*!, KILL+2!
D0 17+1!
DD00 14+3!
DHD 2+5*, 3+1*!, 5+1*!, 6+1*!, 7+1*!, 8+1*!, 9+5*, 10+5*, 11+6*, 12+5*
13+2!, 14+2*, 14+3!, 16+1!, 17+1!, KILL+2!, ZTSAVE+3
DHIT 2+6*, 10+6*, 12+6*, KILL+2!, ZTSAVE+4
DIC 2+3*, 3+1*, 4+1*, 5+1*, 6+1*, 7+1*, 8+1*, 9+3*, 10+3*, 11+4*
12+4*, 13+1*, 14+1*, 15+3*, 16+1*, 17+1*, KILL+2!
DIJ 4+2!
DIS KILL+2!, ZTSAVE+2
DIS(0 2+7*, 9+6*, 10+7*, 11+7*, 12+7*, 15+5*
DP 4+2!
DTOUT KILL+2!
DUOUT KILL+2!
FLDS 2+3*, 3+1*!, 4+1*, 4+2!, 5+1*!, 6+1*!, 7+1*!, 8+1*!, 9+3*, 10+3*
11+4*, 12+4*, 13+1*, 13+2!, 14+1*, 14+3!, 15+3*, 16+1*!, 17+1*!, KILL+2!
FR 2+4*, 3+1*!, 4+1*, 4+2!, 5+1*!, 6+1*!, 7+1*!, 8+1*!, 9+4*, 10+4*
11+5*, 13+1*, 13+2!, 14+1*, 14+3!, 15+4*, 16+1*!, 17+1*!, KILL+2!
I KILL+4!, ZTSAVE+1~*
IO("Q" ZIS+5, ZIS+6!
IOM ENTASK+2
ION ENTASK+2
IOP ENTASK+2*, ZIS+3!
IOSL ENTASK+2
IOST ENTASK+2
L 2+3*, 3+1*, 4+1*, 5+1*, 6+1*!, 7+1*, 8+1*, 9+3*, 10+3*, 11+4*
12+4*, 13+1*, 14+1*, 15+3*, 16+1*, 17+1*, KILL+2!
P 4+2!
POP 3+1!, 4+2!, 5+1!, 6+1!, 7+1!, 8+1!, 13+2!, 14+3!, 16+1!, KILL+2!
KILL+4!, ZIS+4
RA IMG~, IMG+4, ZIS~, ZIS+6
RA1 2+1~, 9+1~, 10+1~, 12+1~, 15+1~
RA2 2+1~, 9+1~, 10+1~, 12+1~, 15+1~
RA3 2+1~, 10+1~, 12+1~
RADIO KILL+4!
RAI IMG+4~*, IMG+5, IMG+6, IMG+7
RAII IMG+4~, IMG+6*, IMG+7
RAIOP KILL+2!, ENTASK+2*
RALINE KILL+2!
RAPHARM KILL+4!
RAPOP 2+8*, 2+9, 2+10, 9+7*, 9+8, 9+9, 10+8*, 10+9, 10+10, 11+8*
11+9, 11+10, 12+8*, 12+9, 12+10, 15+6*, 15+7, 15+8, KILL+2!, ZIS+2~
, ZIS+4*, ZIS+5, ZIS+7*, ZIS+11
RAX 2+1~*, 9+1~*, 10+1~*, 11+1~, 11+2*, 12+1~, 12+2*, 15+1~*
RAY 2+1~, 2+2*, 2+8, 9+1~, 9+2*, 9+7, 10+1~, 10+2*, 10+8, 11+1~
11+3*, 11+8, 12+1~, 12+3*, 12+8, 15+1~, 15+2*, 15+6
TO 2+4*, 3+1*!, 4+1*, 4+2!, 5+1*!, 6+1*!, 7+1*!, 8+1*!, 9+4*, 10+4*
11+5*, 13+1*, 13+2!, 14+1*, 14+3!, 15+4*, 16+1*!, 17+1*!, KILL+3!
X 4+2!, 8+1!, 13+2!, 16+1!, KILL+3!
X1 16+1!
Y KILL+3!
ZTDESC KILL+3!, ZIS+6*
>> ZTQUEUED KILL+5
>> ZTREQ KILL+5*
ZTRTN KILL+3!, ZIS+6*
ZTSAVE KILL+3!
ZTSAVE( ZTSAVE+1*
ZTSAVE("DHD" ZTSAVE+3*
ZTSAVE("DHIT" ZTSAVE+4*
ZTSAVE("DIS(" ZTSAVE+2*
ZTSAVE("^TMP( $J, ""RA I-TYPE"", " , ZTSAVE+5*
ZTSK 7+1!, ZIS+8
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 |  Local Variables  | All