VPSRPC12 ;WOIFO/BT - Patient Demographic - Lab Orders;08/14/14 13:07
Source file <VPSRPC12.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETLAB(VPSARR,DFN,DTRANGE) | ;given DFN, returns the patient lab
; OUTPUT ; VPSARR - passed in by reference; this is the output array to store lab order ; INPUT ; DFN - patient DFN (This value must be validated before calling this procedure) ; DTRANGE - FROMDATE:THROUGHDATE |
|
| PREPLST(LST) | ;Prepare Lab Order List
|
|
| STORE(VPSARR,DFN,ORDIEN,LST) | ;Store Lab Orders
; OUTPUT ; VPSARR - passed in by reference; this is the output array to store lab order ; INPUT ; DFN - patient DFN (This value must be validated before calling this procedure) ; ORDIEN - Order Number ; LST - Detail Result Array |
|
| EXT2FM(VAL) | ;External to FM Date -> Oct 20, 2014@17:30 -> 3141020@173
; -- Get Date |
|
| SET(VPSARR,VPSFL,VPSIEN,VPSFLD,VPSDA,VPSDS) | ;Set line item to output array
|
| FileNo | Call Tags |
|---|---|
| ^OR(100 - [#100] | GET1^DIQ |
