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

Package: Engineering

Routine: ENFACTR


Information

ENFACTR ;(WCIOFO)/SAB-FAP CAPITALIZATION THRESHOLD REMOVED LIST ;10/14/1999

Source Information

Source file <ENFACTR.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
; ask device
QEN ; queued entry
COLLECT ; collect data
PRINT ; print results
EXIT
HD ; header

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Nothing to report."
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: " (continued)"
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !!,?2,"ENTRY #: ",ENDA
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: ?22,"CMR: ",$E($$GET1^DIQ(6914,ENDA,19),1,5)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: ?33,"Value: ",$FN($$GET1^DIQ(6914,ENDA,12),",",2)
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,?2,"CATEGORY STOCK NUMBER: ",ENCSN
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: " (",$$GET1^DIQ(6914,ENDA,"18:2"),")"
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: !,?2,"Remain Capitalized set by: ",$G(^TMP($J,ENSN,ENDA))
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: !!,"REPORT STOPPED BY USER REQUEST"
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !,"EQUIPMENT THAT USER REMOVED FROM CT TASK"
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: ?49,ENDT,?72,"page ",ENPG
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !,ENL
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: !,"The following equipment meets the system criteria to expense, but no action"
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: !,"will be taken because a user indicated that it should remain capitalized.",!
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !,"STATION ",ENSN
  • Line Location: HD+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6914 - [#6914] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call