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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ENLBL15

Package: Engineering

Routine: ENLBL15


Information

ENLBL15 ;(WASH ISC)/DH-Print Bar Coded Equipment Labels ;10.10.97

Source Information

Source file <ENLBL15.m>

Entry Points

Name Comments DBIA/ICR reference
LOCID ;By LOCAL IDENTIFIER
LOCID1
LOCID15
LOCID2
LOCID25
LOCID3
LOCID4
NEXT ;Time to quit?
LIDSRT
HOLD

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "Start with: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: LOCID1+0
Function Call: WRITE
  • Prompt: " ",ENLID("FR")
  • Line Location: LOCID1+2
Function Call: WRITE
  • Prompt: " ",ENLID("FR")
  • Line Location: LOCID1+3
Function Call: WRITE
  • Prompt: !,"There is no LOCAL IDENTIFIER in the Equipment File that begins with:",!,?5,ENX
  • Line Location: LOCID1+4
Function Call: WRITE
  • Prompt: " ",ENLID("FR")
  • Line Location: LOCID15+1
Function Call: READ
  • Formatting: !
  • Prompt: "Go to: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: LOCID2+0
Function Call: WRITE
  • Prompt: !,"Please enter a character string which follows (or equals):",!,ENLID("FR"),!,"This will be the end point of our print job."
  • Line Location: LOCID2+1
Function Call: WRITE
  • Prompt: !,"Your entry (",X,") does not follow ",ENLID("FR"),".",*7
  • Line Location: LOCID2+4
Function Call: WRITE
  • Prompt: !,"OK, including everything from ",ENLID("FR")," to ",ENLID("TO"),"."
  • Line Location: LOCID25+0
Function Call: WRITE
  • Prompt: !,"Sort labels by LOCATION"
  • Line Location: LOCID3+0
Function Call: WRITE
  • Prompt: !,"Say YES to sort labels by DIVISION, BUILDING, and then by ROOM.",!,"If you say NO, labels will be sorted by LOCAL IDENTIFIER."
  • Line Location: LOCID3+0
Function Call: WRITE
  • Prompt: !,*7,"Companion Printer UNAVAILABLE."
  • Line Location: LOCID4+1
Function Call: WRITE
  • Prompt: !,"Press <RETURN> to continue..."
  • Line Location: HOLD+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6914 - [#6914] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call