Routine: DMSQP

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

DMSQP ;SFISC/EZ-PRINT SQLI TABLE POINTERS ;10/30/97 16:49

Source Information

Source file <DMSQP.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
VA FileMan	5	EN^DIAC ^DIC DT^DICRW EN1^DIP $$WAIT^DMSQT1

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
VA FileMan	2	DMSQ TS PTR PARENT FULL DMSQ TS PTR SUBFILE FULL

Entry Points

Name	Comments	DBIA/ICR reference
EN1	; in pointers (to this table from others)
EN2	; out pointers (from this table out)
OK	; check if okay to run
ASK
CHK
CHK1	; check file access needed for navigation in PR2 report
PR1
PR2
EXIT

External References

Name	Field # of Occurrence
EN^DIAC	CHK1+2
^DIC	ASK+1
DT^DICRW	EN1+1, EN2+1
EN1^DIP	PR1+6, PR2+4
$$WAIT^DMSQT1	OK+2

Interaction Calls

Name	Line Occurrences
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: !,?5,"NO POINTERS",! Line Location: CHK+0
Function Call: WRITE	Prompt: !!?5,"You need 'Read' access to one SQLI file to run this report." Line Location: CHK1+4
Function Call: WRITE	Prompt: !?5,"It is file 1.5212." Line Location: CHK1+5
Function Call: WRITE	Prompt: !!?5,"Contact your system manager to be granted single file access.",! Line Location: CHK1+6
Routine Call	DIC Line Location: ASK+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DMSQ("DM" - [#1.5212]	PR1+5
^DMSQ("E" - [#1.5216]	CHK
^DMSQ("S" - [#1.521]	OK+1
^DMSQ("T" - [#1.5215]	PR1+2, PR2+1

Label References

Name	Line Occurrences
ASK	EN1+2, EN2+2
CHK	EN1+2, EN2+2
CHK1	EN2+2
EXIT	EN1+1, EN2+1
OK	EN1+2, EN2+2
PR1	EN1+2
PR2	EN2+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	CHK1+2
>> BY(0	PR1+6, PR2+4
>> DHD	PR1+2, PR2+1
DIAC	CHK1+1!, CHK1+2*
DIC	ASK, ASK+1!, PR1, PR2*
DIC(0	ASK*
>> DIFILE	CHK1+1*
>> DIS(0	PR1+1*
DMQ	EN1+1, EN1+2, EN2+1, EN2+2, OK+1, OK+2, ASK+1, CHK, CHK1+2*, CHK1+3 , EXIT!
DMY	ASK+1*, CHK, PR1+2, PR1+5, PR2+1, EXIT!
DMY1	PR1+5*, EXIT!
>> DTOUT	ASK+1
>> DUOUT	ASK+1
DUZ(0	CHK1+1
>> FLDS	PR1+3, PR2+2
>> FLDS(1	PR1+4, PR2+3
>> L	PR1, PR2
>> L(0	PR1+6, PR2+4
U	PR1+2, PR2+1
>> Y	ASK+1