Commit 165b1a6e authored by claes's avatar claes

*** empty log message ***

parent 6d66e64a
!
! Proview $Id: rt_io_msg.msg,v 1.3 2005-09-01 14:58:00 claes Exp $
! Proview $Id: rt_io_msg.msg,v 1.4 2006-04-12 12:18:12 claes Exp $
! Copyright (C) 2005 SSAB Oxelsund AB.
!
! This program is free software; you can redistribute it and/or
......@@ -98,6 +98,8 @@ chanrange <Error in channel range attributes> /error
notconnected <Object is not connected> /error
connectedclass <Incorrect class of connected object> /error
replaced <Symbol is replaced> /info
normal <Normal operating state> /succ
initfail <Initialization failed> /error
.end
!
! Proview $Id: rt_pb_msg.msg,v 1.3 2006-03-22 14:43:45 claes Exp $
! Proview $Id: rt_pb_msg.msg,v 1.4 2006-04-12 12:18:12 claes Exp $
! Copyright (C) 2005 SSAB Oxelsund AB.
!
! This program is free software; you can redistribute it and/or
......@@ -20,11 +20,11 @@
!
.facility PB,141 /prefix = PB__ ! Profibus I/O
success <normal, successful completion> /succ
normal <normal operating state> /succ
initfail <failed to initialize slave or module> /error
disabled <slave is disabled> /warning
noconn <no connection to slave> /error
success <Normal, successful completion> /succ
normal <Normal operating state> /succ
initfail <Initialization failed> /error
disabled <Disabled> /warning
noconn <No connection> /error
attrnoedit <Attribute is no edit> /error
noattrsel <No attributes is selected> /error
userprmdatalen <Mismatch in UserPrmDataLen> /error
......@@ -34,6 +34,9 @@ gsdfile <Unable to open gsd file> /error
nomodulename <Module name is missing> /error
duplmodulename <Duplicate module name> /error
nomoduleclass <Module class is missing> /error
stopped <Stopped state> /warning
cleared <Cleared state> /warning
notinit <Not initialized> /warning
.end
......@@ -355,6 +355,8 @@ sub build_all_wbl ()
sub method_build ()
{
my($program) = $_[0];
if (!defined($program)) {
printf("-- Relink method dependent programs");
_module("rt");
$ENV{"export_type"} = "exp";
......@@ -376,7 +378,34 @@ sub method_build ()
system("rm $exe_dir/rt_xtt");
_build("exe", "rt_xtt", "all");
merge();
}
if ( $_[0] eq "rt_io_comm" ) {
printf("-- Method build $program");
_module("rt");
$ENV{"export_type"} = "exp";
my($exe_dir) = $ENV{"pwr_exe"};
system("rm $exe_dir/rt_io_comm");
_build("exe", "rt_io_comm", "all");
merge();
}
if ( $_[0] eq "wb" ) {
printf("-- Method build $program");
_module("wb");
$ENV{"export_type"} = "exp";
my($exe_dir) = $ENV{"pwr_exe"};
system("rm $exe_dir/wb");
_build("exe", "wb", "all");
merge();
}
if ( $_[0] eq "rt_xtt" ) {
printf("-- Method build $program");
_module("xtt");
$ENV{"export_type"} = "exp";
my($exe_dir) = $ENV{"pwr_exe"};
system("rm $exe_dir/rt_xtt");
_build("exe", "rt_xtt", "all");
merge();
}
}
sub create_all_modules ()
......
......@@ -88,7 +88,7 @@ palette NavigatorPalette
menu IO_SSAB
{
class Rack_SSAB
class RemoteRack_SSAB
class Ssab_RemoteRack
menu Cards
{
class Di_DIX2
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment