From: Michael Wagner Date: Fri, 13 Aug 2021 11:18:05 +0000 (+0200) Subject: epic-ts X-Git-Tag: kivitendo-mebil_0.1-0~19 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=2498c3fe17bc3846b308645dd37aa32c64b5574d;p=kivitendo-erp.git epic-ts --- diff --git a/SL/Controller/Mebil.pm b/SL/Controller/Mebil.pm new file mode 100644 index 000000000..ced266f10 --- /dev/null +++ b/SL/Controller/Mebil.pm @@ -0,0 +1,29 @@ +package SL::Controller::Mebil; + +use strict; + +use parent qw(SL::Controller::Base); + +use SL::DBUtils; + +#use Data::Dumper; +#use SL::ClientJS; + +sub action_map { + $::lxdebug->enter_sub; + $::lxdebug->message(5, 'controller=mebil/action=map'); + my ($self) = @_; + + $::form->header(no_layout => 1); + + print "

Mebil running

"; + + my $sql = "SELECT * from mebil_mapping"; + my $result = SL::DBUtils::do_query($::form, $::form->get_standard_dbh, $sql); + $::lxdebug->message(5, "result= $result"); + print "$result\n"; + print "

Mebil ready

"; + $::lxdebug->leave_sub; +} + +1; diff --git a/sql/mebil.sql b/sql/mebil.sql new file mode 100644 index 000000000..8badc9b94 --- /dev/null +++ b/sql/mebil.sql @@ -0,0 +1,11 @@ +-- Table of mebil extensions +-- for module +-- Lx office +DROP TABLE IF EXISTS mebil_mapping; +CREATE TABLE mebil_mapping ( + id integer NOT NULL, + chart_id integer NOT NULL, + xbrl_tag VARCHAR(200) NOT NULL +); +INSERT INTO mebil_mapping VALUES (1,1,'acc.trans.global'); +