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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ENBCPM1

Package: Engineering

Routine: ENBCPM1


Information

ENBCPM1 ;(WASH ISC)/DH-Record Bar Coded PMI ;1/9/2001

Source Information

Source file <ENBCPM1.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Engineering 8 (HDR,UPDATE,XCPTN,ZTSK)^ENBCPM2  (NOLBL,PMN)^ENBCPM3  POST^ENBCPM4  (ERR,EXIT)^ENBCPM5  MSG^ENBCPM6  ^ENBCPM8  ^ENCTBAR  COBH1^ENEQPMR4  
VA FileMan 4 ^%DT  ^DIC  YN^DICN  ^DIR  
Kernel 1 ^%ZIS  

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

Package Total Caller Graph
Engineering 2 ENBCPM  ENBCPMRES  

Entry Points

Name Comments DBIA/ICR reference
DNLD ;Get PM Inspector
RES ;Restart an aborted process
EN ;Main entry point. Expects ENCTID and ENCTTI.
MORW
WEEK
EN1
EN2
CONT ;Physical processing of uploaded data
DEV
NEWLOC ;Beginning of a specific location
NEWNX ;Process a piece of equipment
HOLD
DONE ;Delete DATE/TIME OF DATA UPLOAD
EXIT

External References

Name Field # of Occurrence
^%DT EN+11, EN+13
^%ZIS DEV+1
^DIC DNLD+1, EN1
YN^DICN MORW
^DIR CONT+18
HDR^ENBCPM2 CONT+2
UPDATE^ENBCPM2 NEWNX+12
XCPTN^ENBCPM2 NEWLOC+1, NEWNX+7
ZTSK^ENBCPM2 DEV+2
NOLBL^ENBCPM3 NEWNX+5
PMN^ENBCPM3 NEWNX+6
POST^ENBCPM4 NEWNX+12
ERR^ENBCPM5 EN+2, EN+5, EN+13, MORWWEEKEN1EN2+1, CONT+18, DEV+1
EXIT^ENBCPM5 EXIT
MSG^ENBCPM6 DEV
^ENBCPM8 EXIT
^ENCTBAR DNLD+3
COBH1^ENEQPMR4 EN2+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RES+1
Function Call: WRITE
  • Prompt: !!,"Enter PROCESS ID: "
  • Line Location: RES+1
Function Call: WRITE
  • Prompt: !!,*7,"Wrong application. Aborting..."
  • Line Location: RES+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RES+2
Function Call: WRITE
  • Prompt: !!,"Enter TIME STAMP of process to be restarted: "
  • Line Location: RES+2
Function Call: WRITE
  • Prompt: !!,"NO DATA. Aborting..."
  • Line Location: RES+2
Function Call: WRITE
  • Prompt: !!,"Can't seem to find your STATION NUMBER. Please check File 6910.",!,"Your IRM staff may need to assist you.",*7
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"Are you recording a MONTHLY (as opposed to a WEEKLY) worklist"
  • Line Location: MORW+0
Function Call: READ
  • Formatting: !
  • Prompt: "Week number (enter an integer from 1 to 5): "
  • Variable: X
  • Timeout: DTIME
  • Line Location: WEEK+0
Function Call: WRITE
  • Prompt: "??",*7
  • Line Location: WEEK+1
Function Call: READ
  • Formatting: !
  • Prompt: "Should existing PM work orders be deleted after close out? YES// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: *7,!!,"No data to process."
  • Line Location: CONT+2
Function Call: WRITE
  • Prompt: !,"Press RETURN to continue..."
  • Line Location: HOLD+0
Routine Call
  • DIC
  • Line Location:
    • DNLD+1
    • EN1
