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

Package: DSS Extracts

Routine: ECXDVSNX


Information

ECXDVSNX ;ALB/JAP - Division Identifier for DSS ;July 16, 1998

Source Information

Source file <ECXDVSNX.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point from menu option
SELECT ;select division
EXIT ;common exit point
CHKCODE(X,ECXDIV) ;make sure dss identifier is unique

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Division:",?20,$P(ECXDIV(ECXDIV),U,2)
  • Line Location: SELECT+4
Function Call: WRITE
  • Prompt: " **Inactive**"
  • Line Location: SELECT+5
Function Call: WRITE
  • Prompt: !,"Station number:",?20,$P(ECXDIV(ECXDIV),U,3)
  • Line Location: SELECT+6
Function Call: WRITE
  • Prompt: !,"Primary division?:",?20,$S(+$P(ECXDIV(ECXDIV),U,4):"Yes",1:"No")
  • Line Location: SELECT+7
Function Call: WRITE
  • Prompt: !,"Invalid ...try again.",!
  • Line Location: SELECT+20
Function Call: WRITE
  • Prompt: !,"Already used for another division ...try again.",!
  • Line Location: SELECT+21
Function Call: WRITE
  • Prompt: !!
  • Line Location: SELECT+31

FileMan Files Accessed Via FileMan Db Call

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