©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
LAEKT7P ; IHS/DIR/FJE - KODAK EKTACHEM 700 ROUTINE ** MODIFIED TO USE 2ND PRINTER PORT ** 7/20/90 08:14 ;
Source file <LAEKT7P.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Lab Instruments | 3 | SET^LAB ^LABERR ^LASET |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QUIT | ||
| HDR | ||
| QC | ;QC TESTING HERE; S BAD=1 IF DONT STORE
|
|
| NUM | ||
| TRAP | ||
| DA2 | ||
| IN | ||
| DATA | ||
| LA1 | ||
| LA2 | ||
| LA3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TRAP" | LA1+2 |
| ^LA( | LA1+1, IN, IN+1*, QUIT! |
| ^LA("LOCK" | QUIT! |
| ^LAB(62.4 - [#62.4] | LA1 |
| ^LAH( | LA3+1* |
| ^TMP("LA" | QUIT! |
| ^TMP($J | QUIT! |
| Name | Line Occurrences |
|---|---|
| @( | TRAP |
| IN | LA2, DATA, IN |
| LA2 | LA2, LA3+3 |
| NUM | HDR, DA2 |
| QC | DATA |
| QUIT | LA2, DATA |
| Name | Field # of Occurrence |
|---|---|
| ^( | IN, IN+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> A | DATA*, QC+1 |
| >> BAD | DATA* |
| >> CNT | IN*, IN+1 |
| >> CTRL | IN+2* |
| >> CUP | HDR* |
| >> I | DA2*, LA3+1* |
| >> ID | HDR* |
| >> IDE | HDR* |
| >> IN | LA2, HDR, QC+1, IN+1*, IN+2* |
| >> ISQN | LA3+1 |
| >> JJ | NUM* |
| >> LAGEN | LA3 |
| >> LANM | LA1*, LA1+2, TRAP |
| >> LWL | LA3+1 |
| >> T | TRAP* |
| >> TC( | DA2 |
| >> TOUT | LA2*, DATA*, IN*, IN+1* |
| >> TRAY | HDR* |
| >> TSK | LA1*, LA1+1, LA1+2, IN, IN+1, QUIT, TRAP |
| TV | LA3+2! |
| TV( | LA3+1 |
| >> V | HDR*, DA2, NUM, NUM+1* |
| >> X | LA1+2*, NUM*, NUM+1 |
| >> Y( | QC+1* |
| >> ZTQUEUED | LA1 |
| >> ZTREQ | LA1* |
| Name | Field # of Occurrence |
|---|---|
| $T( | LA1 |