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

Package: Radiology Nuclear Medicine

Routine: RANPRO4


Information

RANPRO4 ;BPFO/CLT - RADIOLOGY NEW PROCEDURE UTILITIES ; 27 Oct 2016 4:32 PM

Source Information

Source file <RANPRO4.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 4 C^%DTC  ^DIE  $$GET1^DIQ  ^DIR  
Radiology Nuclear Medicine 3 MRPF^RANPRO5  MTCH^RANPROU2  EN^RAXMLSND  
Kernel 2 $$NS^XUAF4  $$KSP^XUPARAM  
M XML Parser 1 $$XMLHDR^MXMLUTL  
MailMan 1 ^XMD  

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

Package Total Caller Graph
Radiology Nuclear Medicine 1 RANPRO  

Entry Points

Name Comments DBIA/ICR reference
EN(RADA) ;PRIMARY ENTRY POINT
GOOD ;ACCEPT ENTRY AND ASSIGN CPT
CPTEN ;Enter the CPT code
MSG ;SEND A MESSAGE TO GATEKEEPER
MSG1 ;MESSAGE TO NTRT
XML ; NTRT message for ISAAC
; Need P1 ISAAC SCHEMA NAME
; Need P2 ISAAC SCHEMA PATH
; get the schemea name and the schema path
DEACT ;BLOCK INACTIVATION DATE
END ;KILL LOCAL VARIABLES AND END
MSGRAN(RADA) ; entry from RANPRO after file to 71 to send NTRT message

External References

Name Field # of Occurrence
C^%DTC DEACT+4
^DIE CPTEN+12, CPTEN+18, MSG1+8
$$GET1^DIQ XML+5, XML+6
^DIR GOOD+12, CPTEN+5
$$XMLHDR^MXMLUTL XML+15
MRPF^RANPRO5 CPTEN+7
MTCH^RANPROU2 CPTEN+9
EN^RAXMLSND XML+32
^XMD MSG+15, MSG1+35
$$NS^XUAF4 MSG1+6
$$KSP^XUPARAM MSG1+6, MSG1+30, MSG1+31, XML+20, XML+25

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: GOOD+12
Function Call: WRITE
  • Prompt: !!,"The CPT code is needed to match to an entry within the MASTER",!,"RADIOLOGY PROCEDURE file."
  • Line Location: CPTEN+2
Function Call: WRITE
  • Prompt: !!,"The CPT code for this procedure is ",RACPT,"."
  • Line Location: CPTEN+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CPTEN+5
Function Call: WRITE
  • Prompt: !!,*7,"No MRPF match made.",!!
  • Line Location: CPTEN+8
Function Call: WRITE
  • Prompt: !?3,"You have mapped this procedure to "_$P($G(^RAMRPF(71.99,RAPROIEN,0)),U,1)
  • Line Location: CPTEN+13
Routine Call
  • DIE
  • Line Location:
    • CPTEN+12
    • CPTEN+18
    • MSG1+8
