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

Package: Engineering

Routine: ENPRP1


Information

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

Source Information

Source file <ENPRP1.m>

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) ;

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG("PROJ" - [#6925] GET1^DIQ
6925.0166 EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call