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~ |