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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ENLBL10

Package: Engineering

Routine: ENLBL10


Information

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

Source Information

Source file <ENLBL10.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Engineering 4 (DOTS,QUIT,SORT,STA,STATCK)^ENLBL3  (BCDT,FORMAT,NXPRT)^ENLBL7  (EXIT,EXIT1,REQ)^ENLBL8  (CPRNT,EN,OPEN)^ENLBL9  
Kernel 2 ^%ZIS  ^%ZTLOAD  
VA FileMan 1 YN^DICN  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Engineering 1 ENBCEE PM  

Entry Points

Name Comments DBIA/ICR reference
PM ;Range of PM numbers
PM1
PM2
PM21
PM3
PMNSRT
HOLD

External References

Name Field # of Occurrence
^%ZIS PM21+3
^%ZTLOAD PM21+5
YN^DICN PM1+7, PM2+1, PM21
DOTS^ENLBL3 PM3+3, PM3+4
QUIT^ENLBL3 PM+1
SORT^ENLBL3 PM3+2, PM3+3
STA^ENLBL3 PM+1
STATCK^ENLBL3 PM3+2, PM3+3
BCDT^ENLBL7 PM3+4
FORMAT^ENLBL7 PM3+4
NXPRT^ENLBL7 PM3+4
EXIT^ENLBL8 PM3+5
EXIT1^ENLBL8 PM1PM1+7, PM2PM2+1, PM2+3, PM2+4, PM21PM21+3, PM21+5, PM3+1
REQ^ENLBL8 PM3+1
CPRNT^ENLBL9 PM3+4
EN^ENLBL9 PM2+3
OPEN^ENLBL9 PM3+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "Starting with: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: PM1+0
Function Call: WRITE
  • Prompt: !!,"Property Management (PM) numbers should consist of four numbers, followed",!,"by a dash (-), followed by four more numbers. There may be an alphabetic"
  • Line Location: PM1+2
Function Call: WRITE
  • Prompt: !,"at the end (for a grand total of ten characters), but there usually isn't."
  • Line Location: PM1+3
Function Call: WRITE
  • Prompt: !!,"The first four numbers correspond to the Federal Supply Classification Code."
  • Line Location: PM1+4
Function Call: WRITE
  • Prompt: !,"The next four numbers are assigned at the site, usually by the Property",!,"Management Section in A&MM."
  • Line Location: PM1+5
Function Call: WRITE
  • Prompt: !!,"It is the intent of VACO Program Offices to phase out PM numbers in favor of",!,"the AEMS/MERS entry number, but no official timetable has been established.",!
  • Line Location: PM1+6
Function Call: WRITE
  • Prompt: !,"Doesn't look like a standard PM number. Are you sure",*7
  • Line Location: PM1+7
Function Call: WRITE
  • Prompt: !,"PM #'s look like '7025-5001'."
  • Line Location: PM1+7
Function Call: READ
  • Formatting: !
  • Prompt: "and ending with: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: PM2+0
Function Call: WRITE
  • Prompt: !!,"Your ending point does not follow your starting point. I'm confused.",*7
  • Line Location: PM2+0
Function Call: WRITE
  • Prompt: !,"Are you sure"
  • Line Location: PM2+1
Function Call: WRITE
  • Prompt: !,"PM numbers look like '7025-5001'."
  • Line Location: PM2+1
Function Call: WRITE
  • Prompt: !!,*7,"Sorry, but there doesn't appear to be any equipment in specified range."
  • Line Location: PM2+2
Function Call: WRITE
  • Prompt: !,"Sort labels by LOCATION"
  • Line Location: PM21+0
Function Call: WRITE
  • Prompt: !,"Say YES to sort labels by DIVISION, BUILDING, then by ROOM.",!,"If you say NO, labels will be sorted by VA PM #."
  • Line Location: PM21+0
Function Call: WRITE
  • Prompt: !,*7,"Companion Printer UNAVAILABLE."
  • Line Location: PM3+1
Function Call: WRITE
  • Prompt: !,"Press <RETURN> to continue..."
  • Line Location: HOLD+0
Routine Call
  • %ZIS
  • Line Location:
    • PM21+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENG(6914 - [#6914] PM2+2, PM3+2, PM3+3
^TMP($J PM3+2!, PM3+4, PMNSRT*

Label References

Name Line Occurrences
HOLD PM3+1
PM1 PM1+1, PM1+7, PM2PM2+2
PM2 PM2+1
PM21 PM21
PMNSRT PM3+2, PM3+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PM1+7*, PM2+1*, PM2+4, PM21*, PM21+1
%ZIS PM21+2*, PM21+3!
%ZIS("A" PM21+2*
%ZIS("B" PM21+2*
DA PM+2~, PM3+2*, PM3+3*, PM3+4*, PMNSRT
DIC PM+2~
DIE PM+2~
>> DIRUT PM2+3
DR PM+2~
DTIME PM1PM2HOLD
>> ENBCIO PM21+4*, PM3*, PM3+4
>> ENBCIO("S" PM21+4*
>> ENBCIOF PM21+4*
>> ENBCION PM21+4*
>> ENBCIOS PM21+4*
>> ENBCIOSL PM21+4*
>> ENBCIOST PM21+4*
>> ENBCIOST(0 PM21+4*
>> ENEQBY PM3*
>> ENEQIO PM2+4, PM21+2, PM3+1, PM3+4
>> ENEQSTA PM+1
>> ENERR PM+1*
>> ENLOCSRT PM2+5*, PM21+1*, PM3+2, PM3+3
>> FR PM1+7*, PM1+8*, PM2PM2+2, PM3PM3+2
I PM+2~, PM2+2*
I1 PM+2~, PM3+2*, PM3+3*, PM3+4*, PMNSRT
IO PM21+2, PM21+4, PM3
IO("Q" PM21+3!, PM21+5!
>> IO("S" PM21+4
IOF PM21+4
ION PM21+4, PM21+5
>> IOS PM21+4
IOSL PM21+4
IOST PM21+4
>> IOST(0 PM21+4
J PM+2~
>> J1 PM3+4*
K PM+2~, PM3+3*
>> POP PM21+3, PM3+1
>> TO PM2*, PM2+1, PM2+2, PM3PM3+3
X PM+2~, PM1*, PM1+1, PM1+7, PM2*, HOLD*
X1 PM+2~
X2 PM+2~
>> ZTDESC PM21+5*
>> ZTIO PM21+5*
>> ZTQUEUED PM3+1
>> ZTRTN PM21+5*
>> ZTSAVE("D*" PM21+5*
>> ZTSAVE("EN*" PM21+5*
>> ZTSAVE("FR" PM21+5*
>> ZTSAVE("TO" PM21+5*
ZTSK PM21+5!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All