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
Print Page as PDF
Routine: ENPL3B

Package: Engineering

Routine: ENPL3B


Information

ENPL3B ;(WASH ISC)/LKG-PRINT MINOR DESIGN/MISC PRIORITY SHEET ;7/8/94

Source Information

Source file <ENPL3B.m>

Entry Points

Name Comments DBIA/ICR reference
D
EX0
EX
HD ; Subsequent Page Header

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"2. Safety: Handicapped (UFAS), EPA/NRC, Fire/Safety (RSFPE), OSHA."
  • Line Location: D+0
Function Call: WRITE
  • Prompt: !,?6,"Date",?19,"Page",?29,"Name/Title"
  • Line Location: D+1
Function Call: WRITE
  • Prompt: !,?2,"(",ENA,")",?6,$P(ENF(2,ENA),U),?19,$P(ENF(2,ENA),U,2),?29,$P(ENF(2,ENA),U,3)
  • Line Location: D+2
Function Call: WRITE
  • Prompt: !,?70,$J($P($G(ENF),U,2)+0,2)
  • Line Location: D+3
Function Call: WRITE
  • Prompt: !!,"3. Space:",!,?5,$S(+ENK>0:$P($G(ENG),U,2),1:"Not Applicable"),?70,$J($G(ENK)+0,2)
  • Line Location: D+4
Function Call: WRITE
  • Prompt: !!,"4. Energy Conservation:",!,?5,$S($P(ENK,U,2)>0:$P($G(ENH),U,2),1:"Not Applicable")
  • Line Location: D+6
Function Call: WRITE
  • Prompt: ?70,$J($P($G(ENK),U,2)+0,2)
  • Line Location: D+7
Function Call: WRITE
  • Prompt: !!,"5. Category Bonus (Scope Dependent):"
  • Line Location: D+9
Function Call: WRITE
  • Prompt: !,?5,$S($P(ENK,U,3)>0:$P($G(ENI),U,2),1:"Not Applicable"),?70,$J($P($G(ENK),U,3)+0,2)
  • Line Location: D+10
Function Call: WRITE
  • Prompt: !!,?53,"FACTOR SUBTOTAL",?70,$J($G(ENF)+$P($G(ENF),U,2)+$G(ENK)+$P($G(ENK),U,2)+$P($G(ENK),U,3),2)
  • Line Location: D+11
Function Call: WRITE
  • Prompt: !!,"6. VAMC Priority: [Rank and Submit ",$S(ENN="MI":"2 Minor Design projects",1:"no more than 4 Minor Misc"),"]"
  • Line Location: D+13
Function Call: WRITE
  • Prompt: !,?5,$P($G(ENJ),U,2),?70,"UNK"
  • Line Location: D+14
Function Call: WRITE
  • Prompt: !!,?46,"VAMC & FACTOR SUBTOTAL",?70,$J($G(ENX)+0,2)
  • Line Location: D+15
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: D+16
Function Call: WRITE
  • Prompt: !!!,ENM,!!!
  • Line Location: D+17
Function Call: WRITE
  • Prompt: !
  • Line Location: D+25
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !,?55,"Project #: ",$P($G(^ENG("PROJ",ENDA,0)),U)
  • Line Location: HD+3
Info |  Source |  Entry Points |  Interaction Calls