--- /dev/null
+package SL::mebil::Mapping;
+
+use strict;
+
+# Manager methods for mebil
+
+sub new {
+ # parameter: 1) ...
+ my $name = shift;
+ my $my_data = {
+ error_channel => shift,
+ dbh => shift};
+ bless $my_data;
+ return $my_data;
+}
+sub get_mapping {
+ my $self = shift;
+ my $sql = "SELECT fromacc,typ,toacc from mebil_mapping order by ordering";
+ return SL::DBUtils::selectall_hashref_query($self->{error_channel}, $self->{dbh}, $sql);
+}
+
+1;