©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
Select the objects that you wish to see in the downloaded PDF
InfoBLRIPLZI ; IHS/OIT/MKK - INTERMEC IPL ACCESSION NUMBER Barcode 39 Lab Label Intialization ; 26 Sep 2011 6:47 AM
Source file <BLRIPLZI.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 4 | ^%ZIS ^%ZISC ^%ZTLOAD $$HTE^XLFDT |
| IHS VA Utilities | 1 | ^XBFMK |
| VA Fileman | 1 | ^DIR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETVARS | ; EP - Initialize variables for testing
|
|
| F2 | ; Prints TEST label WITHOUT a barcoded UID number
|
|
| F3 | ; EP - Prints TEST label with Accession # barcoded
|
|
| BAR | ; EP
|
|
| ZIS | ; EP
|
|
| MAKERNDM | ; EP - Randomly set certain variables
|
|
| BARCODEI(SHIFT) | ; EP - Bar code format, By ROWs,
|
|
| FMT | ;EP - E3;F3 erases format 3 (BARCODE) and accesses form #
; E2;F2 erases format 2 (PLAIN) and accesses form # |
|
| RANDNAME(LEN) | ; EP - Make Random (Gibberish) Name
|
|
| ACCRNDOM() | ; EP - Make Random Accession numbers. CH only.
|
|
| PLAININI(SHIFT) | ; EP -- PLAIN format - By ROWs,
|
|
| BARCODET | ; EP - BARCODE format Test print
|
|
| JUSTBAR | ; EP - Tests BARCODE format only
|
|
| JUSTPLN | ; EP - Tests PLAIN format only
|
|
| PLAINTST | ; EP - PLAIN label TeST print
|
|
| TEST | ; EP - sets variables used with the test labels
|
|
| PREPCODE(FORMAT) | ;EP - Code Common to BAR & PLAIN labels initialization
|
|
| PROGINIT | ; EP -- SHIFT Prompt.
|
|
| PROGBAR | ; EP - SHIFT Initialization
|
|
| DOBSTR() | ; EP - Make DoB random
|
|
| PRESSKEY(TAB) | ; EP - Generic "PRESS RETURN KEY TO CONTINUE"
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences |
|---|---|
| $$ACCRNDOM | MAKERNDM+7 |
| $$DOBSTR | MAKERNDM+11 |
| $$RANDNAME | MAKERNDM+14, MAKERNDM+15 |
| BARCODEI | BAR+8, PROGBAR+4 |
| BARCODET | F3+1, JUSTBAR+13 |
| F3 | TEST+11 |
| MAKERNDM | SETVARS+1 |
| PLAININI | BAR+9, PROGBAR+5 |
| PLAINTST | F2+1, JUSTPLN+12 |
| PREPCODE | BARCODEI+2, PLAININI+1 |
| PRESSKEY | TEST+8, JUSTBAR+9, JUSTPLN+8 |
| SETVARS | BARCODET+1, PLAINTST+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %ZIS | ZIS+1!, ZIS+2*, PROGINIT+9!, PROGINIT+10* |
| DAY | MAKERNDM+1~, ACCRNDOM+6*, ACCRNDOM+7*, ACCRNDOM+10 |
| >> DIR("A" | PROGINIT+5*, PRESSKEY+2* |
| >> DIR(0 | PROGINIT+4*, PRESSKEY+1* |
| DOB | TEST+1~, BARCODET+13, PLAINTST+14, MAKERNDM+11*, JUSTBAR+1~, JUSTPLN+1~ |
| DOBDY | DOBSTR+1~, DOBSTR+4*, DOBSTR+6 |
| DOBMO | DOBSTR+1~, DOBSTR+3*, DOBSTR+6 |
| DOBYR | DOBSTR+1~, DOBSTR+5*, DOBSTR+6 |
| FNAME | MAKERNDM+1~, MAKERNDM+14*, MAKERNDM+16 |
| FORMAT | PREPCODE~, PREPCODE+7 |
| HRCN | TEST+1~, BARCODET+12, PLAINTST+13, MAKERNDM+4*, JUSTBAR+1~, JUSTPLN+1~ |
| IO | TEST+10, JUSTBAR+11, JUSTPLN+10 |
| ION | ZIS+5, PROGINIT+14 |
| LDM | MAKERNDM+1~, ACCRNDOM+2*, ACCRNDOM+3*, ACCRNDOM+4*, ACCRNDOM+6 |
| LEN | RANDNAME~, RANDNAME+3 |
| LNAME | MAKERNDM+1~, MAKERNDM+15*, MAKERNDM+16 |
| LRACCAP | TEST+1~, SETVARS+12*, JUSTBAR+1~, JUSTPLN+1~ |
| LRAN | TEST+1~, BARCODET+9, MAKERNDM+9*, JUSTBAR+1~, JUSTPLN+1~ |
| LRAS | TEST+1~, BARCODET+7, PLAINTST+9, MAKERNDM+7*, MAKERNDM+8, JUSTBAR+1~, JUSTPLN+1~ |
| LRCE | TEST+1~, BARCODET+10, PLAINTST+10, MAKERNDM+3*, JUSTBAR+1~, JUSTPLN+1~ |
| LRDAT | TEST+1~, BARCODET+8, PLAINTST+8, SETVARS+5*, JUSTBAR+1~, JUSTPLN+1~ |
| LRLLOC | TEST+2~, BARCODET+11, PLAINTST+6, SETVARS+6*, JUSTBAR+2~, JUSTPLN+2~ |
| LRPROV | TEST+2~, BARCODET+5, PLAINTST+7, SETVARS+10*, JUSTBAR+2~, JUSTPLN+2~ |
| LRRB | TEST+2~, BARCODET+11, PLAINTST+6, SETVARS+14*, JUSTBAR+2~, JUSTPLN+2~ |
| LRSPEC | TEST+2~, SETVARS+13*, JUSTBAR+2~, JUSTPLN+2~ |
| LRTOP | TEST+2~, BARCODET+6, PLAINTST+5, SETVARS+4*, JUSTBAR+2~, JUSTPLN+2~ |
| LRTXT | TEST+2~, BARCODET+4, PLAINTST+4, SETVARS+3*, JUSTBAR+2~, JUSTPLN+2~ |
| LRUID | TEST+2~, MAKERNDM+5*, JUSTBAR+2~, JUSTPLN+2~ |
| LRURG | TEST+2~, BARCODET+14, PLAINTST+12, SETVARS+7*, JUSTBAR+2~, JUSTPLN+2~ |
| MON | MAKERNDM+1~, ACCRNDOM+1*, ACCRNDOM+2, ACCRNDOM+3, ACCRNDOM+4, ACCRNDOM+5*, ACCRNDOM+10 |
| NAME | RANDNAME+1~, RANDNAME+3*, RANDNAME+5*, RANDNAME+6*, RANDNAME+7 |
| NUM | MAKERNDM+1~, MAKERNDM+8*, MAKERNDM+9, ACCRNDOM+8*, ACCRNDOM+9*, ACCRNDOM+10 |
| NUMBER | TEST+3~, MAKERNDM+9*, JUSTBAR+3~, JUSTPLN+3~ |
| PNM | TEST+3~, BARCODET+15, PLAINTST+15, MAKERNDM+16*, JUSTBAR+3~, JUSTPLN+3~ |
| >> POP | ZIS+3, PROGINIT+11, TEST+6, JUSTBAR+7, JUSTPLN+6 |
| SEX | TEST+3~, BARCODET+16, PLAINTST+11, SETVARS+9*, JUSTBAR+3~, JUSTPLN+3~ |
| SHIFT | BAR+1~, BAR+6*, BAR+8, BAR+9, PROGINIT+1~, PROGINIT+7*, PROGBAR+4, PROGBAR+5, BARCODEI~, BARCODEI+4 , BARCODEI+5, BARCODEI+6, BARCODEI+7, BARCODEI+8, BARCODEI+12, BARCODEI+13, BARCODEI+14, BARCODEI+15, BARCODEI+16, BARCODEI+17 , BARCODEI+18, BARCODEI+19, PREPCODE+1*, PREPCODE+2*, PREPCODE+3*, PLAININI~, PLAININI+3, PLAININI+4, PLAININI+5, PLAININI+6 , PLAININI+7, PLAININI+8, PLAININI+9, PLAININI+10, PLAININI+11, PLAININI+12, PLAININI+13, PLAININI+14 |
| SYMBOLGY | BARCODEI+1~ |
| TAB | PRESSKEY~, PRESSKEY+2 |
| WOTALFA | RANDNAME+1~, RANDNAME+4*, RANDNAME+5, RANDNAME+6 |
| >> Y | PROGINIT+7 |
| >> ZTDESC | ZIS+7*, PROGINIT+16* |
| >> ZTDTH | ZIS+6*, PROGINIT+15* |
| >> ZTIO | ZIS+5*, PROGINIT+14* |
| >> ZTQUEUED | BAR+3, PROGBAR+1 |
| >> ZTREQ | BAR+3*, PROGBAR+1* |
| >> ZTRTN | ZIS+8*, PROGINIT+17* |
| >> ZTSAVE("SHIFT" | PROGINIT+13* |
| ZTSK | ZIS+10, ZIS+12!, PROGINIT+19, PROGINIT+21! |