LR7OR3 ;slc/dcm - Get Lab TEST parameters ;8/11/97
Source file <LR7OR3.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
GET(TEST) | ;Get TEST ifn
|
|
TEST(TEST,Y) | ;Gets Lab Test ordering parameters from file 60
|
|
COLL(TEST,Y) | ;Get Collection Sample-Specimen data
|
|
URG(TEST,Y) | ;Get Urgency params for TEST
|
|
SAMP(X) | ;Build Collection Sample data
|
|
DEFURG() | ;Get default urgency for lab
|
|
SCOM(TEST,SAMP,TEXT) | ;Get Ward Remarks (specimen) & put in TEXT aray
|
|
GCOM(TEST,TEXT) | ;Get General Ward Instructions
|
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | GET+2, GET+3, TEST+15, COLL+5, COLL+7, COLL+8, COLL+9, COLL+10, COLL+11, COLL+12 , URG+5, SCOM+4, SCOM+6, GCOM+2, GCOM+3 |
^LAB(61 - [#61] | COLL+10 |
^LAB(62 - [#62] | SAMP+6 |
^LAB(62.05 - [#62.05] | URG+6, URG+7 |
^LAB(62.07 - [#62.07] | COLL+6, SAMP+7 |
^LAB(69.9 - [#69.9] | DEFURG+1 |
Name | Line Occurrences |
---|---|
$$GET | TEST+14, COLL+3, URG+3 |
$$SAMP | COLL+7, COLL+13 |
COLL | TEST+17 |
GCOM | TEST+16 |
URG | TEST+18 |
Name | Field # of Occurrence |
---|---|
^( | COLL+7, COLL+8, COLL+10, COLL+12, URG+7 |
^(0 | COLL+9, COLL+11, SAMP+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
I | COLL+1~, COLL+5*, COLL+7*, COLL+8, COLL+10*, COLL+12*, URG+1~, URG+7* |
J | COLL+1~, COLL+7*, COLL+8* |
REQ | SAMP+5~, SAMP+7*, SAMP+8 |
SAMP | COLL+1~, SCOM~, SCOM+4 |
SPEC | COLL+1~ |
TEST | GET~, GET+1, GET+2*, GET+3, GET+4, TEST~, TEST+13, TEST+14*, TEST+15, TEST+16 , TEST+17, TEST+18, COLL~, COLL+2, COLL+3*, COLL+4, COLL+5, COLL+7, COLL+8, COLL+9 , COLL+10, COLL+11, COLL+12, URG~, URG+2, URG+3*, URG+4, URG+5, SCOM~, SCOM+4 , SCOM+6, GCOM~, GCOM+2, GCOM+3 |
TEXT | SCOM~, SCOM+6*, GCOM~ |
TEXT("GenWardInstructions" | GCOM+3* |
U | DEFURG+1 |
URG | URG+1~ |
X | COLL+1~, COLL+7*, COLL+10*, COLL+12*, URG+1~, SAMP~, SAMP+6, SAMP+7, SAMP+8, SCOM+3~ , SCOM+4*, SCOM+5, SCOM+6 |
X0 | TEST+12~, TEST+15*, COLL+1~, COLL+5*, COLL+6, COLL+11, COLL+12, COLL+13, URG+1~, URG+5* , URG+6, URG+7, SAMP+5~, SAMP+6*, SAMP+8 |
Y | TEST~, TEST+16, TEST+17, TEST+18, COLL~, URG~, SAMP+5~, SAMP+8*, SAMP+9 |
Y("CollSamp" | COLL+7*, COLL+8*, COLL+13* |
Y("Default Co | llSamp" , COLL+9* |
Y("Default Ur | gency" , URG+6* |
Y("Lab CollSa | mp" , COLL+12*, COLL+13* |
Y("ReqCom" | COLL+6* |
Y("Specimens" | COLL+10* |
Y("Unique Col | lSamp" , COLL+11* |
Y("Urgencies" | URG+7* |