Routine: LA7CHKF

Information

LA7CHKF ;VA/DALOI/JMC - Check Lab Messaging File Integrity ; 22-Oct-2013 09:22 ; MAW

Source Information

Source file <LA7CHKF.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZTLOAD ($$DT,$$FMADD,$$NOW)^XLFDT SETUP^XQALERT
VA Fileman	1	^DIR

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Automated Lab Instruments	3	LA7 CHECK FILES LA7ADL2 LA7PURG

Entry Points

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	Field # of Occurrence
^%ZIS	EN+20
HOME^%ZIS	EN+23, EN+27
^%ZTLOAD	EN+27, IC+107
^DIR	EN+8, EN+15
$$DT^XLFDT	IC+9
$$FMADD^XLFDT	IC+10
$$NOW^XLFDT	IC+8, IC+10, IC+92
SETUP^XQALERT	IC+102, LACHK+11

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Request ",$S($G(ZTSK):"",1:"NOT "),"Queued" Line Location: EN+28
Routine Call	%ZIS Line Location: EN+23 EN+27
Routine Call	DIR Line Location: EN+8 EN+15
Routine Call	%ZIS Line Location: EN+20

Global Variables Directly Accessed

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

Local Variables

Legend:

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

Customize PDF page

Package: Automated Lab Instruments

Routine: LA7CHKF

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: