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

Package: Engineering

Routine: ENEQPMR1


Information

ENEQPMR1 ;(WASH ISC)/DH-Regular PMI Close Out ;1/2/2001

Source Information

Source file <ENEQPMR1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 ^DIC  ^DIE  ^DIK  ^DIR  
Engineering 3 COUNT^ENBCPM8  (COBH1,COH2,PMHRS,PMINV)^ENEQPMR4  (WONUM,WOPRNT)^ENWONEW  
Kernel 1 $$UP^XLFSTR  

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 ENEQPMR2  ENPMR1  

Entry Points

Name Comments DBIA/ICR reference
CO ;Close out Pm worklist
COF
CO1
CO2
EXIT
HOLD
REGLR ;Failed PM

External References

Name Field # of Occurrence
^DIC COFCO2+3
^DIE COF+4, CO2+5, REGLR+13, REGLR+14, REGLR+30, REGLR+33
^DIK COF+8, CO2+9
^DIR REGLR+10, REGLR+20
COUNT^ENBCPM8 EXIT+5
COBH1^ENEQPMR4 CO+3
COH2^ENEQPMR4 CO2+2, CO2+3
PMHRS^ENEQPMR4 COF+7, CO2+8
PMINV^ENEQPMR4 COF+7, CO2+8
WONUM^ENWONEW REGLR+22
WOPRNT^ENWONEW REGLR+33
$$UP^XLFSTR CO+3

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Should PM work orders be deleted after close out? YES//"
  • Variable: X
  • Timeout: DTIME
  • Line Location: CO+3
Function Call: WRITE
  • Prompt: *7,!!,"This work order has already been closed out and posted. If you wish to change",!,"the data, please use the EDIT WORK ORDER option."
  • Line Location: COF+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: CO2+0
Function Call: WRITE
  • Prompt: !!,"Next work order (or sequential portion), '^' to quit: "_ENPMWO(1)_"// "
  • Line Location: CO2+0
Function Call: WRITE
  • Prompt: !,?10," ("_X_")"
  • Line Location: CO2+0
Function Call: WRITE
  • Prompt: "??",*7
  • Line Location: CO2+3
Function Call: WRITE
  • Prompt: !!,*7,"This work order has already been closed out and posted. If you need to change",!,"the data, please use the EDIT WORK ORDER option."
  • Line Location: CO2+4
Function Call: WRITE
  • Prompt: !!,"Work Order ",$P(^ENG(6920,EN1,0),U)," is open."
  • Line Location: REGLR+7
Function Call: WRITE
  • Prompt: !,$P(^(1),U,2)
  • Line Location: REGLR+8
Routine Call
  • DIC
  • Line Location:
    • COF
    • CO2+3
Routine Call
  • DIE
  • Line Location:
    • COF+4
    • CO2+5
    • REGLR+13
    • REGLR+14
    • REGLR+30
    • REGLR+33
Routine Call
  • DIR
  • Line Location:
    • REGLR+10
    • REGLR+20

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6920 - [#6920] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(6910 - [#6910] CO+1
^DIE("B" COF+1, REGLR+14, REGLR+31
^ENG("SP" - [#6928] REGLR+28
^ENG(6914 - [#6914] REGLR+2, REGLR+15, REGLR+17, REGLR+18*, REGLR+23, REGLR+25, REGLR+26*, REGLR+28
^ENG(6920 - [#6920] COFCOF+2, COF+3, COF+5, COF+6, CO1CO2+4, CO2+6, CO2+7, REGLR+1
REGLR+2, REGLR+3, REGLR+5, REGLR+7, REGLR+8, REGLR+18

Label References

Name Line Occurrences
CO CO+3
CO1 COF+3, CO2+4, CO2+10
CO2 CO2+2, CO2+3
EXIT CO+3, COFCOF+2, COF+4, CO1CO2CO2+5
REGLR COF+6, CO2+7

Naked Globals

Name Field # of Occurrence
^(0 CO+1, REGLR+5, REGLR+28
^(1 REGLR+8
^(2 COF+2, REGLR+3, REGLR+5
^(3 REGLR+28
^(5 COF+3, CO2+4, REGLR+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDWO REGLR+1~, REGLR+4*, REGLR+6, REGLR+10*
CODE REGLR+21~
DA COF*, COF+2, COF+3, COF+5, COF+6, CO2+4*, CO2+6, CO2+7, EXIT!, REGLR+1
REGLR+2, REGLR+3, REGLR+11~, REGLR+12*, REGLR+21~
DIC COF*, CO2+3*, EXIT!
DIC("A" COF*
DIC("S" COF*!, CO2+3*!
DIC(0 COF*, CO2+3*
DIE COF+1*, CO2+5*, EXIT!, REGLR+1~, REGLR+12*, REGLR+29*
DIK COF+8*!, CO2+9*!, EXIT!
DIR REGLR+10!, REGLR+20!
DIR("A" REGLR+9*, REGLR+19*
DIR("B" REGLR+9*
DIR(0 REGLR+9*, REGLR+19*
DR COF+1*, EXIT!, REGLR+1~, REGLR+13*, REGLR+14*, REGLR+29*, REGLR+31*
DTIME CO+3, CO2HOLD
>> DTOUT REGLR+13, REGLR+30
EN REGLR+1~, REGLR+17*, REGLR+18, REGLR+25*, REGLR+26
EN1 EXIT!, REGLR+5*, REGLR+6, REGLR+7, REGLR+8, REGLR+12, REGLR+18
ENDEL CO+1*, CO+3*, COF+8, CO2+9, EXIT!
ENEQ REGLR+1~, REGLR+2*, REGLR+5, REGLR+15, REGLR+17, REGLR+18, REGLR+23, REGLR+25, REGLR+26, REGLR+28
ENLOC EXIT!, REGLR+27*, REGLR+28*
ENPM EXIT!
ENPMDT EXIT+2*, EXIT+3*, EXIT+4*, EXIT+6!
ENPMMN EXIT!
ENPMWK EXIT!
ENPMWO COF*, CO1CO2CO2+3*, EXIT+1, EXIT+2, EXIT+6!, REGLR+17, REGLR+25
ENPMWO(1 CO1*, CO2CO2+1
ENSHABR EXIT!
ENSHKEY COF+2*, EXIT+6!
ENSHOP EXIT!
ENY EXIT!, HOLD+1*
>> I EXIT+3*
IOST HOLD
NUMBER REGLR+21~, REGLR+22, REGLR+26
PMTOT CO+2~, EXIT+5
SHOPKEY REGLR+1~, REGLR+3*, REGLR+5
U CO+1, COFCOF+2, COF+3, COF+5, COF+6, CO2+4, CO2+6, CO2+7, REGLR+2
REGLR+3, REGLR+5, REGLR+7, REGLR+8, REGLR+17, REGLR+18, REGLR+25, REGLR+26, REGLR+28
WARD REGLR+1~, REGLR+32*
X CO+3*, CO2*, CO2+1*, CO2+2, CO2+3, EXIT+2*, EXIT+3, HOLD*, REGLR+1~, REGLR+15*
REGLR+16, REGLR+17, REGLR+18, REGLR+23*, REGLR+24, REGLR+25, REGLR+26, REGLR+28*
>> Y COFCOF+4, CO2+3, CO2+4, CO2+5, REGLR+10, REGLR+20
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