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

Package: Interim Management Support

Routine: ECTSIN


Information

ECTSIN ;B'ham ISC/PTD-Enter/Edit Workload Data for Fiscal Year ;01/29/91 08:00

Source Information

Source file <ECTSIN.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;1.05;INTERIM MANAGEMENT SUPPORT;;
YR
SRCH ;SEARCH THROUGH FILES 42 AND 40.8 TO DETERMINE INP AND OP NAMES
WD
SET1
SET2
DIE
VRFY ;VALIDATE LIST OF INPATIENT AND OUTPATIENT NAMES
DLT ;DELETE INVALID NAME

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: YR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: YR+0
Function Call: WRITE
  • Prompt: !!,"This is an EXISTING entry. You may edit if you wish.",!!
  • Line Location: DIE+0
Function Call: WRITE
  • Prompt: !!,"Number of "_$S(VAR="INP":"INPATIENT discharges",1:"OUTPATIENT visits")_" will be asked for each of these locations: ",!
  • Line Location: VRFY+2
Function Call: WRITE
  • Prompt: !?5,CNT,?10,LCN
  • Line Location: VRFY+3
Function Call: WRITE
  • Prompt: !
  • Line Location: VRFY+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: DLT+1
Function Call: WRITE
  • Prompt: !?10,CNT,?15,LCN
  • Line Location: DLT+1
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: DLT+2
Function Call: WRITE
  • Prompt: !!,*7,"You MUST answer with a number from 1 to ",CNT
  • Line Location: DLT+2

FileMan Files Accessed Via FileMan Db Call

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