Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DMSQP2

Package: VA Fileman

Routine: DMSQP2


Information

DMSQP2 ;SFISC/EZ-PRINT SQLI'S DD INFORMATION ;10/30/97 17:29

Source Information

Source file <DMSQP2.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 6 EN^DIAC  DT^DICRW  $$EXTERNAL^DILFD  EN1^DIP  ^DIR  $$WAIT^DMSQT1  
Kernel 1 ^%ZIS  

Entry Points

Name Comments DBIA/ICR reference
DN ; downward
EN ; for a single file or number range, show SQLI projection of fields
ASK1
ZIS
PRT ; report
CHK ; check for existence of SQLI data in DMSQ global
LST ; list file names and SQLI tables by file number
EN2 ; display file numbers above
CHK1 ; check file access needed for navigation in PRT report
EN1 ; display file numbers below this one (subfiles)
INIT
EN3 ; file number choices to use in EN, EN1, EN2
EXIT
ASK ; select file numbers
PAGE
UP ; upward

External References

Name Field # of Occurrence
^%ZIS ZIS
EN^DIAC CHK1+2
DT^DICRW INIT
$$EXTERNAL^DILFD DN+8, UP+5
EN1^DIP PRT+12, LST+5
^DIR ASK+4, ASK1+3, PAGE
$$WAIT^DMSQT1 CHK+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"Sorry, SQLI files are empty.",!
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: !?5,"Try later. SQLI is being re-built right now."
  • Line Location: CHK+3
Function Call: WRITE
  • Prompt: !!?5,"You need 'Read' access to four SQLI files to run this report."
  • Line Location: CHK1+4
Function Call: WRITE
  • Prompt: !?5,"They are files 1.5211, 1.5212, 1.5214, and 1.5216."
  • Line Location: CHK1+5
Function Call: WRITE
  • Prompt: !!?5,"Contact your system manager to be granted single file access.",!
  • Line Location: CHK1+6
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: !?5,DMY,?20,$$EXTERNAL^DILFD(1.5215,6,"",DMY)
  • Line Location: DN+8
Function Call: WRITE
  • Prompt: !?5,DMY,?20,$$EXTERNAL^DILFD(1.5215,6,"",DMY)
  • Line Location: UP+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PAGE+0
Routine Call
  • DIR
  • Line Location:
    • ASK+4
    • ASK1+3
    • PAGE
Routine Call
  • %ZIS
  • Line Location:
    • ZIS

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DMSQ("DM" - [#1.5212] DN+2, DN+3, UP+3
^DMSQ("E" - [#1.5216] DN+4, DN+5, UP+2, UP+3
^DMSQ("S" - [#1.521] CHK+1
^DMSQ("T" - [#1.5215] ASK+1, ASK+5, ASK1+4, DN+1, DN+5, UP+1, UP+3

Label References

Name Line Occurrences
ASK EN+1, EN1+1, EN2+1, ASK+5
ASK1 EN+1, ASK1+4, ASK1+7
CHK EN+1, EN1+1, EN2+1, EN3+1
CHK1 EN+1
DN EN1+1
EXIT EN+1, EN1+1, EN2+1, EN3+1
INIT EN1+1, EN2+1, EN3+1
LST EN3+1
PAGE DN+7, UP+4
PRT EN+1
UP EN2+1
ZIS EN1+1, EN2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CHK1+2
>> BY LST+1*
>> BY(0 PRT+9*
>> DHD PRT+1*, LST+4*
DIAC CHK1+1!, CHK1+2*
>> DIC PRT+1*, LST+1*
>> DIFILE CHK1+1*
DIR ASK+4!, ASK1+3!, PAGE!
DIR("?" ASK+3*, ASK1+2*
DIR("A" ASK+2*, ASK1+1*
DIR("B" ASK+4*, ASK1*
DIR(0 ASK+2*, ASK1+1*, PAGE*
>> DIRUT ASK+4, DN+7, UP+4
>> DISPAR(0 PRT+10*, PRT+11*
DM1 EXIT!, ASK+1*, ASK+2, ASK1+1
DM2 EXIT!, ASK+1*, ASK+2, ASK1+1, ASK1+6, ASK1+9
DMFN EXIT!, ASK+4*, ASK+5, ASK1, ASK1+7, PRT+9, DN+1, UP+1
DMFN1 EXIT!, ASK1+3*, ASK1+4, ASK1+7, PRT+9
DMNODE EXIT!, DN+5*, DN+6
DMQ EN+1*, EN1+1, EN2+1, EN3+1, INIT*, ZIS*, EXIT!, CHK+1*, CHK+2*, CHK1+2*
, CHK1+3, ASK+4*, ASK1+3*, DN+4, DN+7*, UP+2, UP+4*
DMX EXIT!, DN+1*, DN+2*, DN+3*, DN+4, UP+1*, UP+2
DMX1 EXIT!, DN+4*, DN+5, UP+2*, UP+3
DMY EXIT!, DN+6*, DN+8, UP+3*, UP+5
>> DTOUT ASK1+3
>> DUOUT ASK1+3
DUZ(0 CHK1+1
>> FLDS PRT+2*, LST+2*
>> FLDS(1 PRT+3*, LST+3*
>> FLDS(2 PRT+4*
>> FLDS(3 PRT+5*
>> FLDS(4 PRT+6*
>> FLDS(5 PRT+7*
>> FLDS(6 PRT+8*
>> FR(0 PRT+9*
IOF PAGE
IOSL DN+7, UP+4
IOST PAGE
>> L PRT+1*, LST+1*
>> L(0 PRT+9*
>> POP ZIS
>> TO(0 PRT+9*
U DN+3, DN+5, DN+6, UP+3
>> Y ASK+4, ASK1+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All