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

Package: Radiology Nuclear Medicine

Routine: RAPINFO


Information

RAPINFO ;HIRMFO/GJC - Display Imaging Procedure Rad/Nuc Med info ;11/5/99 12:32

Source Information

Source file <RAPINFO.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  $$LOW^XLFSTR  
Radiology Nuclear Medicine 5 $$NAMCODE^RACPTMSC  ($$BLD,HDR)^RAPINFO  EN1^RASELCT  ($$EOS,$$XTERNAL)^RAUTL5  STOPCHK^RAUTL9  
VA FileMan 5 EN^DDIOL  ^DIC  $$EXTERNAL^DILFD  ^DIWP  ^DIWW  

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 RA DISPLAY IMAGPROCINFO  RAPINFO  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Associated option: [DISPLAY IMAGING PROCEDURE RAD/NUC MED INFORMATION]
PROC ; Procedure selection O-M-A
DEV ; Device selection
START ; Start processing data & printing to the device here.
BLD(RA1) ; Build procedure identifier string
; input: 'RA1' = ien of entry in Rad/Nuc Med Procedures file
DICS(RAY,Y) ; Display active procedures within an imaging type.
; Input : RAY - Imaging Type
; Y - ien of the procedure
; Output: 1 if a valid selection, 0 if invalid
DICW ; Display abbreviation with the I-Type
HDR ; Header for our report
KILL ; Kill and quit the application
DESC(RAPRC,RAFLG) ; display the descendants associated with the
; parent procedure
CMEDIA ; display the contrast media associated with the parent procedure

External References

Name Field # of Occurrence
^%ZIS DEV+1
HOME^%ZIS DEV+12
^%ZISC START+42
^%ZTLOAD DEV+7
EN^DDIOL DICW+4
^DIC EN1+6
$$EXTERNAL^DILFD CMEDIA+5
^DIWP START+35, CMEDIA+8
^DIWW START+37, CMEDIA+8
$$NAMCODE^RACPTMSC BLD+17
$$BLD^RAPINFO START+16, DESC+5
HDR^RAPINFO START+11, START+17, START+34, DESC+6, CMEDIA+7
EN1^RASELCT PROC+3
$$EOS^RAUTL5 START+17, START+34, DESC+6, CMEDIA+7
$$XTERNAL^RAUTL5 BLD+9
STOPCHK^RAUTL9 HDR+5
$$FMTE^XLFDT START+11
$$NOW^XLFDT START+10
$$LOW^XLFSTR BLD+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !?5,"Request Queued, Task #: ",+$G(ZTSK)
  • Line Location: DEV+9
Function Call: WRITE
  • Prompt: !?5,"Request cancelled!"
  • Line Location: DEV+11
Function Call: WRITE
  • Prompt: !,$E(RA0,1,30),?34,RAIDFIER
  • Line Location: START+18
Function Call: WRITE
  • Prompt: !
  • Line Location: START+39
Function Call: WRITE
  • Prompt: !
  • Line Location: START+42
Function Call: WRITE
  • Prompt: !?(IOM-$L(RAHDR)\2),RAHDR
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"Run Date/Time: ",RARUNDT,?($S(IOM=132:121,1:68)),"Page: ",RAPG
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,RALN
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X
  • Line Location: DESC+7
Function Call: WRITE
  • Prompt: ?2,$E($P($G(^RAMIS(71,RAPRC,0)),U),1,30),?34,RAIDFIER
  • Line Location: DESC+7
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1
Routine Call
  • %ZIS
  • Line Location:
    • DEV+12
Routine Call
  • DIC
  • Line Location:
    • EN1+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
