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

Package: Radiology Nuclear Medicine

Routine: RAO7XX


Information

RAO7XX ;HISC/SS-Sending XX HL7 message to CPRS ;11/19/01 09:07

Source Information

Source file <RAO7XX.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Radiology Nuclear Medicine 6 EN1^RAO7NEW  (SETALERT,SETNOTIF)^RAO7PC4  SVBEFOR^RAO7UTL  $$ORVR^RAORDU  (STR70,STR751)^RAUTL10  $$GETTCOM^RAUTL11  
VA FileMan 4 EN^DDIOL  FIELD^DID  $$GET1^DIQ  ^DIR  
Kernel 1 $$PATCH^XPDUTL  

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

Package Total Caller Graph
Radiology Nuclear Medicine 8 RAEDCN  RAEDPT  RAMAG06A  RAO7NEW  RAREG2  RASTED  RAUTL1  RAUTL11  

Entry Points

Name Comments DBIA/ICR reference
EN1(RAOIFN1) ;P18 entry point for "Register exams" and "Add to last visit" options
CHCK
ISCHNGD(RAIEN751,SNDALERT) ;P18
B1P18
FNDIN70M(RAPT,RADT,RACSN,RARET)
FNDIN70(RAPATN,RAORDN,RETRN) ;
UPDTRA0 ;P18 updates var RAO with data from file #70 and sets RAD70SB variable (D2^D3 of #70), called from RAO7NEW
ORCSET
MODIF70(RA18D1,RA18D2) ;P18 uses data of Modifiers from #70 for OBR(18)
SVBEFOR(RAPATN,RAINVDT,RACIEN) ;P18;send radfn,radti,racni (instead of racn and new sequencing of params
CMPAFTR(SNDALERT) ;P18
B2P18
CMPEXIT ;
QQQ
TCPROMPT() ;called from input templates to immitate prompt
DSCRP ;get field description
ZZ(RAPTID,RAPFIEN,RAPTIEN) ; Additional text for display when processing alert.

External References

Name Field # of Occurrence
EN^DDIOL ZZ+13, ZZ+14, ZZ+15
FIELD^DID TCPROMPT+3
$$GET1^DIQ ZZ+8, ZZ+9, ZZ+10, ZZ+11
^DIR TCPROMPT+10
EN1^RAO7NEW CHCK+1, B2P18+3
SETALERT^RAO7PC4 ISCHNGD+23, CMPAFTR+28
SETNOTIF^RAO7PC4 ISCHNGD+22, CMPAFTR+27
SVBEFOR^RAO7UTL SVBEFOR+1
$$ORVR^RAORDU CHCK+1, B2P18+3
STR70^RAUTL10 ISCHNGD+16, CMPAFTR+20
STR751^RAUTL10 ISCHNGD+15
$$GETTCOM^RAUTL11 TCPROMPT+8
$$PATCH^XPDUTL ISCHNGD+22, B1P18, CMPAFTR+27, B2P18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,RA18B("DESCRIPTION",RA18D)
  • Line Location: DSCRP+2
Routine Call
  • DIR
  • Line Location:
    • TCPROMPT+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RADPT - [#70] GET1^DIQ
70.07 FIELD^DID
^RAMIS(71 - [#71] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RADPT - [#70] FNDIN70M+4, FNDIN70M+6, FNDIN70M+8, FNDIN70+6, FNDIN70+8, UPDTRA0+6, MODIF70+1, MODIF70+3, MODIF70+4, CMPAFTR+9
, CMPEXIT+4, CMPEXIT+7
^RADPT("AO" FNDIN70+2, FNDIN70+4
^RAMIS(71 - [#71] EN1+3, EN1+4, UPDTRA0+9, CMPAFTR+12
^RAMIS(71.2 - [#71.2] MODIF70+5
^RAO(75.1 - [#75.1] EN1+2, EN1+3, EN1+4, ISCHNGD+2, CMPAFTR+12

Label References

Name Line Occurrences
$$FNDIN70 ISCHNGD+5, ISCHNGD+6, UPDTRA0+4
$$ISCHNGD EN1+6
CMPEXIT CMPAFTR+10, CMPAFTR+11, CMPAFTR+13, CMPAFTR+22, B2P18
ORCSET UPDTRA0+8
QQQ CMPEXIT+2, CMPEXIT+5

Naked Globals

Name Field # of Occurrence
^( CMPEXIT+4, CMPEXIT+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A MODIF70+2*, MODIF70+3*, MODIF70+4
>> B(0 MODIF70+4*, MODIF70+5
>> B(1 MODIF70+5*, MODIF70+6, MODIF70+7
DA TCPROMPT+1~
DIR TCPROMPT+1~
DIR("?" TCPROMPT+5*
DIR("??" TCPROMPT+6*
DIR("A" TCPROMPT+7*
DIR("B" TCPROMPT+9*
DIR(0 TCPROMPT+4*
DIROUT TCPROMPT+1~
DIRUT TCPROMPT+1~
DTOUT TCPROMPT+1~
DUOUT TCPROMPT+1~
DUZ ORCSET
I CMPAFTR+2~
J CMPAFTR+3~
>> RA("OBR" MODIF70+6, MODIF70+7*, MODIF70+9*
RA0 UPDTRA0+4, UPDTRA0+8*, UPDTRA0+9*, UPDTRA0+10*, UPDTRA0+11*, ORCSET*, MODIF70+1, MODIF70+3, MODIF70+4, CMPAFTR+6~
RA1 CMPAFTR+6~
RA18A FNDIN70+1~, FNDIN70+2*, FNDIN70+3, FNDIN70+4, FNDIN70+6, FNDIN70+7, FNDIN70+8, TCPROMPT+1~, TCPROMPT+2*, TCPROMPT+3
RA18B FNDIN70+1~, FNDIN70+4*, FNDIN70+5, FNDIN70+6, FNDIN70+7, FNDIN70+8, TCPROMPT+1~
RA18B("DESCRIPTION" DSCRP+2
RA18B("HELP-PROMPT" TCPROMPT+5
RA18B("INPUT TRANSFORM" , TCPROMPT+4
RA18C TCPROMPT+1~, TCPROMPT+8*, TCPROMPT+9, TCPROMPT+11
RA18D DSCRP+1~*, DSCRP+2*
RA18D1 MODIF70~, MODIF70+1, MODIF70+3, MODIF70+4
RA18D2 MODIF70~, MODIF70+1, MODIF70+3, MODIF70+4
RA2 CMPAFTR+6~
RA3 CMPAFTR+6~
RACHANGE ISCHNGD+1~, ISCHNGD+11*, ISCHNGD+12*, ISCHNGD+14*, ISCHNGD+17*, ISCHNGD+18, CMPAFTR+6~, CMPAFTR+8*, CMPAFTR+15*, CMPAFTR+18*
, CMPAFTR+21*, CMPAFTR+22, CMPEXIT+2, CMPEXIT+4*, CMPEXIT+5, CMPEXIT+7*, QQQ
RACIEN SVBEFOR~, SVBEFOR+1
>> RACNI TCPROMPT+8
RACSN FNDIN70M~, FNDIN70M+4
RAD70 ISCHNGD+5~*, ISCHNGD+7, ISCHNGD+10, ISCHNGD+14, UPDTRA0+1~, UPDTRA0+2*, UPDTRA0+4*, UPDTRA0+6*, UPDTRA0+8, UPDTRA0+9
, UPDTRA0+10, UPDTRA0+11
RAD70SB ISCHNGD+6~*, ISCHNGD+16, ISCHNGD+19, UPDTRA0+4*, UPDTRA0+6*
RAD751 ISCHNGD+2~*, ISCHNGD+3, ISCHNGD+4, ISCHNGD+8, ISCHNGD+9
RADATA CMPAFTR+6~, CMPAFTR+9*, CMPAFTR+10, CMPAFTR+11, CMPAFTR+12, CMPAFTR+15, CMPAFTR+16, CMPAFTR+18, CMPAFTR+27, B2P18+3
>> RADFN TCPROMPT+8
RADT FNDIN70M~, FNDIN70M+4, FNDIN70M+6, FNDIN70M+7, FNDIN70M+8
>> RADTI TCPROMPT+8
>> RAECH(2 MODIF70+7, MODIF70+9
RAIEN751 ISCHNGD~, ISCHNGD+2, ISCHNGD+5, ISCHNGD+6, ISCHNGD+15, ISCHNGD+22
RAINVDT SVBEFOR~, SVBEFOR+1
RALFL FNDIN70M+1~, FNDIN70M+2*
RALV FNDIN70M+1~, FNDIN70M+2*, FNDIN70M+4*, FNDIN70M+5, FNDIN70M+6, FNDIN70M+7, FNDIN70M+8
RALVAR2 FNDIN70M+3~
>> RAOIFN UPDTRA0+4
RAOIFN1 EN1~, EN1+2, EN1+3, EN1+4, EN1+6, CHCK+1
RAORDN FNDIN70~, FNDIN70+2, FNDIN70+4
RAPAT ISCHNGD+4~*, ISCHNGD+5, ISCHNGD+6, ISCHNGD+16, ISCHNGD+19
RAPATN FNDIN70~, FNDIN70+2, FNDIN70+4, FNDIN70+6, FNDIN70+8, SVBEFOR~, SVBEFOR+1
RAPFIEN ZZ~, ZZ+3*, ZZ+10
RAPHYSID ISCHNGD+9~*, ISCHNGD+14, ISCHNGD+20
RAPNAM ZZ+6~, ZZ+8*, ZZ+13
>> RAPR70 ISCHNGD+10*, ISCHNGD+12, ISCHNGD+13
RAPR751 ISCHNGD+8~*, ISCHNGD+12, ISCHNGD+13
RAPRFR ZZ+6~, ZZ+10*, ZZ+14
RAPRIEN CMPAFTR+5, CMPAFTR+15, CMPAFTR+16, QQQ!
RAPRIEN("CMOD" CMPEXIT+4
RAPRIEN("TCOM" CMPEXIT+7
RAPRIEN(1 UPDTRA0+6, CMPAFTR+9, CMPAFTR+20, CMPAFTR+23, CMPEXIT+4, CMPEXIT+7
RAPRIEN(2 UPDTRA0+6, CMPAFTR+9, CMPAFTR+20, CMPAFTR+23, CMPEXIT+4, CMPEXIT+7
RAPRIEN(3 UPDTRA0+6, CMPAFTR+9, CMPAFTR+20, CMPAFTR+23, CMPEXIT+4, CMPEXIT+7
RAPRIEN(4 CMPAFTR+18, CMPAFTR+24
RAPRIEN(5 CMPAFTR+21
RAPRTO ZZ+6~, ZZ+11*, ZZ+15
RAPRTYPE EN1+4~*, EN1+5, ISCHNGD+12, ISCHNGD+13, CMPAFTR+6~, CMPAFTR+12*, CMPAFTR+13, CMPAFTR+15, CMPAFTR+16
RAPSSN ZZ+6~, ZZ+9*, ZZ+13
RAPT FNDIN70M~, FNDIN70M+4, FNDIN70M+6, FNDIN70M+8
RAPTID ZZ~, ZZ+2*, ZZ+8, ZZ+9
RAPTIEN ZZ~, ZZ+4*, ZZ+11
RAREGMOD EN1+1!, CHCK~*, UPDTRA0+4, UPDTRA0+6, CMPAFTR+1!, B2P18+2~*
RARET FNDIN70M~, FNDIN70M+6, FNDIN70M+7
RASTRING ISCHNGD+1~, ISCHNGD+2*, ISCHNGD+12*, ISCHNGD+13*, ISCHNGD+14*, ISCHNGD+17*, ISCHNGD+19*, ISCHNGD+20*, CMPAFTR+6~, CMPAFTR+7*
, CMPAFTR+15*, CMPAFTR+16*, CMPAFTR+18*, CMPAFTR+21*, CMPAFTR+23*, CMPAFTR+24*
RAVAL2 FNDIN70M+3~
RAX CMPAFTR+6~, CMPAFTR+20, CMPAFTR+21, CMPEXIT+3*, CMPEXIT+4*, CMPEXIT+6*, CMPEXIT+7*
RAX70 ISCHNGD+1~, ISCHNGD+16, ISCHNGD+17
RAX751 ISCHNGD+1~, ISCHNGD+15, ISCHNGD+17
>> RAXIT MODIF70+2*, MODIF70+3, MODIF70+6*
RETRN FNDIN70~, FNDIN70+6, FNDIN70+7
SNDALERT ISCHNGD~, ISCHNGD+21, CMPAFTR~, CMPAFTR+26
U MODIF70+5
X TCPROMPT+1~
Y CMPAFTR+4~, TCPROMPT+1~, TCPROMPT+11, TCPROMPT+12
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