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 |  Local Variables  | All
Print Page as PDF
Routine: ENPRP1

Package: Engineering

Routine: ENPRP1


Information

ENPRP1 ;(WIRMFO)/DLM/DH/SAB-Project Progress Report ;7/15/97

Source Information

Source file <ENPRP1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 5 $$EXTERNAL^DILFD  $$GET1^DIQ  ^DIR  ^DIWP  ^DIWW  
Engineering 3 ^ENPRP2  ^ENPRP3  ^ENPRP4  
Kernel 1 $$S^%ZTLOAD  

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

Package Total Caller Graph
Engineering 4 ENPRP  ENPRP2  ENPRP3  ENPRP4  

Entry Points

Name Comments DBIA/ICR reference
EN ; print 0051
PAGE1 ; page 1
PAGE2 ; page 2
HD ; header
ID
CAT ;
NHCU ;
NHCNV ; NHCU conversion line (source and number)
COST ;
DATE ; milestones
NOTE ; progress note
HDCONTR ; Contract Header
CONTR ; Contracts
FT ; Page footer
W(ENDATA,ENDATAO,ENIND) ;

External References

Name Field # of Occurrence
$$S^%ZTLOAD HD+1
$$EXTERNAL^DILFD NHCU+3, NHCU+7
$$GET1^DIQ EN+3, EN+4, EN+5, EN+6, EN+7, EN+8, EN+9, EN+12, ID+7, CAT+3
, CAT+5, CAT+8, CAT+10, CAT+13, COST+3, COST+4, COST+5, COST+7, COST+10, COST+11
, COST+12, COST+14
^DIR HD+2
^DIWP NOTE+8, NOTE+9
^DIWW NOTE+10
^ENPRP2 DATE+1
^ENPRP3 CONTR+1
^ENPRP4 CONTR+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: "CONSTRUCTION PROJECT PROGRESS REPORT",?48,ENDT,?72,"page ",ENP
  • Line Location: ID+0
Function Call: WRITE
  • Prompt: !!,"FACILITY: "
  • Line Location: ID+1
Function Call: WRITE
  • Prompt: " ("
  • Line Location: ID+2
Function Call: WRITE
  • Prompt: W
  • Line Location: ID+2
Function Call: WRITE
  • Prompt: ")"
  • Line Location: ID+2
Function Call: WRITE
  • Prompt: ?52,"DIVISION: "
  • Line Location: ID+3
Function Call: WRITE
  • Prompt: !,"FACILITY TYPE: "
  • Line Location: ID+4
Function Call: WRITE
  • Prompt: ?20,"SERVICING FACILITY: ",ENSMC," (",ENSMCN,")"
  • Line Location: ID+5
Function Call: WRITE
  • Prompt: !!,"PROJECT #: "
  • Line Location: ID+6
Function Call: WRITE
  • Prompt: ?25,"FMS #: ",$$GET1^DIQ(6925,ENDA,.05)
  • Line Location: ID+7
Function Call: WRITE
  • Prompt: ?46,"REPORTING PERIOD: "
  • Line Location: ID+8
Function Call: WRITE
  • Prompt: !,"TITLE: "
  • Line Location: ID+9
Function Call: WRITE
  • Prompt: !!,"PROGRAM: "
  • Line Location: CAT+1
Function Call: WRITE
  • Prompt: ?14,"STATUS: "
  • Line Location: CAT+2
Function Call: WRITE
  • Prompt: !,"PROJECT CATEGORY: "
  • Line Location: CAT+4
Function Call: WRITE
  • Prompt: ?51,"BONUS: "
  • Line Location: CAT+6
Function Call: WRITE
  • Prompt: "NA"
  • Line Location: CAT+7
Function Call: WRITE
  • Prompt: !,"BUDGET CATEGORY: "
  • Line Location: CAT+9
Function Call: WRITE
  • Prompt: !,"EPA REPORTING CATEGORY: "
  • Line Location: CAT+11
Function Call: WRITE
  • Prompt: "NA"
  • Line Location: CAT+12
Function Call: WRITE
  • Prompt: !!,"NHCU BEDS:"
  • Line Location: NHCU+10
Function Call: WRITE
  • Prompt: ?13,"AUTHORIZED:",?25
  • Line Location: NHCU+11
Function Call: WRITE
  • Prompt: ?37,"CONVERTED FROM:"
  • Line Location: NHCU+13
Function Call: WRITE
  • Prompt: !,?13,"NEW:",?25
  • Line Location: NHCU+14
Function Call: WRITE
  • Prompt: !,?13,"RENOVATED:",?25
  • Line Location: NHCU+16
