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: DMSQP5

Package: VA FileMan

Routine: DMSQP5


Information

DMSQP5 ;SFISC/EZ-DD LISTING USING SQLI ;10/30/97 17:46

Source Information

Source file <DMSQP5.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; for a single file or number range, display DD information
EXIT
ASK ; select file numbers
ASK1
DQ ; print DD information in file number order
; find file number links (from subfiles or pointers)
PAGE ; do page breaks if using a terminal (C-) device
RPT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"Sorry, SQLI files are empty.",!
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !?5,"Try later. SQLI is being re-built right now."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"WARNING: REPORT JUST WRITES TO THE SCREEN WITHOUT PAGE BREAKS"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !," (INTENDED FOR SCREEN CAPTURES) SO PICK ONE TABLE"
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !," OR A SMALL RANGE WHEN TESTING",!
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: !,"SQLI table not found."
  • Line Location: ASK+8
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: @IOF
  • Line Location: PAGE+1
Function Call: WRITE
  • Prompt: !,FI_" "_FN,!?($L(FI)-3),"TBL:"_TN
  • Line Location: RPT+24
Function Call: WRITE
  • Prompt: !?10,FLD_" "_$G(DMSQTMP("LABEL")),!?($L(FLD)+7),"COL:"_EN
  • Line Location: RPT+25
Function Call: WRITE
  • Prompt: !?20,$G(DMSQTMP("TYPE"))
  • Line Location: RPT+26
Function Call: WRITE
  • Prompt: !?20,FLDGBL
  • Line Location: RPT+29
Info |  Source |  Entry Points |  Interaction Calls