Routine: DMSQU

Package	Total	Call Graph
VA Fileman	5	FIELD^DID (FILE,UPDATE)^DIE (CLEAN,INIZE)^DIEFU $$EXTERNAL^DILFD $$GET1^DIQ

Package	Total	Caller Graph
VA Fileman	6	DMSQ DMSQD DMSQF DMSQF1 DMSQF2 DMSQS

Entry Points

Name	Comments	DBIA/ICR reference
PUT(I,A,E)	;FILE OR UPDATE
TM(S)	;RETURN TEXT VALUE OF TIME S SECONDS AS HH:MM:SS
ET(T)	;REPORT ELAPSED TIME SINCE T ($H FORMAT)
TD(T,N)	;RETURNS TIME DIFERENCE OF N(OW)-T(HEN) $H FORMATS
PAR(TI,NP,G,P,E)	;GET PARENT, GBL FRAGMENT, AND PIECE OR EXTRACT
DM(F,FI,DEF)	;BUILD META-DATA FOR ONE FIELD (USE WHEN FIELD^DID FAILS!!)
NEW()	;Extrinsic function returns comma-list of variables to NEW
CN(T,C,N)	;BUILD COLUMN NAME N UNIQUE BY TABLE T, COLUMN ELEMENT C
ATTR	;;TYPE;FIELD LENGTH;DECIMAL DEFAULT;INPUT TRANSFORM;GLOBAL SUBSCRIPT LOCATION;POINTER;TITLE;SPECIFIER;DESCRIPTION;MULTIPLE-VALUED;LABEL
GET(F,IEN,FI,FLG,BUF,MSG)	;SQLI ENTRY TO GET1^DIQ
CLF(S)
SQLK(T,L)	;RETURN SQL IDENTIFIER NOT A KEYWORD
FIL(SF)	;EXTRINSIC FUNCTION RETURNS FILE CONTAINING FILE OR SUBFILE SF
CLN
SQLIX
SQLI(T,L)	;RETURN VALID SQL IDENTIFIER OF LENGTH L OR LESS BASED ON T
EXT(F,FI,FLG,INT,MSG)	;SQLI ENTRY TO EXTERNAL^DILFD
ENV
DOM(F,FI,DEF,ERR)	;GET FIELD ATTRIBUTES - DEF AND ERR ARE OPTIONAL
ERR(F,FI,T)	;ERROR LOGGER
KWC(N)	;RETURN N AS A NON-KEYWORD
FNB(F,TI)	;BUILD SQL FILE NAME
KL(TI)	;RETURN IEN LIST OF TABLE
TBL(TI)	;EXTRINSIC FUNCTION RETURNS TABLE CONTAINING TABLE OR SUBTABLE TI
SS(T)	;CONVERT T TO A VALID SUBSCRIPT (QUOTES)
SOC(T,B)	;TRANSLATE BASE CODE B TO EXTERNAL FORM FROM TEXT T
VIEN(TI)	;RETURN VIRTUAL IENS FOR TI
ROOT(F)	;GET GLOBAL NAME SYNTAX FOR A SUBFILE (F)
SQZ(T)	;RETURN MNEMONIC VALUE OF T

External References

Name	Field # of Occurrence
FIELD^DID	DOM+4
FILE^DIE	PUT+4
UPDATE^DIE	PUT+6
CLEAN^DIEFU	ENV+1
INIZE^DIEFU	ENV+2
$$EXTERNAL^DILFD	EXT+1
$$GET1^DIQ	GET+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?30,"Time elapsed: ",$$TM($$TD(T,$H))," (HH:MM:SS)" Line Location: ET+1
Routine Call	DIE Line Location: PUT+6
Routine Call	DIE Line Location: PUT+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	DOM+3, DM+2, DM+5, KL+2, FNB+7, FNB+8, ROOT+3, ROOT+5, ROOT+6, FIL+1
^DIC - [#1]	FNB+9, ROOT+8, FIL+2
^DMSQ(	CLF+1!*
^DMSQ("E" - [#1.5216]	PAR+3, CN+7
^DMSQ("ET" - [#1.52191]	ERR+2, ERR+3, ERR+4, ERR+5*
^DMSQ("EX" - [#1.52192]	ERR+6, ERR+7, ERR+8, ERR+9*
^DMSQ("K" - [#1.52101]	KWC+1, KWC+2
^DMSQ("P" - [#1.5218]	PAR+4, PAR+5
^DMSQ("T" - [#1.5215]	VIEN+2, FNB+15, TBL+1, TBL+2

Label References

Name	Line Occurrences
$$DM	DOM+6
$$FIL	TBL+2
$$KWC	FNB+16, CN+6, SQLK+3
$$SQLI	KWC+1, FNB+14, CN+6, SQLK+3
$$SQZ	SQLI+15
$$SS	PAR+6, ROOT+6
$$TD	ET+1
$$TM	ET+1
ATTR	DOM+4
CLF	CLN
ENV	EXT+1, GET+1, CLF, PAR+2, ERR+1, DOM+2, DOM+6, DM+1, PUT+2
ERR	DOM+6
SQLIX	SQLI+5

Naked Globals

Name	Field # of Occurrence
^(	ERR+4, ERR+5*, FNB+15
^("GL"	ROOT+8
^(0	ERR+6*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CN+5~, CN+6, CN+7
A	PUT~, PUT+4, PUT+6
B	SOC~, SOC+1
BUF	GET~, GET+1
C	CN~, CN+7
CI	PAR+2~, PAR+5*, PAR+9
CK	DM+1~, DM+11*
D	DM+1~, DM+7*, DM+10, DM+15
DEF	DOM~, DOM+2!, DOM+6, DM~, DM+2!
DEF("DECIMAL	DEFAULT" , DOM+7, DM+13*
DEF("DESCRIPTION"	DOM+22!, DOM+23, DM+5
DEF("FIELD LE	NGTH" , DOM+7, DM+14*
DEF("GLOBAL S	UBSCRIPT LOCATION" , DM+3*
DEF("INPUT TR	ANSFORM" , DOM+9, DOM+13, DM+4*
DEF("LABEL"	DM+3*
DEF("MULTIPLE-VALUED"	DM+6*
DEF("POINTER"	DM+6*
DEF("SPECIFIER"	DM+4*
DEF("TYPE"	DOM+7, DM+16, DM+18, DM+19, DM+20, DM+24, DM+25, DM+26, DM+31, DM+32* , DM+33*
>> DIERR	DOM+5
>> DIFM	ENV+1, ENV+2*
>> DIQUIET	ENV+2*
DM	DM+1~, DM+16, DM+18, DM+19, DM+20, DM+24, DM+25, DM+26, DM+28, DM+29* , DM+30, DM+32, DM+33*, DM+34
DP	DM+1~, DM+10*, DM+13, DM+15
DT	ENV+1, ERR+7, ERR+8
DUZ	ENV+1
DUZ(0	ENV
E	PAR~, PAR+6, PAR+8, PUT~, PUT+2, PUT+4, PUT+6, PUT+7
E1	PAR+2~
E2	PAR+2~
EI	ERR+1~, ERR+6*, ERR+7, ERR+8, ERR+9
ERR	ENV+1!, DOM~, DOM+5
ERR("DIERR"	ERR+1
EX	DM+1~, DM+8, DM+9, DM+12
F	EXT~, EXT+1, GET~, GET+1, ERR~, ERR+7, DOM~, DOM+3, DOM+4, DOM+6 , DOM+22, DOM+23, DM~, DM+2, DM+5, FNB~, FNB+6, ROOT~, ROOT+3, ROOT+5 , ROOT+6, ROOT+8, FIL+1~, FIL+2, TBL+1~, TBL+2*, TBL+3
F1	FNB+5~, FNB+6, FNB+7, FNB+8, FNB+9
FE	ERR+1~*, ERR+7, ERR+9
FI	EXT~, EXT+1, GET~, GET+1, ERR~, ERR+7, DOM~, DOM+3, DOM+4, DOM+6 , DM~, DM+2, DM+5, ROOT+1~, ROOT+5*, ROOT+6
FLG	EXT~, EXT+1, GET~, GET+1
G	PAR~, PAR+6, ROOT+1~, ROOT+2, ROOT+6, ROOT+7, ROOT+8, ROOT+9, ROOT+10
H	DM+1~, DM+2*, DM+3, DM+4, DM+6, DM+27
I	VIEN+1~, VIEN+2, DOM+9, DM+9, DM+21~, DM+22, PUT~, PUT+3, PUT+6, PUT+7 , KWC+1~, KWC+2, FNB+5~, FNB+11, FNB+12, FNB+13, FNB+15, CN+5~, CN+7, SQLI+4~ , SQLI+15, SQLI+17*
IEN	GET~, GET+1
INT	EXT~, EXT+1
IT	DM+1~, DM+4*, DM+11
J	FNB+5~, FNB+13*
KL	KL+1~, KL+2, KL+3
L	SQLK~, SQLK+3, SQLI~, SQLI+5, SQLI+13, SQLI+15, SQLI+17, SQLI+19, SQLIX+3
LD	DM+1~, DM+10, DM+11, DM+12, DM+13, DM+14, DM+16, DM+18, DM+19, DM+20 , DM+23, DM+24, DM+33
MSG	EXT~, EXT+1, GET~, GET+1
N	TD~, TD+1, KWC~, KWC+1, KWC+2, KWC+3, CN~, CN+5, CN+6, CN+7 , CN+8
NM	FNB+5~, FNB+6, FNB+8, FNB+9, FNB+10, FNB+11, FNB+12, FNB+13, FNB+14, FNB+15 , FNB+16
NP	PAR~, PAR+6, PAR+7, PAR+8
O	PUT+6~
O(1	PUT+6
P	PAR~, PAR+7, PAR+8, DM+1~, DM+6, DM+22, KL+1~, KL+2, FNB+5~, FNB+6 , FNB+7, FNB+8, ROOT+1~, ROOT+3, ROOT+4, ROOT+5, ROOT+6
>> PE	DM+3*, DM+8
PEI	PAR+2~, PAR+3*, PAR+4, PAR+5
PI	PAR+2~, PAR+5*
PL	SQLI+4~, SQLI+14*, SQLI+15, SQLI+17
S	CLF~, CLF+1, VIEN+1~, VIEN+2, VIEN+3, TM~, TM+1, DOM+2~, DOM+7, DOM+8 , DOM+15*, DOM+17, DOM+24
SF	FIL~, FIL+1*
SP	DM+1~, DM+4, DM+6, DM+7, FNB+5~, FNB+6, FNB+8*, FNB+9
SQ	PAR+2~, PAR+4*, PAR+5
T	SOC~, SOC+1, ET~, ET+1, TD~, TD+1, ERR~, ERR+2, ERR+3, ERR+5 , DOM+2~, DOM+5, DOM+6, DOM+7, DOM+10, DOM+11, DOM+12, DOM+14, DOM+15, DOM+16* , DOM+17, DOM+18, DOM+19, DOM+20, DOM+21, DOM+24, CN~, CN+7, SQLK~, SQLK+3 , SQLI~, SQLI+5, SQLI+7, SQLI+9, SQLI+10, SQLI+11, SQLI+13, SQLI+14, SQLI+15, SQLI+17* , SQLI+19, SQLIX, SQLIX+1, SQLIX+2, SQLIX+3, SQLIX+4, SQZ~, SQZ+1, SQZ+2, SS~ , SS+1, SS+2, SS+3*, SS+4
T1	SQLI+4~
TI	VIEN~, VIEN+2, PAR~, PAR+3, ERR+1~, ERR+2, ERR+3, ERR+4, ERR+5, ERR+7 , ERR+8, KL~, KL+1, KL+2, FNB~, FNB+15, TBL~, TBL+1
TYP	DM+1~, DM+15*, DM+16, DM+17, DM+19, DM+20, DM+24, DM+25, DM+26, DM+27 , DM+32
U	ENV+1, PAR+5, ERR+4, ERR+5, ERR+6, ERR+7, DOM+24, DM+3, DM+4, DM+6 , DM+13, DM+14, DM+23, TBL+1
W	DOM+2~, DOM+7, DOM+8, DOM+9, DOM+10, DOM+21, DOM+24, DM+21~, DM+22*, DM+23
X	CLF~, CLF+1, DOM+2~, DOM+13, DOM+14, DM+1~, DM+21~, DM+22, DM+27, DM+28 , DM+29, KWC+1~, KWC+2, FNB+5~, FNB+12, FNB+13, CN+5~, CN+6*, CN+7

Marked Items

Name	Field # of Occurrence
$T(ATTR	DOM+4

Customize PDF page

Package: VA Fileman

Routine: DMSQU

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items