Function Call: WRITE
  • Prompt: !,?13,"CONVERTED:",?25
  • Line Location: NHCU+19
Function Call: WRITE
  • Prompt: !
  • Line Location: NHCU+22
Function Call: WRITE
  • Prompt: ?53
  • Line Location: NHCNV+3
Function Call: WRITE
  • Prompt: ?69
  • Line Location: NHCNV+4
Function Call: WRITE
  • Prompt: !!,?15,"FY",?22,"METHOD",?38,"$ APPROVED",?53,"$ OBLIGATED"
  • Line Location: COST+1
Function Call: WRITE
  • Prompt: !,"DESIGN:"
  • Line Location: COST+2
Function Call: WRITE
  • Prompt: ?15
  • Line Location: COST+3
Function Call: WRITE
  • Prompt: ?22
  • Line Location: COST+4
Function Call: WRITE
  • Prompt: ?37
  • Line Location: COST+6
Function Call: WRITE
  • Prompt: ?53
  • Line Location: COST+8
Function Call: WRITE
  • Prompt: !,"CONSTRUCTION:"
  • Line Location: COST+9
Function Call: WRITE
  • Prompt: ?15
  • Line Location: COST+10
Function Call: WRITE
  • Prompt: ?22
  • Line Location: COST+11
Function Call: WRITE
  • Prompt: ?37
  • Line Location: COST+13
Function Call: WRITE
  • Prompt: ?53
  • Line Location: COST+15
Function Call: WRITE
  • Prompt: !,"TOTAL:"
  • Line Location: COST+16
Function Call: WRITE
  • Prompt: ?37
  • Line Location: COST+17
Function Call: WRITE
  • Prompt: ?53
  • Line Location: COST+19
Function Call: WRITE
  • Prompt: !!
  • Line Location: NOTE+4
Function Call: WRITE
  • Prompt: IOINHI
  • Line Location: NOTE+5
Function Call: WRITE
  • Prompt: IOINLOW
  • Line Location: NOTE+11
Function Call: WRITE
  • Prompt: !!,"TYPE",?7,"CONTRACT DATA",?50,"SUPPLEMENTAL AGREEMENTS"
  • Line Location: HDCONTR+2
Function Call: WRITE
  • Prompt: !,ENDL
  • Line Location: HDCONTR+3
Function Call: WRITE
  • Prompt: !!," An asterisk '*' indicates a change since the last transmission."
  • Line Location: FT+1
Function Call: WRITE
  • Prompt: IOINHI
  • Line Location: W+2
Function Call: WRITE
  • Prompt: ENDATA
  • Line Location: W+3
Function Call: WRITE
  • Prompt: "*"
  • Line Location: W+5
Function Call: WRITE
  • Prompt: IOINLOW
  • Line Location: W+6
Function Call: WRITE
  • Prompt: " ("_ENDATAO_")"
  • Line Location: W+7
