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

Package: Engineering

Routine: ENTINSR


Information

ENTINSR ;WOIFO/SAB - NON-SPACE FILE LOCATION REPORT ;2/4/2008

Source Information

Source file <ENTINSR.m>

Entry Points

Name Comments DBIA/ICR reference
QEN ; queued entry
EXIT
HD ; header
HDNSP ; header for continued NON-SPACE FILE LOCATION

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NON-SPACE FILE LOCATION: ",ENNSP
  • Line Location: QEN+13
Function Call: WRITE
  • Prompt: !,?2,ENDA
  • Line Location: QEN+18
Function Call: WRITE
  • Prompt: ?14,$P($$GET1^DIQ(6914,ENDA_",",90.2),"@")
  • Line Location: QEN+19
Function Call: WRITE
  • Prompt: ?28,$$GET1^DIQ(6914,ENDA_",",90.1)
  • Line Location: QEN+20
Function Call: WRITE
  • Prompt: ?60,$$GET1^DIQ(6914,ENDA_",",24)
  • Line Location: QEN+21
Function Call: WRITE
  • Prompt: !!,"Count of equipment items with non-space location values = ",ENT
  • Line Location: QEN+27
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !,"NON-SPACE FILE LOCATION REPORT"
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: ?48,ENDT,?72,"page ",ENPG
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !!,?2,"EQUIP ID #",?14,"NON-SP DATE",?28,"ENTERED BY",?60,"LOCATION"
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !,?2,$E(ENL,1,10),?14,$E(ENL,1,12),?28,$E(ENL,1,30),?60,$E(ENL,1,20)
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: !,"NON-SPACE LOCATION: ",ENNSP," (continued)"
  • Line Location: HDNSP+2

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