Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls