PSJHL3 ;BIR/RLW - PHARMACY ORDER SEGMENTS ; 8/19/14 2:08pm
Source file <PSJHL3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1(PSJHLDFN,PSOC,PSJORDER) | ; start here
; passed in are PSJHLDFN (patient ien) ; PSJORDER (file root of order) ; OC (order control code - NW for new order, OK for finished order, OC for order canceled) |
|
INIT | ; initialize HL7 variables
|
|
RXO | ; pharmacy prescription order segment (used to send Orderable Item to OE/RR)
|
|
RXE | ; pharmacy encoded order segment
|
|
IVRXE | ; RXE segment for IV orders
; If an Inpatient Med IV order, send RXE w/dispense drug info. ; If an IV FLUID order, send start/stop date and duration in the RXE ; and send an RXC for each additive and solution. |
|
RXC | ;component segments
|
|
RXR | ; med route segment
|
|
ZRX | ; pharmacy Z-segment
|
|
CNT | ;Count dispense drugs for an order
|
|
FINDDOSE(PSJDD,PSJF1P1,PSJDO) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|