Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Event Capture 5 (ADREAS,UNIT)^ECDSUTIL  PROS^ECHECK1  ^ECKILL  ^ECL  CLIN^ECPCEU  
VA FileMan 2 ^DIE  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Event Capture 1 ECDSSYN  

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

External References

Name Field # of Occurrence
^DIE STUFF+4
^DIR RETURN+2
ADREAS^ECDSUTIL STUFF+6
UNIT^ECDSUTIL UNIT+1
PROS^ECHECK1 PROC1
^ECKILL END+2
^ECL LOC+1
CLIN^ECPCEU CLIN+3

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
Routine Call
  • DIE
  • Line Location:
    • STUFF+4
Routine Call
  • DIR
  • Line Location:
    • RETURN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] START+1
^ECJ - [#720.3] STUFF+6, CLIN+2
^ECJ("AP" LOC+2, PRO+1
^TMP("ECPRO" PROC1!, PROC1+1, PROC2+1!, STUFF, END+2!, LISTALL+2, LISTALL+3, LISTALL+6!, LISTALL+9, LISTALL+10
, MATCH+2, MATCH+3, MATCH+4, SPLIT+6, SPLIT+7

Label References

Name Line Occurrences
CLIN STUFF+10
END LOC+1, UNIT+1, PRO+1, PROC1+1, PROC2+5, PROC2+7, PROC2+9, STUFF+4
HELP PROC2+3
LABEL LISTALL+1, SPLIT+3
LISTALL PROC2+4, PROC2+8, LISTALL+2, LISTALL+7, LISTALL+8, LISTALL+9
MATCH PROC2+7
PROC1 STUFF+12
PROC2 PROC2+3
RETURN LOC+2, PRO+1, PROC1+1, LISTALL+7, LISTALL+8, LISTALL+9, SPLIT+4, SPLIT+5, SPLIT+6
SPLIT LISTALL+2
STUFF PROC2+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS END+2!, LISTALL+1*, LISTALL+2, LISTALL+5*, LISTALL+6, LISTALL+7, LISTALL+8, LISTALL+9, LISTALL+10, SPLIT+1*
, SPLIT+2, SPLIT+3, SPLIT+4, SPLIT+5, SPLIT+6, SPLIT+7
>> CNT LISTALL+2*, LISTALL+3*, LISTALL+5
>> DA STUFF*
DIE STUFF+1*, STUFF+12!
DIR RETURN+2!
DIR(0 RETURN+2*
DR STUFF+3*, STUFF+12!
DTIME START+1, PROC2, LISTALL+5, SPLIT+1
>> DTOUT PROC2+4, PROC2+8, RETURN+2
>> DUOUT PROC2+4, PROC2+8, RETURN+2
>> EC4 CLIN+2*
ECANS END+2!
>> ECC PRO+1
>> ECD PRO+1
ECDONE PROC2+2, PROC2+5, PROC2+9, STUFF+12!, LISTALL+4, LISTALL+10*, SPLIT+7*
ECFN STUFF*, STUFF+6, STUFF+12!, CLIN+2
ECHOICE STUFF+12!, LISTALL+2, LISTALL+4, SPLIT+2*, SPLIT+7*
ECL LOC+1!, LOC+2!, UNIT+1, PRO+1
>> ECOUT PROC1*, PROC1+1*, PROC2+1*, PROC2+2*, PROC2+4*, PROC2+5, PROC2+7, PROC2+8*, PROC2+9, LISTALL+2
, LISTALL+4, LISTALL+6*, LISTALL+7, LISTALL+8, LISTALL+9, RETURN+2*, MATCH+1*, SPLIT+2*
>> ECPCE STUFF+3, STUFF+10
>> ECPCL CLIN+4
ECPROC PROC2+7, PROC2+8, STUFF, STUFF+12!, LISTALL+10*, MATCH+2*, MATCH+3*, MATCH+4*, SPLIT+7*
ECR END+2!, LISTALL+1!, LISTALL+2, SPLIT+4*, SPLIT+5*, SPLIT+6*
IOF START+2, END+1, LISTALL+1, SPLIT+3
IOSL LISTALL+2, RETURN+1
LOC STUFF+12!
>> MSG1 START+3*, CLIN+1*, CLIN+5, CLIN+8*
>> MSG2 START+3*, CLIN+1*, CLIN+2*, CLIN+5, CLIN+6, CLIN+8*
NOTIOF LOC+1*!
OK END+2!
RK END+2!, RETURN+1*
U STUFF, LISTALL+3
X START+1*!
XX START+2*, PROC2*, PROC2+1, PROC2+2, PROC2+3, PROC2+4, PROC2+5, STUFF+12!, LISTALL+2*, LISTALL+3
, MATCH+1, MATCH+2, MATCH+3, MATCH+4
Y STUFF!, STUFF+4, END+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All