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

Package: Radiology Nuclear Medicine

Routine: RAMAINP1


Information

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

Source Information

Source file <RAMAINP1.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 5 HOME^%ZIS  $$S^%ZTLOAD  $$FMTE^XLFDT  $$CJ^XLFSTR  EN^XUTMDEVQ  
Radiology Nuclear Medicine 3 ($$BASICMOD,$$NAMCODE)^RACPTMSC  ($$ZIS,132,ENTASK,KILL)^RAMAINP  $$IMG^RAUTL12  
VA Fileman 2 $$EXTERNAL^DILFD  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Radiology Nuclear Medicine 2 RA PROCMEDIA  RA PROCPARENT  

Entry Points

Name Comments DBIA/ICR reference
CMPRT ; Entry Point: print procedures that are associated with contrast
; media/medium.
; kill ^TMP($J) and select procedure i-types
HDR ; print header
18 ;;Parent Procedure List
PRTCM ; Print procedures that are associated with contrast media/medium.
EOS ; end of screen dialog
CMDISP(RAZ71) ;Display contrast media data for descendents when the 'Parent
KILL ; kill and quit
ACTIVE() ; Use the ^DIR call to ask the user if active, inactive, or
; both inactive & active procedures are to be included.

External References

Name Field # of Occurrence
HOME^%ZIS 18+12
$$S^%ZTLOAD PRTCM+10
$$EXTERNAL^DILFD PRTCM+29, PRTCM+33, PRTCM+34, CMDISP+9
^DIR ACTIVE+6, EOS+3
$$BASICMOD^RACPTMSC PRTCM+28
$$NAMCODE^RACPTMSC PRTCM+24
$$ZIS^RAMAINP 18+11
132^RAMAINP 18+11
ENTASK^RAMAINP 18+14
KILL^RAMAINP 18+2, 18+12, 18+13
$$IMG^RAUTL12 18+2, CMPRT+3
$$FMTE^XLFDT PRTCM+5
$$CJ^XLFSTR KILL+2, HDR+2, HDR+5
EN^XUTMDEVQ CMPRT+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: 18+11
Function Call: WRITE
  • Prompt: !!,"Task Number: "_ZTSK,!
  • Line Location: CMPRT+16
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTCM+27
Function Call: WRITE
  • Prompt: ?52,$$EXTERNAL^DILFD(71,100,"",RAY("I"))
  • Line Location: PRTCM+34
Function Call: WRITE
  • Prompt: !
  • Line Location: ACTIVE+6
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(RAHD,IOM),!,"Date: ",RADT,?69,"Page ",RAPG
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"CPT",?19,"Procedure",!?2,"CPT Modifiers",?50,"Contrast Media",!,"Procedure Type",?24,"Imaging Type"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(RALINE,IOM)
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !?7,"Contrast Medium"
  • Line Location: CMDISP+5
Function Call: WRITE
  • Prompt: ?40,$$EXTERNAL^DILFD(71.0125,.01,"",RAX)
  • Line Location: CMDISP+9
Routine Call
  • %ZIS
  • Line Location:
    • 18+12