Routine Call
  • DIR
  • Line Location:
    • CONT+18
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(6922 - [#6922] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN+12, EN+13
^DIC(6910 - [#6910] EN+4, EN+7, EN+8, EN+9, EN2
^DIC(6922 - [#6922] EN1
^ENG("EMP" - [#6929] DNLD+2, CONT+4
^ENG(6914 - [#6914] NEWNX+11
^PRCT(446.4 - [#446.4] RES+1, RES+2, EN+3, CONT+2, CONT+3, CONT+4, NEWLOC+1, NEWNX+2, NEWNX+4*

Label References

Name Line Occurrences
DONE NEWNX+2
EN1 MORWWEEK
EN2 EN2+2
EXIT RES+1, RES+2, CONT+2, NEWLOC+1
HOLD RES+1, RES+2, CONT+2
MORW MORW
NEWLOC NEWLOC+1, NEWNX+3
NEWNX NEWNX+2, NEWNX+5, NEWNX+6, NEWNX+7, NEWNX+13
WEEK WEEK+1

Naked Globals

Name Field # of Occurrence
^( NEWNX+2, NEWNX+11
^(0 EN1EN2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % MORW*
>> %DT EN+11*, EN+13*
>> %DT("A" EN+13*
>> %DT("B" EN+13*
%ZIS DEV+1*!
%ZIS("A" DEV+1*
DIC DNLD+1*!, EN1*
DIC("A" DNLD+1*
DIC("S" DNLD+1*
DIC(0 DNLD+1*, EN1*
DIR CONT+18!
DIR("?" CONT+8*, CONT+9*, CONT+10*, CONT+11*, CONT+12*, CONT+13*, CONT+14*, CONT+15*, CONT+16*, CONT+17*
DIR("A" CONT+6*, CONT+7*
DIR("B" CONT+7*
DIR(0 CONT+5*
>> DIRUT CONT+18
DT EN+11*, EN+12, EN+13
DTIME RES+1, RES+2, EN+11*, WEEKEN2+1, HOLD
>> ENCTID RES+1*, RES+2, EN+2, EN+3, CONT+2, CONT+3, CONT+4, NEWLOC+1, NEWNX+2, NEWNX+4
>> ENCTTI RES+2*, EN+3, CONT+2, CONT+3, CONT+4, NEWLOC+1, NEWNX+2, NEWNX+4
>> ENCTTI(0 EN+3*
>> ENDATE EN+12*
>> ENDEL EN2*, EN2+1*, EN2+2
>> ENEMP DNLD+1*, DNLD+2*, DNLD+3*, CONT+4*, CONT+6, CONT+7, CONT+8, CONT+19*
ENEQ NEWNX+2*, NEWNX+3!, NEWNX+4, NEWNX+5, NEWNX+6, NEWNX+7, NEWNX+9, NEWNX+11*, NEWNX+12
>> ENLBL NEWLOC+1*, NEWNX+2*, NEWNX+11
>> ENLOC NEWLOC+1*, NEWLOC+2*, NEWLOC+3*
>> ENMATRL NEWNX+1*
ENMSG NEWLOC+1*, NEWNX+7, NEWNX+8!*, NEWNX+9!, NEWNX+10
ENMSG(0 NEWNX+10*
>> ENPG CONT+2*
>> ENPM EN+13*, WEEK*, EN1+1
>> ENPMDT EN+13*, EN1+1
>> ENPMWO EN1+1*
>> ENSHABR EN1*, EN1+1
>> ENSHKEY EN1*
>> ENSHOP EN1*
>> ENSTA EN+4*, EN+5, NEWNX+7
>> ENSTA( EN+6*, EN+9*, EN+10, NEWNX+9
>> ENSTAL EN+4*
>> ENSTAL( EN+6*, EN+10*, NEWNX+9
>> ENTEC CONT+4*, CONT+19*
>> ENTIME NEWNX+1*
>> ENX EN+8*, EN+9, CONT+2*, CONT+3*, CONT+4*, NEWLOC+1*, NEWNX+2*, NEWNX+4
>> ENY RES+1*, CONT+2*
>> I EN+6*, EN+8*, EN+9*, EN+10, NEWNX+9*
IO("Q" DEV+2
IOST CONT+2, HOLD
PMTOT CONT+1~, EXIT
>> POP DEV+1
U DNLD+1, EN+3, EN+4, EN+9, EN+11*, EN1EN2CONT+4, CONT+19
>> X RES+1*, RES+2*, EN+11*, WEEK*, EN2+1*, EN2+2, NEWLOC+3*, HOLD*
>> Y DNLD+1, DNLD+2, EN+11, EN+12*, EN+13*, EN1CONT+18, CONT+19
>> Y(0 DNLD+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All