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 |