Routine Call
  • DIR
  • Line Location:
    • HD+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG("PROJ" - [#6925] GET1^DIQ
6925.0166 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(6910 - [#6910] EN+10
^ENG("PROJ" - [#6925] EN+2, CAT+12, NHCU+1, NHCU+2, NHCU+5, NHCU+6, NHCU+9, NHCU+12, NOTE+2, NOTE+3
^UTILITY($J NOTE+6!

Label References

Name Line Occurrences
CAT PAGE1+4
CONTR PAGE2+5
COST PAGE1+6
DATE PAGE1+7
FT PAGE1+9, PAGE2+6
HD PAGE1+2, PAGE1+3, PAGE1+4, PAGE1+5, PAGE1+6, PAGE1+7, PAGE2+2, CONTR+1
HDCONTR PAGE2+4, CONTR+1
ID PAGE1+3, PAGE2+3
NHCNV NHCU+13, NHCU+15, NHCU+18, NHCU+21, NHCU+22
NHCU PAGE1+5
NOTE PAGE1+8
PAGE1 EN+17
PAGE2 EN+18
W ID+1, ID+2, ID+3, ID+4, ID+6, ID+8, ID+9, CAT+1, CAT+3, CAT+5
, CAT+8, CAT+10, CAT+13, NHCU+12, NHCU+14, NHCU+17, NHCU+20, NHCNV+3, NHCNV+4, COST+3
, COST+4, COST+6, COST+8, COST+10, COST+11, COST+13, COST+15, COST+18, COST+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR HD+2!
DIR(0 HD+2*
DIWF NOTE+1~, NOTE+7*
DIWL NOTE+1~, NOTE+7*
DIWR NOTE+1~, NOTE+7*
ENA COST+21!
ENA("AE" COST+5*, COST+6, COST+18
ENA("CN" COST+12*, COST+13, COST+18
ENCNV NHCU+1!, NHCU+23!
ENCNV( NHCU+4*, NHCNV+1, NHCNV+4
ENCNVO NHCU+5!, NHCU+23!
ENCNVO( NHCU+8*, NHCNV+2, NHCNV+4
>> END EN+17, EN+18, PAGE1+2, PAGE1+3, PAGE1+4, PAGE1+5, PAGE1+6, PAGE1+7, PAGE2+2, HD+1*
, HD+2*, CONTR+1
>> ENDA EN+2, EN+3, EN+4, EN+5, EN+6, EN+7, EN+8, EN+9, EN+12, ID+7
, CAT+3, CAT+5, CAT+8, CAT+10, CAT+12, CAT+13, NHCU+1, NHCU+2, NHCU+5, NHCU+6
, NHCU+9, NHCU+12, COST+3, COST+4, COST+5, COST+7, COST+10, COST+11, COST+12, COST+14
, NOTE+2, NOTE+3
ENDATA W~, W+2, W+3, W+4
ENDATAO W~, W+2, W+4, W+7
ENDIV EN+8*, EN+19!, ID+3
ENDIV(0 EN+9*, ID+3
>> ENDL HDCONTR+1*, HDCONTR+3
>> ENDT ID
ENFT EN+6*, EN+10, EN+19!, ID+4, ID+5
ENFT(0 EN+7*, ID+4
>> ENI NHCU+1*, NHCU+2, NHCU+5*, NHCU+6
ENIND W~, W+2, W+5, W+6, W+7
ENMC EN+3*, EN+19!, ID+1
ENMC(0 EN+3*, ID+1
ENMCN EN+4*, EN+19!, ID+2
ENMCN(0 EN+5*, ID+2
ENO COST+21!
ENO("AE" COST+7*, COST+8, COST+20
ENO("CN" COST+14*, COST+15, COST+20
>> ENOPT EN+17, EN+18
>> ENP PAGE1+1*, PAGE2+1*, ID
>> ENPG HD+2, HD+3, HD+4*
ENPN EN+1~, EN+11*, EN+19!, ID+6
ENPN(0 EN+11*, ID+6
ENPR EN+14*, EN+19!, CAT+1, CAT+7, CAT+12
ENPR(0 EN+14*, CAT+1
ENPT EN+13*, EN+19!, ID+9
ENPT(0 EN+13*, ID+9
ENRP EN+12*, EN+19!, ID+8
ENRP(0 EN+12*, ID+8
ENSMC EN+10*, EN+19!, ID+5
ENSMCN EN+10*, EN+19!, ID+5
ENX NHCU+2*, NHCU+3, NHCU+4, NHCU+6*, NHCU+7, NHCU+8, NHCU+9*, NHCU+15, NHCU+18, NHCU+21
, NHCU+22, NHCU+23!, NHCNV+1*, NHCNV+2, NHCNV+3, NHCNV+4, NOTE+1~, NOTE+2*, NOTE+5, NOTE+9
, NOTE+11
ENX(0 NOTE+3*, NOTE+5, NOTE+11
>> ENXE NHCU+3*, NHCU+4, NHCU+7*, NHCU+8
>> ENXO NHCNV+2*, NHCNV+3
ENY0 EN+2*, EN+11, EN+13, EN+14, EN+15!
ENY52 NHCU+9*, NHCU+14, NHCU+17, NHCU+20, NHCU+23!
ENY60 EN+2*, EN+11, EN+13, EN+14, EN+15!
ENY68 NHCU+9*, NHCU+14, NHCU+17, NHCU+20, NHCU+23!
>> I NHCU+22*
IOF HD+3
>> IOINHI NOTE+5, W+2
>> IOINLOW NOTE+11, W+6
IOSL PAGE1+3, PAGE1+4, PAGE1+5, PAGE1+6, PAGE1+7, CONTR+1
IOST HD+2, HD+3
U EN+10, EN+11, EN+13, EN+14, CAT+7, CAT+12, NHCU+3, NHCU+4, NHCU+7, NHCU+8
, NHCU+12, NHCU+14, NHCU+17, NHCU+20, NOTE+2, NOTE+3
X NOTE+5*, NOTE+8*, NOTE+9*, NOTE+11*, W+1~, W+2*, W+6*
Y EN+10*!, HD+2
>> ZTQUEUED HD+1
>> ZTSTOP HD+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 |  Local Variables  | All