Routine Call
  • DIR
  • Line Location:
    • GOOD+12
    • CPTEN+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RAMIS(71 - [#71] Classic Fileman Calls
^RAMRPF(71.11 - [#71.11] Classic Fileman Calls
^RAMRPF(71.98 - [#71.98] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RAMIS(71 - [#71] CPTEN+9, MSG1+5, MSG1+23, MSG1+27, MSG1+33*, XML+22
^RAMRPF(71.11 - [#71.11] GOOD+1, GOOD+7, CPTEN+6*, MSG+2, MSG+12, MSG+14, MSG+17, DEACT+5*
^RAMRPF(71.98 - [#71.98] GOOD+9, CPTEN+12, CPTEN+17, MSG+1, MSG+5, MSG+16, MSG1+2, MSG1+16, MSG1+37, DEACT+2
DEACT+3
^RAMRPF(71.99 - [#71.99] CPTEN+12, CPTEN+13
^TMP("RA7111DA" GOOD+6, MSG+11, MSG1+22
^XTMP("RAMAIN4" EN+4*, GOOD+12*

Label References

Name Line Occurrences
END GOOD+12, CPTEN+1, CPTEN+5, CPTEN+8, CPTEN+10, MSG+19
MSG1 MSGRAN+1
XML MSG1+37

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A XML+4~, XML+7*, XML+8, XML+12*, XML+16
C XML+4~
DA EN+3, CPTEN+7*, CPTEN+12*, CPTEN+16*, MSG1+8~*!
DIE CPTEN+12*, CPTEN+16*, MSG1+8~*!
DIE(0 CPTEN+12*, CPTEN+16*
DIR EN+1~, GOOD+5!, GOOD+7!, CPTEN+4!
DIR("A" GOOD+5!, GOOD+7*, GOOD+10*, CPTEN+4*
DIR("B" GOOD+5!, GOOD+11*
DIR(0 GOOD+5!, GOOD+7*, CPTEN+4*
DIROUT CPTEN+5!
DIRUT CPTEN+5!
DR CPTEN+12*, CPTEN+17*, CPTEN+18*, MSG1+8~*!
DT CPTEN+12, CPTEN+18, MSG1+33, DEACT+3
DUOUT CPTEN+5!, CPTEN+8
DUZ MSG+4, MSG1+15, XML+31
P1 EN+2~, XML+4~, XML+5*, XML+7, XML+8*, XML+12
P2 EN+2~, XML+4~, XML+6*, XML+9, XML+10*, XML+11*, XML+12
>> RA7111DA GOOD+6*, GOOD+7, MSG+11*, MSG+12, MSG1+22*
RA71IEN XML+30~, XML+31*, XML+33!
RA901 EN+2~, CPTEN+17*, CPTEN+18
RACODE EN+1~
>> RACPT CPTEN+3, CPTEN+4, CPTEN+5, CPTEN+6*
RADA EN~, EN+3*, EN+4*, GOOD+1, CPTEN+6, CPTEN+7, CPTEN+12, CPTEN+16, MSG+1, MSG+2
MSG+14, MSG+16, MSG+17, MSG1+5, MSG1+8, MSG1+23, MSG1+27, MSG1+29, MSG1+33, XML+22
XML+24, XML+31, DEACT+5, MSGRAN~
RADUZ XML+30~, XML+31*, XML+33!
RAFAC EN+1~, MSG1+4~, MSG1+6*, MSG1+9*, MSG1+20, MSG1+38!, XML+19
RAFN EN+1~, MSG1+4~, MSG1+9*, MSG1+18, MSG1+20, MSG1+38!, XML+19
RAGOLD EN+1~, CPTEN+7*
RAMATCH EN+1~, CPTEN+7
>> RAMTCH CPTEN+9*
RANEWPRO EN+1~, END+2
RANM EN+1~, EN+4*, XML+21
>> RANMSG MSG+18*
RANOT EN+1~
>> RANQUIT CPTEN+8, CPTEN+9, CPTEN+10
RAPLUSY EN+1~
>> RAPNM EN+4
RAPROIEN EN+1~, CPTEN+9, CPTEN+12, CPTEN+13
RAS XML+30~, XML+31*, XML+33!
>> RASEED GOOD+9*, GOOD+10
RATXT MSG+2~, MSG1+4~, MSG1+38!, XML+14!, XML+33!, END+1!
RATXT(1 MSG+6*, MSG1+18*, XML+15*
RATXT(10 MSG1+31*, XML+25*
RATXT(11 XML+26*
RATXT(12 XML+27*
RATXT(2 MSG1+19*, XML+16*
RATXT(3 MSG+7*, MSG1+20*, XML+17*
RATXT(4 MSG+8*, MSG1+21*, XML+18*
RATXT(5 MSG+9*, MSG1+23*, XML+19*
RATXT(6 MSG1+26*, XML+20*
RATXT(7 MSG+12*, MSG1+27*, XML+21*
RATXT(8 MSG+14*, MSG1+29*, XML+22*
RATXT(9 MSG1+30*, XML+24*
RATYPE EN+1~, GOOD+1*, GOOD+4
>> RAX CPTEN+1
>> RAXTMPNM XML+28*
U GOOD+1, GOOD+7, GOOD+9, CPTEN+6, CPTEN+12, CPTEN+13, CPTEN+17, MSG+1, MSG+2, MSG+5
MSG+12, MSG+14, MSG+16, MSG+17, MSG1+2, MSG1+5, MSG1+9, MSG1+16, MSG1+23, MSG1+27
MSG1+33, MSG1+37, XML+22, DEACT+2, DEACT+3, DEACT+5
X CPTEN+1, CPTEN+6, DEACT+5, END+1!
>> X1 DEACT+3*
>> X2 DEACT+3*
XMDUN EN+1~, MSG1+4~, MSG1+38!, END+1!
XMDUZ MSG1+4~, MSG1+38!, END+1!
XMDUZ("G.RADNTRT" MSG1+14*
XMSUB MSG+2~, MSG+3*, MSG1+4~, MSG1+11*, MSG1+38!, XML+13*, XML+28
XMTEXT MSG+2~, MSG+15*, MSG1+4~, MSG1+35*, MSG1+38!
XMY MSG+2~, MSG1+4~, MSG1+38!
XMY( MSG+4*, MSG+5*, MSG1+15*, MSG1+16*
XMY("G.RADIOL OGY NTRT@DOMAIN.EXT" , MSG1+12*
XMY("G.RADNTRT" MSG1+13*
XMZ MSG1+4~, MSG1+38!, END+1!
Y GOOD+12, END+1!
Y(0 CPTEN+8, CPTEN+12, CPTEN+14
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