LAXSYM ;MLD/ABBOTT/SLC/RAF - TEMPLATE ROUTINE FOR AUTOMATED DATA ;6/13/96 0900 ; [ 01/12/98 11:20 AM ]
Source file <LAXSYM.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
LAPX | ; orig routine name, copied to LAXSYM (for Abbott AxSYM) 5/3/94 /mld
|
|
C | ; Comments node. type = G if result comment, = I if Exception string
|
|
QUIT | ||
H | ; Header node TYPE: P=pt, Q=qc
|
|
M | ; Manufacturer node
|
|
L | ; Packet termination node
|
|
O | ; Order node.
|
|
Q | ; Set-up Query node
|
|
P | ; Patient node
|
|
S | ; Scientific (not used)
|
|
R | ; Results node
|
|
TRAP | ; Process errors
|
|
IN | ||
ACCN() | ; Chk file 68 for Accn'd test (file 60)
|
|
NUM | ;- not used here - IN+3,4 replaces this (slower) code /mld
|
|
LA1 | ; Init vars/arrays
|
|
LA2 | ; Begin here to parse out data
|
|
LA3 | ; Now process the packet
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TRAP" | Q+8 |
^LA( | R+10*, IN, IN+1*, QUIT, QUIT+1!, QUIT+3, TRAP+2* |
^LA("LOCK" | QUIT+1! |
^LAB(60 - [#60] | ACCN+4 |
^LAB(62.4 - [#62.4] | LA1+1 |
^LAH( | LA3+3* |
^LRO(68 - [#68] | ACCN+2, ACCN+3 |
^TMP("LA" | QUIT+1! |
^TMP($J | QUIT+1! |
Name | Line Occurrences |
---|---|
$$ACCN | O+7 |
@( | LA2+7, LA2+10 |
IN | LA2+3, LA2+10, IN |
LA2 | LA2+4, LA2+5, LA3+1, LA3+2, LA3+5, TRAP+3 |
QUIT | LA2+4 |
Name | Field # of Occurrence |
---|---|
^( | ACCN+4, IN, IN+1 |
^(0 | ACCN+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | LAPX+2~, LA2+2*, LA2+10* |
ALPHA | LAPX+4~, O+4 |
AN | O+1~, O+2*, O+4*, O+6, O+11, ACCN+2, ACCN+3 |
BAD | LAPX+2~, Q+1~, Q+2*, Q+6* |
CNT | LAPX+3~, LA2+6, IN*, IN+1 |
CUP | LAPX+2~, LA2+2* |
D | LAPX+3~, LA2+2*, H+1, P+1, O+2, O+5, O+9, O+10, R+3, R+5 , R+9, C+1, Q+3, IN+4 |
DATE | LAPX+3~ |
DEC | R+2~, R+14*, R+15 |
DFN | LAPX+3~, P+1* |
FLAG | R+2~, R+3* |
FR | LAPX+2~, IN+4* |
HCNT | LAPX+3~, LA2+6*, TRAP+2 |
HTYPE | LAPX+3~, H+1* |
I | LAPX+2~, LA3+3*, ACCN+1~*, ACCN+2*, ACCN+3*, ACCN+4*, ACCN+5 |
ID | LAPX+2~, LA2+2*, LA3+1, O+11*, R+1 |
IDE | LAPX+2~, LA2+2*, O+11* |
IN | LAPX+3~, LA2+4, H+1, P+1, O+2, O+5, O+9, O+10, R+3, R+5 , R+9, R+10, C+1, Q+3, Q+6*, IN+1*, IN+4* |
INST | R+10, Q+1~, Q+2* |
ISQN | LAPX+5~, LA3+2, LA3+3 |
J | ACCN+1~*, ACCN+3*, ACCN+4 |
>> JJ | NUM+1* |
L | O+1~, O+2*, O+4 |
LADT | LAPX+5~, Q+2, ACCN+2, ACCN+3 |
LAGEN | LAPX+3~, LA3+2 |
LALCT | LAPX+4~ |
LANM | LAPX+2~, LA1+1*, Q+8 |
LANOCTL1 | LAPX+2~, IN+4 |
LATEST | LAPX+3~ |
LATEST( | R+7, R+14, R+16, R+17, ACCN+2, ACCN+4 |
LATOP | LA1+2! |
LAZZ | LAPX+4~ |
LINK | LAPX+4~ |
LOG | LAPX+4~ |
LRAA | Q+1~, Q+2* |
LRAD | Q+1~, Q+2* |
LRAN | Q+1~, Q+3* |
LRDFN | LAPX+4~ |
LRDT | Q+1~, Q+2* |
LRFRM | Q+1~, Q+2* |
LRNAME | Q+1~, Q+2*, Q+6 |
LROVER | LAPX+4~ |
LWL | LAPX+4~, LA3+3 |
METH | LAPX+4~ |
N | ACCN+1~*, ACCN+3, ACCN+4* |
NOW | LAPX+4~ |
OUT | LAPX+3~ |
PTYPE | O+1~, O+9* |
RESCOM | LAPX+3~, C+1* |
RESTYPE | LAPX+3~, C+1* |
RMK | LAPX+3~, LA2+2*, LA3+4, C+1* |
SPECID | O+1~, O+2* |
SSN | Q+1~ |
>> T | TRAP+1* |
TC | LAPX+2~ |
TC( | R+14, R+16, R+17 |
TNUM | O+1~, O+5*, O+6, R+2~, R+6*, R+7, R+14, R+16, R+17, ACCN+2 , ACCN+4 |
TOUT | LAPX+2~, LA2+2*, LA2+4, LA2+10, IN*, IN+1* |
TP | LAPX+2~ |
TRAY | LAPX+2~, LA2+2* |
TRES | R+2~, R+9*, R+10, R+11 |
TSK | LAPX+2~, LAPX+4~, LA1+1*, LA1+2, Q+2, IN, IN+1, QUIT, QUIT+1, QUIT+3 , TRAP+1, TRAP+2 |
TST | R+2~, R+5*, R+6, R+9 |
TST60 | LAPX+4~, LA2+2*, O+7*, O+8, R+7, R+14, R+16, R+17 |
TV | LAPX+2~, LA2+1! |
TV( | LA3+3 |
U | P+1, O+2, O+5, R+6, R+9, Q+3 |
V | R+2~, R+9*, R+12, R+15*, R+17, NUM+1, NUM+2* |
V1 | LAPX+2~, LA2+4, LA2+5, LA2+6, LA2+7, LA2+10, IN+4* |
WL | LAPX+4~, Q+2, ACCN+2, ACCN+3 |
X | LAPX+2~, O+1~, Q+8*, NUM+1*, NUM+2 |
Y | LAPX+2~, LA2+1! |
ZTSK | QUIT+2! |
Name | Field # of Occurrence |
---|---|
$T( | LA1+1 |