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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: MDCPVDEF

Package: Clinical Procedures

Routine: MDCPVDEF


Information

MDCPVDEF ;HINES OIFO/BJ/TJ - CP Outbound message record maintenance routine.;30 Jul 2007

Source Information

Source file <MDCPVDEF.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
; Parses outbound message from PIMS to send to 3rd party devices via ADT/A?? message.
ADD(MDCPDFN,MDCPDIV,MDCPWARD,MDCPBED,MDCPMSG,MDCPEVNT,MDCPMVMT,MDCPROT) ;
DEL(MDCPIFN) ;
GENDESTS ;
; Filters outbound messages. See HL*1.6*56/66 Site Manager and Developer Manual
; p. 11-7 to 11-11 (inc).
GETSUBS ;
; Get subscriber protocols
GENDEST2(IEN) ; Filters outbound messages. Unlike GENDESTS, this is set to filter
; assuming that we have not yet queued the outbound message.
ARRYDEST(DIVISION,WARD,MSGTYPE,EVNTTYPE) ;
SENDMSG(DIVISION,WARD,MSGTYPE,EVNTTYPE) ;
LASTLOC(MDCPDFN,MDCPLOC) ;
A02 ;Look into transfers (A02)
A01 ;Look into admissions (A01)
VADATA ;Look into VADPT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Executing HL7 ADT Messaging (MD CP Flowsheets)",!
  • Line Location: EN+47
Function Call: WRITE
  • Prompt: !,"No CP Flowsheets subscriber(s) for the movement location.",!
  • Line Location: EN+48

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] EXTERNAL^DILFD
^MDC(704.005 - [#704.005] GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call