Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
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>

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,

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(668 - [#668] Classic Fileman Calls
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call