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

Package: Interim Management Support

Routine: ECTEIN


Information

ECTEIN ;B'ham ISC/PTD-Enter/Edit Planned Equipment Data ;01/29/91 08:00

Source Information

Source file <ECTEIN.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;1.05;INTERIM MANAGEMENT SUPPORT;;
CHS
DIC
DIE1
DIE2
DIE3
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"At this time, you may:",!!,"1. Enter/Edit Planned Equipment",!,"2. Edit Priority of an Item",!,"3. Edit Status of an Item",!!,"Select a number (1 or 2 or 3): "
  • Line Location: CHS+0
Function Call: READ
  • Variable: CHS
  • Timeout: DTIME
  • Line Location: CHS+1
Function Call: WRITE
  • Prompt: !!,*7,"You MUST answer ""1"", ""2"", or ""3""."
  • Line Location: CHS+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: DIC+0
Function Call: WRITE
  • Prompt: !,"HIGH TECHNOLOGY EQUIPMENT LIST ITEM"
  • Line Location: DIE2+0
Function Call: WRITE
  • Prompt: !,"IRM/ADP EQUIPMENT ITEM"
  • Line Location: DIE2+1
Function Call: WRITE
  • Prompt: " ",$S($P(^ECT(731.5,DA,0),"^",5)="A":"ADDITIONAL",1:"REPLACEMENT")
  • Line Location: DIE2+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ECT(731.5 - [#731.5] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call