LRSRVR2A ;DALIO/FHS - LAB DATA SERVER CONT'D RELMA EXTRACT ; Aug 17, 2006
Source file <LRSRVR2A.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CLEAN | ;
|
|
| HDR | ; Set the header information
|
|
| SITENOTE | ; Build site's test notes for first record
|
|
| SYNNOTE | ; Build site's test synonym's for first record
|
|
| SUFFIX | ; If Result NLT does not have a suffix, i.e. it has .0000 then check for suffixed NLT codes which can also be used
|
|
| UUBEGFN(LRFILENM) | ; Construct uuencode "begin" coding
; Call with LRFILENM = name of uuencoded file attachment ; ; Returns LRX = string with "begin..."_file name |
| FileNo | Call Tags |
|---|---|
| ^LAM - [#64] | GET1^DIQ |
| ^LAB(95.3 - [#95.3] | GET1^DID |