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

Package: Event Capture

Routine: ECDSSYN


Information

ECDSSYN ;BIR/RHK,TTH,JPW-Edit Synonyms and Volume ;30 Apr 96

Source Information

Source file <ECDSSYN.m>

Entry Points

Name Comments DBIA/ICR reference
START ;Check Event Capture Locations.
LOC ;Allow user to select the availiable locations.
UNIT ;Allow user to select DSS Unit.
PRO ;Check Event Code Screens Procedures.
PROC1
PROC2
STUFF
END ;Kill existing variables and exit.
LISTALL ;Display the available procedures.
RETURN ;Ask user to exit or continue.
MATCH ;Check ^TMP cross-references.
LABEL
HELP ;Display user options.
SPLIT ;
CLIN ;check for active associated clinic

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !,"You have no locations flagged for Event Capture.",!,"See your program coordinator.",!!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: "Press <RET> to continue "
  • Line Location: START+1
Function Call: WRITE
  • Prompt: @IOF,!,"Procedure Synonym/Default Volume (Enter/Edit)",!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !,"There are no event code screens set up for your selected location.",!,"Contact your program coordinator."
  • Line Location: LOC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: UNIT+2
Function Call: WRITE
  • Prompt: !,"There are no procedures set up for the selected unit and category.",!,"Please contact your Event Capture administrator."
  • Line Location: PRO+1
Function Call: WRITE
  • Prompt: !!,"There are no procedures available for the selected data."
  • Line Location: PROC1+1
Function Call: WRITE
  • Prompt: !,"Enter Procedure: "
  • Line Location: PROC2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: STUFF+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF,!!,"Available Procedures: ",!!
  • Line Location: LISTALL+1
Function Call: WRITE
  • Prompt: !,$E(XX,1,4),?7,$E($P(^TMP("ECPRO",$J,XX),U,3),1,32),?41,$E($P(^TMP("ECPRO",$J,XX),U,4),1,30),?73,$P(^TMP("ECPRO",$J,XX),U,5)
  • Line Location: LISTALL+3
Function Call: WRITE
  • Prompt: !!,"Select Number (1-"_CNT_"): "
  • Line Location: LISTALL+5
Function Call: WRITE
  • Prompt: !!,"This is a listing of all available, active procedures.",!,"Please enter the correct number corresponding to the desired procedure.",!
  • Line Location: LISTALL+7
Function Call: WRITE
  • Prompt: !!,"Select a single number corresponding to the procedure.",!
  • Line Location: LISTALL+8
Function Call: WRITE
  • Prompt: " **Invalid Number**",!
  • Line Location: LISTALL+9
Function Call: WRITE
  • Prompt: !
  • Line Location: RETURN+1
Function Call: WRITE
  • Prompt: !,"Num",?7,"Synonym",?41,"Procedure Name",?73,"Nat ID",!
  • Line Location: LABEL+0
Function Call: WRITE
  • Prompt: "---",?7,"-------",?41,"--------------",?73,"------",!
  • Line Location: LABEL+1
Function Call: WRITE
  • Prompt: !!,"Enter one of the following: < Procedure Name",!,?29,"< Procedure Number"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,?29,"< Procedure Synonym"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !,?29,"< Enter ""??"" to List Procedures",!
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!,"Select Number, or press <RET> to continue listing : "
  • Line Location: SPLIT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SPLIT+3
Function Call: WRITE
  • Prompt: !!,"Please enter the correct number corresponding to the desired procedure.",!
  • Line Location: SPLIT+4
Function Call: WRITE
  • Prompt: !!,"Select a single number corresponding to the procedure.",!
  • Line Location: SPLIT+5
Function Call: WRITE
  • Prompt: " ** Invalid Number **"
  • Line Location: SPLIT+6
Info |  Source |  Entry Points |  Interaction Calls