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

Package: Interim Management Support

Routine: ECTPFY


Information

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

Source Information

Source file <ECTPFY.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;1.05;INTERIM MANAGEMENT SUPPORT;;
CHS
ENTER ;IF CHOICE 1 WAS SELECTED, CREATE NEW ENTRY WITH ASSOCIATED SERVICES
YR
DIC
EXIT
EDIT
DIE
DIK
LOOP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!?29,"OPTION IS UNAVAILABLE!",!,"Local services have not been identified!",!,"Use the 'Identify Station's Services' option.",!!
  • Line Location: V+1
Function Call: WRITE
  • Prompt: *7,!!?25,"WARNING",!,"You have only ",CNT," services defined for your station!",!,"Use the 'Identify Station's Services' option to verify before you continue."
  • Line Location: V+3
Function Call: WRITE
  • Prompt: !!,"At this time, you may:",!!,"1. Enter data for a new fiscal year",!,"2. Edit existing data for a previously entered fiscal year",!,"3. Delete a fiscal year entered in error",!!,"Choose a number (1 - 3): "
  • Line Location: CHS+0
Function Call: READ
  • Variable: CHS
  • Timeout: DTIME
  • Line Location: CHS+1
Function Call: WRITE
  • Prompt: !!,*7,"You MUST answer with a number between 1 and 3."
  • Line Location: CHS+1
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: YR+1
Function Call: WRITE
  • Prompt: *7,!!,"File contains NO fiscal year data."
  • Line Location: EDIT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+1
Function Call: WRITE
  • Prompt: *7,!!,"File contains NO fiscal year data."
  • Line Location: DIK+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DIK+1
Function Call: WRITE
  • Prompt: !!,"Service: ",SRVNM,!
  • Line Location: LOOP+0

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