71.0125 EXTERNAL^DILFD
^RA(79.2 - [#79.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(71 START+6, BLD+9
^RA(79.2 - [#79.2] BLD+5, DICW+2
^RAMIS(71 - [#71] START+15, START+22, START+23, START+28, START+30, START+33, START+35, BLD+3, DICS+4, DICS+5
, DESC+7, DESC+9, CMEDIA+3, CMEDIA+4
^TMP($J EN1+2!, PROC+4, START+12, START+14, KILL+1!
^UTILITY($J START+32!, CMEDIA+1!, CMEDIA+9!

Label References

Name Line Occurrences
DESC START+23, START+28
KILL EN1+7, PROC+4, DEV+2, DEV+3, START+11, START+42

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%X KILL+1!
%XX KILL+1!
%Y KILL+1!
%YY KILL+1!
%ZIS DEV+1*, DEV+2!
%ZIS("A" DEV+1*
C KILL+2!
DDH KILL+2!
DIC EN1+3*, EN1+6!
DIC("A" EN1+3*
DIC("S" EN1+5*
DIC("W" EN1+4*
DIC(0 EN1+3*
DIROUT KILL+2!
DIRUT KILL+2!
DISYS KILL+3!
DIW KILL+2!
DIWF START+31*, KILL+2!, CMEDIA+2*, CMEDIA+9!
DIWL START+31*, KILL+2!, CMEDIA+2*, CMEDIA+9!
DIWR START+31*, KILL+2!, CMEDIA+2*, CMEDIA+9!
DIWT KILL+2!
DN KILL+2!
DT BLD+7, BLD+17, DICS+6
DTOUT KILL+2!
DUOUT KILL+2!
I START+2~, START+7*, KILL+3!
IO START+2
IO("Q" DEV+3, DEV+12!
IOF HDR+1
IOM START+5, START+31, HDR+2, HDR+3, CMEDIA+2
IOSL START+17, START+34, DESC+6, CMEDIA+7
J START+2~, START+7*, START+8
POP DEV+2, KILL+3!
RA BLD+2~
RA("I" BLD+3*, BLD+7
RA(0 BLD+3*, BLD+4, BLD+9, BLD+14
RA0 START+2~, START+3*, START+12*, START+14, START+18
RA1 START+2~, START+13*, START+14*, START+15, START+16, START+22, START+23, START+28, START+30, START+33
, START+35, BLD~, BLD+3
RA2 START+2~, START+22*, START+23, START+25!, START+32*, START+33*, START+35
RA21 START+23*, START+25!
RA3 CMEDIA+1*, CMEDIA+3*, CMEDIA+4, CMEDIA+9!
RA3(0 CMEDIA+4*, CMEDIA+5
RA71 START+2~, START+15*, START+21
RA71ACT DICS+5~*, DICS+6
RA792 DICW+1~, DICW+2*
RABBRV DICW+1~, DICW+2*, DICW+3, DICW+4
RABBRV(1 DICW+3*, DICW+4*
RACPT BLD+2~, BLD+14*, BLD+15*, BLD+16, BLD+17*, BLD+18*, BLD+20
RACPT(0 BLD+14*, BLD+17
RADD START+2~, START+6*, START+7
RADIC EN1+1~, PROC+1*, PROC+3
RADIC("A" PROC+1*
RADIC("S" PROC+2*
RADIC(0 PROC+2*
RAFLG DESC~, DESC+4
RAHDR START+2~, START+4*, HDR+2
RAIABRV BLD+2~, BLD+6*, BLD+20
RAIABRV(0 BLD+4*, BLD+5
RAIABRV(1 BLD+5*, BLD+6
RAIDFIER START+2~, START+16*, START+18, DESC+5*, DESC+7
RAINA EN1+1~
RAITYPE EN1+1~, EN1+8*, DICS+4
RALN START+2~, START+5*, HDR+4
RAMAX START+2~, START+3*, START+8*, BLD+13
RANOW START+2~, START+10*, START+11
RAPG START+2~, START+3*, HDR+1*, HDR+3
RAPRC DESC~, DESC+5, DESC+7, DESC+9, CMEDIA+3, CMEDIA+4
RAPTYPE BLD+2~, BLD+7*, BLD+8, BLD+9*, BLD+10*, BLD+11*, BLD+13*, BLD+15, BLD+20
RAQUIT EN1+1~
RARUNDT START+3~, START+11*, HDR+3
RASTR BLD+2~*, BLD+20*, BLD+21
RAUTIL EN1+1~, PROC+3*
RAXIT START+3~*, START+11, START+12, START+14, START+17*, START+18, START+21, START+22, START+28, START+33
, START+34*, START+35, START+37, HDR+5*, DESC+4, DESC+6*, DESC+7, CMEDIA+7*
RAY DICS~
U START+21, DESC+7, CMEDIA+4
X START+32*, START+33!, START+35*, KILL+2!, CMEDIA+1!*, CMEDIA+5*, CMEDIA+8*, CMEDIA+9!
Y EN1+7, EN1+8, DICS~, DICS+4, DICS+5, DICW+2, KILL+2!
Z KILL+3!
ZTDESC DEV+6*, KILL+3!
>> ZTQUEUED START+1, HDR+5
>> ZTREQ START+1*
ZTRTN DEV+4*, KILL+3!
ZTSAVE KILL+3!
ZTSAVE("^TMP( $J, ""RA PROCEDURES"", " , DEV+5*
>> ZTSK DEV+9
>> ZTSK("D" DEV+8
>> ZTSTOP HDR+5
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