LRLABLD ;DALOI/TGA/JMC - LABELS ON DEMAND ; 08/29/16@12:21pm
Source file <LRLABLD.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 |
|---|---|---|
| ENT | ;
; Called by LROE |
|
| EN2 | ;
|
|
| GO | ; From above, LRLABXT, LRPHLIS1
|
|
| UID | ; Set up variables for unique id.
; Called by above, LRLABLD0, LRPHLIS1 ; LRUID = unique id number of accession |
|
| BARID | ; Set up variables for barcoding
; LRBARID = number to be barcoded on label, based on accession area setup in file #68. ; If no accession # or UID - sets LRBARID="" ; Called by LRLABLD0, LRPHLIS1 |
|
| LBLTYP | ; Determine label routine to use.
; Sets LRLABEL to label print routine (label^routine). ; Called by above, LRLABLD0, LRLABLIO, LRLABXOL, LRLABXT, LRPHLIS1 |
|
| PSET | ; Setup special printer variables - barcode on/barcode off
; Called by above, LRLABXOL, LRLABXT, LRPHLIS1 |
|
| URGA(X) | ; Determine urgency abbreviation to print on label
; Input X = pointer to Urgency #62.05 file ; Returns Y = urgency abbreviation^display type if turned on ; Called by above, LRLABELF, LRLABLD0, LRLABLIO, LRPHLIS1 |
|
| LRTXT(LRTLST,LRLEN) | ; Parse test list to print on label.
; Builds a string of test names concatentated using ";" to the maximum ; length (LRLEN) specified. Terminates list with "..." if exceeds length ; specified. ; Call with ; LRTLST = array containing name of test to parse ; LRLEN = length of test string to return (default=35) |
|
| LRBAR | ; Setup LRBAR array if barcodes for this accession area
; Called by above, LRLABLD0, LRLABLIO, LRLABXT, LRPHIS1 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(60 - [#60] | GO+32, GO+33, GO+39, GO+42, GO+44, GO+45 |
| ^LAB(61 - [#61] | GO+10 |
| ^LAB(62 - [#62] | GO+4, GO+9, GO+11 |
| ^LAB(62.05 - [#62.05] | URGA+7 |
| ^LAB(69.9 - [#69.9] | LBLTYP+7, LBLTYP+8, LBLTYP+10 |
| ^LR - [#63] | GO+13 |
| ^LRO(68 - [#68] | GO+1, GO+2, GO+7, GO+12, GO+26, GO+27, UID+3, BARID+5, LBLTYP+15, LBLTYP+16 , LRBAR+3 |
| ^LRO(69 - [#69] | GO+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | GO+13* |
| DUZ(2 | GO+42, GO+44 |
| I | GO+56*, LRTXT+13~, LRTXT+21* |
| IO | ENT+4 |
| >> IOBAROFF | PSET+9 |
| >> IOBARON | PSET+10 |
| >> IOS | LBLTYP+8 |
| IOST(0 | PSET+7 |
| J | LRTXT+13~, LRTXT+15*, LRTXT+16*, LRTXT+17 |
| >> LRAA | ENT+5*, ENT+6*, EN2+4, EN2+6, GO+1, GO+2, GO+7, GO+12, GO+26, GO+27 , UID+3, BARID+5, LBLTYP+12*, LBLTYP+15, LBLTYP+16, LRBAR+2, LRBAR+3 |
| >> LRACC | EN2+6* |
| >> LRAD | EN2+6*, GO+1, GO+2, GO+7, GO+12, GO+26, GO+27, UID+3 |
| >> LRAN | EN2+3*, EN2+4*, EN2+6, GO+1, GO+2, GO+7, GO+12, GO+26, GO+27, UID+3 , BARID+8, BARID+9 |
| LRBAR | ENT+7! |
| LRBAR( | LRBAR+3* |
| LRBAR0 | ENT+7!, PSET+9* |
| LRBAR1 | ENT+7!, PSET+10* |
| LRBARID | ENT+7!, BARID+6*, BARID+7*, BARID+8, BARID+9*, BARID+10* |
| >> LRCE | EN2+6* |
| >> LRDAT | GO+2* |
| >> LRDFN | GO+12*, GO+13 |
| >> LRDPF | GO+13* |
| LREND | ENT+7!, GO+14 |
| LRI | ENT+7!, GO+55*, GO+56, GO+57~ |
| >> LRINFW | GO+13* |
| LRIXK | GO+43~, GO+45*, GO+46, GO+47 |
| LRK | GO+43~, GO+44*, GO+45 |
| >> LRLABEL | GO+59, LBLTYP+7*, LBLTYP+16*, LBLTYP+23*, LBLTYP+27*, LBLTYP+28*, LBLTYP+29*, LBLTYP+33*, LBLTYP+34*, LBLTYP+35* |
| >> LRLABLIO | ENT+4* |
| >> LRLBL( | ENT+6, EN2+4, EN2+6 |
| LRLBLDEV | LBLTYP+4~, LBLTYP+8*, LBLTYP+9, LBLTYP+10, LBLTYP+19 |
| LRLBLDEV(0 | LBLTYP+10*, LBLTYP+12, LBLTYP+22, LBLTYP+23, LBLTYP+26, LBLTYP+27, LBLTYP+28, LBLTYP+29, LBLTYP+32, LBLTYP+33 , LBLTYP+34, LBLTYP+35 |
| LRLEN | LRTXT~, LRTXT+14*, LRTXT+16, LRTXT+19, LRTXT+21, LRTXT+22 |
| LRLLOC | EN2+5~, EN2+6* |
| LRN | ENT+7!, GO+52*, GO+53, GO+55, GO+56, GO+57~ |
| >> LRODT | EN2+6*, GO+3 |
| LROK | ENT+7! |
| >> LRPREF | GO+58* |
| LRRB | EN2+5~, EN2+6* |
| >> LRSN | EN2+6*, GO+3 |
| >> LRSSP | GO+32* |
| >> LRTJ | GO+3*, GO+4, GO+11, GO+32 |
| >> LRTJDATA | GO+4*, GO+5, GO+11* |
| LRTLST | LRTXT~ |
| LRTLST( | LRTXT+16, LRTXT+17 |
| >> LRTOP | GO+5*, GO+6, GO+7*, GO+8, GO+9, GO+10* |
| LRTS | GO+16! |
| LRTS( | GO+33* |
| >> LRTV | GO+27*, GO+28, GO+30, GO+31, GO+32, GO+33, GO+39, GO+42, GO+44, GO+45 |
| >> LRTVOL | GO+24*, GO+32*, GO+52, GO+58* |
| LRTXT | LRTXT+13~, LRTXT+15*, LRTXT+16, LRTXT+18*, LRTXT+19, LRTXT+20, LRTXT+21, LRTXT+22*, LRTXT+23 |
| >> LRUID | UID+3*, UID+4*, BARID+7 |
| LRURG | ENT+7!, GO+16!, GO+30* |
| LRURG0 | ENT+7!, GO+24*, GO+31*, GO+54 |
| LRURGA | ENT+7!, GO+54* |
| >> LRVOL | GO+29*, GO+32* |
| LRX | BARID+4~, BARID+5*, BARID+7, BARID+10 |
| >> LRXL | GO+24*, GO+47*, GO+50*, GO+52 |
| LRXLTST | GO+37~, GO+38*, GO+39*, GO+50 |
| >> N | GO+56* |
| >> S1 | GO+5*, GO+11*, GO+52, GO+58 |
| >> S2 | GO+5*, GO+11*, GO+58 |
| >> T | GO+9*, GO+10, GO+25*, GO+26*, GO+27, GO+33 |
| U | ENT+2*, EN2+6, GO+2, GO+3, GO+5, GO+9, GO+10, GO+11, GO+13, GO+28 , GO+30, GO+31, GO+32, GO+33, GO+39, LBLTYP+7, LRBAR+3 |
| UPDTTEST | GO+37~, GO+38*, GO+48*, GO+50 |
| X | EN2+6*, URGA~, URGA+6, URGA+7, LRTXT+13~, LRTXT+17*, LRTXT+18, LRTXT+21*, LRTXT+22 |
| X(0 | URGA+7*, URGA+8 |
| Y | URGA+4~, URGA+5*, URGA+6, URGA+8*, URGA+9, LRTXT+13~, LRTXT+20*, LRTXT+21 |
| >> ZTQUEUED | ENT+8 |
| >> ZTREQ | ENT+8* |
