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

Package: Radiology Nuclear Medicine

Routine: RACMHIS


Information

RACMHIS ;HISC/GJC-Radiology Contrast Media History option (driver)

Source Information

Source file <RACMHIS.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA Fileman 5 $$EXTERNAL^DILFD  $$GET1^DIQ  ^DIR  ^DIWP  ^DIWW  
Kernel 4 $$S^%ZTLOAD  ($$FMADD,$$FMTE)^XLFDT  $$CJ^XLFSTR  EN^XUTMDEVQ  
Radiology Nuclear Medicine 1 EN1^RASELCT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Radiology Nuclear Medicine 2 RA CMAUDIT HISTORY  RAPROD2  

Entry Points

Name Comments DBIA/ICR reference
ENDDT ;Prompt for Ending Date
EN ;begin; find all procedures with a CM audit history
HDR ; print header
CONTRAST(RACMU) ;Return the current CM definition for this procedure delimited
EOS ; end of screen dialog
START ;main body
EXIT ;clean up symbol table, message to user
KILL ;clean up symbol table
STRTDT ;Prompt for Starting Date

External References

Name Field # of Occurrence
$$S^%ZTLOAD START+7, START+10
$$EXTERNAL^DILFD CONTRAST+7
$$GET1^DIQ START+19
^DIR STRTDT+7, ENDDT+8, EOS+3
^DIWP START+24
^DIWW START+24
EN1^RASELCT EN+3
$$FMADD^XLFDT STRTDT+10
$$FMTE^XLFDT STRTDT+5, ENDDT+5, START+3, START+17
$$CJ^XLFSTR EXIT+2, HDR+2, HDR+4
EN^XUTMDEVQ ENDDT+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: STRTDT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ENDDT+1
Function Call: WRITE
  • Prompt: !!,"Task Number: "_ZTSK,!
  • Line Location: ENDDT+16
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(RAHD,IOM),!,"Run Date: ",RADT,?25,"From: ",$P(RASTRT,U,2),?45,"To: ",$P(RASTOP,U,2),?68,"Page ",RAPG
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"Procedure",?34,"Date/Time Changed",?55,"User",!?2,"Contrast Media"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(RALINE,IOM)
  • Line Location: HDR+4
Routine Call
  • DIR
  • Line Location:
    • STRTDT+7
    • ENDDT+8
    • EOS+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
71.0125 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RAMIS(71 - [#71] START+12, START+14, START+16
^TMP($J EN+3!, EN+4, KILL+2!, START+6, START+9
^UTILITY($J START+24!

Label References

Name Line Occurrences
$$CONTRAST START+18
EOS START+20, START+22
HDR START+5
KILL EN+4, STRTDT+8, ENDDT+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR STRTDT+1!, STRTDT+7!, ENDDT+1!, ENDDT+8!, KILL+1!, EOS+2!, EOS+4!
DIR("?" STRTDT+3*, STRTDT+4*, STRTDT+5*, STRTDT+6*, ENDDT+3*, ENDDT+4*, ENDDT+5*, ENDDT+6*, ENDDT+7*
DIR("A" STRTDT+2*, ENDDT+2*
DIR(0 STRTDT+1*, ENDDT+1*, EOS+3*
DIROUT KILL+1!
DIRUT STRTDT+8, ENDDT+9, KILL+1!, EOS+2!, EOS+3, EOS+4!
DIW EXIT+3!
DIWF START+24*, EXIT+3!
DIWL START+24*, EXIT+3!
DIWR START+24*, EXIT+3!
DIWT EXIT+3!
DN EXIT+3!
DT STRTDT+1, STRTDT+5, ENDDT+1, ENDDT+5, START+3
DTOUT KILL+1!, EOS+2!, EOS+4!
DUOUT KILL+1!, EOS+2!, EOS+4!
I ENDDT+14*, ENDDT+15!, EXIT+3!
IOF START+4, HDR+1
IOM START+3, EXIT+2, HDR+2, HDR+4
IOSL START+20, START+22
IOST START+4, EOS+1
POP KILL+1!
RAADT START+17*, START+21, EXIT+3!
RAAU START+19*, START+21, EXIT+3!
RACMU START+17*, START+18, EXIT+3!, CONTRAST~, CONTRAST+6, CONTRAST+7
RADIC EN+1*, EN+3, KILL+1!
RADIC("A" EN+1*
RADIC("S" EN+2*
RADIC(0 EN+1*
RADT START+3*, EXIT+3!, HDR+2
RAHD START+2*, EXIT+3!, HDR+2
RAI EXIT+3!, CONTRAST+5~, CONTRAST+6*, CONTRAST+7
RAIEN START+13*, START+14*, START+16, EXIT+3!
RALINE START+3*, EXIT+4!, HDR+4
RAPG START+3*, EXIT+4!, HDR+1*, HDR+2
RAPNME START+5*, START+6*, START+9, START+21, EXIT+4!
RAQUIT KILL+1!
RAS START+11*, START+12*, START+14, EXIT+4!
RASTOP ENDDT+12*, KILL+1!, START+12, HDR+2
RASTRT STRTDT+10*, ENDDT+1, ENDDT+6, KILL+1!, START+11, HDR+2
RAUTIL EN+2*, EN+3, KILL+1!
RAX START+18*, START+24, EXIT+4!, CONTRAST+5~*, CONTRAST+7*, CONTRAST+9
RAXIT START+5*, START+6, START+7*, START+9, START+10*, START+12, START+14, START+20, START+22, EXIT+4!
, EOS+1, EOS+3*
RAY START+8*, START+9*, START+12, START+14, START+16, EXIT+4!
RAY(0 START+16*, START+17, START+19, EXIT+2
U ENDDT+1, ENDDT+6, START+11, START+12, START+17, START+19, HDR+2
X KILL+1!, START+24*, EXIT+4!
Y STRTDT+10, ENDDT+12, KILL+2!, EXIT+4!
Y(0 STRTDT+10, ENDDT+12
Z EXIT+4!
>> ZTQUEUED START+1
>> ZTREQ START+1*
ZTSAVE ENDDT+15, KILL+2!
ZTSAVE( ENDDT+14*
ZTSK ENDDT+16, KILL+2!
>> ZTSTOP START+7*, START+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 |  Local Variables |  All