Routine: SCUTBK1

Information

SCUTBK1 ;ALB/MJK - Scheduling Broker Utilities ;[ 03/08/95 3:41 PM ]

Source file <SCUTBK1.m>

Package	Total	Call Graph
Scheduling	2	$$PRTP^SCAPMC8 (CHK,TMP)^SCUTBK
VA Fileman	1	^DIK

Name	Comments	DBIA/ICR reference
IFNODE(SCNODE,SCROOT)	; -- extrinsic call to check if node exists. ; passes in full node reference.
FILENOC(SCFLNO,SCNAME)	; -- broker callback to get File #
PRTP(SCACTV,SC)	;
GLCNT(SCOK,SC)	; -- extrinsic call to invoke broker to return number of ; global nodes found at cross reference
NODEC(SCNODE,SCROOT)	; -- broker callback to get global node value
PRTPQ
DIKC(SCOK,SC)	; -- broker callback to kill a file entry
LOCKC(SCOK,SC)	; -- broker callback to lock/unlock a node

Name	Field # of Occurrence
^DIK	DIKC+10
$$PRTP^SCAPMC8	PRTP+15
CHK^SCUTBK	DIKC+3, LOCKC+3, FILENOC+2, NODEC+2, GLCNT+3, IFNODE+3, PRTP+4
TMP^SCUTBK	PRTP+3

Name	Line Occurrences (* Changed, ! Killed)
^DIC("B"	FILENOC+3

Name	Line Occurrences
PRTPQ	PRTP+6

Name	Field # of Occurrence
DA	DIKC+2~, DIKC+7*, DIKC+9
DIK	DIKC+2~, DIKC+6*, DIKC+9
DT	PRTP+11, PRTP+12
>> I	GLCNT+11, GLCNT+12
SC	DIKC~, LOCKC~, GLCNT~, PRTP~
SC("BEGIN"	PRTP+11
SC("END"	PRTP+12
SC("IEN"	DIKC+7, PRTP+6, PRTP+8
SC("INCL"	PRTP+13
SC("LOCKMODE"	LOCKC+10
SC("NODE"	LOCKC+6
SC("ROOT"	DIKC+6, GLCNT+6
SC("TIMEOUT"	LOCKC+11
SC("VALUE"	GLCNT+8
SC("XREF"	GLCNT+7
SCACTV	PRTP~, PRTP+7, PRTP+16
SCERRX	PRTP+2~
SCFLNO	FILENOC~, FILENOC+3*
SCFRST	GLCNT+2~, GLCNT+5*
SCIEN	PRTP+2~, PRTP+8*, PRTP+15
SCKDT	PRTP+2~, PRTP+10*
SCKDT("BEGIN"	PRTP+11*
SCKDT("END"	PRTP+12*
SCKDT("INCL"	PRTP+13*
SCNAME	FILENOC~, FILENOC+3
SCNODE	LOCKC+2~, LOCKC+6, LOCKC+7, LOCKC+9, LOCKC+11, LOCKC+14, NODEC~, NODEC+5, NODEC+7, GLCNT+2~ , GLCNT+6, GLCNT+12, IFNODE~, IFNODE+6, IFNODE+8
SCOK	DIKC~, DIKC+11, DIKC+13, LOCKC~, LOCKC+7, LOCKC+12, LOCKC+15, LOCKC+17, GLCNT~, GLCNT+5* , GLCNT+14, PRTP+2~, PRTP+15, PRTP+16
SCROOT	NODEC~, NODEC+4, NODEC+5, NODEC+6, NODEC+7, IFNODE~, IFNODE+5, IFNODE+6, IFNODE+7, IFNODE+8
SCRTN	PRTP+2~
SCRTN(1	PRTP+16
SCTEAM	GLCNT+2~
>> SCVAL	GLCNT+8*, GLCNT+12
SCXREF	GLCNT+2~, GLCNT+7, GLCNT+10, GLCNT+12
X	GLCNT+11, GLCNT+13, GLCNT+14, IFNODE+2~