LR7OB1 ;slc/dcm - Build message, backdoor Lab from file 69 ; 5/12/16 4:33pm
Source file <LR7OB1.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 |
|---|---|---|
| NEW(ODT,SN,CONTROL,NAT,TESTS,LRSTATI) | ;Set-up order message
|
|
| CALL(CNTRL) | ;Make protocol calls
|
|
| RESULTS(OREMSG,CNTRL) | ;Results only protocol
|
|
| ACC(AC,ACDT,ACN,CONTROL,NAT) | ;Set-up order message for BB,SP,EM,CY,AU accessions
|
|
| ORD(ORD) | ;Set test nodes in LRTMPO("LRIFN" for given Lab #
|
|
| ORD1(ODT,SN,TST) | ;Set test nodes in LRTMPO("LRIFN" for given LRODT & LRSN (includes combined tests)
|
|
| TWOORIFN() | ;
; function to determine if a merged test has 2 different ; file 100 order numbers |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC - [#1] | NEW+8 |
| ^LR - [#63] | NEW+8, NEW+12 |
| ^LRO(69 - [#69] | NEW+7, NEW+10*, NEW+21, ORD+5, ORD1+8, ORD1+12, TWOORIFN+13 |
| ^ORD(100.99 - [#100.99] | NEW+8, NEW+9 |
| ^TMP("LRAP" | NEW+14!, NEW+16!, NEW+21!, NEW+22!, CALL+5, ACC+6!, ACC+9! |
| ^TMP("LRBB" | NEW+14!, NEW+16!, NEW+21!, NEW+22!, CALL+4, ACC+6!, ACC+9! |
| ^TMP("LRCH" | NEW+14!, NEW+16!, NEW+21!, NEW+22!, CALL+3, ACC+6!, ACC+9! |
| Name | Line Occurrences |
|---|---|
| $$TWOORIFN | NEW+19, ORD1+11 |
| CALL | NEW+16, NEW+21, NEW+22, ACC+8 |
| ORD1 | NEW+15 |
| RESULTS | CALL+3, CALL+4, CALL+5 |
| Name | Field # of Occurrence |
|---|---|
| ^( | ORD+5, ORD1+8 |
| ^(0 | NEW+7, ORD1+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AC | ACC~, ACC+7 |
| ACDT | ACC~, ACC+7 |
| ACN | ACC~, ACC+7 |
| APMSG | ACC+5~, ACC+7 |
| BBMSG | ACC+5~, ACC+7 |
| CHMSG | ACC+5~, ACC+7 |
| CNTRL | CALL~, CALL+2*, CALL+3, CALL+4, CALL+5, RESULTS~, RESULTS+1 |
| CONTROL | NEW~, NEW+16, NEW+21, NEW+22, ACC~, ACC+7, ACC+8, ORD1+9 |
| CTR | ORD+4*, ORD+6*, ORD1+6~, ORD1+7*, ORD1+10*, ORD1+12* |
| DFN | NEW+8~*, NEW+9, NEW+11 |
| I | NEW+13~ |
| IFN | ORD+3~, ORD+5*, ORD1+6~, ORD1+7*, ORD1+8*, TWOORIFN+8~, TWOORIFN+9*, TWOORIFN+11, TWOORIFN+13 |
| LRDPF | NEW+8~*, NEW+11 |
| LRNIFN | NEW+13~, NEW+17* |
| LRSTATI | NEW~, NEW+21* |
| LRTMPO | NEW+13~ |
| LRTMPO("LRIFN" | NEW+16, NEW+17, ORD+2!, ORD+6*, ORD1+5!, ORD1+9*, ORD1+10*, ORD1+12* |
| LRX | TWOORIFN+8~, TWOORIFN+9*, TWOORIFN+13*, TWOORIFN+14, TWOORIFN+16 |
| LRX0 | NEW+7~*, NEW+8, NEW+12 |
| MSG | NEW+13~, ACC+5~ |
| NAT | NEW~, NEW+16, NEW+21, NEW+22, ACC~, ACC+7 |
| ODT | NEW~, NEW+7, NEW+10, NEW+15, NEW+16, NEW+19~, NEW+20*, NEW+21, NEW+22, ORD+3~ , ORD+4*, ORD+5*, ORD1~, ORD1+5, ORD1+8, TWOORIFN+8~, TWOORIFN+9*, TWOORIFN+11, TWOORIFN+13 |
| ORAPMSG | NEW+13~, CALL+5* |
| ORBBMSG | NEW+13~, CALL+4* |
| ORCHMSG | NEW+13~, CALL+3* |
| ORD | ORD~, ORD+2, ORD+5 |
| OREMSG | RESULTS~, RESULTS+1, RESULTS+2 |
| SN | NEW~, NEW+7, NEW+10, NEW+15, NEW+16, NEW+19~, NEW+20*, NEW+21, NEW+22, ORD+3~ , ORD+5*, ORD1~, ORD1+5, ORD1+8, TWOORIFN+8~, TWOORIFN+9*, TWOORIFN+11, TWOORIFN+13 |
| TESTS | NEW~, NEW+15 |
| TST | ORD1~ |
| TST( | ORD1+10 |
| TST(0 | ORD1+10 |
| X | NEW+17*, NEW+18, NEW+19, NEW+20, ORD+3~, ORD+5*, ORD+6, ORD1+6~, ORD1+8*, ORD1+9 , ORD1+10, ORD1+11*, ORD1+12*, TWOORIFN+9, TWOORIFN+16 |
| Y | NEW+8~* |
| Name | Field # of Occurrence |
|---|---|
| $T(MSG^XQOR | NEW+6, CALL+1, ACC+4 |
