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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RMPRHL7A

Package: Prosthetics

Routine: RMPRHL7A


Information

RMPRHL7A ;HINES CIOFO/HNC - Receive HL-7 CPRS Message, parse into components and store in File 668 ;3/13/00

Source Information

Source file <RMPRHL7A.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Prosthetics 3 $$FMDATE^RMPRHL7  NEW^RMPRHL7B  (EXIT,PID,PV1,REJECT)^RMPRHL7U  
Order Entry Results Reporting 1 $$PKGID^ORX8  
VA FileMan 1 ^DIE  

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
Kernel 1 ^ORD(101  
Prosthetics 1 RMPR RECEIVE  

Entry Points

Name Comments DBIA/ICR reference
URG(X) ;Return Urgency give Z-code from HL-7 segment; see ORC+9
ORC(RMPRORC) ;Get fields from ORC segment and set into RMPR variables
OBR(RMPROBR) ;Get fields from OBR segment and set into RMPR variables
DG1(RMPRDG1) ;Get fields from DG1 and ZCL segments
; RMPRSID = Set ID
; RMPRDIAG = pointer to ICD DIAGNOSIS (#80)
; RMPRCI = Outpat. Classification Type
; RMPRVAL = Value of each SC or EI - 0,1,Null.
ZSV(RMPRZSV) ;Get service from ZSV segment
OBX(RMPROBX) ;Get fields from OBX segment and set into RMPR variables
EN(MSG) ;Entry point from protocol RMPR RECEIVE
RTN(RMPRORN,RMPRO) ;Put ^OR(100, ien for order into ^RMPR(668,

External References

Name Field # of Occurrence
^DIE RTN+3
$$PKGID^ORX8 RTN+6
$$FMDATE^RMPRHL7 ORC+21, OBR+24, OBR+27
NEW^RMPRHL7B EN+37
EXIT^RMPRHL7U EN+32, EN+33, EN+34, EN+35, EN+39, EN+43, RTN+8
PID^RMPRHL7U EN+16
PV1^RMPRHL7U EN+17
REJECT^RMPRHL7U EN+39, RTN+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(668 - [#668] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(123.5 - [#123.5] OBR+11
^RMPR(668 - [#668] RTN+3, RTN+6, RTN+7*
^TMP("SPS" ORC+1*

Label References

Name Line Occurrences
$$URG ORC+18
DG1 EN+24
OBR EN+21
OBX EN+27
ORC EN+19
RTN EN+41
ZSV EN+26

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA RTN+1*
DFN EN+5~
DIE RTN+2*, RTN+4!
DR RTN+2*, RTN+4!
LN OBX+11*, OBX+21*, OBX+23!
MSG EN~, EN+39, RTN+8
MSG( DG1+5, OBX+6, OBX+11, OBX+21, EN+10, EN+15
N EN+14*, EN+30!
>> NL OBX+21
ORC EN+7~
ORIFN EN+6~
PRDXSEG OBX+16~*, OBX+17, OBX+18
RMPR99C OBR+7~, OBR+8*, OBR+9
RMPRACT EN+5~
RMPRAD ORC+21*, EN+7~
RMPRADD EN+5~
>> RMPRAPP ORC+13*
>> RMPRATN OBR+25*
>> RMPRCI DG1+11*, DG1+13
>> RMPRCMT( OBX+21*
>> RMPRCMT(1 OBX+20*
RMPRDG1 DG1~, DG1+5
>> RMPRDIAG DG1+8*, DG1+9
RMPRFAC EN+5~, EN+11*
>> RMPRGMRC RTN+6*, RTN+7
>> RMPRI EN+9*
>> RMPRINTR OBR+29*
>> RMPRMSG ORC+9, DG1+5*, DG1+6, DG1+7, DG1+8, DG1+10, DG1+11, DG1+12, OBX+6*, OBX+7
, OBX+10, OBX+14, OBX+16, OBX+20, EN+9*, EN+10*, EN+11, EN+14*, EN+15*, EN+16
, EN+17, EN+19, EN+21, EN+24, EN+26, EN+27
>> RMPRMSG1( DG1+9*, DG1+13*
RMPRMSGO EN+8~
RMPRMTP EN+5~, EN+11*
>> RMPRNATO ORC+23*
>> RMPRNOD EN+9*, EN+10*, EN+14*, EN+15*, EN+24, EN+27
RMPRO ORC+19*, EN+5~, EN+39, EN+41, RTN~, RTN+1, RTN+3, RTN+6, RTN+7
RMPROBR OBR~, OBR+8, OBR+10, OBR+23, OBR+25, OBR+26, OBR+28, OBR+29
RMPROBX OBX~, OBX+6, OBX+11, OBX+21
RMPROCR ORC+22*, ORC+23, EN+5~
RMPRODT ORC+20~*, ORC+21, OBR+23*, OBR+24*
>> RMPROID OBX+7*, OBX+8, OBX+9, OBX+13, OBX+19
RMPRORC ORC~, ORC+1, ORC+10, ORC+11, ORC+13, ORC+14, ORC+15, ORC+16, ORC+17, ORC+19
, ORC+20, ORC+22
RMPRORFN ORC+11*, ORC+12*, EN+6~, EN+41
RMPRORN RTN~
RMPRORNP ORC+17*, EN+5~
RMPROTXT ZSV+3*, EN+7~
RMPRPLCR ORC+16*, EN+6~
RMPRPNM EN+5~
>> RMPRPRCD OBX+18*
>> RMPRPRDG OBX+14*, OBX+17*
>> RMPRQT ORC+9*, OBR+9*, OBR+21*, EN+14*, EN+15, EN+20, EN+21*, EN+22
RMPRRB EN+6~
>> RMPRRFQ( OBX+11*
>> RMPRRFQ(1 OBX+10*
>> RMPRS38 ORC+14*
>> RMPRS668 OBR+28*
RMPRSBR EN+7~
RMPRSEND EN+6~, EN+11*
>> RMPRSID DG1+6*, DG1+9, DG1+13
RMPRSS OBR+9*, OBR+11*, OBR+13*, OBR+14*, OBR+15*, OBR+16*, OBR+17*, OBR+19*, OBR+21, EN+7~
, EN+21!, EN+34, EN+35
RMPRSST OBR+10*, OBR+11, EN+7~
>> RMPRSTDT OBR+26*, OBR+27*
RMPRSTS EN+6~
RMPRTRLC ORC+10*, EN+6~, EN+7~, EN+32, EN+33
>> RMPRURGI ORC+15*, ORC+18*
>> RMPRVAL DG1+12*, DG1+13, OBX+8*
>> RMPRVTYP OBX+7*, OBX+14, OBX+15
RMPRWARD EN+6~
RMPRZSS ZSV+1*, EN+7~
RMPRZSV ZSV~, ZSV+1, ZSV+3
U OBR+11, RTN+6, RTN+7
X URG~, URG+1*, URG+2*, URG+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All