Routine: SCMCPST

Information

SCMCPST ;ALB/REW - PCMM Post-init ; 4 Feb 1996

Source file <SCMCPST.m>

Package	Total	Call Graph
VA Fileman	3	EN^DDIOL FILE^DICN ^DIE

Name	Comments	DBIA/ICR reference
EXTCHK()	;environment check
EN	;
OKCLEAN()	;
QTGLOB
QTEXT
GLOB	;
MESS(TEXT,FORMAT)	;
DEFAULT()	;setup system defaults
LTRGLB	;
ABORT	;
LTRRT	; - to be used later if a/s isn't distributed with pcmm
GLOBCHK()	;
QTEN

FileNo	Call Tags
^SD(404.91 - [#404.91]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^SD(404.91 - [#404.91]	DEFAULT+5, DEFAULT+6!, DEFAULT+14
^TMP("SCMC"	OKCLEAN+4!

Name	Line Occurrences
$$DEFAULT	EN+8
$$EXTCHK	EN+4
$$GLOBCHK	EXTCHK+4
$$OKCLEAN	EN+12
ABORT	EN+6, EN+10, EN+14
MESS	EN+1, EN+5, EN+7, EN+9, EN+11, EN+13, EN+15, EN+16, EXTCHK+1, QTEXT , DEFAULT+3, DEFAULT+4, DEFAULT+12, DEFAULT+16, DEFAULT+18, DEFAULT+20, GLOBCHK+3, GLOBCHK+8, GLOBCHK+10, GLOBCHK+13 , QTGLOB, OKCLEAN+1, ABORT+1, ABORT+2, ABORT+3, ABORT+4, ABORT+5, ABORT+6, ABORT+7
QTEN	EN+4, EN+8, EN+12

Name	Field # of Occurrence
DA	DEFAULT+1~, DEFAULT+15, DEFAULT+21
DD	DEFAULT+7!
>> DIC	DEFAULT+8*
>> DIC(0	DEFAULT+9*
DIE	DEFAULT+1~, DEFAULT+15, DEFAULT+21
DO	DEFAULT+7!
DR	DEFAULT+1~, DEFAULT+15, DEFAULT+21
FORMAT	MESS~, MESS+2*, MESS+3
>> SCARR	GLOBCHK+5*, GLOBCHK+8, GLOBCHK+9
SCBEGIN	EN+3~
SCDTS	EN+3~
SCEND	EN+3~
SCESEQ	EN+3~
>> SCGLOB	GLOBCHK+4*, GLOBCHK+5, GLOBCHK+6, GLOBCHK+7
SCINCL	EN+3~
SCLSEQ	EN+3~
SCN	EN+3~
SCOK	EXTCHK+2~, EXTCHK+3, EXTCHK+4, QTEXT, QTEXT+1, DEFAULT+1~, DEFAULT+2, DEFAULT+22, GLOBCHK+1~, GLOBCHK+2 , QTGLOB, QTGLOB+1, OKCLEAN+2~, OKCLEAN+3*, OKCLEAN+5
SCP	EN+3~
SCPARM	EN+3~
>> SCSUB	GLOBCHK+6*, GLOBCHK+8, GLOBCHK+9
SCUSR	EN+2~, EXTCHK+3*, DEFAULT+13
SCVAR	EN+2~, GLOBCHK+7*, GLOBCHK+11
>> SCX	GLOBCHK+4*
TEXT	MESS~, MESS+1*, MESS+3
U	DEFAULT+14, GLOBCHK+6, GLOBCHK+7, GLOBCHK+8
X	DEFAULT+1~, DEFAULT+10*
Y	DEFAULT+1~

Name	Field # of Occurrence
$T(GLOB+SCX	GLOBCHK+4