LA7CHKF ;VA/DALOI/JMC - Check Lab Messaging File Integrity ; 22-Oct-2013 09:22 ; MAW
Source file <LA7CHKF.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Automated Lab Instruments | 3 | LA7 CHECK FILES LA7ADL2 LA7PURG | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| LACHK() | ; Check ^LA("ADL","Q") for build up of entries. ; Send alert to mail group LAB MESSAGING warning about large # of entries. | |
| EN | ; Run an integrity check | |
| LOG(X) | ; Log error in XTMP global. ; Call with X = error message to store. | |
| LOCK(LA7DA) | ; Lock entry in #62.49 ; Call with LA7DA = entry to lock ; Returns 0 = failure to obtain lock ; 1 = lock obtained | |
| UNLOCK(LA7DA) | ; Unlock entry in #62.49 ; Call with LA7DA = entry to lock | |
| IC | ; File 62.49 Integrity checker and fix-er-upper. | |
| DQ | ; Entry point from taskman | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^LA("ADL" | LACHK+4 | 
| ^LAHM(62.49 - [#62.49] | IC+18, IC+31, IC+41, IC+53, IC+54, IC+65, IC+68, IC+69, IC+72!, IC+75 , IC+76*, IC+79, IC+80*, IC+83, IC+84*, IC+87, IC+88*, LOCK+6, UNLOCK+4 | 
| ^XTMP( | IC+8, IC+10*, IC+92*, IC+93*, IC+94, LOG+3* | 
| Name | Line Occurrences | 
|---|---|
| $$LOCK | IC+17, IC+27, IC+40, IC+52, IC+66 | 
| IC | DQ+1 | 
| LOG | IC+20, IC+30, IC+33, IC+43, IC+56, IC+73, IC+77, IC+81, IC+85, IC+89 , LOCK+8 | 
| UNLOCK | IC+21, IC+34, IC+44, IC+58, IC+90 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %ZIS | EN+18~, EN+19* | 
| %ZIS("A" | EN+19* | 
| %ZIS("B" | EN+19* | 
| DIR | EN+2~, EN+13! | 
| DIR("?" | EN+14* | 
| DIR("A" | EN+7*, EN+14* | 
| DIR("B" | EN+7*, EN+14* | 
| DIR(0 | EN+6*, EN+14* | 
| DIROUT | EN+2~, EN+13! | 
| DIRUT | EN+2~, EN+9, EN+13!, EN+16 | 
| DT | IC+9*, IC+10 | 
| DTOUT | EN+2~, EN+13! | 
| DUOUT | EN+2~, EN+13! | 
| DUZ | IC+100, LACHK+9 | 
| ION | EN+22 | 
| LA7CFG | IC+4~, IC+49*, IC+55 | 
| LA7CNT | LACHK+2~, LACHK+3*, LACHK+4*, LACHK+5, LACHK+7, LACHK+12 | 
| LA7DA | IC+4~, IC+16*, IC+17, IC+18, IC+20, IC+21, IC+26*, IC+27, IC+28, IC+31 , IC+33, IC+34, IC+39*, IC+40, IC+41, IC+43, IC+44, IC+51*, IC+52, IC+53 , IC+54, IC+56, IC+58, IC+64*, IC+65*, IC+66, IC+68, IC+69, IC+72, IC+73 , IC+75, IC+76, IC+77, IC+79, IC+80, IC+81, IC+83, IC+84, IC+85, IC+87 , IC+88, IC+89, IC+90, LOCK~, LOCK+5*, LOCK+6, LOCK+8, UNLOCK~, UNLOCK+3*, UNLOCK+4 , LACHK+2~, LACHK+3*, LACHK+4* | 
| LA7DAT | IC+4~, IC+16*, IC+18 | 
| LA7ECNT | IC+4~, IC+11*, IC+93, IC+95, IC+97, LOG+2*, LOG+3 | 
| LA7FIX | EN+3~, EN+10*, EN+11*, IC+5*, IC+19, IC+29, IC+32, IC+42, IC+57, IC+72 , IC+76, IC+80, IC+84, IC+88, IC+108! | 
| LA7IC | IC+4~, IC+8*, IC+10, IC+92, IC+93, IC+94, IC+98, IC+99, LOG+3 | 
| LA7INAME | IC+4~, IC+39*, IC+41 | 
| LA7ION | EN+3~, EN+22*, IC+103, IC+105, IC+108! | 
| LA7LOG | EN+3~, EN+5*, IC+6*, IC+7, IC+20, IC+30, IC+33, IC+43, IC+56, IC+73 , IC+77, IC+81, IC+85, IC+89, IC+91, IC+98, IC+108!, LOCK+8 | 
| LA7Q | IC+4~, IC+50*, IC+55 | 
| LA7QUIT | EN+3~, EN+21*, EN+23 | 
| LA7ROOT | IC+4~, IC+14*, IC+15*, IC+16, IC+19, IC+20, IC+24*, IC+25*, IC+26, IC+28 , IC+29, IC+30, IC+32, IC+33, IC+37*, IC+38*, IC+39, IC+42, IC+43, IC+47* , IC+48*, IC+49, IC+50, IC+51, IC+56, IC+57 | 
| >> LA7TCNT | IC+64*, IC+67*, IC+93 | 
| LA7Y | LOCK+4~, LOCK+5*, LOCK+7*, LOCK+8, LOCK+9 | 
| >> POP | EN+21 | 
| X | EN+2~, EN+13!, IC+4~, LOG~, LOG+3, LACHK+2~ | 
| X( | IC+54*, IC+55, IC+69*, IC+87, IC+88, IC+89 | 
| X(0 | IC+53*, IC+55, IC+68*, IC+70, IC+74, IC+78, IC+82, IC+86 | 
| XQA | IC+96~, LACHK+6~ | 
| XQA( | IC+100*, LACHK+9* | 
| XQA("G.LAB ME | SSAGING" , IC+101*, LACHK+10* | 
| XQADATA | IC+96~, IC+98*, LACHK+6~ | 
| XQAID | IC+96~, IC+99*, LACHK+6~, LACHK+8* | 
| XQAMSG | IC+96~, IC+97*, LACHK+6~, LACHK+7* | 
| XQAOPT | IC+96~, LACHK+6~ | 
| XQAROU | IC+96~, IC+98*, LACHK+6~ | 
| Y | EN+2~, EN+10, EN+11, EN+13!, EN+17, IC+4~, IC+70*, IC+71, IC+74*, IC+75 , IC+76, IC+77, IC+78*, IC+79, IC+80, IC+82*, IC+83, IC+84, IC+85, IC+86* , IC+87, IC+88, IC+89, LACHK+2~ | 
| ZTDESC | EN+25*, IC+104~, IC+106* | 
| ZTDTH | IC+104~, IC+105* | 
| ZTIO | EN+26*, IC+104~, IC+105* | 
| ZTRTN | EN+25*, IC+104~, IC+105* | 
| >> ZTSAVE("LA7*" | EN+26* | 
| >> ZTSAVE("LA7IC" | IC+105* | 
| ZTSK | EN+28, IC+104~ |