%%%
  VERSION: 1
  LANGUAGE: ENGLISH
%%%
MODULE EG1_TOOL (SYSMODULE)

 !*******************************************************************
 ! 
 ! Example module for testing the Discrete Application
 !
 ! ----------------
 ! $Revision: 1.1 $ 
 ! ----------------
 ! Copyright (c) ABB Robotics Products AB 1996.  All rights reserved
 !
 ! Module name ..........: EG1_TOOL - Application tool definitions
 !
 ! Application name .....: EG1
 ! Application number ...: 1
 !
 ! Number of processes ..: 2
 ! Name of process 1 ....: EG1_PROCESS1
 ! Name of process 2 ....: EG1_PROCESS2
 !
 
 !
 ! data definitions
 !
  
 ! User defined data
 ! Definition of the procdata
 RECORD EG1procdata
   string EG1_string_comp;
 ENDRECORD
 
 ! Definition of the tooldata
 ! Tooldata contains the event times for the three time
 ! event hooks. The unit for the event times is second.
 RECORD EG1tooldata
   string EG1_string_comp;
   num time_event1;
   num time_event2;
   num time_event3;
 ENDRECORD
 
 ! Definnition of the intdata
 RECORD EG1intdata
   daintdata internal;
   string EG1_string_comp;
 ENDRECORD

 ! Application descriptor
 VAR dadescapp EG1_app_desc;
 
 ! Process descriptors
 VAR dadescprc EG1_prc_desc{2};
 
 ! Application name
 CONST string EG1_app_name := "EG1";
 
 ! Process names
 CONST string EG1_prc_name{2} := ["EG1_PROCESS1", "EG1_PROCESS2"];
 
 ! Process numbers
 CONST num EG1_prc_no{2} := [1, 2];
 
 ! Number of processes in application EG1
 CONST num EG1_NO_OF_PROC := 2;
 
 ! Allocate user defined objects
 ! PROCDATA
 PERS EG1procdata EG1_prc_data{2} := [["PROCDATA1"], ["PROCDATA2"]];
				      
 ! TOOLDATA
 PERS EG1tooldata EG1_tool_data{2} := [["TOOLDATA1", 0.2, 0.1, 0.05], ["TOOLDATA2", 0.15, 0.1, 0.05]];
				      
 ! INTDATA
 PERS EG1intdata EG1_int_data{2} := [[[5, TRUE, TRUE, 1, 1, 0, 0,""], "INTDATA1"],
 				     [[7, TRUE, TRUE, 1, 1, 0, 0,""], "INTDATA2"]];

 !User data
 PERS num EG1_prc_time_out := 1.5;

ENDMODULE
