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

Package: Event Capture

Routine: ECSECT


Information

ECSECT ;BIR/MAM,JPW-Create DSS Units for Event Capture ;1 May 96

Source Information

Source file <ECSECT.m>

Entry Points

Name Comments DBIA/ICR reference
SECT ;entry
END ;D ^ECKILL W @IOF
REACT ; reactivate DSS Unit
DIE ; enter DSS Unit info
MSG
CHK ;loop thru screens
SCCHK(ECDA) ;** Check to see if sending to PCE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Enter/Edit DSS Units for Event Capture"
  • Line Location: SECT+2
Function Call: WRITE
  • Prompt: !!,?5,"If you elect to send data to PCE for DSS Unit, you must answer the",!,?5,"""Send to PCE"" prompt."
  • Line Location: SECT+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: SECT+4
Function Call: WRITE
  • Prompt: !!,"Cateories are "_$S($P($G(^ECD(+ECDA,0)),"^",11):"used",1:"not used")_" to group procedures. You have event codes screens defined",!,"and cannot change the use of categories.",!
  • Line Location: SECT+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: READ
  • Variable: ECYN
  • Timeout: DTIME
  • Line Location: REACT+1
Function Call: WRITE
  • Prompt: !!,"Enter <RET> to make this DSS Unit valid for use in the Event Capture",!,"software, or NO if this DSS Unit should remain inactive."
  • Line Location: REACT+2
Function Call: WRITE
  • Prompt: !!,"Press <RET> to continue "
  • Line Location: MSG+0
Info |  Source |  Entry Points |  Interaction Calls