HDISDSRL ;BPFO/DTG - HDI MAILMAN SERVER COLLECT ITEMS FOR LABORATORY; Apr 07, 2018@12:42
Source file <HDISDSRL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Display found orderable items for Lab
|
|
| EN1 | ;
|
|
| L1 | ||
| L1E | ; end of flip from XML
|
|
| DONE | ; final quit point
|
|
| EXPORT | ; output as export file
; basic repeats |
|
| E1 | ||
| E2 | ||
| E3 | ||
| E4 | ||
| EOUT | ;
|
|
| EHEAD | ; export header
|
|
| GETORD | ||
| GETLPI | ; get primary lab item
|
|
| GETLTI | ; get lab test item
|
|
| GETLTS | ; get lab specimen and mltf item
|
|
| CHAR(A) | ; check for ctrl chars, <, >, &
|
|
| N(K) | ;get value
|
|
| SETDATA | ; Set data into report structure
|
|
| PSEND | ; SEND IF FILE TO BIG
|