Routine Call
  • DIR
  • Line Location:
    • ACTIVE+6
    • EOS+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RAMIS(71 - [#71] Classic Fileman Calls,  EXTERNAL^DILFD
71.0125 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RAMIS(71 - [#71] PRTCM+9, PRTCM+11, PRTCM+14, PRTCM+28, PRTCM+29, CMDISP+7, CMDISP+8
^TMP($J CMPRT+3!, CMPRT+5, CMPRT+6, CMPRT+7!

Label References

Name Line Occurrences
$$ACTIVE 18+3, CMPRT+11
EOS PRTCM+25, PRTCM+30, PRTCM+32
HDR PRTCM+7

Naked Globals

Name Field # of Occurrence
^( PRTCM+28, PRTCM+29

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%L CMPRT+17!
%X CMPRT+17!
%Y CMPRT+17!
>> BY 18+6*
DDH CMPRT+17!
>> DHD 18+6*
>> DHIT 18+10*
>> DIC 18+5*
DIR ACTIVE+2!, ACTIVE+7!, EOS+2!, EOS+4!
DIR("?" ACTIVE+4*, ACTIVE+5*
DIR("A" ACTIVE+3*
DIR("B" ACTIVE+3*
DIR(0 ACTIVE+3*, EOS+3*
DIROUT ACTIVE+2!, ACTIVE+7!
DIRUT ACTIVE+2!, ACTIVE+6, ACTIVE+7!, EOS+2!, EOS+3, EOS+4!
>> DIS(0 18+7*, 18+8*, 18+9*
DT PRTCM+5, PRTCM+17, PRTCM+22, PRTCM+24, PRTCM+28
DTOUT ACTIVE+2!, ACTIVE+7!, EOS+2!, EOS+4!
DUOUT ACTIVE+2!, ACTIVE+7!, EOS+2!, EOS+4!
>> FLDS 18+5*
>> FR 18+10*
I CMPRT+14*, CMPRT+15!
IOF PRTCM+6, HDR+1
IOM PRTCM+4, KILL+2, HDR+2, HDR+5
IOSL PRTCM+25, PRTCM+30, PRTCM+32
IOST PRTCM+6, EOS+1
>> L 18+5*
POP CMPRT+17!
RA1 18+1~
RA2 18+1~
RA3 18+1~
RACM PRTCM+26*, PRTCM+27, PRTCM+29*, KILL+4!
RADCM PRTCM+26*, PRTCM+27, PRTCM+28*, KILL+4!
RADT PRTCM+5*, KILL+4!, HDR+2
RAHD PRTCM+2*, PRTCM+3*, KILL+4!, HDR+2
RAITYP CMPRT+4*, CMPRT+6*, CMPRT+12!, CMPRT+17!, PRTCM+13, KILL+4!
RALBL CMDISP+6~*, CMDISP+9*
RALINE PRTCM+4*, KILL+4!, HDR+5
RAPG PRTCM+5*, KILL+4!, HDR+1*, HDR+2
>> RAPOP 18+11*, 18+12, 18+13
RASTAT 18+3*, 18+4!, 18+6, 18+7, 18+8, 18+9, 18+10!, CMPRT+11*, CMPRT+12!, CMPRT+17!
, PRTCM+3, PRTCM+17, PRTCM+19, PRTCM+22, PRTCM+34, HDR+4
RAX 18+2~*, CMPRT+3*!, CMPRT+4*, CMPRT+5*, CMPRT+6, CMPRT+7, CMPRT+12!, CMPRT+17!, CMDISP+6~, CMDISP+8*
, CMDISP+9
RAXIT PRTCM+7*, PRTCM+9, PRTCM+10*, PRTCM+25, PRTCM+27, PRTCM+30, PRTCM+32, KILL+4!, EOS+1, EOS+3*
RAY 18+2~, CMPRT+6*, CMPRT+12!, CMPRT+17!, PRTCM+7*, PRTCM+9*, PRTCM+11, PRTCM+14, PRTCM+28, PRTCM+29
, KILL+4!, CMDISP+6~*, CMDISP+7*, CMDISP+8, CMDISP+9
RAY("I" PRTCM+14*, PRTCM+17, PRTCM+19, PRTCM+22, PRTCM+34
RAY(0 PRTCM+11*, PRTCM+13, PRTCM+24, PRTCM+33, KILL+2
RAZ71 CMDISP~, CMDISP+7, CMDISP+8
>> TO 18+10*
U PRTCM+13, PRTCM+24, PRTCM+28, PRTCM+29, PRTCM+33, CMDISP+8
X CMPRT+17!, ACTIVE+2!, ACTIVE+7!
Y CMPRT+17!, ACTIVE+2~, ACTIVE+6*, ACTIVE+8
>> ZTQUEUED PRTCM+1
>> ZTREQ PRTCM+1*
ZTSAVE CMPRT+15, CMPRT+17!
ZTSAVE( CMPRT+14*
ZTSK CMPRT+16, CMPRT+17!
>> ZTSTOP PRTCM+10*
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