diff --git a/ba/ba3200.cpp b/ba/ba3200.cpp
index c6190a306..787d2cbae 100755
--- a/ba/ba3200.cpp
+++ b/ba/ba3200.cpp
@@ -322,7 +322,7 @@ void BA3200_application::set_translations()
 
 void BA3200_application::set_relations()
 {
-  TToken_string line("", ',');
+  TToken_string line("", ';');
   TString tab(16), expr(40);
   int key, linkto, alias, logicnum;