Routine: DMSQP3

Package	Total	Call Graph
VA Fileman	5	DT^DICRW EN1^DIP ^DIR (PRT3,PRT4,PRT5,PRT6,PRT7)^DMSQP4 $$WAIT^DMSQT1
Kernel	1	HOME^%ZIS

Entry Points

Name	Comments	DBIA/ICR reference
PAIRS	; build array with to-table and from-tables that point
EN	; show individual table counts of links
OK	; check of okay to run
ASK2	; prompt for style of listing (summary counts or detail)
READ	; reader for the menu
MENU	; present a choice of reports, now that TMP arrays are built
CLEAR
PREASK	; confirm that it's okay to wait for interactive processing
CNT	; get reference counts
TOTS	;
EN1	; show summary counts of table links
EXIT
BUILD	;
ASK	; select file numbers
ASK1
PRT	;
DEFINE	;

External References

Name	Field # of Occurrence
HOME^%ZIS	EN+3, EN1+3
DT^DICRW	EN+3, EN1+3
EN1^DIP	PRT+13
^DIR	MENU+1, READ+2, PREASK+2, ASK+4, ASK1+3, ASK2+2
PRT3^DMSQP4	EN1+9
PRT4^DMSQP4	EN1+10
PRT5^DMSQP4	EN1+11
PRT6^DMSQP4	EN1+12
PRT7^DMSQP4	EN1+13
$$WAIT^DMSQT1	OK+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: MENU+1
Function Call: WRITE	Prompt: !!!!!?9,"(1) SELF Tables with Self-referential Pointers" Line Location: MENU+2
Function Call: WRITE	Prompt: !?9,"(2) UP Tables with Upward Links" Line Location: MENU+3
Function Call: WRITE	Prompt: !?9,"(3) DOWN Tables Linked from Below" Line Location: MENU+4
Function Call: WRITE	Prompt: !?9,"(4) OUT Tables Pointing Outward" Line Location: MENU+5
Function Call: WRITE	Prompt: !?9,"(5) IN Tables with Incoming Pointers" Line Location: MENU+6
Function Call: WRITE	Prompt: !!?9,"(9) QUIT Exit this Menu" Line Location: MENU+7
Function Call: WRITE	Prompt: !! Line Location: MENU+8
Function Call: WRITE	Prompt: !?5,"Sorry, SQLI files are empty.",! Line Location: OK+1
Function Call: WRITE	Prompt: !?5,"Try later. SQLI is being re-built right now." Line Location: OK+3
Function Call: WRITE	Prompt: !,"SQLI table not found." Line Location: ASK+5
Function Call: WRITE	Prompt: !!?5,"There isn't a table for the file number you've entered." Line Location: ASK1+5
Function Call: WRITE	Prompt: !?5,"(The highest possible number is "_DM2_".)",! Line Location: ASK1+6
Function Call: WRITE	Prompt: !!?5,"Enter a LARGER number to get a range." Line Location: ASK1+8
Function Call: WRITE	Prompt: !?5,"The highest possible number here is "_DM2_".",! Line Location: ASK1+9
Function Call: WRITE	Prompt: !,"Please wait..." Line Location: PAIRS+1
Routine Call	%ZIS Line Location: EN+3 EN1+3
Routine Call	DIR Line Location: MENU+1 READ+2 PREASK+2 ASK+4 ASK1+3 ASK2+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DMSQ("C" - [#1.5217]	BUILD+15, BUILD+16, PAIRS+10
^DMSQ("DM" - [#1.5212]	BUILD+18, PAIRS+7
^DMSQ("E" - [#1.5216]	BUILD+5, BUILD+12, BUILD+17, BUILD+20, PAIRS+5, PAIRS+6
^DMSQ("F" - [#1.5219]	BUILD+13, BUILD+14, PAIRS+8, PAIRS+9
^DMSQ("S" - [#1.521]	OK+1
^DMSQ("T" - [#1.5215]	ASK+1, ASK+5, ASK1+4, BUILD+2, BUILD+4, TOTS+5, PAIRS+2, PAIRS+4
^TMP("DM"	CLEAR!, DEFINE+3*, TOTS+3, TOTS+6, TOTS+9, TOTS+12, TOTS+15, TOTS+18, TOTS+21
^TMP("DMCT1"	CLEAR+2!, DEFINE+1, CNT+6*
^TMP("DMCT2"	CLEAR+2!, DEFINE+2, CNT+10*
^TMP("DMFQ2"	CLEAR+2!, TOTS+7*
^TMP("DMFQ3"	CLEAR+2!, TOTS+10*
^TMP("DMFQ4"	CLEAR+3!, TOTS+13*
^TMP("DMFQ5"	CLEAR+3!, TOTS+16*
^TMP("DMFQ6"	CLEAR+3!, TOTS+19*
^TMP("DMFQ7"	CLEAR+3!, TOTS+22*
^TMP("DMP1"	CLEAR+1!, PAIRS+10*, CNT+1, CNT+3, CNT+5
^TMP("DMP2"	CLEAR+1!, PAIRS+11*, CNT+7, CNT+9
^TMP("DMT"	CLEAR!, TOTS+26*
^TMP("DMTN"	CLEAR!, TOTS+25*

Label References

Name	Line Occurrences
ASK	EN+4, ASK+5
ASK1	EN+4, ASK1+4, ASK1+7
ASK2	EN1+4
BUILD	EN+4, EN1+4
CLEAR	EN+4, EN1+4
CNT	EN+4, EN1+4
DEFINE	BUILD+5, BUILD+20
EXIT	EN+4, EN1+3
MENU	EN1+8
OK	EN+1, EN1+1
PAIRS	EN+4, EN1+4
PREASK	EN+2, EN1+2
PRT	EN+4
READ	EN1+8
TOTS	EN1+4

Naked Globals

Name	Field # of Occurrence
^(	DEFINE+1, DEFINE+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BY(0	PRT+3*
>> DHD	PRT+1*
>> DIC	PRT+1*
DIR	MENU+1!, READ+2!, PREASK+2!, ASK+4!, ASK1+3!, ASK2+2!
DIR("?"	ASK+3, ASK1+2
DIR("A"	READ+2, PREASK+1, ASK+2, ASK1+1, ASK2+1*
DIR("B"	PREASK+2, ASK+4, ASK1, ASK2+2
DIR(0	MENU+1, READ+1, PREASK+1, ASK+2, ASK1+1, ASK2+2
>> DIRUT	EN+2, EN1+2, EN1+8, MENU+1, ASK+4, ASK2+2
>> DISPAR(0	PRT+4, PRT+5, PRT+8, PRT+9, PRT+10, PRT+11, PRT+12*
DM1	EXIT+2!, ASK+1, ASK+2, ASK1+1, TOTS+1, TOTS+3, TOTS+5, TOTS+6, TOTS+9, TOTS+12 , TOTS+15, TOTS+18, TOTS+21, CNT+1, CNT+3, CNT+5, CNT+6, CNT+7*, CNT+9, CNT+10
DM2	EXIT+2!, ASK+1, ASK+2, ASK1+1, ASK1+6, ASK1+9, TOTS+5, TOTS+6, TOTS+7, TOTS+8 , TOTS+9, TOTS+12, TOTS+13, TOTS+15, TOTS+18, TOTS+21, CNT+2, CNT+3, CNT+5, CNT+8 , CNT+9*
DM3	EXIT+2!, TOTS+8, TOTS+9, TOTS+10, TOTS+11, TOTS+12, TOTS+15, TOTS+18, TOTS+21, CNT+4* , CNT+5*
DM4	EXIT+2!, TOTS+11, TOTS+12, TOTS+13, TOTS+14, TOTS+15, TOTS+18, TOTS+21, TOTS+24
DM5	EXIT+2!, TOTS+14, TOTS+15, TOTS+16, TOTS+17, TOTS+18, TOTS+21, TOTS+24
DM6	EXIT+2!, TOTS+17, TOTS+18, TOTS+19, TOTS+20, TOTS+21, TOTS+24
DM7	EXIT+2!, TOTS+20, TOTS+21, TOTS+22, TOTS+23, TOTS+24
DMANS	EN1+7, EN1+8, EN1+9, EN1+10, EN1+11, EN1+12, EN1+13, READ+2, EXIT!
DMBFK	EXIT+1!, DEFINE+1*, DEFINE+3
DMBPFK	EXIT+1!, DEFINE+2*, DEFINE+3
DMC1	EXIT+3!, TOTS+1, TOTS+5, TOTS+25, TOTS+26
DMC2	EXIT+3!, TOTS+1, TOTS+8, TOTS+26
DMC3	EXIT+3!, TOTS+1, TOTS+11, TOTS+26
DMC4	EXIT+3!, TOTS+1, TOTS+14, TOTS+26
DMC5	EXIT+3!, TOTS+1, TOTS+17, TOTS+26
DMC6	EXIT+3!, TOTS+1, TOTS+20, TOTS+26
DMC7	EXIT+3!, TOTS+1, TOTS+23, TOTS+26
DMCI	EXIT+1!
DMCN2	EXIT+4!, TOTS+2, TOTS+8, TOTS+25
DMCN3	EXIT+4!, TOTS+2, TOTS+11, TOTS+25
DMCN4	EXIT+4!, TOTS+2, TOTS+14, TOTS+25
DMCN5	EXIT+4!, TOTS+2, TOTS+17, TOTS+25
DMCN6	EXIT+4!, TOTS+2, TOTS+20, TOTS+25
DMCN7	EXIT+4!, TOTS+2, TOTS+23, TOTS+25
DMCN8	EXIT+4!, TOTS+2, TOTS+24, TOTS+25
DMCOL	EXIT!, BUILD+14, BUILD+15, BUILD+16, PAIRS+9, PAIRS+10
DMCT	EXIT+1!, CNT+2, CNT+5, CNT+6, CNT+8, CNT+9, CNT+10
DMDHD	EN1+5*, EXIT+2!
DMDI	EXIT+1!
DMDM	EXIT!, BUILD+17, BUILD+18, PAIRS+6, PAIRS+7
DME	EXIT!, BUILD+12, BUILD+13, BUILD+17, BUILD+20, PAIRS+5, PAIRS+6, PAIRS+8
DMEI	EXIT+1!
DMF	EXIT!, BUILD+13, BUILD+14, PAIRS+8, PAIRS+9, PAIRS+10
DMFILE	EXIT!, BUILD+1, BUILD+2, BUILD+4, DEFINE+3, PAIRS+1, PAIRS+2, PAIRS+4
DMFK	EXIT!, BUILD+4, BUILD+15, DEFINE+3
DMFLDS	EN1+6*, EXIT+2!
DMFN	EXIT+1!, ASK+4*, ASK+5, ASK1, ASK1+7, PRT+3
DMFN1	EXIT+1!, ASK1+3*, ASK1+4, ASK1+7, PRT+3
DMPFK	EXIT!, BUILD+4, BUILD+16, DEFINE+3
DMQ	EN+1!, EN+2!, EN+4, EN1+1!, EN1+2!, EN1+4, EXIT+1!, OK+1, OK+2, PREASK+2* , ASK+4, ASK1+3, ASK2+2*
DMSR	EXIT!, BUILD+4, BUILD+19, DEFINE+3
DMTBL	EXIT+1!, TOTS+5*, TOTS+7, TOTS+10, TOTS+13, TOTS+16, TOTS+19, TOTS+22
DMWP	EXIT!, BUILD+4*, DEFINE+3
DMX	EXIT+1!, BUILD+4, BUILD+5, BUILD+12, BUILD+19, BUILD+20, DEFINE+1, DEFINE+2, DEFINE+3, PAIRS+4 , PAIRS+5, PAIRS+10, PAIRS+11
DMY	EXIT+1!, BUILD+18, BUILD+19, PAIRS+7, PAIRS+10, PAIRS+11
DMYN	EN1+5, EN1+6, EXIT!, ASK2+2*
DOT	EXIT!, BUILD+1, BUILD+3, TOTS+1, TOTS+4, PAIRS+1, PAIRS+3
>> DTOUT	ASK1+3
>> DUOUT	ASK1+3
>> FLDS	PRT+2*
>> FR(0	PRT+3*
IOF	MENU+1
>> L	PRT+1*
>> L(0	PRT+3*
>> TO(0	PRT+3*
U	BUILD+14, BUILD+15, BUILD+16, BUILD+17, BUILD+18, PAIRS+6, PAIRS+7, PAIRS+9, PAIRS+10
>> Y	READ+2, PREASK+2, ASK+4, ASK1+3, ASK2+2

Customize PDF page

Package: VA Fileman

Routine: DMSQP3

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: