<?php
/*
hook_libraries_info
Externell labraries
*/

/*
global
*/
//$host = 'plesk.cramer-mueller-partner.de'; // 'localhost'; //

// Ist bereits in highchart_spider geladen. Überlegen, ob ausgelaegert wird.
function lucanet_report_libraries_info() {
  //$path = drupal_get_path('module', 'highchart_spider');
  $libraries['highcharts'] = array( // Machine name.
    'name' => 'Highcharts library',
    'vendor url' => 'http://www.highcharts.com',
    'download url' => 'http://www.highcharts.com/download',
    'version arguments' => array(
      'file' => 'js/highcharts.js', // Could be any file with version info.
      'pattern' => '/v(\d\.){1,2}\d/', // Regular expression pattern matching version number.
      'lines' => 2,
    ),
    'files' => array(// Path to the file location.
      'js' => array(
        'js/highcharts.js',
        'js/highcharts-3d.js',
        'js/exporting.js',
        'js/highcharts-more.js'
        ),
     // 'css' => array('css/highslide.css' => array()),
    )
  );
  return $libraries;
}

/**
* Implements hook_init().
*/
function lucanet_report_init() {
//1 - Dateien unter modul gespeichert
libraries_load('highcharts');

drupal_add_css(drupal_get_path('module', 'lucanet_report') . '/css/lucanet_style.css', array('group' => CSS_DEFAULT, 'type' => 'file'));
drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/javascript.js');
}


/*
**
* Implements hook_block_info().
*/
function lucanet_report_block_info() {
  $blocks = array();
  $blocks['lucanet_report_block'] = array(
    'info' => t('Lucanet Report NEU'),
    'cache' => DRUPAL_NO_CACHE,
  );
  return $blocks;
}


/**
* Implements hook_block_view().
*/
function lucanet_report_block_view($delta = '') {
  $block = array();

  switch ($delta) {
    case 'lucanet_report_block':
      $block['subject'] = t('Lucanet Report');
      //$block['content'] = '<div id="lucanet_graph" class="lucanet_one">'; // Inhalt beirets im Formular geladen
      $block['content'] = drupal_get_form('lucanet_report_form');

    break;
  }
  return $block;
}


/**
 * Implements hook_permission().
*/
function lucanet_report_permission() {
  return array(
    'lucanet_report' => array(
      'title' => t('Lucanet Reports betrachten'),
    )
  );
}

/**
* hook_menu
*/
function lucanet_report_menu() {
    // Report_id & Gruppe_id wird hier übergeben
    $items['kennzahlen/report/%/%'] = array( // $form, &$form_state, $hd_marke_nr, $marke_id, $typ_id, $hd_name, $td_id
    'title' => t(''),
    'page callback' => 'drupal_get_form',
    'page arguments' => array('lucanet_report_form',2,3), // zuerst Report-ID, dann Gruppe_id
    'description' => t(''),
    'access callback' => '_lucanet_report_get_oid_array', // falls ein Return Wert vorhanden - Zugang gewährt. report_id = 0 - TRUE
    'access arguments' => array(3,"1"), // Erste Position steht for report_id, zweite für den 'tag'. "1" holt von der o.g. Funktion true oder false
    'type' => MENU_CALLBACK,
  );

   return $items;
}


// FUNKTIONEN
function _lucanet_report_get_first_id($gruppe_id)
{
$dia_id = 0;
$projekt_nr = _lucanet_report_kundennamen_call();
$berater = 0;

// Falls Admin oder Berater
if (user_has_role('14') || user_has_role('70') || user_has_role('3'))
{$berater = 1;}

// Selektion von ID
$query = db_select('lucanet_report', 'lr');
$query->fields('lr',array('id'));
$query->condition('lr.gruppe_id', $gruppe_id, '='); //

$query->Join('lucanet_report_aktiv', 'ra', '(lr.id = ra.report_id)');
$query->condition('ra.status', '1','='); // Status aktiv
$query->condition('ra.projekt_nr', $projekt_nr, '='); //

$query->range(0, 1);
$query->orderBy('id', 'ASC');
$result = $query->execute();
    foreach ($result as $record) {
    $dia_id = $record->id; //
}
return $dia_id;
}

// Parent Child Beziehung OID_1800 (Credit Debit)
// Liefert einen kummulierten Wert zwischen angegebene Monaten.
function _lucanet_report_get_oid_value_guv($vhr_nr, $datum_anfang, $datum_ende, $c_id, $balance = NULL)
{
$dbms = 'mysql';
//Replace the below connection parameters to fit your environment
//$host = 'plesk.cramer-mueller-partner.de';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";

//global $dbms, $host, $db, $user, $pass, $dsn;
/*
$dbms = 'mysql';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";
*/
$cn=new PDO($dsn, $user, $pass);

$q=$cn->exec('
SET @p0="'.$vhr_nr.'";
SET @p1="'.$datum_anfang.'";
SET @p2="'.$datum_ende.'";
SET @p3="'.$c_id.'";
SET @p4="Credit";
CALL get_value_guv_kum(@p0, @p1, @p2, @p3, @p4, @p5);');
$res=$cn->query('SELECT @p5 AS `wert`')->fetchAll();
if ($res[0][wert] != '')
{return $res[0][wert];}
else
{return NULL;}
//print_r($res[0]);
}

// 1700

function _lucanet_report_get_oid_value_guv_1700($vhr_nr, $datum_anfang, $c_id, $balance = NULL)
{
$dbms = 'mysql';
//Replace the below connection parameters to fit your environment
//$host = 'plesk.cramer-mueller-partner.de';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";

$cn=new PDO($dsn, $user, $pass);

$q=$cn->exec('
SET @p0="'.$vhr_nr.'";
SET @p1="'.$datum_anfang.'";
SET @p2="'.$c_id.'";
SET @p3="'.$balance.'";
CALL get_value_guv_1700(@p0, @p1, @p2, @p3, @p4);');
$res=$cn->query('SELECT @p4 AS `wert`')->fetchAll();
if ($res[0][wert] != '')
{return $res[0][wert];}
else
{return NULL;}
//print_r($res[0]);
}



// Parent Child Beziehung OID_2465599
// Liefert einen kummulierten Wert zwischen angegebene Monaten.
function _lucanet_report_get_oid_value_guv2($vhr_nr, $datum_anfang, $datum_ende, $c_id, $balance = NULL)
{
$dbms = 'mysql';
//Replace the below connection parameters to fit your environment
//$host = 'plesk.cramer-mueller-partner.de';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";

/*
$dbms = 'mysql';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";
*/
/*
SET @p0='VHR_2467148, VHR_2467149, VHR_2467150, VHR_2467151, VHR_2467152, VHR_2467153, VHR_2467154'; SET @p1='2015-10-01'; SET @p2='2016-09-01'; SET @p3='1149'; SET @p4='Credit'; CALL `get_value_guv2_kum_array`(@p0, @p1, @p2, @p3, @p4, @p5); SELECT @p5 AS `wert`;
*/

$cn=new PDO($dsn, $user, $pass);

$q=$cn->exec('
SET @p0="'.$vhr_nr.'";
SET @p1="'.$datum_anfang.'";
SET @p2="'.$datum_ende.'";
SET @p3="'.$c_id.'";
SET @p4="Credit";
CALL get_value_guv2_kum(@p0, @p1, @p2, @p3, @p4, @p5);');
$res=$cn->query('SELECT @p5 AS `wert`')->fetchAll();
if ($res[0][wert] != '')
{return $res[0][wert];}
else
{return NULL;}
//print_r($res[0]);
}


// Array
function _lucanet_report_get_oid_value_guv2_array($vhr_nrs, $datum_anfang, $datum_ende, $c_id, $balance = NULL)
{
$dbms = 'mysql';
//Replace the below connection parameters to fit your environment
//$host = 'plesk.cramer-mueller-partner.de';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";

/*
SET @p0='VHR_2467148, VHR_2467149, VHR_2467150, VHR_2467151, VHR_2467152, VHR_2467153, VHR_2467154'; SET @p1='2015-01-01'; SET @p2='2016-01-01'; SET @p3='1149'; SET @p4='Credit'; CALL `get_value_guv2_kum_array`(@p0, @p1, @p2, @p3, @p4, @p5); SELECT @p5 AS `wert`;
*/

$vhr_nrs = implode(',', $vhr_nrs);
$cn=new PDO($dsn, $user, $pass);

$q=$cn->exec('
SET @p0="'.$vhr_nrs.'";
SET @p1="'.$datum_anfang.'";
SET @p2="'.$datum_ende.'";
SET @p3="'.$c_id.'";
SET @p4="Credit";
CALL get_value_guv2_kum_array(@p0, @p1, @p2, @p3, @p4, @p5);');
$res=$cn->query('SELECT @p5 AS `wert`')->fetchAll();
if ($res[0][wert] != '')
{return $res[0][wert];}
else
{return NULL;}
//print_r($res[0]);
}


// Parent Child Beziehung OID_1800 (Credit Debit)
function _lucanet_report_get_oid_value_guv_plan($vhr_nr, $datum_anfang, $datum_ende, $c_id, $balance = NULL)
{
$dbms = 'mysql';
//Replace the below connection parameters to fit your environment
//$host = 'plesk.cramer-mueller-partner.de';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";


/*
$dbms = 'mysql';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";
*/

$cn=new PDO($dsn, $user, $pass);

$q=$cn->exec('
SET @p0="'.$vhr_nr.'";
SET @p1="'.$datum_anfang.'";
SET @p2="'.$datum_ende.'";
SET @p3="'.$c_id.'";
SET @p4="Credit";
CALL get_value_guv_kum_plan(@p0, @p1, @p2, @p3, @p4, @p5);');
$res=$cn->query('SELECT @p5 AS `wert`')->fetchAll();
if ($res[0][wert] != '')
{return $res[0][wert];}
else
{return NULL;}
//print_r($res[0]);
}


// Parent Child Beziehung OID_2465599
function _lucanet_report_get_oid_value_guv2_plan($vhr_nr, $datum_anfang, $datum_ende, $c_id, $balance = NULL)
{

$dbms = 'mysql';
//Replace the below connection parameters to fit your environment
//$host = 'plesk.cramer-mueller-partner.de';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";

/*
$dbms = 'mysql';
$host = 'plesk.cramer-mueller-partner.de';
$db = 'usr_p209762_7';
$user = 'lucanet_caravan';
$pass = '1PNO98AEU7D3F897';
$dsn = "$dbms:host=$host;dbname=$db";
*/

$cn=new PDO($dsn, $user, $pass);

$q=$cn->exec('
SET @p0="'.$vhr_nr.'";
SET @p1="'.$datum_anfang.'";
SET @p2="'.$datum_ende.'";
SET @p3="'.$c_id.'";
SET @p4="Credit";
CALL get_value_guv2_kum_plan(@p0, @p1, @p2, @p3, @p4, @p5);');
$res=$cn->query('SELECT @p5 AS `wert`')->fetchAll();
if ($res[0][wert] != '')
{return $res[0][wert];}
else
{return NULL;}
//print_r($res[0]);
}


// IST/VJ Wert von Betrag (kum oder einzeln)
function _lucanet_report_get_betrag_sum($vhr_nr, $datum_anfang, $datum_ende, $c_id)
{
try{
    db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    //$query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $c_id, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $vhr_nr, '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->condition('b.datum', array($datum_anfang, $datum_ende), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $entry_quantity = $query->execute()->fetchField();
    db_set_active();
    //dsm($entry_quantity);
    if (!$entry_quantity)
    {return 0;}
    return $entry_quantity;
    }
    catch (Exception $e) {
    db_set_active();
    dsm($e);
    drupal_set_message(t('Error1'),'error');
    }
}


// PLAN
function _lucanet_report_get_betrag_sum_plan($vhr_nr, $datum_anfang, $datum_ende, $c_id)
{
try{
    db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    //$query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $c_id, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $vhr_nr, '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // PLAN
    $query->condition('b.datum', array($datum_anfang, $datum_ende), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $entry_quantity = $query->execute()->fetchField();
    db_set_active();
    //dsm($entry_quantity);
    if (!$entry_quantity)
    {return 0;}
    return $entry_quantity;
    }
    catch (Exception $e) {
    db_set_active();
    dsm($e);
    drupal_set_message(t('Error2'),'error');
    }
}

/*
// Form AKTIVA PASSIVA, SPÄTER!!!!!
function lucanet_report_form_test($form, &$form_state, $report_id = NULL) {
db_set_active('lucanet_susa');
//$query = 'SELECT get_oid_direkt(VHR_1710, "2016-03-01", 1149, Debit) AS get_oid_direkt;';
$query = db_select('LN_Dim_Account', 'lda')
  ->fields('lda', array('Name', 'UID', 'Level'))
  ->condition('Balance', 'Debit', '=')
  ->condition('SectionUID', 'OID_1700', '=');

$query->orderBy('lda.Level');//ORDER BY ID
$result = $query->execute();
db_set_active();


$ik = 0;
$u1 = "<strong>Aktiva:</strong><br>";
$form['test_u1'] = array(
    //'#markup' => $row->UID. " -> ".lucanet_report_get_oid_value($row->UID, _lucanet_report_get_monat().'-01', '1149', 'Debit') , '#weight' => -5,
    '#markup' => $u1,
    );

foreach ($result as $row) {
    // Abfrage, ob OID stimmt, wenn ja, dann einsetzen, wenn nein - weiter einsetzen
    // Strukturbaum visualisieren

    // Ebene 2
    if ($row->UID == 'VHR_12623')
    {
        $form['bilanz_'.$row->UID] =
        array('#markup' => $row->Name. " Ebene ".$row->Level.  " -> ".lucanet_report_get_oid_value_guv($row->UID, _lucanet_report_get_monat().'-01', _lucanet_report_kundennamen_call(), 'Debit').'<br>');
    }

    // Ebene 3
    else if ($row->UID == 'VHR_12637')
    {


    }

}



db_set_active('lucanet_susa');
//$query = 'SELECT get_oid_direkt(VHR_1710, "2016-03-01", 1149, Debit) AS get_oid_direkt;';
$query = db_select('LN_Dim_Account', 'lda')
  ->fields('lda', array('Name', 'UID', 'Level'))
  ->condition('Balance', 'Credit', '=')
  ->condition('SectionUID', 'OID_1700', '=');

$query->orderBy('lda.Level');//ORDER BY ID
$result = $query->execute();
db_set_active();
$ik = 0;
$u1 = "<strong>Passiva:</strong><br>";
$form['test_u2'] = array(
    //'#markup' => $row->UID. " -> ".lucanet_report_get_oid_value($row->UID, _lucanet_report_get_monat().'-01', '1149', 'Debit') , '#weight' => -5,
    '#markup' => $u1,
    );

foreach ($result as $row) {
  $form['test2_'.$ik] = array(
    //'#markup' => $row->UID. " -> ".lucanet_report_get_oid_value($row->UID, _lucanet_report_get_monat().'-01', '1149', 'Debit') , '#weight' => -5,
    '#markup' => $row->UID. " ".$row->Name. " Ebene ".$row->Level.  " -> ".lucanet_report_get_oid_value($row->UID, _lucanet_report_get_monat().'-01', _lucanet_report_kundennamen_call(), 'Credit').'<br>' ,
    );
  $ik++;
}

return $form;
}
// ENDE
// Form AKTIVA PASSIVA, SPÄTER!!!!!
*/
/////////////////////// ---------- //////////////////////////////////


/* hook_form */
function lucanet_report_form($form, &$form_state, $grupp_id = NULL, $report_id = NULL) {

// Falls Menü angeklickt
if ($report_id == NULL || $report_id == 0)
{
// calculate first diagram_id from group
$report_id = _lucanet_report_get_first_id($grupp_id);
//drupal_set_message($report_id);
}

// Session
// Global Filter Value auslesen.
$fil_value = _lucanet_report_tax_call(); // 23

// Falls $fil_value (Projekt Taxonomie Nummer) gesetzt, dann DB Werte auslesen.
if (is_numeric($fil_value))
    {
        // beim ersten Aufruf die Daten aud Lucanet mithilfe KdNr. laden und Grafik anzeigen
        if (empty($form_state['storage']['dd_report_id'])) {
            $form_state['storage']['dd_report_id'] = $report_id ;
        }
        if (!empty($grupp_id)) {
            $form_state['storage']['grupp_id'] = $grupp_id ;
        }

    // Deklaration
    $form = array();

    _lucanet_report_menu_call_back($form, $form_state, $form_state['storage']['dd_report_id'], $grupp_id);

/*
  $form['#prefix'] = '<div id="lucanet_report_wrapper">';
  $form['#suffix'] = '</div>';
*/

  $form['#prefix'] = '<div id="lucanet_report_wrapper"><div class="lucanet_report_wrapper_'.$form_state['storage']['dd_report_id'].'">';
  $form['#suffix'] = '</div></div>';

    // Fieldset
    $form['lucanet_report_fieldset'] = array(
    '#type' => 'fieldset',
    '#title' => t('Kommentar'),
    '#prefix' => '<div id="lucanet_report_container">',
    '#suffix' => '</div>',
    '#collapsible' => FALSE,
    '#collapsed' => FALSE,
    );

    /*
    $form['lucanet_report_fieldset']['lucanet'] = array(
    '#markup' => '<div id="lucanet_graph" class="lucanet_one"></div>');
    */
    /*DEVELS NEU*/
    // Falls keine Tabelle, dann Inhalte laden.
    if ($form_state['storage']['dd_report_id'] != 5 && $form_state['storage']['dd_report_id'] != 15)
    {
    $form['lucanet_graph'] = array(
    '#markup' => '<div id="lucanet_graph" class="lucanet_one"></div>',
        '#weight' => -5,
        );
    }
    // ----------Versteckte Übergabe-------------
    //  Kundennummer
    $form['lucanet_report_fieldset']['kd_nr']= array(
        '#type' => 'hidden',
        '#value' => _lucanet_report_kundennamen_call(),
        '#disabled' => TRUE,
        );

    //  report_id
    $form['lucanet_report_fieldset']['report_id']= array(
        '#type' => 'hidden',
        '#value' => $form_state['storage']['dd_report_id'],
        '#disabled' => TRUE,
        );

    //  Datum. Beim ersten Ausführen nicht gesetzt
    $form['lucanet_report_fieldset']['datum_hidden']= array(
        '#type' => 'hidden',
        '#value' => _lucanet_report_get_monat_name(1,_lucanet_report_session('akt_date')),
        '#disabled' => TRUE,
    );
    // ----------Versteckte Übergabe Ende-------------




    // ---------------- BUTTONS ----------------------
    // Back Button----------
    $form['lucanet_report_fieldset']['back_'] = array(
    '#type' => 'button',
    //'#value' => t('←'),
    '#value' => '⇦',
        '#ajax' => array(
        'event' => 'click',
        'callback' => '_lucanet_report_get_back',
        'wrapper' => 'lucanet_report_container',
        'method' => 'replace',
        'progress' => array('type' => 'none'),
        //'progress' => array('type' => 'bar', 'message' => t('TestMessage'),)
        ),
        // Hide the button.
        '#attributes' => array(
          'style' => array('float:left; font-size:25px; background:none; color:#004675;'),
        ),
    );

    // Aktuelles Datum, was angezeigt wird
    $form['lucanet_report_fieldset']['datum'] = array(
    '#title' => t(""),
    '#markup' => _lucanet_report_get_monat_name(0,_lucanet_report_session('akt_date')),
    '#prefix' => '<div class="lucanet_report_pfeil">',
    '#suffix' => '</div>',

    );


    // Next Button----------
    $form['lucanet_report_fieldset']['next_'] = array(
    '#type' => 'button',
    '#value' => t('⇨'),
    '#ajax' => array(
            'callback' => '_lucanet_report_get_next', // die Werte aus der DB auslesen und setzen
            'wrapper' => 'lucanet_report_container',
            'method' => 'replace',
            //'progress' => array('type' => 'none'),
            ),
        // Hide the button or give a class.
    '#attributes' => array(
          'style' => array('float:left; font-size:25px; background:none; color:#004675;'),
        ),
    );


    // Submit
    $form['lucanet_report_fieldset']['submit'] = array(
                '#type' => 'submit',
                '#value' => t('Save Comment'),
                '#ajax' => array(
                 'callback' => '_lucanet_report_kommentar_set',
                 'effect' => 'fade',
               ),
);


// Status Anzeige, nach Speichern
    $form['lucanet_report_fieldset']['status'] = array(
    '#type' => 'markup',
    '#prefix' => '<div id="lucanet_report_show_status">',
    '#suffix' => '</div>',
    );


    // ---------------- BUTTONS ENDE ----------------------

    // Kommentar Feld
    $comment = _lucanet_report_kommentar_get($form_state['storage']['dd_report_id'],_lucanet_report_session('akt_date'));
    $form['lucanet_report_fieldset']["lucanet_kommentar_".$form_state['storage']['dd_report_id']] = array(
     //'#title' => t(''),
     '#type' => 'text_format',
//       '#type' => 'textarea', // #base_type is optional.
     '#format' => 'full_html',

//     '#attributes' => array("spellcheck" => "true"),
    //'#wysiwyg' => TRUE,
     '#description' => '', // $form_state['values']["lucanet_kommentar_".$form_state['storage']['dd_report_id']]
     '#default_value' => check_markup($comment['value'], $comment['format']), // Falls kein akt_date vorhanden, wird der Kommentar für den aktuellen Monat eingetragen
     '#rows' => 10,
     '#cols' => 60,
     '#resizable' => TRUE,
    );
  // Add form after build.
  $form['#after_build'][] = '_lucanet_report_form_after_build';

// Zum Ansteuern über js
//  $form['lucanet_report_fieldset']["lucanet_kommentar_".$form_state['storage']['dd_report_id']]['#attributes']['id'] = 'lucanet_report_kommentar';




// ------------------------- Falls BWA-Tabelle (id=5) ------------------
if ($form_state['storage']['dd_report_id'] == 5)
{
//Alle Werte hier berechnen:
$kd_nr = _lucanet_report_kundennamen_call(); // $kd_nr z.B. 1125
$w_jahr = _lucanet_report_wirtschaftsjahr_call(); // Wirtschaftsjahr, aus taxonomy - z.B. 09 (für September)
$last_import = _lucanet_report_get_last_date($kd_nr); // 2016-02-01

$wert = '';
// Falls letzte Lieferung vor dem WJ Vorliegt - das Jahr von der Lieferung == IST Jahr Beginn
// Ist, Plan und VJ Werte

if (substr($last_import,5,2)<$w_jahr)
    {
    $start_date = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date= $last_import;

    $start_date_vj = (substr($last_import,0,4)-2).'-'.$w_jahr.'-01';
    $end_date_jtd= (substr($last_import,0,4)-1).'-'.substr($last_import,5,2).'-01';
    }
    else if (substr($last_import,5,2)>$w_jahr)
    {
    $start_date = (substr($last_import,0,4)).'-'.$w_jahr.'-01';
    $end_date= $last_import;
    $start_date_vj = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date_jtd= (substr($last_import,0,4)-1).'-'.substr($last_import,5,2).'-01';
    }
    // neu
    else if (substr($last_import,5,2)==$w_jahr)
    {
    $start_date = (substr($last_import,0,4)).'-'.$w_jahr.'-01';
    $end_date= $last_import;
    $start_date_vj = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date_jtd= date("Y-m-d", strtotime("-1 months", strtotime($last_import)));
    }

$monate = array('Jan', 'Feb', 'März', 'Apr', 'Mai', 'Jun', 'Jul', 'Aug', 'Sep', 'Okt', 'Nov', 'Dez');
    $monate_neu = array();
    for ($i = 0; $i <= 11; $i++) {
        $monate_neu[] = $monate[($i+intval($w_jahr)-1) % 12]; // Wirtschaftjahr
}


//Ausgeben
// Variablen:
$rest_vj = _lucanet_report_get_oid_value_guv2('VHR_2467150', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467151', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467152', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467153', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467154', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467211', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467158', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467159', $start_date_vj, $end_date_jtd, $kd_nr)+

    _lucanet_report_get_betrag_sum('VHR_2417953', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_betrag_sum('VHR_2407266', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_betrag_sum('VHR_2407267', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_betrag_sum('VHR_2465380', $start_date_vj, $end_date_jtd, $kd_nr);

// Rest plan
$rest_plan = _lucanet_report_get_oid_value_guv2_plan('VHR_2467150', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467151', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467152', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467153', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467154', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467211', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467158', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467159', $start_date, $end_date, $kd_nr)+


    _lucanet_report_get_betrag_sum_plan('VHR_2417953', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_betrag_sum_plan('VHR_2407266', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_betrag_sum_plan('VHR_2407267', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_betrag_sum_plan('VHR_2465380', $start_date, $end_date, $kd_nr);

// IST
$rest_ist = _lucanet_report_get_oid_value_guv2('VHR_2467150', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467151', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467152', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467153', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467154', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467211', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467158', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467159', $start_date, $end_date, $kd_nr)+


    _lucanet_report_get_betrag_sum('VHR_2417953', $start_date, $end_date, $kd_nr)+ // Sonstige ordentliche Erträge POSITIV GROSS
    _lucanet_report_get_betrag_sum('VHR_2407266', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_betrag_sum('VHR_2407267', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_betrag_sum('VHR_2465380', $start_date, $end_date, $kd_nr);

$rest_akt = _lucanet_report_get_oid_value_guv2('VHR_2467150', $end_date, $end_date, $kd_nr)+

    _lucanet_report_get_oid_value_guv2('VHR_2467151', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467152', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467153', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467154', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467211', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467158', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467159', $end_date, $end_date, $kd_nr)+

    _lucanet_report_get_betrag_sum('VHR_2417953', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_betrag_sum('VHR_2407266', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_betrag_sum('VHR_2407267', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_betrag_sum('VHR_2465380', $end_date, $end_date, $kd_nr);


$form['lucanet_graph'] = array(
    '#prefix' => '<div class="table-scrollable">',
    '#suffix' => '</div>',

    '#markup' => '
    <table border="1" cellspacing="3">
  <tr >
    <td rowspan="2" scope="col"><strong>Kurz-BWA</strong><br>
    <strong>(IST) '.$monate_neu[0].' '.@substr($start_date,2,2).' - '.$monate[intval(substr($end_date,5,2))-1].' '.substr($end_date,2,2).'</strong</td>
    <td style="text-align: center;" colspan="3" scope="col"><strong>Kummuliert laufend</strong>
    </strong></td>
    <td style="text-align: center;"><strong>Monat</strong></td>
    <td style="display: none;"></td>
    <td style="display: none;"></td>
  </tr>

<tr ">
    <td style="text-align: center;" scope="row" ><strong>VJ</strong></td>
    <td style="text-align: center;"><strong>Plan</strong></td>
    <td style="text-align: center;" colspan="2" ><strong>IST</strong></td>


  </tr>
  <tr>
     <td scope="row" width="20%">Umsatzerlöse</td>
    <td style="text-align: right;" width="20%">'.number_format(_lucanet_report_get_betrag_sum('VHR_2399940', $start_date_vj, $end_date_jtd, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;"  width="20%">'.number_format(_lucanet_report_get_betrag_sum_plan('VHR_2399940', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;" width="20%">'.number_format(_lucanet_report_get_betrag_sum('VHR_2399940', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;" width="20%">'.number_format(_lucanet_report_get_betrag_sum('VHR_2399940', $end_date, $end_date, $kd_nr),2, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Wareneinsatz</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_rohertrag(1,1)-_lucanet_report_get_betrag_sum('VHR_2399940', $start_date_vj, $end_date_jtd, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_rohertrag(3,1)-_lucanet_report_get_betrag_sum_plan('VHR_2399940', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_rohertrag(2,1)-_lucanet_report_get_betrag_sum('VHR_2399940', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_rohertrag(2,2)-_lucanet_report_get_betrag_sum('VHR_2399940', $end_date, $end_date, $kd_nr),2, ',', '.').'</td>
  </tr>
   <tr>
    <td style="background-color:#DDD; " scope="row"><strong>Rohertrag</strong></td>
    <td style="background-color:#DDD; text-align: right;">'.number_format(_lucanet_report_rohertrag(1,1),2, ',', '.').'</td>
    <td style="background-color:#DDD; text-align: right;">'.number_format(_lucanet_report_rohertrag(3,1),2, ',', '.').'</td>
    <td style="background-color:#DDD; text-align: right;">'.number_format(_lucanet_report_rohertrag(2,1),2, ',', '.').'</td>
    <td style="background-color:#DDD; text-align: right;">'.number_format(_lucanet_report_rohertrag(2,2),2, ',', '.').'</td>

  </tr>
  <tr>
    <td scope="row"><strong>Gesamtaufwendungen</strong></td>
    <td style="text-align: right;">'.number_format(
    _lucanet_report_get_oid_value_guv2('VHR_2467148', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467149', $start_date_vj, $end_date_jtd, $kd_nr)+
    _lucanet_report_get_oid_value_guv('VHR_2407263', $start_date_vj, $end_date_jtd, $kd_nr)+

    // Rest ist
    +$rest_vj

    ,2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467148', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2_plan('VHR_2467149', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv_plan('VHR_2407263', $start_date, $end_date, $kd_nr)

    +$rest_plan

    ,2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(
    _lucanet_report_get_oid_value_guv2('VHR_2467148', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467149', $start_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv('VHR_2407263', $start_date, $end_date, $kd_nr)

    +$rest_ist

    ,2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(
    _lucanet_report_get_oid_value_guv2('VHR_2467148', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv2('VHR_2467149', $end_date, $end_date, $kd_nr)+
    _lucanet_report_get_oid_value_guv('VHR_2407263', $end_date, $end_date, $kd_nr)

    +$rest_akt
    ,2, ',', '.').'</td>

  </tr>

  <tr>
    <td scope="row">Personalkosten</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv2('VHR_2467148', $start_date_vj, $end_date_jtd, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv2_plan('VHR_2467148', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv2('VHR_2467148', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv2('VHR_2467148', $end_date, $end_date, $kd_nr),2, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Raumkosten</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv2('VHR_2467149', $start_date_vj, $end_date_jtd, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv2_plan('VHR_2467149', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv2('VHR_2467149', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv2('VHR_2467149', $end_date, $end_date, $kd_nr),2, ',', '.').'</td>

  </tr>
  <tr>
    <td scope="row">Zinsaufwendungen</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv('VHR_2407263', $start_date_vj, $end_date_jtd, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv_plan('VHR_2407263', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv('VHR_2407263', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv('VHR_2407263', $end_date, $end_date, $kd_nr),2, ',', '.').'</td>

  </tr>
  <tr>
    <td scope="row">Restliche Aufwendungen</td>
    <td style="text-align: right;">'
    .number_format(
    $rest_vj
    //_lucanet_report_get_betrag_sum('VHR_2467221', $start_date_vj, $end_date_jtd, $kd_nr)
    ,2, ',', '.').'</td>
    <td style="text-align: right;">'
    .number_format(
    $rest_plan
    //_lucanet_report_get_betrag_sum_plan('VHR_2467211', $start_date, $end_date, $kd_nr)
    ,2, ',', '.').'</td>
    <td style="text-align: right;">'
    .number_format(
    $rest_ist
    ,2, ',', '.').'</td>
    <td style="text-align: right;">'
    .number_format(
    $rest_akt
    ,2, ',', '.').'</td>
  </tr>
  <tr>
    <td style="background-color:#DDD;" scope="row"><strong>Jahresergebnis vor Steuern</strong></td>
    <td style="background-color:#DDD;text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv('VHR_2399944', $start_date_vj, $end_date_jtd, $kd_nr)
    - // statistische Anpassung
    _lucanet_report_get_betrag_sum('VHR_2417954', $start_date_vj, $end_date_jtd, $kd_nr)
    ,2, ',', '.').'</td>
    <td style="background-color:#DDD;text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv_plan('VHR_2399944', $start_date, $end_date, $kd_nr)
    - // statistische Anpassung
    _lucanet_report_get_betrag_sum_plan('VHR_2417954', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="background-color:#DDD;text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv('VHR_2399944', $start_date, $end_date, $kd_nr)
    - // statistische Anpassung
    _lucanet_report_get_betrag_sum('VHR_2417954', $start_date, $end_date, $kd_nr),2, ',', '.').'</td>
    <td style="background-color:#DDD;text-align: right;">'.number_format(_lucanet_report_get_oid_value_guv('VHR_2399944', $end_date, $end_date, $kd_nr)
    - // statistische Anpassung
    _lucanet_report_get_betrag_sum('VHR_2417954', $end_date, $end_date, $kd_nr),2, ',', '.').'</td>

  </tr>
</table>
    ',
        '#weight' => -5,
    );
}
// ------------------------- Falls BWA-Tabelle (id=5) ENDE  -------------------

//-------------------------- Falls Spartenvergleich id=15 ---------------------
if ($form_state['storage']['dd_report_id'] == 15)
{
//
db_set_active('lucanet_susa');
$query = db_select('LN_Dim_Account', 'lda')
    ->fields('lda', array('Name', 'UID', 'Level'))
    ->condition('Balance', 'Debit', '=')
    ->condition('SectionUID', 'OID_1700', '=');

$query->orderBy('lda.Level');//ORDER BY ID
$result = $query->execute();
db_set_active();

$result = _lucanet_report_get_last_date_value();
//$result =  _lucanet_report_get_last_date();
//
$kd_nr = _lucanet_report_kundennamen_call(); // $kd_nr z.B. 1125
$w_jahr = _lucanet_report_wirtschaftsjahr_call(); // Wirtschaftsjahr, aus taxonomy - z.B. 09 (für September)
$last_import = _lucanet_report_get_last_date($kd_nr); // 2016-02-01
$wert = '';
// Falls letzte Lieferung vor dem WJ Vorliegt - das Jahr von der Lieferung == IST Jahr Beginn
// Ist, Plan und VJ Werte
if (substr($last_import,5,2)<$w_jahr)
    {
    $start_date = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date= $last_import;

    $start_date_vj = (substr($last_import,0,4)-2).'-'.$w_jahr.'-01';
    $end_date_jtd= (substr($last_import,0,4)-1).'-'.substr($last_import,5,2).'-01';
    }
    else if (substr($last_import,5,2)>$w_jahr)
    {
    $start_date = (substr($last_import,0,4)).'-'.$w_jahr.'-01';
    $end_date= $last_import;
    $start_date_vj = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date_jtd= (substr($last_import,0,4)-1).'-'.substr($last_import,5,2).'-01';
    }
    // neu
    else if (substr($last_import,5,2)==$w_jahr)
    {
    $start_date = (substr($last_import,0,4)).'-'.$w_jahr.'-01';
    $end_date= $last_import;
    $start_date_vj = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date_jtd= date("Y-m-d", strtotime("-1 months", strtotime($last_import)));
    }

    $monate = array('Jan', 'Feb', 'März', 'Apr', 'Mai', 'Jun', 'Jul', 'Aug', 'Sep', 'Okt', 'Nov', 'Dez');
    $monate_neu = array();
    for ($i = 0; $i <= 11; $i++) {
        $monate_neu[] = $monate[($i+intval($w_jahr)-1) % 12]; // Wirtschaftjahr
}



$t15_umsatz = _lucanet_report_get_betrag_sum('VHR_2399940', $start_date, $end_date, $kd_nr);
$t15_wareneinsatz = _lucanet_report_rohertrag(2,1)-_lucanet_report_get_betrag_sum('VHR_2399940', $start_date, $end_date, $kd_nr);

$t15_1_umsatz_car = _lucanet_report_get_oid_value_guv('VHR_2464225', $start_date, $end_date, $kd_nr);
$t15_2_umsatz_ver = _lucanet_report_get_oid_value_guv('VHR_2464226', $start_date, $end_date, $kd_nr);
$t15_3_umsatz_werk = _lucanet_report_get_oid_value_guv('VHR_2464227', $start_date, $end_date, $kd_nr);
$t15_4_umsatz_teil = _lucanet_report_get_oid_value_guv('VHR_2464228', $start_date, $end_date, $kd_nr);

$t15_5_umsatz_pkw_1 = _lucanet_report_get_oid_value_guv('VHR_2464257', $start_date, $end_date, $kd_nr);
$t15_5_umsatz_pkw_2 = _lucanet_report_get_oid_value_guv('VHR_2407228', $start_date, $end_date, $kd_nr);
$t15_5_umsatz_pkw_3 = _lucanet_report_get_oid_value_guv('VHR_2417951', $start_date, $end_date, $kd_nr);
$t15_5_umsatz_pkw_4 = _lucanet_report_get_oid_value_guv('VHR_12825', $start_date, $end_date, $kd_nr);
$t15_5_umsatz_pkw_5 = _lucanet_report_get_oid_value_guv('VHR_2400290', $start_date, $end_date, $kd_nr);

$t15_5_umsatz_pkw = $t15_5_umsatz_pkw_1 + $t15_5_umsatz_pkw_2 + $t15_5_umsatz_pkw_3 + $t15_5_umsatz_pkw_4 + $t15_5_umsatz_pkw_5;
$t15_6_umsatz_ver = 0;


$t15a_1_car = _lucanet_report_get_oid_value_guv('VHR_2464978', $start_date, $end_date, $kd_nr);
$t15a_2_ver = _lucanet_report_get_oid_value_guv('VHR_2464986', $start_date, $end_date, $kd_nr) +
_lucanet_report_get_oid_value_guv('VHR_2407142', $start_date, $end_date, $kd_nr)
 ;
$t15a_3_werk = _lucanet_report_get_oid_value_guv('VHR_2464987', $start_date, $end_date, $kd_nr);
$t15a_4_teil = _lucanet_report_get_oid_value_guv('VHR_2464992', $start_date, $end_date, $kd_nr);

$t15a_5_pkw_1 = _lucanet_report_get_oid_value_guv('VHR_2464996', $start_date, $end_date, $kd_nr);
$t15a_5_pkw_2 = _lucanet_report_get_oid_value_guv('VHR_2464999', $start_date, $end_date, $kd_nr);
$t15a_5_pkw_3 = _lucanet_report_get_oid_value_guv('VHR_2465000', $start_date, $end_date, $kd_nr);
$t15a_5_pkw_4 = _lucanet_report_get_oid_value_guv('VHR_2465005', $start_date, $end_date, $kd_nr);
$t15a_5_pkw_5 = _lucanet_report_get_oid_value_guv('VHR_2465368', $start_date, $end_date, $kd_nr);
$t15a_5_pkw_6 = _lucanet_report_get_oid_value_guv('VHR_2465369', $start_date, $end_date, $kd_nr);
$t15a_5_pkw_7 = _lucanet_report_get_oid_value_guv('VHR_2465370', $start_date, $end_date, $kd_nr);

$t15a_5_pkw = $t15a_5_pkw_1 + $t15a_5_pkw_2 + $t15a_5_pkw_3 +$t15a_5_pkw_4 +$t15a_5_pkw_5 +$t15a_5_pkw_6 +$t15a_5_pkw_7;
$t15a_6_umsatz_ver = 0;


// Summen
$t15_sum_rohertrag = $t15_umsatz + $t15_wareneinsatz;
$t15_sum_1_car = $t15_1_umsatz_car+$t15a_1_car;
$t15_sum_2_ver = $t15_2_umsatz_ver+$t15a_2_ver;
$t15_sum_3_werk = $t15_3_umsatz_werk + $t15a_3_werk;
$t15_sum_4_teile = $t15_4_umsatz_teil + $t15a_4_teil;
$t15_sum_5_pkw = $t15_5_umsatz_pkw + $t15a_5_pkw;
$t15_sum_6_verwalt = $t15_6_umsatz_ver + $t15a_6_umsatz_ver;

// Prozente
$t15_0_pr = $t15_sum_rohertrag/$t15_umsatz;
$t15_1_pr = $t15_sum_1_car/$t15_1_umsatz_car;
$t15_2_pr = $t15_sum_2_ver/$t15_2_umsatz_ver;
$t15_3_pr = $t15_sum_3_werk /$t15_3_umsatz_werk;
$t15_4_pr = $t15_sum_4_teile/$t15_4_umsatz_teil;
$t15_5_pr = $t15_sum_5_pkw/$t15_5_umsatz_pkw;
$t15_6_pr = $t15_sum_6_verwalt/1; // nicht durch 0 teilbar




$t15_perso = _lucanet_report_get_oid_value_guv2('VHR_2433039_3816423', $start_date, $end_date, $kd_nr);
$t15_raum = _lucanet_report_get_oid_value_guv2('VHR_2467149', $start_date, $end_date, $kd_nr);
$t15_werbe = _lucanet_report_get_oid_value_guv('VHR_2408219', $start_date, $end_date, $kd_nr);
$t15_fahrzeug_fuhr = _lucanet_report_get_oid_value_guv('VHR_2414644', $start_date, $end_date, $kd_nr);
$t15_fahrzeug_handel = _lucanet_report_get_oid_value_guv('VHR_2400491', $start_date, $end_date, $kd_nr);
$t15_afa = _lucanet_report_get_oid_value_guv('VHR_2407251', $start_date, $end_date, $kd_nr);
$t15_sonstige_auf = _lucanet_report_get_oid_value_guv('VHR_2465378', $start_date, $end_date, $kd_nr);

$t15_betrieblich_aufwand = $t15_perso+$t15_raum +$t15_werbe+$t15_fahrzeug_fuhr+$t15_fahrzeug_handel+$t15_afa+$t15_sonstige_auf;

$t15_sonstige_ordentliche_er = _lucanet_report_get_oid_value_guv('VHR_2417953', $start_date, $end_date, $kd_nr);
$t15_versicherung_ent = _lucanet_report_get_oid_value_guv('VHR_2407266', $start_date, $end_date, $kd_nr);
$t15_sonstige_er = _lucanet_report_get_oid_value_guv('VHR_2407267', $start_date, $end_date, $kd_nr);

$t15_betriebergeb_1 = $t15_sum_rohertrag + $t15_betrieblich_aufwand +$t15_sonstige_ordentliche_er +$t15_versicherung_ent + $t15_sonstige_er;

$t15_finanzergebnis = _lucanet_report_get_oid_value_guv('VHR_2400300', $start_date, $end_date, $kd_nr);

$t15_betriebergeb_2 = $t15_betriebergeb_1 + $t15_finanzergebnis;

$t15_ao_ergebnis = _lucanet_report_get_oid_value_guv('VHR_2400306', $start_date, $end_date, $kd_nr) - _lucanet_report_get_oid_value_guv('VHR_2407266', $start_date, $end_date, $kd_nr);


$t15_ao_aufwendung =  _lucanet_report_get_oid_value_guv('VHR_2400307', $start_date, $end_date, $kd_nr);

$t15_jahresergeb_vor_st  = _lucanet_report_get_betrag_sum('VHR_2399944', $start_date, $end_date, $kd_nr) -
_lucanet_report_get_betrag_sum('VHR_2417954', $start_date, $end_date, $kd_nr);

$t15_ee_steuern = _lucanet_report_get_oid_value_guv('VHR_12991', $start_date, $end_date, $kd_nr);

$t15_jahresergeb_nach_st = $t15_jahresergeb_vor_st + $t15_ee_steuern;

$t15_eliminierung_stat = _lucanet_report_get_betrag_sum('VHR_2417954', $start_date, $end_date, $kd_nr);

$t15_jahresergeb_nach_eliminierung_st = $t15_jahresergeb_nach_st + $t15_eliminierung_stat;


//

// Umsatz .number_format(_lucanet_report_get_oid_value_guv('VHR_12805', $start_date, $end_date, $kd_nr)/1000,1, ',', '.')

$form['lucanet_graph'] = array(
'#prefix' => '<div class="table-scrollable">',
    '#suffix' => '</div>',
    '#markup' =>'
<table border="1" cellspacing="3">
  <tr>
    <td style="text-align: center;" rowspan="2" scope="col"><strong>Spartenvergleich auf Basis Kostenstellen-Verteilungsschlüssel<br> in TEUR</strong></td>
    <td style="text-align: center; background-color:#DDD;" colspan="7" scope="col"><strong>IST '.$monate_neu[0].' '.@substr($start_date,2,2).' - '.$monate[intval(substr($end_date,5,2))-1].' '.substr($end_date,2,2).'</strong></td>
  </tr>

<tr>
    <td scope="row"><strong>Gesamt</strong></td>
    <td><strong>Caravanhandel</strong></td>
    <td><strong>Vermietung</strong></td>
    <td><strong>Werkstatt</strong></td>
    <td><strong>Teile & Shop</strong></td>
    <td><strong>PKW / Sonstige</strong></td>
    <td><strong>Verwaltung</strong></td>
  </tr>
  <tr>
    <td scope="row">Umsatz</td>
    <td style="text-align: right;">'.number_format($t15_umsatz/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15_1_umsatz_car/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15_2_umsatz_ver/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15_3_umsatz_werk/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15_4_umsatz_teil/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15_5_umsatz_pkw/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15_6_umsatz_ver/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Wareneinsatz</td>
    <td style="text-align: right;">'.number_format($t15_wareneinsatz/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15a_1_car/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15a_2_ver/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15a_3_werk/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15a_4_teil/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15a_5_pkw/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($t15a_6_umsatz_ver/1000,1, ',', '.').'</td>

  </tr>
  <tr>
    <td style="background-color:#DDD; text-align: right;" scope="row"><strong>Summe Rohertrag</strong></td>
    <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_sum_rohertrag/1000,1, ',', '.').'</strong></td>
    <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_sum_1_car/1000,1, ',', '.').'</strong></td>
    <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_sum_2_ver/1000,1, ',', '.').'</strong></td>
    <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_sum_3_werk/1000,1, ',', '.').'</strong></td>
    <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_sum_4_teile/1000,1, ',', '.').'</strong></td>
    <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_sum_5_pkw/1000,1, ',', '.').'</strong></td>
    <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_sum_6_verwalt/1000,1, ',', '.').'</strong></td>
  </tr>
  <tr>
    <td  style="text-align: right;" scope="row"><strong>Summe Margen in %</strong></td>
    <td style="text-align: right;"><strong>'.number_format($t15_0_pr*100,1, ',', '.').'%</strong></td>
    <td style="text-align: right;"><strong>'.number_format($t15_1_pr*100,1, ',', '.').'%</strong></td>
    <td style="text-align: right;"><strong>'.number_format($t15_2_pr*100,1, ',', '.').'%</strong></td>
    <td style="text-align: right;"><strong>'.number_format($t15_3_pr*100,1, ',', '.').'%</strong></td>
    <td style="text-align: right;"><strong>'.number_format($t15_4_pr*100,1, ',', '.').'%</strong></td>
    <td style="text-align: right;"><strong>'.number_format($t15_5_pr*100,1, ',', '.').'%</strong></td>
    <td style="text-align: right;"><strong>'.number_format($t15_6_pr*100,1, ',', '.').'%</strong></td>
  </tr>
  <tr>
    <td scope="row">Personalkosten</td>
    <td style="text-align: right;">'.number_format($t15_perso/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s3_1 = (_lucanet_report_get_schluessel('VHR_3741509',$kd_nr,$end_date))/100*$t15_perso/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s3_2 = (_lucanet_report_get_schluessel('VHR_3748178',$kd_nr,$end_date))/100*$t15_perso/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s3_3 = (_lucanet_report_get_schluessel('VHR_3748179',$kd_nr,$end_date))/100*$t15_perso/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s3_4 = (_lucanet_report_get_schluessel('VHR_3748180',$kd_nr,$end_date))/100*$t15_perso/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s3_5 = (_lucanet_report_get_schluessel('VHR_3748181',$kd_nr,$end_date))/100*$t15_perso/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s3_6 = (_lucanet_report_get_schluessel('VHR_3748182',$kd_nr,$end_date))/100*$t15_perso/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Raumkosten</td>
    <td style="text-align: right;">'.number_format($t15_raum/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s4_1 = (_lucanet_report_get_schluessel('VHR_3748196',$kd_nr,$end_date))/100*$t15_raum/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s4_2 = (_lucanet_report_get_schluessel('VHR_3748197',$kd_nr,$end_date))/100*$t15_raum/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s4_3 = (_lucanet_report_get_schluessel('VHR_3748198',$kd_nr,$end_date))/100*$t15_raum/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s4_4 = (_lucanet_report_get_schluessel('VHR_3748199',$kd_nr,$end_date))/100*$t15_raum/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s4_5 = (_lucanet_report_get_schluessel('VHR_3748200',$kd_nr,$end_date))/100*$t15_raum/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s4_6 = (_lucanet_report_get_schluessel('VHR_3748201',$kd_nr,$end_date))/100*$t15_raum/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Werbe- und Reisekosten</td>
    <td style="text-align: right;">'.number_format($t15_werbe/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s5_1 = (_lucanet_report_get_schluessel('VHR_3748203',$kd_nr,$end_date))/100*$t15_werbe/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s5_2 = (_lucanet_report_get_schluessel('VHR_3748204',$kd_nr,$end_date))/100*$t15_werbe/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s5_3 = (_lucanet_report_get_schluessel('VHR_3748205',$kd_nr,$end_date))/100*$t15_werbe/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s5_4 = (_lucanet_report_get_schluessel('VHR_3748206',$kd_nr,$end_date))/100*$t15_werbe/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s5_5 = (_lucanet_report_get_schluessel('VHR_3748207',$kd_nr,$end_date))/100*$t15_werbe/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s5_6 = (_lucanet_report_get_schluessel('VHR_3748208',$kd_nr,$end_date))/100*$t15_werbe/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Fahrzeugkosten Fuhrpark</td>
    <td style="text-align: right;">'.number_format($t15_fahrzeug_fuhr/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s6_1 = (_lucanet_report_get_schluessel('VHR_3748223',$kd_nr,$end_date))/100*$t15_fahrzeug_fuhr/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s6_2 = (_lucanet_report_get_schluessel('VHR_3748224',$kd_nr,$end_date))/100*$t15_fahrzeug_fuhr/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s6_3 = (_lucanet_report_get_schluessel('VHR_3748225',$kd_nr,$end_date))/100*$t15_fahrzeug_fuhr/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s6_4 = (_lucanet_report_get_schluessel('VHR_3748226',$kd_nr,$end_date))/100*$t15_fahrzeug_fuhr/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s6_5 = (_lucanet_report_get_schluessel('VHR_3748227',$kd_nr,$end_date))/100*$t15_fahrzeug_fuhr/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s6_6 = (_lucanet_report_get_schluessel('VHR_3748228',$kd_nr,$end_date))/100*$t15_fahrzeug_fuhr/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Fahrzeugkosten Handel / Miete</td>
    <td style="text-align: right;">'.number_format($t15_fahrzeug_handel/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s7_1 = (_lucanet_report_get_schluessel('VHR_3748229',$kd_nr,$end_date))/100*$t15_fahrzeug_handel/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s7_2 = (_lucanet_report_get_schluessel('VHR_3748230',$kd_nr,$end_date))/100*$t15_fahrzeug_handel/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s7_3 = (_lucanet_report_get_schluessel('VHR_3748231',$kd_nr,$end_date))/100*$t15_fahrzeug_handel/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s7_4 = (_lucanet_report_get_schluessel('VHR_3748232',$kd_nr,$end_date))/100*$t15_fahrzeug_handel/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s7_5 = (_lucanet_report_get_schluessel('VHR_3748233',$kd_nr,$end_date))/100*$t15_fahrzeug_handel/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s7_6 = (_lucanet_report_get_schluessel('VHR_3748234',$kd_nr,$end_date))/100*$t15_fahrzeug_handel/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Afa</td>
    <td style="text-align: right;">'.number_format($t15_afa/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s8_1 = (_lucanet_report_get_schluessel('VHR_3748235',$kd_nr,$end_date))/100*$t15_afa/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s8_2 = (_lucanet_report_get_schluessel('VHR_3748236',$kd_nr,$end_date))/100*$t15_afa/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s8_3 = (_lucanet_report_get_schluessel('VHR_3748237',$kd_nr,$end_date))/100*$t15_afa/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s8_4 = (_lucanet_report_get_schluessel('VHR_3748238',$kd_nr,$end_date))/100*$t15_afa/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s8_5 = (_lucanet_report_get_schluessel('VHR_3748239',$kd_nr,$end_date))/100*$t15_afa/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s8_6 = (_lucanet_report_get_schluessel('VHR_3748240',$kd_nr,$end_date))/100*$t15_afa/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Sonstige Aufwendungen</td>
    <td style="text-align: right;">'.number_format($t15_sonstige_auf/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s9_1 = (_lucanet_report_get_schluessel('VHR_3748241',$kd_nr,$end_date))/100*$t15_sonstige_auf/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s9_2 = (_lucanet_report_get_schluessel('VHR_3748242',$kd_nr,$end_date))/100*$t15_sonstige_auf/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s9_3 = (_lucanet_report_get_schluessel('VHR_3748243',$kd_nr,$end_date))/100*$t15_sonstige_auf/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s9_4 = (_lucanet_report_get_schluessel('VHR_3748244',$kd_nr,$end_date))/100*$t15_sonstige_auf/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s9_5 = (_lucanet_report_get_schluessel('VHR_3748245',$kd_nr,$end_date))/100*$t15_sonstige_auf/1000,1, ',', '.').'</td>
    <td style="text-align: right;">'.number_format($s9_6 = (_lucanet_report_get_schluessel('VHR_3748246',$kd_nr,$end_date))/100*$t15_sonstige_auf/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td  style="text-align: right;background-color:#DDD;" scope="row"><strong>Betrieblicher Aufwand</strong></td>
     <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_betrieblich_aufwand/1000,1, ',', '.').'</strong></td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($sw = $s3_1+$s4_1+$s5_1+$s6_1+$s7_1+$s8_1+$s9_1,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($sw1 = $s3_2+$s4_2+$s5_2+$s6_2+$s7_2+$s8_2+$s9_2,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($sw2 = $s3_3+$s4_3+$s5_3+$s6_3+$s7_3+$s8_3+$s9_3,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($sw3 = $s3_4+$s4_4+$s5_4+$s6_4+$s7_4+$s8_4+$s9_4,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($sw4 = $s3_5+$s4_5+$s5_5+$s6_5+$s7_5+$s8_5+$s9_5,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($sw5 = $s3_6+$s4_6+$s5_6+$s6_6+$s7_6+$s8_6+$s9_6,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Sonstige ordentliche Erträge</td>
     <td style="text-align: right;">'.number_format($t15_sonstige_ordentliche_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s1_1 = (_lucanet_report_get_schluessel('VHR_3748213',$kd_nr,$end_date))/100*$t15_sonstige_ordentliche_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s1_2 = (_lucanet_report_get_schluessel('VHR_3748222',$kd_nr,$end_date))/100*$t15_sonstige_ordentliche_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s1_3 = (_lucanet_report_get_schluessel('VHR_3748247',$kd_nr,$end_date))/100*$t15_sonstige_ordentliche_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s1_4 = (_lucanet_report_get_schluessel('VHR_3748248',$kd_nr,$end_date))/100*$t15_sonstige_ordentliche_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s1_5 = (_lucanet_report_get_schluessel('VHR_3748249',$kd_nr,$end_date))/100*$t15_sonstige_ordentliche_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s1_6 = (_lucanet_report_get_schluessel('VHR_3748250',$kd_nr,$end_date))/100*$t15_sonstige_ordentliche_er/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Versicherungsentschädigung</td>
     <td style="text-align: right;">'.number_format($t15_versicherung_ent/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s2_1 = (_lucanet_report_get_schluessel('VHR_3748252',$kd_nr,$end_date))/100*$t15_versicherung_ent/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s2_2 = (_lucanet_report_get_schluessel('VHR_3748253',$kd_nr,$end_date))/100*$t15_versicherung_ent/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s2_3 = (_lucanet_report_get_schluessel('VHR_3748254',$kd_nr,$end_date))/100*$t15_versicherung_ent/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s2_4 = (_lucanet_report_get_schluessel('VHR_3748255',$kd_nr,$end_date))/100*$t15_versicherung_ent/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s2_5 = (_lucanet_report_get_schluessel('VHR_3748256',$kd_nr,$end_date))/100*$t15_versicherung_ent/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s2_6 = (_lucanet_report_get_schluessel('VHR_3748257',$kd_nr,$end_date))/100*$t15_versicherung_ent/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Sonstige Erträge</td>
     <td style="text-align: right;">'.number_format($t15_sonstige_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s3_1 = (_lucanet_report_get_schluessel('VHR_3748258',$kd_nr,$end_date))/100*$t15_sonstige_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s3_2 = (_lucanet_report_get_schluessel('VHR_3748259',$kd_nr,$end_date))/100*$t15_sonstige_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s3_3 = (_lucanet_report_get_schluessel('VHR_3748260',$kd_nr,$end_date))/100*$t15_sonstige_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s3_4 = (_lucanet_report_get_schluessel('VHR_3748261',$kd_nr,$end_date))/100*$t15_sonstige_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s3_5 = (_lucanet_report_get_schluessel('VHR_3748262',$kd_nr,$end_date))/100*$t15_sonstige_er/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($s3_6 = (_lucanet_report_get_schluessel('VHR_3748263',$kd_nr,$end_date))/100*$t15_sonstige_er/1000,1, ',', '.').'</td>
  </tr>
  <tr>
     <td style="text-align: right;background-color:#DDD;" scope="row"><strong>Betriebsergebnis I (EBIT)</strong></td>
     <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_betriebergeb_1/1000,1, ',', '.').'</strong></td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($h1 = $s1_1+$s2_1+$s3_1 + $sw + $t15_sum_1_car/1000,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($h2 = $s1_2+$s2_2+$s3_2 + $sw1 + $t15_sum_2_ver/1000,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($h3 = $s1_3+$s2_3+$s3_3 + $sw2 + $t15_sum_3_werk/1000,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($h4 = $s1_4+$s2_4+$s3_4 + $sw3 + $t15_sum_4_teile/1000,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($h5 = $s1_5+$s2_5+$s3_5 + $sw4 + $t15_sum_5_pkw/1000,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($h6 = $s1_6+$s2_6+$s3_6 + $sw5 + $t15_sum_6_verwalt/1000,1, ',', '.').'</td>
  </tr>
 <tr>
    <td scope="row">Finanzergebnis</td>
     <td style="text-align: right;">'.number_format($t15_finanzergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b1_1 = (_lucanet_report_get_schluessel('VHR_3748264',$kd_nr,$end_date))/100*$t15_finanzergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b1_2 = (_lucanet_report_get_schluessel('VHR_3748265',$kd_nr,$end_date))/100*$t15_finanzergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b1_3 = (_lucanet_report_get_schluessel('VHR_3748266',$kd_nr,$end_date))/100*$t15_finanzergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b1_4 = (_lucanet_report_get_schluessel('VHR_3748267',$kd_nr,$end_date))/100*$t15_finanzergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b1_5 = (_lucanet_report_get_schluessel('VHR_3748268',$kd_nr,$end_date))/100*$t15_finanzergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b1_6 = (_lucanet_report_get_schluessel('VHR_3748269',$kd_nr,$end_date))/100*$t15_finanzergebnis/1000,1, ',', '.').'</td>
  </tr>
  <tr>
     <td style="text-align: right;background-color:#DDD;" scope="row"><strong>Betriebsergebnis II (EBIT)</strong></td>
     <td style="text-align: right;background-color:#DDD;"><strong>'.number_format($t15_betriebergeb_2/1000,1, ',', '.').'</strong></td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($j1 = $h1+$b1_1 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($j2 = $h2+$b1_2 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($j3 = $h3+$b1_3 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($j4 = $h4+$b1_4 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($j5 = $h5+$b1_5 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($j6 = $h6+$b1_6 ,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">AO-Erträge</td>
     <td style="text-align: right;">'.number_format($t15_ao_ergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b2_1 = (_lucanet_report_get_schluessel('VHR_3748270',$kd_nr,$end_date))/100*$t15_ao_ergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b2_2 = (_lucanet_report_get_schluessel('VHR_3748271',$kd_nr,$end_date))/100*$t15_ao_ergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b2_3 = (_lucanet_report_get_schluessel('VHR_3748272',$kd_nr,$end_date))/100*$t15_ao_ergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b2_4 = (_lucanet_report_get_schluessel('VHR_3748273',$kd_nr,$end_date))/100*$t15_ao_ergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b2_5 = (_lucanet_report_get_schluessel('VHR_3748274',$kd_nr,$end_date))/100*$t15_ao_ergebnis/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b2_6 = (_lucanet_report_get_schluessel('VHR_3748275',$kd_nr,$end_date))/100*$t15_ao_ergebnis/1000,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">AO-Aufwendungen</td>
     <td style="text-align: right;">'.number_format($t15_ao_aufwendung/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b3_1 = (_lucanet_report_get_schluessel('VHR_3748276',$kd_nr,$end_date))/100*$t15_ao_aufwendung/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b3_2 = (_lucanet_report_get_schluessel('VHR_3748277',$kd_nr,$end_date))/100*$t15_ao_aufwendung/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b3_3 = (_lucanet_report_get_schluessel('VHR_3748278',$kd_nr,$end_date))/100*$t15_ao_aufwendung/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b3_4 = (_lucanet_report_get_schluessel('VHR_3748279',$kd_nr,$end_date))/100*$t15_ao_aufwendung/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b3_5 = (_lucanet_report_get_schluessel('VHR_3748280',$kd_nr,$end_date))/100*$t15_ao_aufwendung/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($b3_6 = (_lucanet_report_get_schluessel('VHR_3748281',$kd_nr,$end_date))/100*$t15_ao_aufwendung/1000,1, ',', '.').'</td>
  </tr>
  <tr>
     <td style="text-align: right;background-color:#DDD;" scope="row"><strong>Jahresergebnis vor Steuern</strong></td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($t15_jahresergeb_vor_st/1000,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jv1 = $j1 + $b2_1 + $b3_1 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jv2 = $j2 + $b2_2 + $b3_2 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jv3 = $j3 + $b2_3 + $b3_3 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jv4 = $j4 + $b2_4 + $b3_4 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jv5 = $j5 + $b2_5 + $b3_5 ,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jv6 = $j6 + $b2_6 + $b3_6 ,1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">EE-Steuern</td>
     <td style="text-align: right;">'.number_format($t15_ee_steuern/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee1_1 = (_lucanet_report_get_schluessel('VHR_3748288',$kd_nr,$end_date))/100*$t15_ee_steuern/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee2_1 = (_lucanet_report_get_schluessel('VHR_3748289',$kd_nr,$end_date))/100*$t15_ee_steuern/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee3_1 = (_lucanet_report_get_schluessel('VHR_3748290',$kd_nr,$end_date))/100*$t15_ee_steuern/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee4_1 = (_lucanet_report_get_schluessel('VHR_3748291',$kd_nr,$end_date))/100*$t15_ee_steuern/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee5_1 = (_lucanet_report_get_schluessel('VHR_3748292',$kd_nr,$end_date))/100*$t15_ee_steuern/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee6_1 = (_lucanet_report_get_schluessel('VHR_3748293',$kd_nr,$end_date))/100*$t15_ee_steuern/1000,1, ',', '.').'</td>
  </tr>
  <tr>
     <td style="text-align: right;background-color:#DDD;" scope="row"><strong>Jahresergebnis nach Steuern</strong></td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($t15_jahresergeb_nach_st/1000,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn1 = $jv1 + $ee1_1, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn2 = $jv2 + $ee2_1, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn3 = $jv3 + $ee3_1, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn4 = $jv4 + $ee4_1, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn5 = $jv5 + $ee5_1, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn6 = $jv6 + $ee6_1, 1, ',', '.').'</td>
  </tr>
  <tr>
    <td scope="row">Eliminierung von statistischen Anpassungen</td>
     <td style="text-align: right;">'.number_format($t15_eliminierung_stat/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee2_1 = (_lucanet_report_get_schluessel('VHR_3748282',$kd_nr,$end_date))/100*$t15_eliminierung_stat/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee2_2 = (_lucanet_report_get_schluessel('VHR_3748283',$kd_nr,$end_date))/100*$t15_eliminierung_stat/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee2_3 = (_lucanet_report_get_schluessel('VHR_3748284',$kd_nr,$end_date))/100*$t15_eliminierung_stat/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee2_4 = (_lucanet_report_get_schluessel('VHR_3748285',$kd_nr,$end_date))/100*$t15_eliminierung_stat/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee2_5 = (_lucanet_report_get_schluessel('VHR_3748286',$kd_nr,$end_date))/100*$t15_eliminierung_stat/1000,1, ',', '.').'</td>
     <td style="text-align: right;">'.number_format($ee2_6 = (_lucanet_report_get_schluessel('VHR_3748287',$kd_nr,$end_date))/100*$t15_eliminierung_stat/1000,1, ',', '.').'</td>
  </tr>
  <tr>
     <td style="text-align: right;background-color:#DDD;" scope="row"><strong>Jahresergebnis nach Eliminierung von statistischen Anpassungen</strong></td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($t15_jahresergeb_nach_eliminierung_st/1000,1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn1 + $ee2_1, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn2 + $ee2_2, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn3 + $ee2_3, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn4 + $ee2_4, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn5 + $ee2_5, 1, ',', '.').'</td>
     <td style="text-align: right;background-color:#DDD;">'.number_format($jn6 + $ee2_6, 1, ',', '.').'</td>
  </tr>

</table>'
,
        '#weight' => -5,
    );

}
// ------------------------- Falls Tabelle (id=15) ENDE  ------------------




    $i = 0;
    $lucanet_list = array();
    $progect_id = _lucanet_report_kundennamen_call();

    $query = db_select('lucanet_report_aktiv', 'lra');
    $query->innerJoin('lucanet_report', 'lu', 'lu.id = lra.report_id');
    $query->condition('lra.projekt_nr', array($progect_id));
    $query->condition('lu.gruppe_id', array($grupp_id));
    $query->condition('lra.status', array(1));
    $query->orderBy('lu.rang', 'ASC');
    $query->fields('lra', array());
    $query->fields('lu', array());
    $result = $query->execute()->fetchAll();

    // Die Liste aller Aktivierten Grafiken holen
    foreach ($result as $key => $value) {
      $lucanet_list[$i] = $value->report_id;
      $i++;
    }


    // Die Position im Array lucanet_list bestimmen ( von 0 bis anzahl-1)
    $key_arr = array_search($form_state['storage']['dd_report_id'], $lucanet_list);

    // Falls die Position - 1 in der Liste vorhanden ist, Preview
    if (array_key_exists($key_arr - 1, $lucanet_list)) {
      // Preview wrapper
      $prev_report_graph = _dd_lucanet_another_item($lucanet_list[$key_arr - 1], $grupp_id);
      //dsm($prev_report_graph);
      $form['dd_prev_items_button'] = array(
        '#type'       => 'submit',
        '#value'      => t('Prev'),
        '#weight'     => 100,
        '#submit'     => array('_lucanet_report_prev_item'),
                '#attributes' => array(
                    'class' => array('dd_lucanet_switch'),
                ),
        '#suffix' => '<div class="preview-prev-report preview-report">' .$prev_report_graph. '</div></div>',
        '#prefix' => '<div class="wrapper-button-switch">'
      );
      $form_state['lucanet_swich_report_prev'] = $lucanet_list[$key_arr - 1];
    }

    if (array_key_exists($key_arr + 1, $lucanet_list)) {
      $next_report_graph = _dd_lucanet_another_item($lucanet_list[$key_arr + 1], $grupp_id);
      $form['dd_next_items_button'] = array(
        '#type'       => 'submit',
        '#value'      => t('Next'),
        '#weight'     => 101,
        '#submit'     => array('_lucanet_report_next_item'),
                '#attributes' => array(
                    'class' => array('dd_lucanet_switch'),
                ),
        '#suffix' => '<div class="preview-next-report preview-report">' .$next_report_graph. '</div></div>',
        '#prefix' => '<div class="wrapper-button-switch">'
      );


      $form_state['lucanet_swich_report_next'] = $lucanet_list[$key_arr + 1];
    }
return $form;
    }
else
    {
    drupal_set_message(t("For result, select your client please."), 'warning');
    }
}


// Input VHR_ID, return Verteilungsschlussel
function _lucanet_report_get_schluessel($vhr, $c_id, $datum) {
// Schluesselverteilung exportieren
try{
    db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    $query->fields('b', array('Value'));
    $query->condition('b.c_id', $c_id, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $vhr, '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->condition('b.datum', $datum, '=');
   // $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $schluessel = $query->execute()->fetchField();
    db_set_active();
    //dsm($entry_quantity);
    if (!$schluessel)
    {return 0;}
    return $schluessel;
    }
    catch (Exception $e) {
    db_set_active();

    drupal_set_message(t('schluessel'),'error');
    }

return $schluessel;
}

/**
 * "Next item" button submit callback.
 */
function _lucanet_report_next_item($form, &$form_state) {
    drupal_goto('kennzahlen/report/'.$form_state['storage']['grupp_id'].'/'.$form_state['lucanet_swich_report_next']);
}

/**
 * "Prev item" button submit callback.
 */
function _lucanet_report_prev_item($form, &$form_state) {
    drupal_goto('kennzahlen/report/'.$form_state['storage']['grupp_id'].'/'.$form_state['lucanet_swich_report_prev']);
}


// --------------------- Blättern Back --------------------
function _lucanet_report_get_back(&$form, &$form_state) // $richtung = 1 back, $richtung = 2 next
{
        // Falls Session noch nicht gesetzt, dann mit aktuellem Datum - 1 monat setzen
        if (_lucanet_report_session('akt_date') == NULL) // z.B. 2016-05
        {_lucanet_report_session('akt_date',_lucanet_report_get_monat_name(1));} // z.B. 2016-05, da 1 übergeben

        $date = _lucanet_report_get_monat(_lucanet_report_session('akt_date'),1); // z.B. von 2016-05 Back auf 2016-04
        _lucanet_report_session('akt_date', $date); // Session überschreiben
    $comment = _lucanet_report_kommentar_get($form_state['values']['report_id'], _lucanet_report_session('akt_date'));
    $date = _lucanet_report_get_monat_name(0,_lucanet_report_session('akt_date'));
    $form['lucanet_report_fieldset']["lucanet_kommentar_".$form_state['storage']['dd_report_id']]['value']['#value'] = check_markup($comment['value'], $comment['format']);
    $form['lucanet_report_fieldset']['datum_hidden']['#value'] = _lucanet_report_session('akt_date');
    $form['lucanet_report_fieldset']['datum']['#markup'] = $date;


    $form_state['values']['datum'] = $date;
        $form_state['values']['datum_hidden'] = _lucanet_report_session('akt_date');
        $form_state['values']["lucanet_kommentar_".$form_state['storage']['dd_report_id']] = check_markup($comment['value'], $comment['format']);
    $form_state['rebuild'] = TRUE;

    return $form['lucanet_report_fieldset'];
}


// --------------------- Blättern Next --------------------
function _lucanet_report_get_next(&$form, &$form_state) // $richtung = 1 back, $richtung = 2 next
{
    // noch alter Zustand
    //dsm($form_state);
    // noch alter Zustand Ende

        // Falls Session noch nicht gesetzt, dann mit aktuellem Datum - 1 monat setzen
        // Nur bei erster Betätigung
        if (_lucanet_report_session('akt_date') == NULL) // z.B. 2016-05
        {_lucanet_report_session('akt_date',_lucanet_report_get_monat_name(1));} // z.B. 2016-05, da 1 übergeben


        $date = _lucanet_report_get_monat(_lucanet_report_session('akt_date'),2); // z.B. von 2016-05 Next auf 2016-06

        _lucanet_report_session('akt_date', $date); // Session überschreiben

  $comment = _lucanet_report_kommentar_get($form_state['values']['report_id'], _lucanet_report_session('akt_date'));
  $date = _lucanet_report_get_monat_name(0,_lucanet_report_session('akt_date'));
        $form['lucanet_report_fieldset']["lucanet_kommentar_".$form_state['storage']['dd_report_id']]['value']['#value'] = check_markup($comment['value'], $comment['format']);
        $form['lucanet_report_fieldset']['datum_hidden']['#value'] = _lucanet_report_session('akt_date');
    $form['lucanet_report_fieldset']['datum']['#markup'] = $date;

  // ! GUT
        //dsm($form['lucanet_report_fieldset']['datum_hidden']['#value']);

        $form_state['values']['datum'] = $date;
        $form_state['values']['datum_hidden'] = _lucanet_report_session('akt_date');
        $form_state['values']["lucanet_kommentar_".$form_state['storage']['dd_report_id']] = check_markup($comment['value'], $comment['format']);
    $form_state['rebuild'] = TRUE;
        //dsm($form_state);
    return $form['lucanet_report_fieldset'];
}


// im Format JJJJ-MM
function _lucanet_report_get_monat($akt_date = NULL, $next_back = NULL) // $next_back (back = 1, vor = 2)
{
        // Falls kein relatives Datum übergeben worden ist.
        if ($akt_date == NULL)
        {
            $akt_jahr = date("Y");
            $akt_mon = date("m");
            $akt_day = date("d");

            if ($akt_mon == '01')
            {
                $akt_mon = 12;
                $akt_jahr = $akt_jahr - 1;
            }
            else
            {
                $akt_mon = $akt_mon -1;
            }
            // JJJJ-MM
            $last_month = $akt_jahr."-".str_pad($akt_mon, 2, 0, STR_PAD_LEFT);
            return $last_month;

            /*
            $timestamp = strtotime("-20 days");
            $stichtag = date("Y-m-01", $timestamp);
            return substr($stichtag,0,7);
            */
        }

        // Falls ein relatives Datum übergebenen wurde
        else if ($next_back == 1 && isset($akt_date)) // back
        {
            $j = substr($akt_date,0,4);
            $m = substr($akt_date,5);

            if (intval($m) == 1)
            {
                $m = '12';
                $j = intval($j)-1;
            }
            else
            {
                $m = intval($m)-1;
            }

            // leere stocken mit 0 füllen
            if ($m <10)
            {
                $m = '0'.$m;
            }
            return $j.'-'.$m;
        }

        else if ($next_back == 2 && isset($akt_date)) // next
        {
            $j = substr($akt_date,0,4);
            $m = substr($akt_date,5);

            if (intval($m) == 12)
            {
                $m = '1';
                $j = intval($j)+1;
            }
            else
            {
                $m = intval($m)+1;
            }

            // leere Stekken mit 0 füllen
            if ($m <10)
            {
                $m = '0'.$m;
            }
            return $j.'-'.$m;
        }
}



// Liefert immmer den Namen des Monats aus dem Format JJJJ-MM in Januar JJJJ
function _lucanet_report_get_monat_name($nur_date = NULL, $akt_date = NULL) {
// $next_back mit Namen ausgeben. 1 -back, 2 - next
if ($akt_date != NULL)
{$datum = $akt_date;}
else
{$datum = _lucanet_report_get_monat();}
$monatsnamen = array(
   '01'=>"Januar",
   '02'=>"Februar",
   '03'=>"März",
   '04'=>"April",
   '05'=>"Mai",
   '06'=>"Juni",
   '07'=>"Juli",
   '08'=>"August",
   '09'=>"September",
   '10'=>"Oktober",
   '11'=>"November",
   '12'=>"Dezember");


 if ($nur_date ==1)
    {
        // Kommt es vor? Warum prüfen
        return substr($datum,0,7);
    }

        return $monatsnamen[substr($datum,5)].' '.substr($datum,0,4);
}


//------------------------------ Get Alle Felder ------------------------------
function _lucanet_report_kommentar_get($report_id, $datum=NULL) {
$projekt_nr = _lucanet_report_kundennamen_call();

//falls kein Datum vergeben, das aktuellste Kommentar mit dem Wert holen.
if ($datum == NULL)
{$datum = _lucanet_report_get_monat();}

try {
// Query KdNr. selektieren aus taxonomy_term_data
$query = db_select('lucanet_kommentar_berater', 'c');
$query->fields('c',array('kommentar')); // Kommentar

$query->condition('c.projekt_nr', $projekt_nr, '='); //
$query->condition('c.report_id', $report_id, '='); // Leitbild - 1, Strategie - 2, Mitarbeiter - 3
$query->condition('c.datum', $datum.'-01', '='); // Datum im Format JJJJ-MM-01
$query->orderBy('c.id', 'DESC');//ORDER BY ID
$query->range(0, 1);

//drupal_set_message($query->__toString());
$result = $query->execute();
$kommentar = '';
foreach ($result as $record) {
$kommentar = unserialize($record->kommentar);
}
}  // try
catch(PDOException $ex)
{$kommentar = "An Error occured!". $ex->getMessage();}

if (empty($kommentar) || $kommentar == '')
{
    //return '[Kein Kommentar liegt vor]';
}
    return $kommentar;
} //


// aktuell aktive Kundennummer
function _lucanet_report_kundennamen_call()
{
global $user;
$vid = array(2,8); // html text Version
$fil_value = _lucanet_report_tax_call();
$kd_nr = 0;

// Query KdNr. selektieren aus taxonomy_term_data
$query = db_select('taxonomy_term_data', 't');
$query->distinct();
$query->join('role', 'r', 'r.name = t.name');
$query->join('users_roles', 'ur', 'ur.rid = r.rid');
$query->fields('t',array('name'));

$query->condition('ur.uid', $user->uid, '='); //
$query->condition('t.tid', $fil_value, '='); //
$query->condition('t.vid', $vid, 'IN'); //

$result = $query->execute();
$kd_nr = 0;
    foreach ($result as $record) {
    $kd_nr = $record->name; // kd_nr ist immer vorhanden, da in der Registrierung Pflicht.
                            // Wirtschaftsjahr kann auch hier ausgelesen werden
    }
return $kd_nr;
}


// aktuell aktive Kundennummer
function _lucanet_report_wirtschaftsjahr_call($table_array = NULL)
{
$taxo = _lucanet_report_tax_call(); // z.B. id 23

// Wirtschaftsjahr selektieren
$query = db_select('field_data_field_wirtschaftsjahr', 'pa');
$query->distinct();
$query->join('taxonomy_term_data', 't', 't.tid = pa.field_wirtschaftsjahr_target_id');
$query->fields('t',array('name')); //field_data_field_projekt_strasse_nr

$query->condition('pa.entity_id', $taxo, '='); //

//drupal_set_message($query->__toString());
$result = $query->execute();
    foreach ($result as $record) {
    $wirtschaftsjahrbeginn = $record->name;
    }
// Wirtschaftsjahr
return $wirtschaftsjahrbeginn;
}


// aktuell aktive Taxonomienummer
function _lucanet_report_tax_call()
{
// Global Filter Value auslesen.
$fil_value_temp = global_filter_get_session_value('field_projekt');
$fil_value = $fil_value_temp[0];
return $fil_value;
}

// Eindetige OID für die Grafik. Es gilt nur für Grafiken aus einer OID!!!
function _lucanet_report_get_oid_array($report_id, $genem_pruf = NULL)
{
//bypass
if ($report_id == '0')
{return true;}

$oid = array();

$projekt_nr = _lucanet_report_kundennamen_call();
$berater = 0;
//dsm($projekt_nr);
// Falls Admin oder Berater
if (user_has_role('14') || user_has_role('70') || user_has_role('3'))
{$berater = 1;}

// Selektion von OIDs
//$query = db_select('lucanet_report_oid', 'lr');
$query = db_select('lucanet_report', 'lr');
//$query->Join('lucanet_report_aktiv', 'ra', '(lr.report_id = ra.report_id)');


$query->fields('lr',array('oid')); //field_data_field_projekt_strasse_nr
$query->condition('lr.id', $report_id, '='); //

    // falls Kunde, filtern
    if ($berater == NULL || $berater == 0)
    {
    $query->Join('lucanet_report_aktiv', 'ra', '(lr.id = ra.report_id)');
    $query->condition('ra.projekt_nr', $projekt_nr, '='); //
    $query->condition('ra.status', '1','='); // Status aktiv
    }
    //$query->condition('ra.projekt_nr', $projekt_nr, '='); // Projektnummer stimmt

//drupal_set_message($query->__toString());
$result = $query->execute();
    foreach ($result as $record) {
    $oid[] = 'VHR_'.substr($record->oid,4); // OID_ durch VHR_ ersetzen
}

if ($genem_pruf == '1' && !empty($oid))
{return true;}
else { return $oid; } // oder False?
}


// Test, ob Report ID dem Diagramtyp entspricht
function _lucanet_report_id_test($report_id, $typ)
{
    db_set_active();
    $query = db_select('lucanet_report', 'lr');
    $query->fields('lr',array('oid', 'typ')); //field_data_field_projekt_strasse_nr
    $query->condition('lr.id', $report_id, '=');
    $query->condition('lr.typ', $typ, '=');

    $result = $query->execute();
    foreach ($result as $record) {
    return true; // falls Treffer erzielt
    }
    return false; // falls kein Treffer.
}



// Rohertrag berechnen
/* $peri=1 -> vj, $peri=2 -> ist, $peri=3 -> plan, $typ=1 kulumiert, $typ=2 einzeln */
function _lucanet_report_rohertrag($peri = NULL, $typ = NULL)
{
$kd_nr = _lucanet_report_kundennamen_call(); // $kd_nr z.B. 1125
$w_jahr = _lucanet_report_wirtschaftsjahr_call(); // Wirtschaftsjahr, aus taxonomy - z.B. 09 (für September)
$last_import = _lucanet_report_get_last_date($kd_nr); // 2016-02-01
$wert = '';
// Falls letzte Lieferung vor dem WJ Vorliegt - das Jahr von der Lieferung == IST Jahr Beginn
// Ist, Plan und VJ Werte

if (substr($last_import,5,2)<$w_jahr)
    {
    $start_date = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date= $last_import;

    $start_date_vj = (substr($last_import,0,4)-2).'-'.$w_jahr.'-01';
    $end_date_jtd= (substr($last_import,0,4)-1).'-'.substr($last_import,5,2).'-01';
    }
    else if (substr($last_import,5,2)>$w_jahr)
    {
    $start_date = (substr($last_import,0,4)).'-'.$w_jahr.'-01';
    $end_date= $last_import;
    $start_date_vj = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date_jtd= (substr($last_import,0,4)-1).'-'.substr($last_import,5,2).'-01';
    }
    // neu
    else if (substr($last_import,5,2)==$w_jahr)
    {
    $start_date = (substr($last_import,0,4)).'-'.$w_jahr.'-01';
    $end_date= $last_import;
    $start_date_vj = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date_jtd= date("Y-m-d", strtotime("-1 months", strtotime($last_import)));
    }


    $monate = array('Jan', 'Feb', 'März', 'Apr', 'Mai', 'Jun', 'Jul', 'Aug', 'Sep', 'Okt', 'Nov', 'Dez');
    $monate_neu = array();
    for ($i = 0; $i <= 11; $i++) {
        $monate_neu[] = $monate[($i+intval($w_jahr)-1) % 12]; // Wirtschaftjahr
}

// WENN peri = 1
if ($peri == 1 && $typ ==1) // vj, kum
    {
        //kum von VJ Werten
        $vhr_2399942_vj = _lucanet_report_get_betrag_sum('VHR_2399942', $start_date_vj, $end_date_jtd, $kd_nr);
        $vhr_2465362_vj = _lucanet_report_get_betrag_sum('VHR_2465362', $start_date_vj, $end_date_jtd, $kd_nr);
        //$vhr_2465367_vj = _lucanet_report_get_betrag_sum('VHR_2465367', $start_date_vj, $end_date_jtd, $kd_nr);

        //OID_1800
        $vhr_2465367_vj = _lucanet_report_get_oid_value_guv('VHR_2465367', $start_date_vj, $end_date_jtd, $kd_nr);
        $vhr_2407142_vj = _lucanet_report_get_oid_value_guv('VHR_2407142', $start_date_vj, $end_date_jtd, $kd_nr);
        $vhr_12881_vj = _lucanet_report_get_oid_value_guv('VHR_12881', $start_date_vj, $end_date_jtd, $kd_nr);

        $wert = floatval($vhr_2399942_vj)+floatval($vhr_2465362_vj)+floatval($vhr_2465367_vj)+floatval($vhr_2407142_vj)-floatval($vhr_12881_vj);
    }

else if ($peri == 2 && $typ ==1) // ist, kum
    {

    //kum von IST Werten
    $vhr_2399942 = _lucanet_report_get_betrag_sum('VHR_2399942', $start_date, $end_date, $kd_nr);
    $vhr_2465362 = _lucanet_report_get_betrag_sum('VHR_2465362', $start_date, $end_date, $kd_nr);
    //$vhr_2465367 = _lucanet_report_get_betrag_sum('vhr_2465367', $start_date, $end_date, $kd_nr);

    //OID_1800
    $vhr_2465367 = _lucanet_report_get_oid_value_guv('VHR_2465367', $start_date, $end_date, $kd_nr);
    $vhr_2407142 = _lucanet_report_get_oid_value_guv('VHR_2407142', $start_date, $end_date, $kd_nr);
    $vhr_12881 = _lucanet_report_get_oid_value_guv('VHR_12881', $start_date, $end_date, $kd_nr);

    $wert = floatval($vhr_2399942)+floatval($vhr_2465362)+floatval($vhr_2465367)+floatval($vhr_2407142)-floatval($vhr_12881);
}

else if ($peri == 3 && $typ ==1) // plan, kum
    {
    //kum von PLAN Werten
    $vhr_2399942 = _lucanet_report_get_betrag_sum_plan('VHR_2399942', $start_date, $end_date, $kd_nr);
    $vhr_2465362 = _lucanet_report_get_betrag_sum_plan('VHR_2465362', $start_date, $end_date, $kd_nr);
    //$vhr_2465367 = _lucanet_report_get_betrag_sum('vhr_2465367', $start_date, $end_date, $kd_nr);

    //OID_1800
    $vhr_2465367 = _lucanet_report_get_oid_value_guv_plan('VHR_2465367', $start_date, $end_date, $kd_nr);
    $vhr_2407142 = _lucanet_report_get_oid_value_guv_plan('VHR_2407142', $start_date, $end_date, $kd_nr);
    $vhr_12881 = _lucanet_report_get_oid_value_guv_plan('VHR_12881', $start_date, $end_date, $kd_nr);

    //dsm($vhr_12881);
    $wert = floatval($vhr_2399942)+floatval($vhr_2465362)+floatval($vhr_2465367)+floatval($vhr_2407142)-floatval($vhr_12881);}

else if ($peri == 2 && $typ ==2) // ist, aktuell
{

    //kum von IST Werten
    $vhr_2399942 = _lucanet_report_get_betrag_sum('VHR_2399942', $end_date, $end_date, $kd_nr);
    $vhr_2465362 = _lucanet_report_get_betrag_sum('VHR_2465362', $end_date, $end_date, $kd_nr);
    //$vhr_2465367 = _lucanet_report_get_betrag_sum('vhr_2465367', $start_date, $end_date, $kd_nr);

    //OID_1800
    $vhr_2465367 = _lucanet_report_get_oid_value_guv('VHR_2465367', $end_date, $end_date, $kd_nr);
    $vhr_2407142 = _lucanet_report_get_oid_value_guv('VHR_2407142', $end_date, $end_date, $kd_nr);
    $vhr_12881 = _lucanet_report_get_oid_value_guv('VHR_12881', $end_date, $end_date, $kd_nr);

    $wert = floatval($vhr_2399942)+floatval($vhr_2465362)+floatval($vhr_2465367)+floatval($vhr_2407142)-floatval($vhr_12881);

    }
return $wert;
}



//2 - Funktion sollte nach dem Klick ausgeführt werden
function _lucanet_report_menu_call_back($form=NULL, &$form_state=NULL, $report_id=NULL, $gruppe_id=NULL) {
// ID Steuerung, je nach Diagramtyp (einfache Betrag Ergebnise, Parent-Child Beziehung, Tabellen ohne Highchart usw)
// Falls Tabelle ausgeben (id=5 und Weitere, dann kein Ergebnis liefern.)
    global $user;
    $projekt_nr = _lucanet_report_kundennamen_call();
    $query = db_select('dd_lucanet_setting_history_save', 'shs');
    //$query->condition('shs.user_id', array($user->uid));
    $query->condition('shs.report_id', $report_id);
    $query->condition('shs.gruppe_id', $gruppe_id);
    $query->condition('shs.projekt_id', $projekt_nr);
    $query->fields('shs');
    $query_result = $query->execute()->fetchAll();

    if (!empty($query_result)) {
        $lucanet_setting_data = unserialize($query_result[0]->lucanet_data);
        $lucanet_array_setting_v = explode(',', $lucanet_setting_data['visible_graph']); // false, false, true
        $lucanet_array_setting_IST = $lucanet_setting_data['IST']; // Radio Buttons
        // Array ( [visible_graph] => false,false,true [IST] => a)
    } else {
        $lucanet_array_setting_v = 0;
        $lucanet_array_setting_IST = 0;
    }

// Falls ID = 1,3,4 (momentan der Rest)
//$fil_value = _lucanet_report_tax_call(); // z.B. id 23
$kd_nr = _lucanet_report_kundennamen_call(); // $kd_nr z.B. 1125
$w_jahr = _lucanet_report_wirtschaftsjahr_call(); // Wirtschaftsjahr, aus taxonomy - z.B. 09 (für September)

// letzte Lieferung Jahr
$last_import = _lucanet_report_get_last_date($kd_nr); // 2016-02-01


// Falls letzte Lieferung vor dem WJ Vorliegt - das Jahr von der Lieferung == IST Jahr Beginn
// Ist, Plan und VJ Werte
    if (substr($last_import,5,2)<$w_jahr)
    {
    $start_date = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date= $last_import;

    $start_date_vj = (substr($last_import,0,4)-2).'-'.$w_jahr.'-01';
    $end_date_jtd= (substr($last_import,0,4)-1).'-'.substr($last_import,5,2).'-01';
    }
    else if (substr($last_import,5,2)>$w_jahr)
    {
    $start_date = (substr($last_import,0,4)).'-'.$w_jahr.'-01';
    $end_date= $last_import;
    $start_date_vj = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date_jtd= (substr($last_import,0,4)-1).'-'.substr($last_import,5,2).'-01';
    }
    // neu
    else if (substr($last_import,5,2)==$w_jahr)
    {
    $start_date = (substr($last_import,0,4)).'-'.$w_jahr.'-01';
    $end_date= $last_import;
    $start_date_vj = (substr($last_import,0,4)-1).'-'.$w_jahr.'-01';
    $end_date_jtd= date("Y-m-d", strtotime("-1 months", strtotime($last_import)));
    }
    // nue

    $monate = array('Jan', 'Feb', 'März', 'Apr', 'Mai', 'Jun', 'Jul', 'Aug', 'Sep', 'Okt', 'Nov', 'Dez');
    $monate_neu = array();
    for ($i = 0; $i <= 11; $i++) {
        $monate_neu[] = $monate[($i+intval($w_jahr)-1) % 12]; // Wirtschaftjahr
} // callback


function diffInMonths($date1,$date2)
{
    $diff =  $date1->diff($date2);

    $months = $diff->y * 12 + $diff->m + $diff->d / 30;

    return (int) round($months);
}


// VARIABLEN DEKLARATION
// Falls Grafik mit dem Typ 1 und nur eine OID
if ($kd_nr !=0 && $report_id == 3) // momentan nur IDs 1,3,4
{
    // Verbinden mit lucanet_susa ist wert
    try{
    $oid_grafik = _lucanet_report_get_oid_array($report_id, 0);
    // liefert eine eingetragene OID, keine Parent Child Beziehug. Statisch kann auch vergeben werden!
    //dsm($oid_grafik);

    // IST und VJ
    db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, 'IN');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->condition('b.datum', array($start_date_vj, $end_date), 'BETWEEN');
    $result = $query->execute();
    //db_set_active();
    $lucanet_value = array();
    $liegt_vor = 0;
    foreach ($result as $row) {
    $lucanet_value[] = array($row->daten, $row->Value, "D".substr($row->datum,0,4).substr($row->datum,5,2));
        // Prüfen, ob das kleinste Datum vorliegt, sonst Warnung ausgeben
        if ($row->datum == $start_date_vj)
        {$liegt_vor = 1;
        } // Test, ob alle Daten vorliegen
    }// foreach
    $query = NULL;

    /*
    // Die Vorjahre selektieren
    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, 'IN');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->condition('b.datum', array(date("Y-m-d", strtotime("-36 months", strtotime($start_date_vj))), date("Y-m-d", strtotime("-1 months", strtotime($start_date_vj)))), 'BETWEEN');
    $result = $query->execute();
    //db_set_active();
    $lucanet_value_vor = array();
    foreach ($result as $row) {
    $lucanet_value_vor[] = array($row->daten, $row->Value, "D".substr($row->datum,0,4).substr($row->datum,5,2));
    }// foreach
    $query = NULL;
    */

    // V3
    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, 'IN');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->condition('b.datum', array(date("Y-m-d", strtotime("-36 months", strtotime($start_date_vj))), date("Y-m-d", strtotime("-25 months", strtotime($start_date_vj)))), 'BETWEEN');
    $result = $query->execute();
    //db_set_active();
    $lucanet_value_vor3 = array();
    foreach ($result as $row) {
    $lucanet_value_vor3[] = array($row->daten, $row->Value, "D".substr($row->datum,0,4).substr($row->datum,5,2));
    }// foreach
    $query = NULL;

    // V2

    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, 'IN');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->condition('b.datum', array(date("Y-m-d", strtotime("-24 months", strtotime($start_date_vj))), date("Y-m-d", strtotime("-13 months", strtotime($start_date_vj)))), 'BETWEEN');
    $result = $query->execute();
    //db_set_active();
    $lucanet_value_vor2 = array();
    foreach ($result as $row) {
    $lucanet_value_vor2[] = array($row->daten, $row->Value, "D".substr($row->datum,0,4).substr($row->datum,5,2));
    }// foreach
    $query = NULL;

    // V1
    // Die Vorjahre selektieren
    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, 'IN');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->condition('b.datum', array(date("Y-m-d", strtotime("-12 months", strtotime($start_date_vj))), date("Y-m-d", strtotime("-1 months", strtotime($start_date_vj)))), 'BETWEEN');
    $result = $query->execute();
    //db_set_active();
    $lucanet_value_vor1 = array();
    foreach ($result as $row) {
    $lucanet_value_vor1[] = array($row->daten, $row->Value, "D".substr($row->datum,0,4).substr($row->datum,5,2));
    }// foreach
    $query = NULL;



    // PLAN
    //db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, 'IN');
    $query->condition('b.Datenebene', "OID_2465009", '='); // PLAN
    $query->condition('b.datum', array($start_date, date("Y-m-d", strtotime("+12 months", strtotime($start_date)))), 'BETWEEN');
    $result = $query->execute();
    db_set_active();

    if ($liegt_vor == 0)
    {
         drupal_set_message(t('Daten evtl. nicht vollständig'), 'warning');
    }

    $lucanet_value_plan = array();
    foreach ($result as $row) {
    $lucanet_value_plan[] = array($row->daten, $row->Value, "D".substr($row->datum,0,4).substr($row->datum,5,2));
    // $lucanet_valu[VHR_12345][0] = [Steuer][-523434.2]
    }// foreach
    $query = NULL;


    // Vorcast berechnen:
    end($lucanet_value);         // move the internal pointer to the end of the array
    $key_forcast = key($lucanet_value)-12;  // fetches the key of the element pointed to by the internal pointer



    // Statistische Anpassung
    // IST
    //  _lucanet_report_get_oid_value_guv

    $stat_anpassung = array();
    for ($i=0; $i<12; $i++)
    {
        $stat_anpassung[$i] = _lucanet_report_get_betrag_sum('VHR_2417954', date("Y-m-d", strtotime("+".$i." months", strtotime($start_date))), date("Y-m-d", strtotime("+".$i." months", strtotime($start_date))), $kd_nr);
    }

    // PLAN
    // _lucanet_report_get_oid_value_guv_plan
    $stat_anpassung_plan = array();
    for ($i=0; $i<12; $i++)
    {
        $stat_anpassung_plan[$i] = _lucanet_report_get_betrag_sum_plan('VHR_2417954', date("Y-m-d", strtotime("+".$i." months", strtotime($start_date))), date("Y-m-d", strtotime("+".$i." months", strtotime($start_date))), $kd_nr);
    };

    // VJ
    $stat_anpassung_vj = array();
    for ($i=0; $i<12; $i++)
    {
        $stat_anpassung_vj[$i] = _lucanet_report_get_betrag_sum('VHR_2417954', date("Y-m-d", strtotime("+".$i." months", strtotime($start_date_vj))), date("Y-m-d", strtotime("+".$i." months", strtotime($start_date_vj))), $kd_nr);
    }


    // VJ-1
    $stat_anpassung_vj2 = array();
    for ($i=0; $i<12; $i++)
    {
        $stat_anpassung_vj2[$i] = _lucanet_report_get_betrag_sum('VHR_2417954', date("Y-m-d", strtotime("+".$i-(12)." months", strtotime($start_date_vj))), date("Y-m-d", strtotime("+".$i-(12)." months", strtotime($start_date_vj))), $kd_nr);
    }


    // VJ-2
    $stat_anpassung_vj3 = array();
    for ($i=0; $i<12; $i++)
    {
        $stat_anpassung_vj3[$i] = _lucanet_report_get_betrag_sum('VHR_2417954', date("Y-m-d", strtotime("+".$i-(24)." months", strtotime($start_date_vj))), date("Y-m-d", strtotime("+".$i-(24)." months", strtotime($start_date_vj))), $kd_nr);
    }

    // VJ-3
    $stat_anpassung_vj4 = array();
    for ($i=0; $i<12; $i++)
    {
        $stat_anpassung_vj4[$i] = _lucanet_report_get_betrag_sum('VHR_2417954', date("Y-m-d", strtotime("+".$i-(24)." months", strtotime($start_date_vj))), date("Y-m-d", strtotime("+".$i-(24)." months", strtotime($start_date_vj))), $kd_nr);
    }


}
catch (Exception $e) {
    db_set_active();
    drupal_set_message(t('Error'),'error');
}
}// if ($kd_nr !=0)



// Falls Parent Child Beziehung, mit mehreren OIDs - nur report_id = 6
else if ($kd_nr !=0 && $report_id == 6)
{
    // Einzelne Werte abrufen. Diese werden in der sql Prozedur kumuliet.
    // Hier zwischen Report_ID unterscheiden, da es unterschiedliche Anzahl an OIDs abgelesen wird
    // Alle OIDs selektieren, die zur report_id zugeordnet sind.
    $oids[] = array();
    $title = '';
    $query = db_select('lucanet_report', 'lr');
    $query->join('lucanet_report_parent_ids', 't', 't.report_id = lr.id');
    $query->fields('t',array('oid'));
    $query->fields('lr',array('name'));
    $query->condition('t.report_id', $report_id, '=');
    //$query->condition('t.oid', '', '!=');
    $result = $query->execute();
        foreach ($result as $record) {
        $oids[] = $record->oid;
        $title = $record->name;
    }

    // Die Namen für OIDs selektieren
    db_set_active('lucanet_susa');
    //$query = 'SELECT get_oid_direkt(VHR_1710, "2016-03-01", 1149, Debit) AS get_oid_direkt;';
    $query = db_select('table_view_guv2', 'tv')
      ->fields('tv', array('Name', 'UID'))
      ->condition('tv.UID', array($oids), 'IN');
    $result = $query->execute();
    db_set_active();

    $zuor = array();
    foreach ($result as $record) {
        $zuor[$record->UID] = $record->Name;
    }

    $wert1_ges = 0;
    $wert2_ges = 0;

    for ($i=1; $i < count($oids); $i++)
    {
        // OID_2465599 (die Werte kämen in den Zähler)
        // Parent Child Beziehung OID_2465599 (Credit Debit)

        // Einzelne Werte+Namen für den Zähler
        $wert1 = _lucanet_report_get_oid_value_guv2($oids[$i], $start_date, $end_date, $kd_nr);
        $wert2 = _lucanet_report_get_oid_value_guv2($oids[$i], $start_date_vj, $end_date_jtd, $kd_nr);

        $wert_ist[$oids[$i]] = array($wert1,$zuor[$oids[$i]]) ;
        $wert_vj[$oids[$i]] = array($wert2,$zuor[$oids[$i]]);
    }

    //kum von IST Werten
    $vhr_2399942 = _lucanet_report_get_betrag_sum('VHR_2399942', $start_date, $end_date, $kd_nr);
    $vhr_2465362 = _lucanet_report_get_betrag_sum('VHR_2465362', $start_date, $end_date, $kd_nr);
    //$vhr_2465367 = _lucanet_report_get_betrag_sum('vhr_2465367', $start_date, $end_date, $kd_nr);

    //OID_1800
    $vhr_2465367 = _lucanet_report_get_oid_value_guv('VHR_2465367', $start_date, $end_date, $kd_nr);
    $vhr_2407142 = _lucanet_report_get_oid_value_guv('VHR_2407142', $start_date, $end_date, $kd_nr);
    $vhr_12881 = _lucanet_report_get_oid_value_guv('VHR_12881', $start_date, $end_date, $kd_nr);

    $wert1_ges = floatval($vhr_2399942)+floatval($vhr_2465362)+floatval($vhr_2465367)+floatval($vhr_2407142)-floatval($vhr_12881);


    //dsm($wert1_ges);

    //kum von VJ Werten
    $vhr_2399942_vj = _lucanet_report_get_betrag_sum('VHR_2399942', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465362_vj = _lucanet_report_get_betrag_sum('VHR_2465362', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465367_vj = _lucanet_report_get_betrag_sum('VHR_2465367', $start_date_vj, $end_date_jtd, $kd_nr);

    //OID_1800
    //$vhr_2465367_vj = _lucanet_report_get_oid_value_guv('VHR_2465367', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2407142_vj = _lucanet_report_get_oid_value_guv('VHR_2407142', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_12881_vj = _lucanet_report_get_oid_value_guv('VHR_12881', $start_date_vj, $end_date_jtd, $kd_nr);

    $wert2_ges = floatval($vhr_2399942_vj)+floatval($vhr_2465362_vj)+floatval($vhr_2465367_vj)+floatval($vhr_2407142_vj)-floatval($vhr_12881_vj);
    //dsm($vhr_12881);
    //dsm($wert1_ges);
    //dsm($wert2_ges);
}

//Falls Tabelle
else if ($kd_nr !=0 && _lucanet_report_id_test($report_id, '3') == TRUE)
{
    return 0;
}



//Falls Tabelle
else if ($kd_nr !=0 && $report_id == 7)
{
    // Daten für Wasserfalldiagramm
    // Einzelne Werte abrufen. Diese werden in der sql Prozedur kumuliet.
    // Hier zwischen Report_ID unterscheiden, da es unterschiedliche Anzahl an OIDs abgelesen wird
    // Alle OIDs selektieren, die zur report_id zugeordnet sind.

    // 2399944 Jahresergebnis vor Steuern (ersetzt 2469285) (betrag)
    // 2465698 Handel NW (table_view_guv2 & table_view_guv2_plan)
    // 2465618 Vermietung (table_view_guv2 & table_view_guv2_plan)
    // 2465619 Werkstatt (table_view_guv2 & table_view_guv2_plan)
    // 2465620 Teile & Shop (table_view_guv2 & table_view_guv2_plan)
    // 2465611 PKW (table_view_guv2 & table_view_guv2_plan)
    // 2467210 Betriebliche Aufwendungen --- (table_view_guv2 & table_view_guv2_plan)
    /* 2467148, 2467149, 2467150, 2467151, 2467152, 2467153, 2467154 */

    // 10042044 Handel GW + MW
    /* summe aus 2465699, 2465700 (table_view_guv2 & table_view_guv2_plan)
    */
    // 2467221 AO-Ergebnis
    /* summe aus 2467158 und 2467159 (table_view_guv2 & table_view_guv2_plan)
    */
    // 10042045 Sonstige Geschäftsbereiche
    /* 2407228, 2465368, 2465369, 2465370, 2417951, 12825, 2400290 (betrag)
    */

    // IST
    $vhr_2399944 = _lucanet_report_get_betrag_sum('VHR_2399944', $start_date, $end_date, $kd_nr);
    $vhr_2465698 = _lucanet_report_get_oid_value_guv2('VHR_2465698', $start_date, $end_date, $kd_nr);
    $vhr_2465618 = _lucanet_report_get_oid_value_guv2('VHR_2465618', $start_date, $end_date, $kd_nr);
    $vhr_2465619 = _lucanet_report_get_oid_value_guv2('VHR_2465619', $start_date, $end_date, $kd_nr);
    $vhr_2465620 = _lucanet_report_get_oid_value_guv2('VHR_2465620', $start_date, $end_date, $kd_nr);
    $vhr_2465611 = _lucanet_report_get_oid_value_guv2('VHR_2465611', $start_date, $end_date, $kd_nr);

    // 2469285 = 2399944 - 2417954
    //Betriebliche Aufwendungen
    $vhr_2467148 = _lucanet_report_get_oid_value_guv2('VHR_2467148', $start_date, $end_date, $kd_nr);
    $vhr_2467149 = _lucanet_report_get_oid_value_guv2('VHR_2467149', $start_date, $end_date, $kd_nr);
    $vhr_2467150 = _lucanet_report_get_oid_value_guv2('VHR_2467150', $start_date, $end_date, $kd_nr);
    $vhr_2467151 = _lucanet_report_get_oid_value_guv2('VHR_2467151', $start_date, $end_date, $kd_nr);
    $vhr_2467152 = _lucanet_report_get_oid_value_guv2('VHR_2467152', $start_date, $end_date, $kd_nr);
    $vhr_2467153 = _lucanet_report_get_oid_value_guv2('VHR_2467153', $start_date, $end_date, $kd_nr);
    $vhr_2467154 = _lucanet_report_get_oid_value_guv2('VHR_2467154', $start_date, $end_date, $kd_nr);

    $vhr_2467210 =
    floatval($vhr_2467148)+
    floatval($vhr_2467149)+
    floatval($vhr_2467150)+
    floatval($vhr_2467151)+
    floatval($vhr_2467152)+
    floatval($vhr_2467153)+
    floatval($vhr_2467154);

    //Handel GW + MW
    $vhr_2465699 = _lucanet_report_get_oid_value_guv2('VHR_2465699', $start_date, $end_date, $kd_nr);
    $vhr_2465700 = _lucanet_report_get_oid_value_guv2('VHR_2465700', $start_date, $end_date, $kd_nr);
    $vhr_10042044 = floatval($vhr_2465699) + floatval($vhr_2465700);

    //AO-Ergebnis
    $vhr_2467158 = _lucanet_report_get_oid_value_guv2('VHR_2467158', $start_date, $end_date, $kd_nr);
    $vhr_2467159 = _lucanet_report_get_oid_value_guv2('VHR_2467159', $start_date, $end_date, $kd_nr);
    $vhr_2467221 =
    floatval($vhr_2467158) +
    floatval($vhr_2467159);

    //Sonstige Geschäftsbereiche
    $vhr_2407228 = _lucanet_report_get_betrag_sum('VHR_2407228', $start_date, $end_date, $kd_nr);
    $vhr_2465368 = _lucanet_report_get_betrag_sum('VHR_2465368', $start_date, $end_date, $kd_nr);
    $vhr_2465369 = _lucanet_report_get_betrag_sum('VHR_2465369', $start_date, $end_date, $kd_nr);
    $vhr_2465370 = _lucanet_report_get_betrag_sum('VHR_2465370', $start_date, $end_date, $kd_nr);
    $vhr_2417951 = _lucanet_report_get_betrag_sum('VHR_2417951', $start_date, $end_date, $kd_nr);
    $vhr_12825 = _lucanet_report_get_betrag_sum('VHR_12825', $start_date, $end_date, $kd_nr);
    $vhr_2400290 = _lucanet_report_get_betrag_sum('VHR_2400290', $start_date, $end_date, $kd_nr);

    $vhr_2668565  = _lucanet_report_get_oid_value_guv2('VHR_2668565', $start_date, $end_date, $kd_nr);
    $vhr_2407266  = _lucanet_report_get_betrag_sum('VHR_2407266', $start_date, $end_date, $kd_nr);
    $vhr_12881  = _lucanet_report_get_oid_value_guv('VHR_12881', $start_date, $end_date, $kd_nr);
    $vhr_2467156  = _lucanet_report_get_oid_value_guv2('VHR_2467156', $start_date, $end_date, $kd_nr);

    $vhr_10042045 =
    floatval($vhr_2407228)+
    floatval($vhr_2465368)+
    floatval($vhr_2465369)+
    floatval($vhr_2465370)+
    floatval($vhr_2417951)+
    floatval($vhr_12825)+
    floatval($vhr_2400290)+

    floatval($vhr_2668565)+
    floatval($vhr_2407266)+
    floatval($vhr_12881)+
    floatval($vhr_2467156);


    // VJ
    $vhr_2399944_vj = _lucanet_report_get_betrag_sum('VHR_2399944', $start_date_vj, $end_date_jtd, $kd_nr);

    $vhr_2465698_vj = _lucanet_report_get_oid_value_guv2('VHR_2465698', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465618_vj = _lucanet_report_get_oid_value_guv2('VHR_2465618', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465619_vj = _lucanet_report_get_oid_value_guv2('VHR_2465619', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465620_vj = _lucanet_report_get_oid_value_guv2('VHR_2465620', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465611_vj = _lucanet_report_get_oid_value_guv2('VHR_2465611', $start_date_vj, $end_date_jtd, $kd_nr);

    // 2467210 Betriebliche Aufwendungen
    $vhr_2467148_vj = _lucanet_report_get_oid_value_guv2('VHR_2467148', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467149_vj = _lucanet_report_get_oid_value_guv2('VHR_2467149', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467150_vj = _lucanet_report_get_oid_value_guv2('VHR_2467150', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467151_vj = _lucanet_report_get_oid_value_guv2('VHR_2467151', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467152_vj = _lucanet_report_get_oid_value_guv2('VHR_2467152', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467153_vj = _lucanet_report_get_oid_value_guv2('VHR_2467153', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467154_vj = _lucanet_report_get_oid_value_guv2('VHR_2467154', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467210_vj =
    floatval($vhr_2467148_vj)+
    floatval($vhr_2467149_vj)+
    floatval($vhr_2467150_vj)+
    floatval($vhr_2467151_vj)+
    floatval($vhr_2467152_vj)+
    floatval($vhr_2467153_vj)+
    floatval($vhr_2467154_vj);

    // 10042044 Handel GW + MW
    $vhr_2465699_vj = _lucanet_report_get_oid_value_guv2('VHR_2465699', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465700_vj = _lucanet_report_get_oid_value_guv2('VHR_2465700', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_10042044_vj =
    floatval($vhr_2465699_vj) +
    floatval($vhr_2465700_vj);


    // 2467221 AO-Ergebnis
    $vhr_2467158_vj = _lucanet_report_get_oid_value_guv2('VHR_2467158', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467159_vj = _lucanet_report_get_oid_value_guv2('VHR_2467159', $start_date_vj, $end_date_jtd, $kd_nr);

    $vhr_2467221_vj =
    floatval($vhr_2467158_vj) +
    floatval($vhr_2467159_vj);

    // 10042045 Sonstige Geschäftsbereiche
    /* 2407228, 2465368, 2465369, 2465370, 2417951, 12825, 2400290 (betrag) */
    $vhr_2407228_vj = _lucanet_report_get_betrag_sum('VHR_2407228', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465368_vj = _lucanet_report_get_betrag_sum('VHR_2465368', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465369_vj = _lucanet_report_get_betrag_sum('VHR_2465369', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465370_vj = _lucanet_report_get_betrag_sum('VHR_2465370', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2417951_vj = _lucanet_report_get_betrag_sum('VHR_2417951', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_12825_vj = _lucanet_report_get_betrag_sum('VHR_12825', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2400290_vj = _lucanet_report_get_betrag_sum('VHR_2400290', $start_date_vj, $end_date_jtd, $kd_nr);

    $vhr_2668565_vj  = _lucanet_report_get_oid_value_guv2('VHR_2668565', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2407266_vj  = _lucanet_report_get_betrag_sum('VHR_2407266', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_12881_vj  = _lucanet_report_get_oid_value_guv('VHR_12881', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2467156_vj  = _lucanet_report_get_oid_value_guv2('VHR_2467156', $start_date_vj, $end_date_jtd, $kd_nr);

    $vhr_10042045_vj =
    floatval($vhr_2407228_vj)+
    floatval($vhr_2465368_vj)+
    floatval($vhr_2465369_vj)+
    floatval($vhr_2465370_vj)+
    floatval($vhr_2417951_vj)+
    floatval($vhr_12825_vj)+
    floatval($vhr_2400290_vj)+

    floatval($vhr_2668565_vj)+
    floatval($vhr_2407266_vj)+
    floatval($vhr_12881_vj)+
    floatval($vhr_2467156_vj);

    // PLAN
    $vhr_2399944_p = _lucanet_report_get_betrag_sum_plan('VHR_2399944', $start_date, $end_date, $kd_nr);

    $vhr_2465698_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2465698', $start_date, $end_date, $kd_nr);
    $vhr_2465618_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2465618', $start_date, $end_date, $kd_nr);
    $vhr_2465619_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2465619', $start_date, $end_date, $kd_nr);
    $vhr_2465620_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2465620', $start_date, $end_date, $kd_nr);
    $vhr_2465611_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2465611', $start_date, $end_date, $kd_nr);

    //Betriebliche Aufwendungen
    $vhr_2467148_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467148', $start_date, $end_date, $kd_nr);
    $vhr_2467149_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467149', $start_date, $end_date, $kd_nr);
    $vhr_2467150_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467150', $start_date, $end_date, $kd_nr);
    $vhr_2467151_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467151', $start_date, $end_date, $kd_nr);
    $vhr_2467152_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467152', $start_date, $end_date, $kd_nr);
    $vhr_2467153_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467153', $start_date, $end_date, $kd_nr);
    $vhr_2467154_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467154', $start_date, $end_date, $kd_nr);
    $vhr_2467210_p =
    floatval($vhr_2467148_p)+
    floatval($vhr_2467149_p)+
    floatval($vhr_2467150_p)+
    floatval($vhr_2467151_p)+
    floatval($vhr_2467152_p)+
    floatval($vhr_2467153_p)+
    floatval($vhr_2467154_p);

    //Handel GW + MW
    $vhr_2465699_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2465699', $start_date, $end_date, $kd_nr);
    $vhr_2465700_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2465700', $start_date, $end_date, $kd_nr);
    $vhr_10042044_p = floatval($vhr_2465699_p) + floatval($vhr_2465700_p);

    //AO-Ergebnis
    $vhr_2467158_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467158', $start_date, $end_date, $kd_nr);
    $vhr_2467159_p = _lucanet_report_get_oid_value_guv2_plan('VHR_2467159', $start_date, $end_date, $kd_nr);
    $vhr_2467221_p = floatval($vhr_2467158_p) + floatval($vhr_2467159_p);


    //Sonstige Geschäftsbereiche
    $vhr_2407228_p = _lucanet_report_get_betrag_sum_plan('VHR_2407228', $start_date, $end_date, $kd_nr);
    $vhr_2465368_p = _lucanet_report_get_betrag_sum_plan('VHR_2465368', $start_date, $end_date, $kd_nr);
    $vhr_2465369_p = _lucanet_report_get_betrag_sum_plan('VHR_2465369', $start_date, $end_date, $kd_nr);
    $vhr_2465370_p = _lucanet_report_get_betrag_sum_plan('VHR_2465370', $start_date, $end_date, $kd_nr);
    $vhr_2417951_p = _lucanet_report_get_betrag_sum_plan('VHR_2417951', $start_date, $end_date, $kd_nr);
    $vhr_12825_p = _lucanet_report_get_betrag_sum_plan('VHR_12825', $start_date, $end_date, $kd_nr);
    $vhr_2400290_p = _lucanet_report_get_betrag_sum_plan('VHR_2400290', $start_date, $end_date, $kd_nr);


    $vhr_2668565_p  = _lucanet_report_get_oid_value_guv2_plan('VHR_2668565', $start_date, $end_date, $kd_nr);
    $vhr_2407266_p  = _lucanet_report_get_betrag_sum_plan('VHR_2407266', $start_date, $end_date, $kd_nr);
    $vhr_12881_p  = _lucanet_report_get_oid_value_guv_plan('VHR_12881', $start_date, $end_date, $kd_nr);
    $vhr_2467156_p  = _lucanet_report_get_oid_value_guv2_plan('VHR_2467156', $start_date, $end_date, $kd_nr);

    $vhr_10042045_p =
    floatval($vhr_2407228_p)+
    floatval($vhr_2465368_p)+
    floatval($vhr_2465369_p)+
    floatval($vhr_2465370_p)+
    floatval($vhr_2417951_p)+
    floatval($vhr_12825_p)+
    floatval($vhr_2400290_p)+

    floatval($vhr_2668565_p)+
    floatval($vhr_2407266_p)+
    floatval($vhr_12881_p)+
    floatval($vhr_2467156_p)
    ;// Plan Ende

    //Delta IST
    //$vhr_2399944_d = $vhr_2399944 - $vhr_2399944_vj;
    $vhr_2465698_d = $vhr_2465698 - $vhr_2465698_vj;


    $vhr_2465618_d = $vhr_2465618 - $vhr_2465618_vj;
    $vhr_2465619_d = $vhr_2465619 - $vhr_2465619_vj;
    $vhr_2465620_d = $vhr_2465620 - $vhr_2465620_vj;
    $vhr_2465611_d = $vhr_2465611 - $vhr_2465611_vj;

    $vhr_2467210_d = $vhr_2467210  - $vhr_2467210_vj;
    $vhr_10042044_d = $vhr_10042044 - $vhr_10042044_vj;


    $vhr_2467221_d = $vhr_2467221 - $vhr_2467221_vj;
    $vhr_10042045_d = $vhr_10042045 - $vhr_10042045_vj;

    //Delta PLAN
    //$vhr_2399944_dp = $vhr_2399944_p - $vhr_2399944;
    $vhr_2465698_dp = $vhr_2465698_p - $vhr_2465698;
    $vhr_2465618_dp = $vhr_2465618_p - $vhr_2465618;
    $vhr_2465619_dp = $vhr_2465619_p - $vhr_2465619;
    $vhr_2465620_dp = $vhr_2465620_p - $vhr_2465620;
    $vhr_2465611_dp = $vhr_2465611_p - $vhr_2465611;

    $vhr_2467210_dp = $vhr_2467210_p  - $vhr_2467210;
    $vhr_10042044_dp = $vhr_10042044_p - $vhr_10042044;

    $vhr_2467221_dp = $vhr_2467221_p - $vhr_2467221;
    $vhr_10042045_dp = $vhr_10042045_p - $vhr_10042045;
        //drupal_set_message($vhr_10042045_p);
    /*
        $zuor['VHR_2399944'] =  'Jahresergebnis VJ';
        $zuor['VHR_2465698'] =  'Handel NW';
        $zuor['VHR_2465618'] =  'Handel GW + MW';
        $zuor['VHR_2465619'] =  'Vermietung';
        $zuor['VHR_2465620'] =  'Werkstatt';
        $zuor['VHR_2465611'] =  'Teile & Shop';
        $zuor['VHR_2467210'] =  'Betriebliche Aufwendungen';
        $zuor['VHR_10042044'] =  'Handel GW + MW';
        $zuor['VHR_2467221'] =  'AO-Ergebnis';
        $zuor['VHR_10042045'] =  'Sonstige Geschäftsbereiche';
    */

$delta_ist = array();
$delta_plan = array();
$werte = array(); //0 -ist, 1-vj, 2-plan

$werte['VHR_2399944_IST'] = array($vhr_2399944 - // statistische Anpassung
    _lucanet_report_get_betrag_sum('VHR_2417954', $start_date, $end_date, $kd_nr), 'Jahresergebnis IST');
$werte['VHR_2399944_PLAN'] = array($vhr_2399944_p - // statistische Anpassung
    _lucanet_report_get_betrag_sum_plan('VHR_2417954', $start_date, $end_date, $kd_nr), 'Jahresergebnis PLAN');
$werte['VHR_2399944_VJ'] = array($vhr_2399944_vj - // statistische Anpassung
    _lucanet_report_get_betrag_sum('VHR_2417954', $start_date_vj, $end_date_jtd, $kd_nr), 'Jahresergebnis VJ');

$delta_ist['VHR_2465698'] = array($vhr_2465698_d,'Handel NW');
$delta_ist['VHR_2465618'] = array($vhr_2465618_d,'Vermietung');
$delta_ist['VHR_2465619'] = array($vhr_2465619_d,'Werkstatt');
$delta_ist['VHR_2465620'] = array($vhr_2465620_d,'Teile & Shop');
$delta_ist['VHR_2465611'] = array($vhr_2465611_d,'PKW');
$delta_ist['VHR_2467210'] = array($vhr_2467210_d,'Betriebliche Aufwendungen');
$delta_ist['VHR_10042044'] = array($vhr_10042044_d,'Handel GW + MW');
$delta_ist['VHR_2467221'] = array($vhr_2467221_d,'AO-Ergebnis');
$delta_ist['VHR_10042045'] = array($vhr_10042045_d,'Sonstige Geschäftsbereiche');

$delta_plan['VHR_2465698'] = array($vhr_2465698_dp,'Handel NW');
$delta_plan['VHR_2465618'] = array($vhr_2465618_dp,'Vermietung');
$delta_plan['VHR_2465619'] = array($vhr_2465619_dp,'Werkstatt');
$delta_plan['VHR_2465620'] = array($vhr_2465620_dp,'Teile & Shop');
$delta_plan['VHR_2465611'] = array($vhr_2465611_dp,'PKW');
$delta_plan['VHR_2467210'] = array($vhr_2467210_dp,'Betriebliche Aufwendungen');
$delta_plan['VHR_10042044'] = array($vhr_10042044_dp,'Handel GW + MW');
$delta_plan['VHR_2467221'] = array($vhr_2467221_dp,'AO-Ergebnis');
$delta_plan['VHR_10042045'] = array($vhr_10042045_dp,'Sonstige Geschäftsbereiche');
}


// Daten fuer Betriebsvergleich vorbereiten.
else if ($kd_nr !=0 && $report_id == 8) //
{
    // Verbinden mit lucanet_susa ist wert
    try{
    $oid_grafik = 'VHR_2399944'; // Ergebnis vor Steuern
    // liefert eine eingetragene OID, keine Parent Child Beziehug. Statisch kann auch vergeben werden!

        // Subquery
        // Kunden_ID = 8. Nur falls manuell eingetragen - auswerten
        $subquery = db_select('taxonomy_term_data','tt')
        ->condition('tt.vid', '8', '=')
        ->fields('tt', array('name'));
        $result = $subquery->execute();

        $subquery_array = array();
        foreach ($result as $row) {
        $subquery_array[] = $row->name;
        }

    // Hauptquery
    // JE v. Steuer
    // Falls 1149 oder 1206, dann alle Kunden auslesen
    if ($kd_nr == '1149')
    {
    db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    $query->fields('b', array('daten', 'c_id'));
    $query->condition('b.c_id', '1206', '!=');

    $query->condition('b.c_id', array('1130','1131','1139','1224','1293'), 'NOT IN'); // Edmund Kunden ausschliessen

    $query->condition('b.c_id', $subquery_array,'IN');
    //$query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    //$query->condition('b.datum', $end_date, '=');
    $query->condition('b.datum', array(date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');

    $query->groupBy('b.c_id');//GROUP BY user ID
    $query->groupBy('b.daten');//GROUP BY user ID

    $query->orderBy('gesamt_betrag', 'DESC');
    $result = $query->execute();
    }

// JE v. Steuer
    // Falls 1149 oder 1206, dann alle Kunden auslesen
    else if ($kd_nr == '1206')
    {
    db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    $query->fields('b', array('daten', 'c_id'));
    //$query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.c_id', '1149', '!=');

    $query->condition('b.c_id', array('1130','1131','1139','1224','1293'), 'NOT IN'); // Edmund Kunden ausschliessen

    $query->condition('b.c_id', $subquery_array,'IN');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    //$query->condition('b.datum', $end_date, '=');
    $query->condition('b.datum', array(date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');

    $query->groupBy('b.c_id');//GROUP BY user ID
    $query->groupBy('b.daten');//GROUP BY user ID

    $query->orderBy('gesamt_betrag', 'DESC');
    $result = $query->execute();
    }

    // Falls Edmund oder der Kunde von Edmund angemeldet
    else if ($kd_nr == '1130' || $kd_nr == '1131' || $kd_nr =='1139' || $kd_nr == '1224' || $kd_nr == '1293')
    {
    db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    $query->fields('b', array('daten', 'c_id'));
    //$query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.c_id', array('1130','1131','1139','1224','1293'), 'IN'); // Edmund Kunden ausschliessen

    $query->condition('b.c_id', $subquery_array,'IN');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    //$query->condition('b.datum', $end_date, '=');
    $query->condition('b.datum', array(date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');

    $query->groupBy('b.c_id');//GROUP BY user ID
    $query->groupBy('b.daten');//GROUP BY user ID

    $query->orderBy('gesamt_betrag', 'DESC');
    $result = $query->execute();
    }

    // sonst zwei Kunden ausschliessen
    else
    {
    db_set_active('lucanet_susa');
    $query = db_select('betrag', 'b');
    $query->fields('b', array('daten', 'c_id'));
    $query->condition('b.c_id', '1149', '!=');
    $query->condition('b.c_id', '1206', '!=');
    $query->condition('b.c_id', array('1130','1131','1139','1224','1293'), 'NOT IN'); // Edmund Kunden ausschliessen
    $query->condition('b.c_id', $subquery_array,'IN');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.datenschluessel', $oid_grafik, '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    //$query->condition('b.datum', $end_date, '=');
    $query->condition('b.datum', array(date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');

    $query->groupBy('b.c_id');//GROUP BY Kunden ID
    $query->groupBy('b.daten');//GROUP BY user ID

    $query->orderBy('gesamt_betrag', 'DESC');
    $result = $query->execute();
    }

    // JE v. Steuer (a)
    $lucanet_value = array();
    $kd_nrs = array();

    $liegt_vor = 0;
    foreach ($result as $row) {
    $lucanet_value[] = array($row->c_id, $row->daten, $row->gesamt_betrag-intval(_lucanet_report_get_betrag_sum('VHR_2417954', strtotime("-11 months", strtotime($end_date)), $end_date, $row->c_id)));
    $kd_nrs[]=$row->c_id;
        // Zum Markieren des Wertes im Diagram
        if ($row->c_id == $kd_nr)
            {
            $value_to_mark = $row->gesamt_betrag-intval(_lucanet_report_get_betrag_sum('VHR_2417954', strtotime("-11 months", strtotime($end_date)), $end_date, $row->c_id));
            }
        }
        // array reorganisieren, multisort
        $dates = array();

        // Roertrag Firma (a)
        // While Kundennummer
        foreach ($lucanet_value as $key => $row) {
        // replace 0 with the field's index/key
        $dates[$key]  = $row[2];
        }
        array_multisort($dates, SORT_DESC, $lucanet_value);


// Betrieblicher Aufwand (b)
// Array abzufragen
$vhrs = array('VHR_2467148', 'VHR_2467149', 'VHR_2467150', 'VHR_2467151', 'VHR_2467152', 'VHR_2467153', 'VHR_2467154');

$lucanet_value_betr = array();
$value_to_mark_betr = '';
$i = 0;


// While Kundennummer
foreach($kd_nrs as $key=>$value){
$lucanet_value_betr[$i] = _lucanet_report_get_oid_value_guv2_array($vhrs, date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date, $value);

if ($value == $kd_nr)
    {
        $value_to_mark_betr = $lucanet_value_betr[$i];
    } $i++;
} // foreach

array_multisort($lucanet_value_betr, SORT_DESC, $lucanet_value_betr);


// Roertrag Firma (c)
// While Kundennummer
$lucanet_value_roh = array();
$value_to_mark_roh = '';
$i = 0;

foreach($kd_nrs as $key=>$value){

$VHR_2399942 = _lucanet_report_get_betrag_sum('VHR_2399942', date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date, $value);
$VHR_2465362 = _lucanet_report_get_betrag_sum('VHR_2465362', date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date, $value);
$VHR_2465367 = _lucanet_report_get_oid_value_guv2('VHR_2465367', date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date, $value);
$VHR_2407142 = _lucanet_report_get_oid_value_guv('VHR_2407142', date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date, $value);
$VHR_12881 = _lucanet_report_get_oid_value_guv('VHR_12881', date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date, $value);

$lucanet_value_roh[$i] = $VHR_2399942 + $VHR_2465362 + $VHR_2465367 + $VHR_2407142 - $VHR_12881;

if ($value == $kd_nr)
    {
        $value_to_mark_roh = $lucanet_value_roh[$i];
    } $i++;
} // foreach

array_multisort($lucanet_value_roh, SORT_DESC, $lucanet_value_roh);
//dsm($lucanet_value_betr);


// Roertrag Firma (d)
// While Kundennummer
$lucanet_value_ges = array();
$value_to_mark_ges = '';
$i = 0;

foreach($kd_nrs as $key=>$value){
$lucanet_value_ges[$i] = _lucanet_report_get_betrag_sum('VHR_2399940', date("Y-m-d", strtotime("-11 months", strtotime($end_date))), $end_date, $value);

if ($value == $kd_nr)
    {
        $value_to_mark_ges = $lucanet_value_ges[$i];
    } $i++;
} // foreach

array_multisort($lucanet_value_ges, SORT_DESC, $lucanet_value_ges);


    }
catch (Exception $e) {
    db_set_active();
    drupal_set_message(t('Error gr8'),'error');
    }

/*
u2  Rohertrag   lucanet://db=caravan&oid=2399942 - SUM
u7  Zinsen Mietpark lucanet://db=caravan&oid=2465362 - SUM
u8  Zinsen Mietpark PKW lucanet://db=caravan&oid=2465367 - GUV2
u6  AfA Mietpark    lucanet://db=caravan&oid=2407142 - GUV
u3  Sonstige betriebliche Erträge  lucanet://db=caravan&oid=12881 - GUV
*/
//u2 + u6 + u7 + u8 - u3

db_set_active();
}// ID 8

// Daten fuer Betriebsvergleich vorbereiten.
else if ($kd_nr !=0 && $report_id == '9') //
{
    $daten_vj = array();
    $daten_ist = array();
    $daten_plan = array();

    // IST
    // KOPIE AUS ID 6 für Rohertrag Nenner
    /*
    $vhr_2399942 = _lucanet_report_get_betrag_sum('VHR_2399942', $start_date, $end_date, $kd_nr);
    $vhr_2465362 = _lucanet_report_get_betrag_sum('VHR_2465362', $start_date, $end_date, $kd_nr);
    $vhr_2465367 = _lucanet_report_get_oid_value_guv('VHR_2465367', $start_date, $end_date, $kd_nr);
    $vhr_2407142 = _lucanet_report_get_oid_value_guv('VHR_2407142', $start_date, $end_date, $kd_nr);
    $vhr_12881 = _lucanet_report_get_oid_value_guv('VHR_12881', $start_date, $end_date, $kd_nr);
    $wert1_ist = floatval($vhr_2399942)+floatval($vhr_2465362)+floatval($vhr_2465367)+floatval($vhr_2407142)-floatval($vhr_12881);

    // PLAN
    $vhr_2399942_plan = _lucanet_report_get_betrag_sum_plan('VHR_2399942', $start_date, $end_date, $kd_nr);
    $vhr_2465362_plan = _lucanet_report_get_betrag_sum_plan('VHR_2465362', $start_date, $end_date, $kd_nr);
    $vhr_2465367_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2465367', $start_date, $end_date, $kd_nr);
    $vhr_2407142_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2407142', $start_date, $end_date, $kd_nr);
    $vhr_12881_plan = _lucanet_report_get_oid_value_guv_plan('VHR_12881', $start_date, $end_date, $kd_nr);
    $wert2_plan = floatval($vhr_2399942_plan)+floatval($vhr_2465362_plan)+floatval($vhr_2465367_plan)+floatval($vhr_2407142_plan)-floatval($vhr_12881_plan);
    // ENDE KOPIE AUS ID 6 für Rohertrag Nenner
*/
    ///////////////////
    // Handel NW (IST)
    // 2407115 / 2399940 (GUV1) Umsatz Zähler
    $vhr_2407115 = _lucanet_report_get_oid_value_guv('VHR_2407115', $start_date, $end_date, $kd_nr);
    $vhr_2465698 = _lucanet_report_get_oid_value_guv2('VHR_2465698', $start_date, $end_date, $kd_nr);
    //$vhr_2399940 = _lucanet_report_get_oid_value_guv('VHR_2399940', $start_date, $end_date, $kd_nr);

    //$vhr_handel_nw_umsatz = round(($vhr_2407115/$vhr_2399940),4); // Umsatz in Prozenten, (Breite Säule) /Gesamtumsatz
    //$vhr_handel_nw_rohertrag = round(($vhr_2465698/$wert1_ist),4);// Rohertrag in Prozenten (Schmale Säule) / floatval($vhr_2399942)+floatval($vhr_2465362)+floatval($vhr_2465367)+floatval($vhr_2407142)-floatval($vhr_12881)
    // Werte, keine Prozente
    $vhr_handel_nw_umsatz = $vhr_2407115;
    $vhr_handel_nw_rohertrag = $vhr_2465698;

    $daten_ist['vhr_handel_nw_umsatz'] = array(($vhr_handel_nw_umsatz),'Handel NW Umsatz IST');
    $daten_ist['vhr_handel_nw_rohertrag'] = array(($vhr_handel_nw_rohertrag),'Handel NW Rohertrag IST');

    ///////////////////
    // Handel NW (VJ)
    // 2407115 / 2399940 (GUV1) Umsatz Zähler
    $vhr_2407115 = _lucanet_report_get_oid_value_guv('VHR_2407115', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465698 = _lucanet_report_get_oid_value_guv2('VHR_2465698', $start_date_vj, $end_date_jtd, $kd_nr);
    //$vhr_2399940 = _lucanet_report_get_oid_value_guv('VHR_2399940', $start_date_vj, $end_date_jtd, $kd_nr);

    $vhr_handel_nw_umsatz = $vhr_2407115;
    $vhr_handel_nw_rohertrag = $vhr_2465698;

    $daten_vj['vhr_handel_nw_umsatz'] = array(($vhr_handel_nw_umsatz),'Handel NW Umsatz VJ');
    $daten_vj['vhr_handel_nw_rohertrag'] = array(($vhr_handel_nw_rohertrag),'Handel NW Rohertrag VJ');

    // Handel NW (PLAN)
    // 2465698 / $wert1_ist  Rohertrag
    $vhr_2407115_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2407115', $start_date, $end_date, $kd_nr);
    $vhr_2465698_plan = _lucanet_report_get_oid_value_guv2_plan('VHR_2465698', $start_date, $end_date, $kd_nr);
    $vhr_2399940_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2399940', $start_date, $end_date, $kd_nr);
    // dsm($vhr_2465698_plan); 46854
    //$vhr_handel_nw_plan_umsatz = round(($vhr_2407115_plan/$vhr_2399940_plan),4); // Umsatz in Prozenten, breite Balken
    //$vhr_handel_nw_plan_rohertrag = round(($vhr_2465698_plan/$wert2_plan),4); //Rohertrag in Prozenten

    $vhr_handel_nw_plan_umsatz = $vhr_2407115_plan;
    $vhr_handel_nw_plan_rohertrag = $vhr_2465698_plan;

    $daten_plan['vhr_handel_nw_umsatz'] = array($vhr_handel_nw_plan_umsatz,'Handel NW Umsatz Plan');
    $daten_plan['vhr_handel_nw_rohertrag'] = array($vhr_handel_nw_plan_rohertrag,'Handel NW Rohertrag Plan');



    ////// Handel GW (IST)
    $vhr_2407119 = _lucanet_report_get_oid_value_guv('VHR_2407119', $start_date, $end_date, $kd_nr);
    $vhr_2465699 = _lucanet_report_get_oid_value_guv2('VHR_2465699', $start_date, $end_date, $kd_nr);
    //$vhr_handel_gw_umsatz = round(($vhr_2407119/$vhr_2399940),4); // Umsatz in Prozenten, (Breite Säule)
    //$vhr_handel_gw_rohertrag = round(($vhr_2465699/$wert1_ist),4);// Rohertrag in Prozenten (Schmale Säule)
    $vhr_handel_gw_umsatz = $vhr_2407119;
    $vhr_handel_gw_rohertrag = $vhr_2465699;

    $daten_ist['vhr_handel_gw_umsatz'] = array($vhr_handel_gw_umsatz,'Handel GW Umsatz IST');
    $daten_ist['vhr_handel_gw_rohertrag'] = array($vhr_handel_gw_rohertrag,'Handel GW Rohertrag IST');

    ////// Handel GW (VJ)
    $vhr_2407119 = _lucanet_report_get_oid_value_guv('VHR_2407119', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465699 = _lucanet_report_get_oid_value_guv2('VHR_2465699', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_handel_gw_umsatz = $vhr_2407119;
    $vhr_handel_gw_rohertrag = $vhr_2465699;

    $daten_vj['vhr_handel_gw_umsatz'] = array($vhr_handel_gw_umsatz,'Handel GW Umsatz VJ');
    $daten_vj['vhr_handel_gw_rohertrag'] = array($vhr_handel_gw_rohertrag,'Handel GW Rohertrag VJ');

    // Handel GW (Plan)
    $vhr_2407119_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2407119', $start_date, $end_date, $kd_nr);
    $vhr_2465699_plan = _lucanet_report_get_oid_value_guv2_plan('VHR_2465699', $start_date, $end_date, $kd_nr);
    $vhr_handel_gw_umsatz_plan = $vhr_2407119_plan; // Umsatz in Prozenten, (Breite Säule)
    $vhr_handel_gw_rohertrag_plan = $vhr_2465699_plan;// Rohertrag in Prozenten (Schmale Säule)

    $daten_plan['vhr_handel_gw_umsatz'] = array($vhr_handel_gw_umsatz_plan,'Handel GW Umsatz PLAN');
    $daten_plan['vhr_handel_gw_rohertrag'] = array($vhr_handel_gw_rohertrag_plan,'Handel GW Rohertrag PLAN');


    // Handel MW (IST)
    $vhr_2407121 = _lucanet_report_get_oid_value_guv('VHR_2407121', $start_date, $end_date, $kd_nr);
    $vhr_2465700 = _lucanet_report_get_oid_value_guv2('VHR_2465700', $start_date, $end_date, $kd_nr);
    $vhr_handel_mw_umsatz = $vhr_2407121;
    $vhr_handel_mw_rohertrag = $vhr_2465700;// Rohertrag in Prozenten (Schmale Säule)

    $daten_ist['vhr_handel_mw_umsatz'] = array($vhr_handel_mw_umsatz,'Handel MW Umsatz IST');
    $daten_ist['vhr_handel_mw_rohertrag'] = array($vhr_handel_mw_rohertrag,'Handel MW Rohertrag IST');

    // Handel MW (VJ)
    $vhr_2407121 = _lucanet_report_get_oid_value_guv('VHR_2407121', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465700 = _lucanet_report_get_oid_value_guv2('VHR_2465700', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_handel_mw_umsatz = $vhr_2407121;
    $vhr_handel_mw_rohertrag = $vhr_2465700;// Rohertrag in Prozenten (Schmale Säule)

    $daten_vj['vhr_handel_mw_umsatz'] = array($vhr_handel_mw_umsatz,'Handel MW Umsatz VJ');
    $daten_vj['vhr_handel_mw_rohertrag'] = array($vhr_handel_mw_rohertrag,'Handel MW Rohertrag VJ');

    // Handel MW (Plan)
    $vhr_2407121_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2407121', $start_date, $end_date, $kd_nr);

    $vhr_2465700_plan = _lucanet_report_get_oid_value_guv2_plan('VHR_2465700', $start_date, $end_date, $kd_nr);
    $vhr_handel_mw_umsatz_plan = $vhr_2407121_plan; // Umsatz in Prozenten, (Breite Säule)
    $vhr_handel_mw_rohertrag_plan = $vhr_2465700_plan;// Rohertrag in Prozenten (Schmale Säule)

    $daten_plan['vhr_handel_mw_umsatz'] = array($vhr_handel_mw_umsatz_plan,'Handel MW Umsatz PLAN');
    $daten_plan['vhr_handel_mw_rohertrag'] = array($vhr_handel_mw_rohertrag_plan,'Handel MW Rohertrag PLAN');


    // Miete (IST)
    $vhr_2464226 = _lucanet_report_get_oid_value_guv('VHR_2464226', $start_date, $end_date, $kd_nr);
    $vhr_2465618 = _lucanet_report_get_oid_value_guv2('VHR_2465618', $start_date, $end_date, $kd_nr);
    $vhr_miete_umsatz = $vhr_2464226; // Umsatz in Prozenten, (Breite Säule)
    $vhr_miete_rohertrag = $vhr_2465618;// Rohertrag in Prozenten (Schmale Säule)

    $daten_ist['vhr_miete_umsatz'] = array($vhr_miete_umsatz,'Miete Umsatz IST');
    $daten_ist['vhr_miete_rohertrag'] = array($vhr_miete_rohertrag,'Miete Rohertrag IST');

    // Miete (VJ)
    $vhr_2464226 = _lucanet_report_get_oid_value_guv('VHR_2464226', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465618 = _lucanet_report_get_oid_value_guv2('VHR_2465618', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_miete_umsatz = $vhr_2464226; // Umsatz in Prozenten, (Breite Säule)
    $vhr_miete_rohertrag = $vhr_2465618;// Rohertrag in Prozenten (Schmale Säule)

    $daten_vj['vhr_miete_umsatz'] = array($vhr_miete_umsatz,'Miete Umsatz VJ');
    $daten_vj['vhr_miete_rohertrag'] = array($vhr_miete_rohertrag,'Miete Rohertrag VJ');


    // Miete (Plan)
    $vhr_2464226_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2464226', $start_date, $end_date, $kd_nr);
    $vhr_2465618_plan = _lucanet_report_get_oid_value_guv2_plan('VHR_2465618', $start_date, $end_date, $kd_nr);
    $vhr_miete_umsatz_plan = $vhr_2464226_plan; // Umsatz in Prozenten, (Breite Säule)
    $vhr_miete_rohertrag_plan = $vhr_2465618_plan;// Rohertrag in Prozenten (Schmale Säule)


    $daten_plan['vhr_miete_umsatz'] = array($vhr_miete_umsatz_plan,'Miete Umsatz PLAN');
    $daten_plan['vhr_miete_rohertrag'] = array($vhr_miete_rohertrag_plan,'Miete Rohertrag PLAN');


    // Werkstatt (IST)
    $vhr_2464227 = _lucanet_report_get_oid_value_guv('VHR_2464227', $start_date, $end_date, $kd_nr);
    $vhr_2465619 = _lucanet_report_get_oid_value_guv2('VHR_2465619', $start_date, $end_date, $kd_nr);
    $vhr_werkstatt_umsatz = $vhr_2464227; // Umsatz in Prozenten, (Breite Säule)
    $vhr_werkstatt_rohertrag = $vhr_2465619;// Rohertrag in Prozenten (Schmale Säule)

    $daten_ist['vhr_werkstatt_umsatz'] = array($vhr_werkstatt_umsatz,'Werkstatt Umsatz IST');
    $daten_ist['vhr_werkstatt_rohertrag'] = array($vhr_werkstatt_rohertrag,'Werkstatt Rohertrag IST');

    // Werkstatt (VJ)
    $vhr_2464227 = _lucanet_report_get_oid_value_guv('VHR_2464227', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465619 = _lucanet_report_get_oid_value_guv2('VHR_2465619', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_werkstatt_umsatz = $vhr_2464227; // Umsatz in Prozenten, (Breite Säule)
    $vhr_werkstatt_rohertrag = $vhr_2465619;// Rohertrag in Prozenten (Schmale Säule)

    $daten_vj['vhr_werkstatt_umsatz'] = array($vhr_werkstatt_umsatz,'Werkstatt Umsatz VJ');
    $daten_vj['vhr_werkstatt_rohertrag'] = array($vhr_werkstatt_rohertrag,'Werkstatt Rohertrag VJ');

    // Werkstatt (Plan)
    $vhr_2464227_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2464227', $start_date, $end_date, $kd_nr);
    $vhr_2465619_plan = _lucanet_report_get_oid_value_guv2_plan('VHR_2465619', $start_date, $end_date, $kd_nr);
    $vhr_werkstatt_umsatz_plan = $vhr_2464227_plan; // Umsatz in Prozenten, (Breite Säule)
    $vhr_werkstatt_rohertrag_plan = $vhr_2465619_plan;// Rohertrag in Prozenten (Schmale Säule)

    $daten_plan['vhr_werkstatt_umsatz'] = array($vhr_werkstatt_umsatz_plan,'Werkstatt Umsatz PLAN');
    $daten_plan['vhr_werkstatt_rohertrag'] = array($vhr_werkstatt_rohertrag_plan,'Werkstatt Rohertrag PLAN');


    // Teile & Shop (IST)
    $vhr_2464228 = _lucanet_report_get_oid_value_guv('VHR_2464228', $start_date, $end_date, $kd_nr);
    $vhr_2465620 = _lucanet_report_get_oid_value_guv2('VHR_2465620', $start_date, $end_date, $kd_nr);
    $vhr_teile_umsatz = $vhr_2464228; // Umsatz in Prozenten, (Breite Säule)
    $vhr_teile_rohertrag = $vhr_2465620;// Rohertrag in Prozenten (Schmale Säule)

    $daten_ist['vhr_teile_umsatz'] = array($vhr_teile_umsatz,'Teile & Shop Umsatz IST');
    $daten_ist['vhr_teile_rohertrag'] = array($vhr_teile_rohertrag,'Teile & Shop Rohertrag IST');

    // Teile & Shop (VJ)
    $vhr_2464228 = _lucanet_report_get_oid_value_guv('VHR_2464228', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465620 = _lucanet_report_get_oid_value_guv2('VHR_2465620', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_teile_umsatz = $vhr_2464228; // Umsatz in Prozenten, (Breite Säule)
    $vhr_teile_rohertrag = $vhr_2465620;// Rohertrag in Prozenten (Schmale Säule)

    $daten_vj['vhr_teile_umsatz'] = array($vhr_teile_umsatz,'Teile & Shop Umsatz VJ');
    $daten_vj['vhr_teile_rohertrag'] = array($vhr_teile_rohertrag,'Teile & Shop Rohertrag VJ');

    // Teile & Shop (Plan)
    $vhr_2464228_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2464228', $start_date, $end_date, $kd_nr);

    $vhr_2465620_plan = _lucanet_report_get_oid_value_guv2_plan('VHR_2465620', $start_date, $end_date, $kd_nr);
    $vhr_teile_umsatz_plan = $vhr_2464228_plan; // Umsatz in Prozenten, (Breite Säule)
    $vhr_teile_rohertrag_plan = $vhr_2465620_plan;// Rohertrag in Prozenten (Schmale Säule)

    $daten_plan['vhr_teile_umsatz'] = array($vhr_teile_umsatz_plan,'Teile & Shop Umsatz PLAN');
    $daten_plan['vhr_teile_rohertrag'] = array($vhr_teile_rohertrag_plan,'Teile & Shop Rohertrag PLAN');



    // Handel PKW (IST)
    $vhr_2464257 = _lucanet_report_get_oid_value_guv('VHR_2464257', $start_date, $end_date, $kd_nr);
    $vhr_2465611 = _lucanet_report_get_oid_value_guv2('VHR_2465611', $start_date, $end_date, $kd_nr);
    $vhr_handel_pkw_umsatz = $vhr_2464257; // Umsatz in Prozenten, (Breite Säule)
    $vhr_handel_pkw_rohertrag = $vhr_2465611;// Rohertrag in Prozenten (Schmale Säule)

    $daten_ist['vhr_handel_pkw_umsatz'] = array($vhr_handel_pkw_umsatz,'Handel PKW Umsatz IST');
    $daten_ist['vhr_handel_pkw_rohertrag'] = array($vhr_handel_pkw_rohertrag,'Handel PKW Rohertrag IST');

    // Handel PKW (VJ)
    $vhr_2464257 = _lucanet_report_get_oid_value_guv('VHR_2464257', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_2465611 = _lucanet_report_get_oid_value_guv2('VHR_2465611', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_handel_pkw_umsatz = $vhr_2464257; // Umsatz in Prozenten, (Breite Säule)
    $vhr_handel_pkw_rohertrag = $vhr_2465611;// Rohertrag in Prozenten (Schmale Säule)

    $daten_vj['vhr_handel_pkw_umsatz'] = array($vhr_handel_pkw_umsatz,'Handel PKW Umsatz VJ');
    $daten_vj['vhr_handel_pkw_rohertrag'] = array($vhr_handel_pkw_rohertrag,'Handel PKW Rohertrag VJ');

    // Handel PKW (Plan)
    $vhr_2464257_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2464257', $start_date, $end_date, $kd_nr);
    $vhr_2465611_plan = _lucanet_report_get_oid_value_guv2_plan('VHR_2465611', $start_date, $end_date, $kd_nr);
    $vhr_handel_pkw_umsatz_plan = $vhr_2464257_plan; // Umsatz in Prozenten, (Breite Säule)
    $vhr_handel_pkw_rohertrag_plan = $vhr_2465611_plan;// Rohertrag in Prozenten (Schmale Säule)

    $daten_plan['vhr_handel_pkw_umsatz'] = array($vhr_handel_pkw_umsatz_plan,'Handel PKW Umsatz PLAN');
    $daten_plan['vhr_handel_pkw_rohertrag'] = array($vhr_handel_pkw_rohertrag_plan,'Handel PKW Rohertrag PLAN');



    // Sonstige Erlöse (IST)
    $vhr_2407228 = _lucanet_report_get_oid_value_guv('VHR_2407228', $start_date, $end_date, $kd_nr);
    $vhr_handel_pkw_umsatz = $vhr_2407228; // Umsatz in Prozenten, (Breite Säule)
    $vhr_handel_pkw_rohertrag = $vhr_2407228;// Rohertrag in Prozenten (Schmale Säule)

    $daten_ist['vhr_sonst_erl_umsatz'] = array($vhr_handel_pkw_umsatz,'Sonstige Erlöse Umsatz IST');
    $daten_ist['vhr_sonst_erl_rohertrag'] = array($vhr_handel_pkw_rohertrag,'Sonstige Erlöse Rohertrag IST');

    // Sonstige Erlöse (VJ)
    $vhr_2407228 = _lucanet_report_get_oid_value_guv('VHR_2407228', $start_date_vj, $end_date_jtd, $kd_nr);
    $vhr_handel_pkw_umsatz = $vhr_2407228; // Umsatz in Prozenten, (Breite Säule)
    $vhr_handel_pkw_rohertrag = $vhr_2407228;// Rohertrag in Prozenten (Schmale Säule)

    $daten_vj['vhr_sonst_erl_umsatz'] = array($vhr_handel_pkw_umsatz,'Sonstige Erlöse Umsatz VJ');
    $daten_vj['vhr_sonst_erl_rohertrag'] = array($vhr_handel_pkw_rohertrag,'Sonstige Erlöse Rohertrag VJ');

    // Sonstige Erlöse (Plan)
    $vhr_2407228_plan = _lucanet_report_get_oid_value_guv_plan('VHR_2407228', $start_date, $end_date, $kd_nr);


    $vhr_sonst_er_umsatz_plan = $vhr_2407228_plan; // Umsatz in Prozenten, (Breite Säule)
    $vhr_sonst_er_rohertrag_plan = $vhr_2407228_plan;// Rohertrag in Prozenten (Schmale Säule)

    $daten_plan['vhr_sonst_erl_umsatz'] = array($vhr_sonst_er_umsatz_plan,'Sonstige Erlöse Umsatz PLAN');
    $daten_plan['vhr_sonst_erl_rohertrag'] = array($vhr_sonst_er_rohertrag_plan,'Sonstige Erlöse Rohertrag PLAN');


db_set_active();
}// ID 9


// Daten fuer Markenvergleich Neuwagen vorbereiten.
else if ($kd_nr !=0 && $report_id == '10') //
{
// Vorbereiten folgender Arrays:

    // --------------- Umsatzerlöse ---------------
    // RM NW Umsatzerlöse für alle vorhandene Marken holen
    db_set_active('lucanet_susa');
    $werte_umsatz_rm = array();
    $werte_ware_rm = array();
    $werte_rohertrag_rm = array();

    // VJ Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Umsatzerlöse' or daten LIKE 'RM NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date_vj, $end_date_jtd), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_rm[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_rm[substr($row->daten,$pos1,$pos2-$pos1)][0] = $row->gesamt_betrag;
    //dsm($row->gesamt_betrag);
    }// foreach number_format($number, 2, '.', '');

    // IST Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Umsatzerlöse' or daten LIKE 'RM NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_rm[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_rm[substr($row->daten,$pos1,$pos2-$pos1)][1] = $row->gesamt_betrag;
    }// foreach
    //lucanet_umsatz_rm['vj'] lucanet_umsatz_rm['ist']  lucanet_umsatz_rm['plan']


    // PLAN Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Umsatzerlöse' or daten LIKE 'RM NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_rm[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_rm[substr($row->daten,$pos1,$pos2-$pos1)][2] = $row->gesamt_betrag;
    }// foreach

//--------------- Wareneinsatz ---------------// Daraus Rohertrag berechnen.

    // RM NW Wareneinsatz VJ
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Wareneinsatz' or daten LIKE 'RM NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date_vj, $end_date_jtd), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_rm[substr($row->daten,$pos1,$pos2-$pos1)][0] = $row->gesamt_betrag;
    }// foreach


    // RM NW Wareneinsatz IST
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Wareneinsatz' or daten LIKE 'RM NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {

    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_rm[substr($row->daten,$pos1,$pos2-$pos1)][1] = $row->gesamt_betrag;
    }// foreach

    // RM NW Wareneinsatz PLAN
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Wareneinsatz' or daten LIKE 'RM NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {

    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_rm[substr($row->daten,$pos1,$pos2-$pos1)][2] = $row->gesamt_betrag;
    }// foreach



/////////---------WW--------------
    // --------------- Umsatzerlöse ---------------
    // WW NW Umsatzerlöse für alle vorhandene Marken holen
    db_set_active('lucanet_susa');
    $werte_umsatz_ww = array();
    $werte_ware_ww = array();
    $werte_rohertrag_ww = array();

    // VJ Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Umsatzerlöse' or daten LIKE 'WW NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date_vj, $end_date_jtd), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_ww[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_ww[substr($row->daten,$pos1,$pos2-$pos1)][0] = $row->gesamt_betrag;
    //dsm($row->gesamt_betrag);
    }// foreach number_fowwat($number, 2, '.', '');

    // IST Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Umsatzerlöse' or daten LIKE 'WW NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_rm[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_ww[substr($row->daten,$pos1,$pos2-$pos1)][1] = $row->gesamt_betrag;
    }// foreach
    //lucanet_umsatz_ww['vj'] lucanet_umsatz_ww['ist']  lucanet_umsatz_rm['plan']


    // PLAN Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Umsatzerlöse' or daten LIKE 'WW NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_rm[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_ww[substr($row->daten,$pos1,$pos2-$pos1)][2] = $row->gesamt_betrag;
    }// foreach

//--------------- Wareneinsatz ---------------// Daraus Rohertrag berechnen.

    // WW NW Wareneinsatz VJ
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Wareneinsatz' or daten LIKE 'WW NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date_vj, $end_date_jtd), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_ww[substr($row->daten,$pos1,$pos2-$pos1)][0] = $row->gesamt_betrag;
    }// foreach


    // RM NW Wareneinsatz IST
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Wareneinsatz' or daten LIKE 'WW NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {

    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_ww[substr($row->daten,$pos1,$pos2-$pos1)][1] = $row->gesamt_betrag;
    }// foreach

    // RM NW Wareneinsatz PLAN
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Wareneinsatz' or daten LIKE 'WW NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {

    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_ww[substr($row->daten,$pos1,$pos2-$pos1)][2] = $row->gesamt_betrag;
    }// foreach


////////---------KW--------------
    // --------------- Umsatzerlöse ---------------
    // WW NW Umsatzerlöse für alle vorhandene Marken holen
    db_set_active('lucanet_susa');
    $werte_umsatz_kw = array();
    $werte_ware_kw = array();
    $werte_rohertrag_kw = array();

    // VJ Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Umsatzerlöse' or daten LIKE 'KW NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date_vj, $end_date_jtd), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_ww[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_kw[substr($row->daten,$pos1,$pos2-$pos1)][0] = $row->gesamt_betrag;
    //dsm($row->gesamt_betrag);
    }// foreach number_fowwat($number, 2, '.', '');

    // IST Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Umsatzerlöse' or daten LIKE 'KW NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_rm[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_kw[substr($row->daten,$pos1,$pos2-$pos1)][1] = $row->gesamt_betrag;
    }// foreach
    //lucanet_umsatz_ww['vj'] lucanet_umsatz_ww['ist']  lucanet_umsatz_rm['plan']


    // PLAN Wert
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Umsatzerlöse' or daten LIKE 'KW NW ____ Umsatzerlöse')");
    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    //$lucanet_umsatz_rm[] = array($row->gesamt_betrag, substr($row->daten,$pos1,$pos2-$pos1));
    $werte_umsatz_kw[substr($row->daten,$pos1,$pos2-$pos1)][2] = $row->gesamt_betrag;
    }// foreach
//--------------- Wareneinsatz ---------------// Daraus Rohertrag berechnen.

    // KW NW Wareneinsatz VJ
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Wareneinsatz' or daten LIKE 'KW NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date_vj, $end_date_jtd), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_kw[substr($row->daten,$pos1,$pos2-$pos1)][0] = $row->gesamt_betrag;
    }// foreach


    // RM NW Wareneinsatz IST
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Wareneinsatz' or daten LIKE 'KW NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {

    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_kw[substr($row->daten,$pos1,$pos2-$pos1)][1] = $row->gesamt_betrag;
    }// foreach

    // KW NW Wareneinsatz PLAN
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('daten', 'datenschluessel'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Wareneinsatz' or daten LIKE 'KW NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date, $end_date), 'BETWEEN');
    $query->addExpression('SUM(Value)', 'gesamt_betrag');
    $query->groupBy('b.daten');//GROUP BY user ID
    $result = $query->execute();
    foreach ($result as $row) {

    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $werte_ware_kw[substr($row->daten,$pos1,$pos2-$pos1)][2] = $row->gesamt_betrag;
    }// foreach


    /*
        $werte_umsatz_rm['CON'] = array(33,44,55);
        $werte_umsatz_rm['DET'] = array(66,77,88);

        $werte_rohertrag_rm['CON'] = array(13,14,15);
        $werte_rohertrag_rm['DET'] = array(16,17,18);
    */


// Alle möglichen Marken aus beiden Arrays auslesen:
$marken_namen_rm_array = array();
$marken_namen_ww_array = array();
$marken_namen_kw_array = array();

// RM
foreach(array_keys($werte_umsatz_rm) as $key){
if (!in_array($key, $marken_namen_rm_array))
    {
        $marken_namen_rm_array[] = $key;
    }
}

foreach(array_keys($werte_ware_rm) as $key){
if (!in_array($key, $marken_namen_rm_array))
    {
        $marken_namen_rm_array[] = $key;
    }
}

// WW
foreach(array_keys($werte_umsatz_ww) as $key){
if (!in_array($key, $marken_namen_ww_array))
    {
        $marken_namen_ww_array[] = $key;
    }
}

foreach(array_keys($werte_ware_ww) as $key){
if (!in_array($key, $marken_namen_ww_array))
    {
        $marken_namen_ww_array[] = $key;
    }
}

// KW
foreach(array_keys($werte_umsatz_kw) as $key){
if (!in_array($key, $marken_namen_kw_array))
    {
        $marken_namen_kw_array[] = $key;
    }
}

foreach(array_keys($werte_ware_kw) as $key){
if (!in_array($key, $marken_namen_kw_array))
    {
        $marken_namen_kw_array[] = $key;
    }
}


// RM
for ($i = 0; $i<count($marken_namen_rm_array); $i++)
{   //number_format((float)$foo, 2, '.', '');
$werte_rohertrag_rm[$marken_namen_rm_array[$i]] = array((float)($werte_umsatz_rm[$marken_namen_rm_array[$i]][0]) + (float)($werte_ware_rm[$marken_namen_rm_array[$i]][0]),(float)($werte_umsatz_rm[$marken_namen_rm_array[$i]][1]) + (float)($werte_ware_rm[$marken_namen_rm_array[$i]][1]),(float)($werte_umsatz_rm[$marken_namen_rm_array[$i]][2]) + (float)($werte_ware_rm[$marken_namen_rm_array[$i]][2])); //array($lucanet_ware_rm[$key_ware][0], $marken_namen_rm_array[$i]);
}

// WW
for ($i = 0; $i<count($marken_namen_ww_array); $i++)
{   //number_format((float)$foo, 2, '.', '');
$werte_rohertrag_ww[$marken_namen_ww_array[$i]] = array((float)($werte_umsatz_ww[$marken_namen_ww_array[$i]][0]) + (float)($werte_ware_ww[$marken_namen_ww_array[$i]][0]),(float)($werte_umsatz_ww[$marken_namen_ww_array[$i]][1]) + (float)($werte_ware_ww[$marken_namen_ww_array[$i]][1]),(float)($werte_umsatz_ww[$marken_namen_ww_array[$i]][2]) + (float)($werte_ware_ww[$marken_namen_ww_array[$i]][2])); //array($lucanet_ware_rm[$key_ware][0], $marken_namen_rm_array[$i]);
}

// KW
for ($i = 0; $i<count($marken_namen_kw_array); $i++)
{   //number_format((float)$foo, 2, '.', '');
$werte_rohertrag_kw[$marken_namen_kw_array[$i]] = array((float)($werte_umsatz_kw[$marken_namen_kw_array[$i]][0]) + (float)($werte_ware_kw[$marken_namen_kw_array[$i]][0]),(float)($werte_umsatz_kw[$marken_namen_kw_array[$i]][1]) + (float)($werte_ware_kw[$marken_namen_kw_array[$i]][1]),(float)($werte_umsatz_kw[$marken_namen_kw_array[$i]][2]) + (float)($werte_ware_kw[$marken_namen_kw_array[$i]][2])); //array($lucanet_ware_rm[$key_ware][0], $marken_namen_rm_array[$i]);
}
db_set_active();
}// ID 10





// Report ID = 11
// Daten fuer Markenvergleich Neuwagen vorbereiten.
else if ($kd_nr !=0 && $report_id == 11) //
{

$monate_zahl = array(
date("Y-m-d", strtotime("+0 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+1 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+2 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+3 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+4 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+5 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+6 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+7 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+8 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+9 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+10 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+11 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+12 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+13 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+14 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+15 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+16 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+17 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+18 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+19 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+20 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+21 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+22 months", strtotime($start_date_vj))),
date("Y-m-d", strtotime("+23 months", strtotime($start_date_vj))),
);

$monate_zahl_plan = array(
date("Y-m-d", strtotime("+0 months", strtotime($start_date))),
date("Y-m-d", strtotime("+1 months", strtotime($start_date))),
date("Y-m-d", strtotime("+2 months", strtotime($start_date))),
date("Y-m-d", strtotime("+3 months", strtotime($start_date))),
date("Y-m-d", strtotime("+4 months", strtotime($start_date))),
date("Y-m-d", strtotime("+5 months", strtotime($start_date))),
date("Y-m-d", strtotime("+6 months", strtotime($start_date))),
date("Y-m-d", strtotime("+7 months", strtotime($start_date))),
date("Y-m-d", strtotime("+8 months", strtotime($start_date))),
date("Y-m-d", strtotime("+9 months", strtotime($start_date))),
date("Y-m-d", strtotime("+10 months", strtotime($start_date))),
date("Y-m-d", strtotime("+11 months", strtotime($start_date))),
);


    // IST, VJ ANFANG
    // --------------- Umsatzerlöse, Wareneinsatz IST ---------------
    // RM NW Umsatzerlöse IST, VJ aller vorhandene Marken holen
    db_set_active('lucanet_susa');
    $lucanet_umsatz_rm = array();

    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Umsatzerlöse' or daten LIKE 'RM NW ____ Umsatzerlöse')");

    $query->condition('b.datum', array($start_date_vj, $end_date), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_umsatz_rm[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach



    // WW NW Umsatzerlöse IST, VJ für alle vorhandene Marken holen
    $lucanet_umsatz_ww = array();
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Umsatzerlöse' or daten LIKE 'WW NW ____ Umsatzerlöse')");

    $query->condition('b.datum', array($start_date_vj, $end_date), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_umsatz_ww[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach


    // KW NW Umsatzerlöse IST, VJ für alle vorhandene Marken holen
    $lucanet_umsatz_kw = array();

    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Umsatzerlöse' or daten LIKE 'KW NW ____ Umsatzerlöse')");

    $query->condition('b.datum', array($start_date_vj, $end_date), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_umsatz_kw[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach

//dsm($lucanet_umsatz_kw);
//--------------- Wareneinsatz ---------------//
// RM NW IST Wareneinsatz
$lucanet_ware_rm = array();

    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Wareneinsatz' or daten LIKE 'RM NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date_vj, $end_date), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_ware_rm[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach


// WW NW IST Wareneinsatz
$lucanet_ware_ww = array();

    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Wareneinsatz' or daten LIKE 'WW NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date_vj, $end_date), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();

    foreach ($result as $row) {

    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_ware_ww[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach



// KW NW IST Wareneinsatz
    $lucanet_ware_kw = array();
    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_1201", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Wareneinsatz' or daten LIKE 'KW NW ____ Wareneinsatz')");
    $query->condition('b.datum', array($start_date_vj, $end_date), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_ware_kw[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01'); }// foreach

// IST, VJ ENDE
// --------------- Umsatzerlöse, Wareneinsatz IST ---------------
// RM NW Umsatzerlöse IST, VJ aller vorhandene Marken holen


////////////////////////////////////////// PLAN Anfang/////////////
// --------------- Umsatzerlöse, Wareneinsatz PLAN ---------------
// RM NW Umsatzerlöse aller vorhandene Marken holen
    db_set_active('lucanet_susa');
    $lucanet_umsatz_rm_plan = array();

    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Umsatzerlöse' or daten LIKE 'RM NW ____ Umsatzerlöse')");

    $query->condition('b.datum', array($start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date)))), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_umsatz_rm_plan[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach



    // WW NW Umsatzerlöse PLAN für alle vorhandene Marken holen
    $lucanet_umsatz_ww_plan = array();
    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Umsatzerlöse' or daten LIKE 'WW NW ____ Umsatzerlöse')");

    $query->condition('b.datum', array($start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date)))), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_umsatz_ww_plan[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach


    // KW NW Umsatzerlöse PLAN für alle vorhandene Marken holen
    $lucanet_umsatz_kw_plan = array();

    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // PLAN
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Umsatzerlöse' or daten LIKE 'KW NW ____ Umsatzerlöse')");

    $query->condition('b.datum', array($start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date)))), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();
    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_umsatz_kw_plan[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach



//--------------- Wareneinsatz ---------------//
// RM NW PLAN Wareneinsatz
$lucanet_ware_rm_plan = array();

    $query = db_select('betrag', 'b');
    //$query->distinct();
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'RM NW ___ Wareneinsatz' or daten LIKE 'RM NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date)))), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_ware_rm_plan[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach


// WW NW IST Wareneinsatz
$lucanet_ware_ww_plan = array();

    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'WW NW ___ Wareneinsatz' or daten LIKE 'WW NW ____ Wareneinsatz')");

    $query->condition('b.datum', array($start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date)))), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();

    foreach ($result as $row) {

    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_ware_ww_plan[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01');
    }// foreach



// KW NW PLAN Wareneinsatz
$lucanet_ware_kw_plan = array();

    $query = db_select('betrag', 'b');
    $query->fields('b', array('datum', 'daten', 'datenschluessel', 'Value'));
    $query->condition('b.c_id', $kd_nr, '=');
    $query->condition('b.PeriodType', "M", '=');
    $query->condition('b.Datenebene', "OID_2465009", '='); // IST
    $query->where("LENGTH(datenschluessel) <=12 and (daten LIKE 'KW NW ___ Wareneinsatz' or daten LIKE 'KW NW ____ Wareneinsatz')");
    $query->condition('b.datum', array($start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date)))), 'BETWEEN');
    $query->orderBy('b.datum', 'ASC');
    $result = $query->execute();

    foreach ($result as $row) {
    $pos1 = strpos($row->daten, ' ', 3)+1;
    $pos2 = strpos($row->daten, ' ', $pos1);
    $lucanet_ware_kw_plan[] = array(substr($row->daten,$pos1,$pos2-$pos1), $row->Value, substr($row->datum,0,4).'-'.substr($row->datum,5,2).'-01'); }// foreach
db_set_active();

// PLAN, VJ ENDE
// --------------- Umsatzerlöse, Wareneinsatz IST ---------------
// RM NW Umsatzerlöse IST, VJ aller vorhandene Marken holen

////////////////////////////////////////// PLAN ENDE


// --------- Rohertrag IST berechnen -------------
$lucanet_roh_rm = array();
$lucanet_roh_ww = array();
$lucanet_roh_kw = array();

// --------- Rohertrag PLAN berechnen -------------
$lucanet_roh_rm_plan = array();
$lucanet_roh_ww_plan = array();
$lucanet_roh_kw_plan = array();


// Alle möglichen Marken aus beiden Arrays auslesen:
$marken_namen_rm_array = array();
$marken_namen_ww_array = array();
$marken_namen_kw_array = array();

// RM IST, VJ, PLAN
for ($i = 0; $i<count($lucanet_ware_rm); $i++)
{
    if (!in_array($lucanet_ware_rm[$i][0], $marken_namen_rm_array))
    {
        $marken_namen_rm_array[] = $lucanet_ware_rm[$i][0];
    }
}


for ($i = 0; $i<count($lucanet_umsatz_rm); $i++)
{
    if (!in_array($lucanet_umsatz_rm[$i][0], $marken_namen_rm_array))
    {
        $marken_namen_rm_array[] = $lucanet_umsatz_rm[$i][0];
    }
}

// PLAN
for ($i = 0; $i<count($lucanet_ware_rm_plan); $i++)
{
    if (!in_array($lucanet_ware_rm_plan[$i][0], $marken_namen_rm_array))
    {
        $marken_namen_rm_array[] = $lucanet_ware_rm_plan[$i][0];
    }
}


for ($i = 0; $i<count($lucanet_umsatz_rm_plan); $i++)
{
    if (!in_array($lucanet_umsatz_rm_plan[$i][0], $marken_namen_rm_array))
    {
        $marken_namen_rm_array[] = $lucanet_umsatz_rm_plan[$i][0];
    }
}
// PLAN Ende


// WW IST, VJ
for ($i = 0; $i<count($lucanet_ware_ww); $i++)
{
    if (!in_array($lucanet_ware_ww[$i][0], $marken_namen_ww_array))
    {
        $marken_namen_ww_array[] = $lucanet_ware_ww[$i][0];
    }
}

for ($i = 0; $i<count($lucanet_umsatz_ww); $i++)
{
    if (!in_array($lucanet_umsatz_ww[$i][0], $marken_namen_ww_array))
    {
        $marken_namen_ww_array[] = $lucanet_umsatz_ww[$i][0];
    }
}

// WW PLAN
for ($i = 0; $i<count($lucanet_ware_ww_plan); $i++)
{
    if (!in_array($lucanet_ware_ww_plan[$i][0], $marken_namen_ww_array))
    {
        $marken_namen_ww_array[] = $lucanet_ware_ww_plan[$i][0];
    }
}

for ($i = 0; $i<count($lucanet_umsatz_ww_plan); $i++)
{
    if (!in_array($lucanet_umsatz_ww_plan[$i][0], $marken_namen_ww_array))
    {
        $marken_namen_ww_array[] = $lucanet_umsatz_ww_plan[$i][0];
    }
}

// WW PLAN ENDE


// KW
for ($i = 0; $i<count($lucanet_ware_kw); $i++)
{
    if (!in_array($lucanet_ware_kw[$i][0], $marken_namen_kw_array))
    {
        $marken_namen_kw_array[] = $lucanet_ware_kw[$i][0];
    }
}


for ($i = 0; $i<count($lucanet_umsatz_kw); $i++)
{
    if (!in_array($lucanet_umsatz_kw[$i][0], $marken_namen_kw_array))
    {
        $marken_namen_kw_array[] = $lucanet_umsatz_kw[$i][0];
    }
}

// KW PLAN
for ($i = 0; $i<count($lucanet_ware_kw_plan); $i++)
{
    if (!in_array($lucanet_ware_kw_plan[$i][0], $marken_namen_kw_array))
    {
        $marken_namen_kw_array[] = $lucanet_ware_kw_plan[$i][0];
    }

}

for ($i = 0; $i<count($lucanet_umsatz_kw_plan); $i++)
{
    if (!in_array($lucanet_umsatz_kw_plan[$i][0], $marken_namen_kw_array))
    {
        $marken_namen_kw_array[] = $lucanet_umsatz_kw_plan[$i][0];
    }
}
// PLAN ENDE


// Markenschleife durchlaufen und gleichnamige DS mit Zeitübereinstimmung zusammenaddieren.
// RM IST Arrays verbinden -> Rohertrag RM ($lucanet_roh_rm)
    for ($j = 0; $j<count($lucanet_umsatz_rm); $j++)
    {
        for ($k = 0; $k<count($lucanet_ware_rm); $k++)
        {
            // Falls Datum und Name übereinstimmen
            if ($lucanet_umsatz_rm[$j][0] == $lucanet_ware_rm[$k][0] && $lucanet_umsatz_rm[$j][2] == $lucanet_ware_rm[$k][2])
            {
                $lucanet_roh_rm[] = array($lucanet_ware_rm[$k][0], $lucanet_ware_rm[$k][1] + $lucanet_umsatz_rm[$j][1], $lucanet_ware_rm[$k][2]);
            }
            // Falls nicht übereinstimmt, prüfen, ob Umsatz oder Wareeinsatz für Marke/Datum fehlt und dem Rohertrag zuschreiben.

        }
    }

// PLAN
// Markenschleife durchlaufen und gleichnamige DS mit Zeitübereinstimmung zusammenaddieren.
// RM PLAN Arrays verbinden -> Rohertrag RM ($lucanet_roh_rm_plan)
    for ($j = 0; $j<count($lucanet_umsatz_rm_plan); $j++)
    {
        for ($k = 0; $k<count($lucanet_ware_rm_plan); $k++)
        {
            // Falls Datum und Name übereinstimmen
            if ($lucanet_umsatz_rm_plan[$j][0] == $lucanet_ware_rm_plan[$k][0] && $lucanet_umsatz_rm_plan[$j][2] == $lucanet_ware_rm_plan[$k][2])
            {
                $lucanet_roh_rm_plan[] = array($lucanet_ware_rm_plan[$k][0], $lucanet_ware_rm_plan[$k][1] + $lucanet_umsatz_rm_plan[$j][1], $lucanet_ware_rm_plan[$k][2]);
            }
            // Falls nicht übereinstimmt, prüfen, ob Umsatz oder Wareeinsatz für Marke/Datum fehlt und dem Rohertrag zuschreiben.

        }
    }
// PLAN ENDE


// Die fehlenden DS in lucanet_roh_rm mit Ware füllen.
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_ware_rm); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_rm); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_ware_rm[$i][0] == $lucanet_roh_rm[$k][0] && $lucanet_ware_rm[$i][2] == $lucanet_roh_rm[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_rm[] = array($lucanet_ware_rm[$i][0], $lucanet_ware_rm[$i][1],$lucanet_ware_rm[$i][2]);
    }
}

// PLAN
// Die fehlenden DS in lucanet_roh_rm mit Ware füllen.
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_ware_rm_plan); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_rm_plan); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_ware_rm_plan[$i][0] == $lucanet_roh_rm_plan[$k][0] && $lucanet_ware_rm_plan[$i][2] == $lucanet_roh_rm_plan[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_rm_plan[] = array($lucanet_ware_rm_plan[$i][0], $lucanet_ware_rm_plan[$i][1],$lucanet_ware_rm_plan[$i][2]);
    }
}
// PLAN ENDE

// Die fehlenden DS in lucanet_roh_rm mit Umsatz füllen.
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_umsatz_rm); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_rm); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_umsatz_rm[$i][0] == $lucanet_roh_rm[$k][0] && $lucanet_umsatz_rm[$i][2] == $lucanet_roh_rm[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_rm[] = array($lucanet_umsatz_rm[$i][0], $lucanet_umsatz_rm[$i][1],$lucanet_umsatz_rm[$i][2]);
    }
}

// PLAN

// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_umsatz_rm_plan); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_rm_plan); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_umsatz_rm_plan[$i][0] == $lucanet_roh_rm_plan[$k][0] && $lucanet_umsatz_rm_plan[$i][2] == $lucanet_roh_rm_plan[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_rm_plan[] = array($lucanet_umsatz_rm_plan[$i][0], $lucanet_umsatz_rm_plan[$i][1],$lucanet_umsatz_rm_plan[$i][2]);
    }
}
// PLAN ENDE


///////// WW Aufbereitung
// Markenschleife durchlaufen und gleichnamige DS mit Zeitübereinstimmung zusammenaddieren.
// WW IST Arrays verbinden -> Rohertrag WW ($lucanet_roh_ww)
    for ($j = 0; $j<count($lucanet_umsatz_ww); $j++)
    {
        for ($k = 0; $k<count($lucanet_ware_ww); $k++)
        {
            // Falls Datum und Name übereinstimmen
            if ($lucanet_umsatz_ww[$j][0] == $lucanet_ware_ww[$k][0] && $lucanet_umsatz_ww[$j][2] == $lucanet_ware_ww[$k][2])
            {
                $lucanet_roh_ww[] = array($lucanet_ware_ww[$k][0], $lucanet_ware_ww[$k][1] + $lucanet_umsatz_ww[$j][1], $lucanet_ware_ww[$k][2]);
            }
            // Falls nicht übereinstimmt, prüfen, ob Umsatz oder Wareeinsatz für Marke/Datum fehlt und dem Rohertrag zuschreiben.

        }
    }

// PLAN
// Arrays verbinden -> Rohertrag WW ($lucanet_roh_ww_plan)
    for ($j = 0; $j<count($lucanet_umsatz_ww_plan); $j++)
    {
        for ($k = 0; $k<count($lucanet_ware_ww_plan); $k++)
        {
            // Falls Datum und Name übereinstimmen
            if ($lucanet_umsatz_ww_plan[$j][0] == $lucanet_ware_ww_plan[$k][0] && $lucanet_umsatz_ww_plan[$j][2] == $lucanet_ware_ww_plan[$k][2])
            {
                $lucanet_roh_ww_plan[] = array($lucanet_ware_ww_plan[$k][0], $lucanet_ware_ww_plan[$k][1] + $lucanet_umsatz_ww_plan[$j][1], $lucanet_ware_ww_plan[$k][2]);
            }
            // Falls nicht übereinstimmt, prüfen, ob Umsatz oder Wareeinsatz für Marke/Datum fehlt und dem Rohertrag zuschreiben.

        }
    }
// PLAN ENDE


// Die fehlenden DS in lucanet_roh_ww mit Ware füllen.
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_ware_ww); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_ww); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_ware_ww[$i][0] == $lucanet_roh_ww[$k][0] && $lucanet_ware_ww[$i][2] == $lucanet_roh_ww[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_ww[] = array($lucanet_ware_ww[$i][0], $lucanet_ware_ww[$i][1],$lucanet_ware_ww[$i][2]);
    }
}

// PLAN
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_ware_ww_plan); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_ww_plan); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_ware_ww_plan[$i][0] == $lucanet_roh_ww_plan[$k][0] && $lucanet_ware_ww_plan[$i][2] == $lucanet_roh_ww_plan[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_ww_plan[] = array($lucanet_ware_ww_plan[$i][0], $lucanet_ware_ww_plan[$i][1],$lucanet_ware_ww_plan[$i][2]);
    }
}
// PLAN ENDE

// Die fehlenden DS in lucanet_roh_ww mit Umsatz füllen.
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_umsatz_ww); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_ww); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_umsatz_ww[$i][0] == $lucanet_roh_ww[$k][0] && $lucanet_umsatz_ww[$i][2] == $lucanet_roh_ww[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_ww[] = array($lucanet_umsatz_ww[$i][0], $lucanet_umsatz_ww[$i][1],$lucanet_umsatz_ww[$i][2]);
    }
}

// PLAN

// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_umsatz_ww_plan); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_ww_plan); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_umsatz_ww_plan[$i][0] == $lucanet_roh_ww_plan[$k][0] && $lucanet_umsatz_ww_plan[$i][2] == $lucanet_roh_ww_plan[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_ww_plan[] = array($lucanet_umsatz_ww_plan[$i][0], $lucanet_umsatz_ww_plan[$i][1],$lucanet_umsatz_ww_plan[$i][2]);
    }
}
// PLAN ENDE
///////// WW Aufbereitung ENDE


///////// KW Aufbereitung
// Markenschleife durchlaufen und gleichnamige DS mit Zeitübereinstimmung zusammenaddieren.
// KW IST Arrays verbinden -> Rohertrag KW ($lucanet_roh_kw)
    for ($j = 0; $j<count($lucanet_umsatz_kw); $j++)
    {
        for ($k = 0; $k<count($lucanet_ware_kw); $k++)
        {
            // Falls Datum und Name übereinstimmen
            if ($lucanet_umsatz_kw[$j][0] == $lucanet_ware_kw[$k][0] && $lucanet_umsatz_kw[$j][2] == $lucanet_ware_kw[$k][2])
            {
                $lucanet_roh_kw[] = array($lucanet_ware_kw[$k][0], $lucanet_ware_kw[$k][1] + $lucanet_umsatz_kw[$j][1], $lucanet_ware_kw[$k][2]);
            }
        }
    }


// Die fehlenden DS in lucanet_roh_kw mit Ware füllen.
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_ware_kw); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_kw); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_ware_kw[$i][0] == $lucanet_roh_kw[$k][0] && $lucanet_ware_kw[$i][2] == $lucanet_roh_kw[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_kw[] = array($lucanet_ware_kw[$i][0], $lucanet_ware_kw[$i][1],$lucanet_ware_kw[$i][2]);
    }
}

// PLAN
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($j = 0; $j<count($lucanet_umsatz_kw_plan); $j++)
    {
        for ($k = 0; $k<count($lucanet_ware_kw_plan); $k++)
        {
            // Falls Datum und Name übereinstimmen
            if ($lucanet_umsatz_kw_plan[$j][0] == $lucanet_ware_kw_plan[$k][0] && $lucanet_umsatz_kw_plan[$j][2] == $lucanet_ware_kw_plan[$k][2])
            {
                $lucanet_roh_kw_plan[] = array($lucanet_ware_kw_plan[$k][0], $lucanet_ware_kw_plan[$k][1] + $lucanet_umsatz_kw_plan[$j][1], $lucanet_ware_kw_plan[$k][2]);
            }
        }
    }


// Die fehlenden DS in lucanet_roh_kw mit Ware füllen.
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_ware_kw_plan); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_kw_plan); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_ware_kw_plan[$i][0] == $lucanet_roh_kw_plan[$k][0] && $lucanet_ware_kw_plan[$i][2] == $lucanet_roh_kw_plan[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_kw_plan[] = array($lucanet_ware_kw_plan[$i][0], $lucanet_ware_kw_plan[$i][1],$lucanet_ware_kw_plan[$i][2]);
    }
}
// PLAN ENDE

// Die fehlenden DS in lucanet_roh_kw mit Umsatz füllen.
// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_umsatz_kw); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_kw); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_umsatz_kw[$i][0] == $lucanet_roh_kw[$k][0] && $lucanet_umsatz_kw[$i][2] == $lucanet_roh_kw[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_kw[] = array($lucanet_umsatz_kw[$i][0], $lucanet_umsatz_kw[$i][1],$lucanet_umsatz_kw[$i][2]);
    }
}

// PLAN

// Schritt für Schritt prüfen, ob ware in ganzem roh vorkommt. Falls nicht - ergänzen
for ($i = 0; $i<count($lucanet_umsatz_kw_plan); $i++)
{
    $in_roh_gefunden = false;
    //durchlafen von allen MARKE - ZEIT Kombinationen und Vergleich
    for ($k = 0; $k<count($lucanet_roh_kw_plan); $k++)
    {
        // name und datum müssen stimmen, sonst an der gleichen Stelle einsetzen
        if ($lucanet_umsatz_kw_plan[$i][0] == $lucanet_roh_kw_plan[$k][0] && $lucanet_umsatz_kw_plan[$i][2] == $lucanet_roh_kw_plan[$k][2])
        {
            $in_roh_gefunden = true;
        }
    }

    // prüfen, ob ware in ganzem roh vorkam. Falls nicht - ergänzen
    if ($in_roh_gefunden == false)
    {   // name, wert, datum
        $lucanet_roh_kw_plan[] = array($lucanet_umsatz_kw_plan[$i][0], $lucanet_umsatz_kw_plan[$i][1],$lucanet_umsatz_kw_plan[$i][2]);
    }
}

// PLAN ENDE
// Aufbereitung ENDE
// IST ENDE

}// ID 11


else if ($kd_nr !=0 && $report_id == 13) //
{

    $umsatz_kum = _lucanet_report_get_betrag_sum('VHR_2399940', $start_date, $end_date, $kd_nr);
    $umsatz_kum_plan = _lucanet_report_get_betrag_sum_plan('VHR_2399940', $start_date, $end_date, $kd_nr);
    $umsatz_ges_plan = _lucanet_report_get_betrag_sum_plan('VHR_2399940', $start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date))), $kd_nr);

    //$unter_ueberdeckung = $umsatz_ges_plan - ($umsatz_kum + $umsatz_ges_plan - $umsatz_kum_plan);
    $unter_ueberdeckung = $umsatz_kum_plan - $umsatz_kum; // falls positiv - Unterdeckung, falls negativ - Überdeckung
    $restplan = $umsatz_ges_plan - $umsatz_kum_plan;
    // Unter-, Überdeckung berechnen
    if ($unter_ueberdeckung>0)
    {
    $unterdeckung = $unter_ueberdeckung;
    $ueberdeckung = 0;
    $unterueber = 'Unterdeckung';
    }
    else if ($unter_ueberdeckung<0)
    {
    $unterdeckung = 0;
    $ueberdeckung = $unter_ueberdeckung;
    $unterueber = 'Überdeckung';
    }
    else
    {
    $unterdeckung = 0;
    $ueberdeckung = 0;
    $unterueber = 'Unter-, Überdeckung';
    }

// Fahrzeughandel
    $umsatz_kum_fahr = _lucanet_report_get_oid_value_guv('VHR_2464225', $start_date, $end_date, $kd_nr);
    $umsatz_kum_plan_fahr = _lucanet_report_get_oid_value_guv_plan('VHR_2464225', $start_date, $end_date, $kd_nr);
    $umsatz_ges_plan_fahr = _lucanet_report_get_oid_value_guv_plan('VHR_2464225', $start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date))), $kd_nr);


    //$unter_ueberdeckung = $umsatz_ges_plan - ($umsatz_kum + $umsatz_ges_plan - $umsatz_kum_plan);
    $unter_ueberdeckung_fahr = $umsatz_kum_plan_fahr - $umsatz_kum_fahr; // falls positiv - Unterdeckung, falls negativ - Überdeckung
    $restplan_fahr = $umsatz_ges_plan_fahr - $umsatz_kum_plan_fahr;
    // Unter-, Überdeckung berechnen
    if ($unter_ueberdeckung_fahr>0)
    {
    $unterdeckung_fahr = $unter_ueberdeckung_fahr;
    $ueberdeckung_fahr = 0;
    $unterueber_fahr = 'Unterdeckung';
    }
    else if ($unter_ueberdeckung_fahr<0)
    {
    $unterdeckung_fahr = 0;
    $ueberdeckung_fahr = $unter_ueberdeckung_fahr;
    $unterueber_fahr = 'Überdeckung';
    }
    else
    {
    $unterdeckung_fahr = 0;
    $ueberdeckung_fahr = 0;
    $unterueber_fahr = 'Unter-, Überdeckung';
    }


    //Dienstleistungen
    $umsatz_kum_dienst2464226 = _lucanet_report_get_oid_value_guv('VHR_2464226', $start_date, $end_date, $kd_nr);
    $umsatz_kum_plan_dienst2464226 = _lucanet_report_get_oid_value_guv_plan('VHR_2464226', $start_date, $end_date, $kd_nr);
    $umsatz_ges_plan_dienst2464226 = _lucanet_report_get_oid_value_guv_plan('VHR_2464226', $start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date))), $kd_nr);

    $umsatz_kum_dienst2464227 = _lucanet_report_get_oid_value_guv('VHR_2464227', $start_date, $end_date, $kd_nr);
    $umsatz_kum_plan_dienst2464227 = _lucanet_report_get_oid_value_guv_plan('VHR_2464227', $start_date, $end_date, $kd_nr);
    $umsatz_ges_plan_dienst2464227 = _lucanet_report_get_oid_value_guv_plan('VHR_2464227', $start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date))), $kd_nr);

    $umsatz_kum_dienst2464228 = _lucanet_report_get_oid_value_guv('VHR_2464228', $start_date, $end_date, $kd_nr);
    $umsatz_kum_plan_dienst2464228 = _lucanet_report_get_oid_value_guv_plan('VHR_2464228', $start_date, $end_date, $kd_nr);
    $umsatz_ges_plan_dienst2464228 = _lucanet_report_get_oid_value_guv_plan('VHR_2464228', $start_date, date("Y-m-d", strtotime("+11 months", strtotime($start_date))), $kd_nr);

    $umsatz_kum_dienst = $umsatz_kum_dienst2464226 + $umsatz_kum_dienst2464227 + $umsatz_kum_dienst2464228;
    $umsatz_kum_plan_dienst = $umsatz_kum_plan_dienst2464226 + $umsatz_kum_plan_dienst2464227 + $umsatz_kum_plan_dienst2464228;
    $umsatz_ges_plan_dienst = $umsatz_ges_plan_dienst2464226 + $umsatz_ges_plan_dienst2464227 + $umsatz_ges_plan_dienst2464228;

    $unter_ueberdeckung_dienst = ($umsatz_kum_plan_dienst2464226+$umsatz_kum_plan_dienst2464227+$umsatz_kum_plan_dienst2464228) - ($umsatz_kum_dienst2464226+$umsatz_kum_dienst2464227+$umsatz_kum_dienst2464227);


    $restplan_dienst = ($umsatz_ges_plan_dienst2464226+ $umsatz_ges_plan_dienst2464227+ $umsatz_ges_plan_dienst2464228) - ($umsatz_kum_plan_dienst2464226+ $umsatz_kum_plan_dienst2464227+ $umsatz_kum_plan_dienst2464228);

    // dsm($restplan_dienst);   // JA

    // Unter-, Überdeckung berechnen
    if ($unter_ueberdeckung_dienst>0)
    {
        $unterdeckung_dienst = $unter_ueberdeckung_dienst;
        $ueberdeckung_dienst = 0;
        $unterueber_dienst = 'Unterdeckung';
    }
    else if ($unter_ueberdeckung_dienst<0)
    {
        $unterdeckung_dienst = 0;
        $ueberdeckung_dienst = $unter_ueberdeckung_dienst;
        $unterueber_dienst = 'Überdeckung';
    }
    else
    {
        $unterdeckung_dienst = 0;
        $ueberdeckung_dienst = 0;
        $unterueber_dienst = 'Unter-, Überdeckung';
    }
}


else if ($kd_nr !=0 && $report_id == 16) //
{

$monatsnamen = array(
   '01'=>"Januar",
   '02'=>"Februar",
   '03'=>"März",
   '04'=>"April",
   '05'=>"Mai",
   '06'=>"Juni",
   '07'=>"Juli",
   '08'=>"August",
   '09'=>"September",
   '10'=>"Oktober",
   '11'=>"November",
   '12'=>"Dezember");


$monate_zahl = array(
$monatsnamen[date("m", strtotime("-12 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-11 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-10 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-9 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-8 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-7 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-6 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-5 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-4 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-3 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-2 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-1 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-0 months", strtotime($end_date)))]
);

$monate = array(
date("Y-m-d", strtotime("-12 months", strtotime($end_date))),
date("Y-m-d", strtotime("-11 months", strtotime($end_date))),
date("Y-m-d", strtotime("-10 months", strtotime($end_date))),
date("Y-m-d", strtotime("-9 months", strtotime($end_date))),
date("Y-m-d", strtotime("-8 months", strtotime($end_date))),
date("Y-m-d", strtotime("-7 months", strtotime($end_date))),
date("Y-m-d", strtotime("-6 months", strtotime($end_date))),
date("Y-m-d", strtotime("-5 months", strtotime($end_date))),
date("Y-m-d", strtotime("-4 months", strtotime($end_date))),
date("Y-m-d", strtotime("-3 months", strtotime($end_date))),
date("Y-m-d", strtotime("-2 months", strtotime($end_date))),
date("Y-m-d", strtotime("-1 months", strtotime($end_date))),
date("Y-m-d", strtotime("-0 months", strtotime($end_date))),
);

// Variablen setzen
$VHR_12657 = array(); // Umlaufvermögen - nur Debit
$VHR_12667 = array(); // Forderungen gegen verbundene Unternehmen
$VHR_12689 = array(); // Forderungen ggü. Untern.im Beteiligungsverhältnis

$VHR_12731 = array(); // Verbindlichkeiten - nur Credit
$VHR_2407307 = array();
$VHR_2407308 = array();
$VHR_12745 = array();

$VHR_5769265 = array(); // WCM_% - Liquidität III - EUR - (Durchschnitt)

$ergebnis = array();

for ($i=0; $i<=12;$i++)
{

    $VHR_12657[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_12657', $monate[$i], $kd_nr, 'Debit');
    $VHR_12667[$i] = _lucanet_report_get_betrag_sum('VHR_12667', $monate[$i], $monate[$i], $kd_nr);
    $VHR_12689[$i] = _lucanet_report_get_betrag_sum('VHR_12689', $monate[$i], $monate[$i], $kd_nr);


    $VHR_12731[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_12731', $monate[$i], $kd_nr, 'Credit');
    //$VHR_2407307[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_2407307', $monate[$i], $kd_nr, 'Debit');
     $VHR_2407307[$i] = _lucanet_report_get_betrag_sum('VHR_2407307', $monate[$i], $monate[$i], $kd_nr);
    //$VHR_2407308[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_2407308', $monate[$i], $kd_nr, 'Debit');
    $VHR_2407308[$i] = _lucanet_report_get_betrag_sum('VHR_2407308', $monate[$i], $monate[$i], $kd_nr);
    $VHR_12745[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_12745', $monate[$i], $kd_nr, 'Credit');

    $VHR_5769265[$i] = _lucanet_report_get_betrag_sum('VHR_5769265', $monate[$i], $monate[$i], 'Cara');

    $zeller = $VHR_12657[$i] - $VHR_12667[$i] - $VHR_12689[$i];
    $nenner = $VHR_12731[$i] - $VHR_2407307[$i] - $VHR_2407308[$i] - $VHR_12745[$i];

    if ($nenner != 0)
    {
        $ergebnis[$i] =  $zeller/$nenner*100 ;
    }
    else
    {
        $ergebnis[$i] = NULL;
    }

}

/*
(Umlaufvermögen - Forderungen gegen verbundene Unternehmen - Forderungen ggü. Untern.im Beteiligungsverhältnis)
(Verbindlichkeiten - Bankdarlehen langfristig - Bankdarlehen mittelfristig - Verbindlichkeiten gegenüber verbundenen Unternehmen)
(12657 - 12667 - 12689) /
(12731 - 2407307 - 2407308 - 12745)
*/
}

// Kreditspiegel
else if ($kd_nr !=0 && $report_id == 17) //
{

    $monatsnamen = array(
   '01'=>"Januar",
   '02'=>"Februar",
   '03'=>"März",
   '04'=>"April",
   '05'=>"Mai",
   '06'=>"Juni",
   '07'=>"Juli",
   '08'=>"August",
   '09'=>"September",
   '10'=>"Oktober",
   '11'=>"November",
   '12'=>"Dezember");


$monate_zahl = array(
$monatsnamen[date("m", strtotime("-12 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-11 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-10 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-9 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-8 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-7 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-6 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-5 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-4 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-3 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-2 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-1 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-0 months", strtotime($end_date)))]
);

$monate = array(
date("Y-m-d", strtotime("-12 months", strtotime($end_date))),
date("Y-m-d", strtotime("-11 months", strtotime($end_date))),
date("Y-m-d", strtotime("-10 months", strtotime($end_date))),
date("Y-m-d", strtotime("-9 months", strtotime($end_date))),
date("Y-m-d", strtotime("-8 months", strtotime($end_date))),
date("Y-m-d", strtotime("-7 months", strtotime($end_date))),
date("Y-m-d", strtotime("-6 months", strtotime($end_date))),
date("Y-m-d", strtotime("-5 months", strtotime($end_date))),
date("Y-m-d", strtotime("-4 months", strtotime($end_date))),
date("Y-m-d", strtotime("-3 months", strtotime($end_date))),
date("Y-m-d", strtotime("-2 months", strtotime($end_date))),
date("Y-m-d", strtotime("-1 months", strtotime($end_date))),
date("Y-m-d", strtotime("-0 months", strtotime($end_date))),
);

    // Radio 1
    // Fahrzeug Finanzierung 2571628 - 1700
    // 2407309 IA
    $VHR_2571628 = array();
    $VHR_2407309 = array();
    $VHR_2401429 = array();
    $VHR_2467248 = array();

    for ($i=0; $i<=12;$i++)
    {
        // Fahrzeugfinanzierung
        $VHR_2571628[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_2571628', $monate[$i], $kd_nr, 'Credit');
        $VHR_2407309[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_2407309', $monate[$i], $kd_nr, 'Credit');

        // Kontokorrent
        $VHR_2401429[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_2401429', $monate[$i], $kd_nr, 'Credit'); // IA
        $VHR_10067023[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_10067023', $monate[$i], $kd_nr, 'Credit'); // Linie KK
    }
} // else 17


// Eigenkapital (in TEUR und %)
else if ($kd_nr !=0 && $report_id == 18) //
{

    $monatsnamen = array(
   '01'=>"Januar",
   '02'=>"Februar",
   '03'=>"März",
   '04'=>"April",
   '05'=>"Mai",
   '06'=>"Juni",
   '07'=>"Juli",
   '08'=>"August",
   '09'=>"September",
   '10'=>"Oktober",
   '11'=>"November",
   '12'=>"Dezember");


$monate_zahl = array(
$monatsnamen[date("m", strtotime("-12 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-11 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-10 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-9 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-8 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-7 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-6 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-5 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-4 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-3 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-2 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-1 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-0 months", strtotime($end_date)))]
);

$monate = array(
date("Y-m-d", strtotime("-12 months", strtotime($end_date))),
date("Y-m-d", strtotime("-11 months", strtotime($end_date))),
date("Y-m-d", strtotime("-10 months", strtotime($end_date))),
date("Y-m-d", strtotime("-9 months", strtotime($end_date))),
date("Y-m-d", strtotime("-8 months", strtotime($end_date))),
date("Y-m-d", strtotime("-7 months", strtotime($end_date))),
date("Y-m-d", strtotime("-6 months", strtotime($end_date))),
date("Y-m-d", strtotime("-5 months", strtotime($end_date))),
date("Y-m-d", strtotime("-4 months", strtotime($end_date))),
date("Y-m-d", strtotime("-3 months", strtotime($end_date))),
date("Y-m-d", strtotime("-2 months", strtotime($end_date))),
date("Y-m-d", strtotime("-1 months", strtotime($end_date))),
date("Y-m-d", strtotime("-0 months", strtotime($end_date))),
);

    // LTM_neu - Eigenkapital - EUR - (Durchschnitt)
    // EK EUR rollierend
    $VHR_5598929 = array(); // betrag

    // LTM_neu - Eigenkapital - EUR - (Summe)
    // EK EUR Stichtag
    $VHR_1713 = array(); // betrag


    /////// - LINIE 1 ////////
    // Linie 1 (Stichtag)
    // WCM_% - Eigenkapitalquote (Stichtagswert) - EUR - (Durchschnitt)
    // EK-Quote % Stichtag
    // EK-Quote  (12-M) Kunde
    $VHR_ek_hd_quote_stich = array(); // betrag

    // Linie 1 (Rollierend)
    $VHR_ek_hd_quote_roll = array();


    /////// - LINIE 2 ////////
    // Linie 2 Stichtag
    // WCM_% - Eigenkapitalquote (Stichtagswert) - EUR - (Durchschnitt)
    // EK-Quote % Stichtag
    // EK-Quote  (12-M) CC-Gruppe
    $VHR_5769267 = array(); // betrag

    // Linie 2 Rollierend
    // WCM_% - Eigenkapitalquote
    //  CC-Gruppe
    $VHR_5705493 = array(); // betrag




    for ($i=0; $i<=12;$i++)
    {

        // Stichtag
        $VHR_1713[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_1713', $monate[$i], $kd_nr, 'Credit');
        $VHR_1712[$i] = _lucanet_report_get_oid_value_guv_1700('VHR_1712', $monate[$i], $kd_nr, 'Credit');

        if ($VHR_1712[$i]!=0 && $VHR_1712[$i]!='')
        {
            $VHR_ek_hd_quote_stich[$i] = $VHR_1713[$i]/$VHR_1712[$i]*100;
        }
        else
        {
            $VHR_ek_hd_quote_stich[$i] = NULL;
        }
        // Quote CC-Gruppe
        $VHR_5769267[$i] = _lucanet_report_get_betrag_sum('VHR_5769267', $monate[$i], $monate[$i], 'Cara');




        // Rollierend
        // Händler
        $VHR_5598929[$i] = _lucanet_report_get_betrag_sum('VHR_5598929', $monate[$i], $monate[$i], $kd_nr);
        $VHR_5598943[$i] = _lucanet_report_get_betrag_sum('VHR_5598943', $monate[$i], $monate[$i], $kd_nr);

        if ($VHR_5598943[$i]!=0 && $VHR_5598943[$i]!='')
        {
            $VHR_ek_hd_quote_roll[$i] = $VHR_5598929[$i]/$VHR_5598943[$i]*100;
        }
        else
        {
            $VHR_ek_hd_quote_roll[$i] = NULL;
        }

        // CC- Gruppe
        $VHR_5705493[$i] = _lucanet_report_get_betrag_sum('VHR_5705493', $monate[$i], $monate[$i], 'Cara');
    }


} // else 18

else if ($kd_nr !=0 && $report_id == 19) //
{

    $monatsnamen = array(
   '01'=>"Januar",
   '02'=>"Februar",
   '03'=>"März",
   '04'=>"April",
   '05'=>"Mai",
   '06'=>"Juni",
   '07'=>"Juli",
   '08'=>"August",
   '09'=>"September",
   '10'=>"Oktober",
   '11'=>"November",
   '12'=>"Dezember");


$monate_zahl = array(
$monatsnamen[date("m", strtotime("-12 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-11 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-10 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-9 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-8 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-7 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-6 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-5 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-4 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-3 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-2 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-1 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-0 months", strtotime($end_date)))]
);

$monate = array(
date("Y-m-d", strtotime("-12 months", strtotime($end_date))),
date("Y-m-d", strtotime("-11 months", strtotime($end_date))),
date("Y-m-d", strtotime("-10 months", strtotime($end_date))),
date("Y-m-d", strtotime("-9 months", strtotime($end_date))),
date("Y-m-d", strtotime("-8 months", strtotime($end_date))),
date("Y-m-d", strtotime("-7 months", strtotime($end_date))),
date("Y-m-d", strtotime("-6 months", strtotime($end_date))),
date("Y-m-d", strtotime("-5 months", strtotime($end_date))),
date("Y-m-d", strtotime("-4 months", strtotime($end_date))),
date("Y-m-d", strtotime("-3 months", strtotime($end_date))),
date("Y-m-d", strtotime("-2 months", strtotime($end_date))),
date("Y-m-d", strtotime("-1 months", strtotime($end_date))),
date("Y-m-d", strtotime("-0 months", strtotime($end_date))),
);

$monate_m = array(
date("Y-m-d", strtotime("-23 months", strtotime($end_date))),
date("Y-m-d", strtotime("-22 months", strtotime($end_date))),
date("Y-m-d", strtotime("-21 months", strtotime($end_date))),
date("Y-m-d", strtotime("-20 months", strtotime($end_date))),
date("Y-m-d", strtotime("-19 months", strtotime($end_date))),
date("Y-m-d", strtotime("-18 months", strtotime($end_date))),
date("Y-m-d", strtotime("-17 months", strtotime($end_date))),
date("Y-m-d", strtotime("-16 months", strtotime($end_date))),
date("Y-m-d", strtotime("-15 months", strtotime($end_date))),
date("Y-m-d", strtotime("-14 months", strtotime($end_date))),
date("Y-m-d", strtotime("-13 months", strtotime($end_date))),
date("Y-m-d", strtotime("-12 months", strtotime($end_date))),
date("Y-m-d", strtotime("-11 months", strtotime($end_date))),
date("Y-m-d", strtotime("-10 months", strtotime($end_date))),
date("Y-m-d", strtotime("-9 months", strtotime($end_date))),
date("Y-m-d", strtotime("-8 months", strtotime($end_date))),
date("Y-m-d", strtotime("-7 months", strtotime($end_date))),
date("Y-m-d", strtotime("-6 months", strtotime($end_date))),
date("Y-m-d", strtotime("-5 months", strtotime($end_date))),
date("Y-m-d", strtotime("-4 months", strtotime($end_date))),
date("Y-m-d", strtotime("-3 months", strtotime($end_date))),
date("Y-m-d", strtotime("-2 months", strtotime($end_date))),
date("Y-m-d", strtotime("-1 months", strtotime($end_date))),
date("Y-m-d", strtotime("-0 months", strtotime($end_date))),
);

for ($i=0; $i<=12; $i++)
{
$monate_zahl[$i] = $monate_zahl[$i]." ".substr($monate[$i],0,4);
}

//1.       lucanet://db=caravan&oid=2407307 - B
//2.       lucanet://db=caravan&oid=2407308 - B
//3.       lucanet://db=caravan&oid=2407313 - B Fahrzeugfinanzierung
//4.       lucanet://db=caravan&oid=2401429 - table_view_guv_1700 Kontokorrentkredite
//5.       lucanet://db=caravan&oid=2407314 - table_view_guv_1700 Verbindlichkeiten LL

// Mittel und langfristige Darlehen

$fahr_finanz = array();

$VHR_2401429 = array();
$VHR_2407314 = array();
$VHR_2407309 = array();
$mwert = array();

$mittelwert_ges_kredite12= array(); // Summe von 12M ab Auswertungsmonat rückwerts / 12

for ($i = 0; $i <=12; $i++)
    {
        $VHR_2407307[$i] = _lucanet_report_get_betrag_sum('VHR_2407307', $monate[$i], $monate[$i], $kd_nr)*(-1);
        $VHR_2407308[$i] = _lucanet_report_get_betrag_sum('VHR_2407308', $monate[$i], $monate[$i], $kd_nr)*(-1);
        $VHR_2407313[$i] = _lucanet_report_get_betrag_sum('VHR_2407313', $monate[$i], $monate[$i], $kd_nr)*(-1);

        $fahr_darlehen[$i] = floatval($VHR_2407307[$i]) + floatval($VHR_2407308[$i]) + floatval($VHR_2407313[$i]);

        $VHR_2401429[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2401429', $monate[$i], $kd_nr, 'Credit'))*(-1);
        $VHR_2407314[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2407314', $monate[$i], $kd_nr, 'Credit'))*(-1);
        $VHR_2407309[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2407309', $monate[$i], $kd_nr, 'Credit'))*(-1);
    }

for ($i = 0; $i <=23; $i++)
    {

        $VHR_2407307m[$i] = _lucanet_report_get_betrag_sum('VHR_2407307', $monate_m[$i], $monate_m[$i], $kd_nr)*(-1);
        $VHR_2407308m[$i] = _lucanet_report_get_betrag_sum('VHR_2407308', $monate_m[$i], $monate_m[$i], $kd_nr)*(-1);
        $VHR_2407313m[$i] = _lucanet_report_get_betrag_sum('VHR_2407313', $monate_m[$i], $monate_m[$i], $kd_nr)*(-1);

        $fahr_darlehenm[$i] = floatval($VHR_2407307m[$i]) + floatval($VHR_2407308m[$i]) + floatval($VHR_2407313m[$i]);

        $VHR_2401429m[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2401429', $monate_m[$i], $kd_nr, 'Credit'))*(-1);
        $VHR_2407314m[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2407314', $monate_m[$i], $kd_nr, 'Credit'))*(-1);
        $VHR_2407309m[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2407309', $monate_m[$i], $kd_nr, 'Credit'))*(-1);
    }

    $fahr_darlehenm_ges = array();
    $VHR_2401429m_ges = array();
    $VHR_2407314m_ges = array();
    $VHR_2407309m_ges = array();


        for ($i=0; $i<=12; $i++) // 13 Mittelwerte
        {
            $fahr_darlehenm_ges[$i] =
            $fahr_darlehenm[$i] +
            $fahr_darlehenm[$i+1] +
            $fahr_darlehenm[$i+2] +
            $fahr_darlehenm[$i+3] +
            $fahr_darlehenm[$i+4] +
            $fahr_darlehenm[$i+5] +
            $fahr_darlehenm[$i+6] +
            $fahr_darlehenm[$i+7] +
            $fahr_darlehenm[$i+8] +
            $fahr_darlehenm[$i+9] +
            $fahr_darlehenm[$i+10] +
            $fahr_darlehenm[$i+11];

            $VHR_2401429m_ges[$i] =
            $VHR_2401429m[$i] +
            $VHR_2401429m[$i+1] +
            $VHR_2401429m[$i+2] +
            $VHR_2401429m[$i+3] +
            $VHR_2401429m[$i+4] +
            $VHR_2401429m[$i+5] +
            $VHR_2401429m[$i+6] +
            $VHR_2401429m[$i+7] +
            $VHR_2401429m[$i+8] +
            $VHR_2401429m[$i+9] +
            $VHR_2401429m[$i+10] +
            $VHR_2401429m[$i+11];

            $VHR_2407314m_ges[$i] =
            $VHR_2407314m[$i] +
            $VHR_2407314m[$i+1] +
            $VHR_2407314m[$i+2] +
            $VHR_2407314m[$i+3] +
            $VHR_2407314m[$i+4] +
            $VHR_2407314m[$i+5] +
            $VHR_2407314m[$i+6] +
            $VHR_2407314m[$i+7] +
            $VHR_2407314m[$i+8] +
            $VHR_2407314m[$i+9] +
            $VHR_2407314m[$i+10] +
            $VHR_2407314m[$i+11];

            $VHR_2407309m_ges[$i] =
            $VHR_2407309m[$i] +
            $VHR_2407309m[$i+1] +
            $VHR_2407309m[$i+2] +
            $VHR_2407309m[$i+3] +
            $VHR_2407309m[$i+4] +
            $VHR_2407309m[$i+5] +
            $VHR_2407309m[$i+6] +
            $VHR_2407309m[$i+7] +
            $VHR_2407309m[$i+8] +
            $VHR_2407309m[$i+9] +
            $VHR_2407309m[$i+10] +
            $VHR_2407309m[$i+11];


            /*
                $fahr_darlehenm_ges[$i] +=  $fahr_darlehenm[$j];
                $VHR_2401429m_ges[$i] += $VHR_2401429m[$j];
                $VHR_2407314m_ges[$i] += $VHR_2407314m[$j];
                $VHR_2407309m_ges[$i] += $VHR_2407309m[$j];
        */

            $mwert[$i] = floatval($fahr_darlehenm_ges[$i]+$VHR_2401429m_ges[$i]+$VHR_2407314m_ges[$i]+$VHR_2407309m_ges[$i])/(12);
        }
        //dsm($mwert);


}

else if ($kd_nr !=0 && $report_id == 20) //
{

    $monatsnamen = array(
   '01'=>"Januar",
   '02'=>"Februar",
   '03'=>"März",
   '04'=>"April",
   '05'=>"Mai",
   '06'=>"Juni",
   '07'=>"Juli",
   '08'=>"August",
   '09'=>"September",
   '10'=>"Oktober",
   '11'=>"November",
   '12'=>"Dezember");


$monate_zahl = array(
$monatsnamen[date("m", strtotime("-12 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-11 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-10 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-9 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-8 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-7 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-6 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-5 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-4 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-3 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-2 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-1 months", strtotime($end_date)))],
$monatsnamen[date("m", strtotime("-0 months", strtotime($end_date)))]
);

$monate = array(
date("Y-m-d", strtotime("-12 months", strtotime($end_date))),
date("Y-m-d", strtotime("-11 months", strtotime($end_date))),
date("Y-m-d", strtotime("-10 months", strtotime($end_date))),
date("Y-m-d", strtotime("-9 months", strtotime($end_date))),
date("Y-m-d", strtotime("-8 months", strtotime($end_date))),
date("Y-m-d", strtotime("-7 months", strtotime($end_date))),
date("Y-m-d", strtotime("-6 months", strtotime($end_date))),
date("Y-m-d", strtotime("-5 months", strtotime($end_date))),
date("Y-m-d", strtotime("-4 months", strtotime($end_date))),
date("Y-m-d", strtotime("-3 months", strtotime($end_date))),
date("Y-m-d", strtotime("-2 months", strtotime($end_date))),
date("Y-m-d", strtotime("-1 months", strtotime($end_date))),
date("Y-m-d", strtotime("-0 months", strtotime($end_date))),
);

$monate_m = array(
date("Y-m-d", strtotime("-23 months", strtotime($end_date))),
date("Y-m-d", strtotime("-22 months", strtotime($end_date))),
date("Y-m-d", strtotime("-21 months", strtotime($end_date))),
date("Y-m-d", strtotime("-20 months", strtotime($end_date))),
date("Y-m-d", strtotime("-19 months", strtotime($end_date))),
date("Y-m-d", strtotime("-18 months", strtotime($end_date))),
date("Y-m-d", strtotime("-17 months", strtotime($end_date))),
date("Y-m-d", strtotime("-16 months", strtotime($end_date))),
date("Y-m-d", strtotime("-15 months", strtotime($end_date))),
date("Y-m-d", strtotime("-14 months", strtotime($end_date))),
date("Y-m-d", strtotime("-13 months", strtotime($end_date))),
date("Y-m-d", strtotime("-12 months", strtotime($end_date))),
date("Y-m-d", strtotime("-11 months", strtotime($end_date))),
date("Y-m-d", strtotime("-10 months", strtotime($end_date))),
date("Y-m-d", strtotime("-9 months", strtotime($end_date))),
date("Y-m-d", strtotime("-8 months", strtotime($end_date))),
date("Y-m-d", strtotime("-7 months", strtotime($end_date))),
date("Y-m-d", strtotime("-6 months", strtotime($end_date))),
date("Y-m-d", strtotime("-5 months", strtotime($end_date))),
date("Y-m-d", strtotime("-4 months", strtotime($end_date))),
date("Y-m-d", strtotime("-3 months", strtotime($end_date))),
date("Y-m-d", strtotime("-2 months", strtotime($end_date))),
date("Y-m-d", strtotime("-1 months", strtotime($end_date))),
date("Y-m-d", strtotime("-0 months", strtotime($end_date))),
);

for ($i=0; $i<=12; $i++)
{
$monate_zahl[$i] = $monate_zahl[$i]." ".substr($monate[$i],0,4);
}

//1.       lucanet://db=caravan&oid=2407307 - B
//2.       lucanet://db=caravan&oid=2407308 - B
//3.       lucanet://db=caravan&oid=2407313 - B Fahrzeugfinanzierung
//4.       lucanet://db=caravan&oid=2401429 - table_view_guv_1700 Kontokorrentkredite
//5.       lucanet://db=caravan&oid=2407314 - table_view_guv_1700 Verbindlichkeiten LL

// Mittel und langfristige Darlehen
/*
$fahr_finanz = array();

$VHR_2401429 = array();
$VHR_2407314 = array();
$VHR_2407309 = array();
$mwert = array();

$mittelwert_ges_kredite12= array(); // Summe von 12M ab Auswertungsmonat rückwerts / 12
*/
// NEU

$VHR_2751575 = array();
$VHR_2751574 = array();
$VHR_2751576 = array();


for ($i = 0; $i <=12; $i++)
    {
        /*
        $VHR_2407307[$i] = _lucanet_report_get_betrag_sum('VHR_2407307', $monate[$i], $monate[$i], $kd_nr)*(-1);
        $VHR_2407308[$i] = _lucanet_report_get_betrag_sum('VHR_2407308', $monate[$i], $monate[$i], $kd_nr)*(-1);
        $VHR_2407313[$i] = _lucanet_report_get_betrag_sum('VHR_2407313', $monate[$i], $monate[$i], $kd_nr)*(-1);


        $fahr_darlehen[$i] = floatval($VHR_2407307[$i]) + floatval($VHR_2407308[$i]) + floatval($VHR_2407313[$i]);
        */

        $VHR_2751575[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2751575', $monate[$i], $kd_nr, 'Debit'));
        $VHR_2751574[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2751574', $monate[$i], $kd_nr, 'Debit'));
        $VHR_2751576[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2751576', $monate[$i], $kd_nr, 'Debit'));
    }

for ($i = 0; $i <=23; $i++)
    {
        /*

        $VHR_2407307m[$i] = _lucanet_report_get_betrag_sum('VHR_2407307', $monate_m[$i], $monate_m[$i], $kd_nr)*(-1);
        $VHR_2407308m[$i] = _lucanet_report_get_betrag_sum('VHR_2407308', $monate_m[$i], $monate_m[$i], $kd_nr)*(-1);
        $VHR_2407313m[$i] = _lucanet_report_get_betrag_sum('VHR_2407313', $monate_m[$i], $monate_m[$i], $kd_nr)*(-1);

        $fahr_darlehenm[$i] = floatval($VHR_2407307m[$i]) + floatval($VHR_2407308m[$i]) + floatval($VHR_2407313m[$i]);

        */
        $VHR_2751575m[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2751575', $monate_m[$i], $kd_nr, 'Debit'));
        $VHR_2751574m[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2751574', $monate_m[$i], $kd_nr, 'Debit'));
        $VHR_2751576m[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2751576', $monate_m[$i], $kd_nr, 'Debit'));
    }

    // $fahr_darlehenm_ges = array();
    $VHR_2751575m_ges = array();
    $VHR_2751574m_ges = array();
    $VHR_2751576m_ges = array();


        for ($i=0; $i<=12; $i++) // 13 Mittelwerte
        {
            /*
            $fahr_darlehenm_ges[$i] =
            $fahr_darlehenm[$i] +
            $fahr_darlehenm[$i+1] +
            $fahr_darlehenm[$i+2] +
            $fahr_darlehenm[$i+3] +
            $fahr_darlehenm[$i+4] +
            $fahr_darlehenm[$i+5] +
            $fahr_darlehenm[$i+6] +
            $fahr_darlehenm[$i+7] +
            $fahr_darlehenm[$i+8] +
            $fahr_darlehenm[$i+9] +
            $fahr_darlehenm[$i+10] +
            $fahr_darlehenm[$i+11];
            */
            $VHR_2751575m_ges[$i] =
            $VHR_2751575m[$i] +
            $VHR_2751575m[$i+1] +
            $VHR_2751575m[$i+2] +
            $VHR_2751575m[$i+3] +
            $VHR_2751575m[$i+4] +
            $VHR_2751575m[$i+5] +
            $VHR_2751575m[$i+6] +
            $VHR_2751575m[$i+7] +
            $VHR_2751575m[$i+8] +
            $VHR_2751575m[$i+9] +
            $VHR_2751575m[$i+10] +
            $VHR_2751575m[$i+11];

            $VHR_2751574m_ges[$i] =
            $VHR_2751574m[$i] +
            $VHR_2751574m[$i+1] +
            $VHR_2751574m[$i+2] +
            $VHR_2751574m[$i+3] +
            $VHR_2751574m[$i+4] +
            $VHR_2751574m[$i+5] +
            $VHR_2751574m[$i+6] +
            $VHR_2751574m[$i+7] +
            $VHR_2751574m[$i+8] +
            $VHR_2751574m[$i+9] +
            $VHR_2751574m[$i+10] +
            $VHR_2751574m[$i+11];

            $VHR_2751576m_ges[$i] =
            $VHR_2751576m[$i] +
            $VHR_2751576m[$i+1] +
            $VHR_2751576m[$i+2] +
            $VHR_2751576m[$i+3] +
            $VHR_2751576m[$i+4] +
            $VHR_2751576m[$i+5] +
            $VHR_2751576m[$i+6] +
            $VHR_2751576m[$i+7] +
            $VHR_2751576m[$i+8] +
            $VHR_2751576m[$i+9] +
            $VHR_2751576m[$i+10] +
            $VHR_2751576m[$i+11];


            /*
                $fahr_darlehenm_ges[$i] +=  $fahr_darlehenm[$j];
                $VHR_2401429m_ges[$i] += $VHR_2401429m[$j];
                $VHR_2407314m_ges[$i] += $VHR_2407314m[$j];
                $VHR_2407309m_ges[$i] += $VHR_2407309m[$j];
        */

            $mwert[$i] = floatval(/*$fahr_darlehenm_ges[$i]+*/$VHR_2751575m_ges[$i]+$VHR_2751574m_ges[$i]+$VHR_2751576m_ges[$i])/(12);
        }
        //dsm($mwert);


}



// Fahrzeugfinanzierungsquote
else if ($report_id == 23) //
{

$monatsnamen = array(
   '01'=>"Januar",
   '02'=>"Februar",
   '03'=>"März",
   '04'=>"April",
   '05'=>"Mai",
   '06'=>"Juni",
   '07'=>"Juli",
   '08'=>"August",
   '09'=>"September",
   '10'=>"Oktober",
   '11'=>"November",
   '12'=>"Dezember");


$monate_zahl = array(
$monatsnamen[date("m", strtotime("-24 months", strtotime($end_date)))].' '.date("Y", strtotime("-24 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-23 months", strtotime($end_date)))].' '.date("Y", strtotime("-23 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-22 months", strtotime($end_date)))].' '.date("Y", strtotime("-22 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-21 months", strtotime($end_date)))].' '.date("Y", strtotime("-21 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-20 months", strtotime($end_date)))].' '.date("Y", strtotime("-20 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-19 months", strtotime($end_date)))].' '.date("Y", strtotime("-19 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-18 months", strtotime($end_date)))].' '.date("Y", strtotime("-18 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-17 months", strtotime($end_date)))].' '.date("Y", strtotime("-17 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-16 months", strtotime($end_date)))].' '.date("Y", strtotime("-16 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-15 months", strtotime($end_date)))].' '.date("Y", strtotime("-15 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-14 months", strtotime($end_date)))].' '.date("Y", strtotime("-14 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-13 months", strtotime($end_date)))].' '.date("Y", strtotime("-13 months", strtotime($end_date))),

$monatsnamen[date("m", strtotime("-12 months", strtotime($end_date)))].' '.date("Y", strtotime("-12 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-11 months", strtotime($end_date)))].' '.date("Y", strtotime("-11 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-10 months", strtotime($end_date)))].' '.date("Y", strtotime("-10 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-9 months", strtotime($end_date)))].' '.date("Y", strtotime("-9 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-8 months", strtotime($end_date)))].' '.date("Y", strtotime("-8 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-7 months", strtotime($end_date)))].' '.date("Y", strtotime("-7 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-6 months", strtotime($end_date)))].' '.date("Y", strtotime("-6 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-5 months", strtotime($end_date)))].' '.date("Y", strtotime("-5 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-4 months", strtotime($end_date)))].' '.date("Y", strtotime("-4 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-3 months", strtotime($end_date)))].' '.date("Y", strtotime("-3 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-2 months", strtotime($end_date)))].' '.date("Y", strtotime("-2 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-1 months", strtotime($end_date)))].' '.date("Y", strtotime("-1 months", strtotime($end_date))),
$monatsnamen[date("m", strtotime("-0 months", strtotime($end_date)))].' '.date("Y", strtotime("-0 months", strtotime($end_date)))
);

$monate = array(
date("Y-m-d", strtotime("-24 months", strtotime($end_date))),
date("Y-m-d", strtotime("-23 months", strtotime($end_date))),
date("Y-m-d", strtotime("-22 months", strtotime($end_date))),
date("Y-m-d", strtotime("-21 months", strtotime($end_date))),
date("Y-m-d", strtotime("-20 months", strtotime($end_date))),
date("Y-m-d", strtotime("-19 months", strtotime($end_date))),
date("Y-m-d", strtotime("-18 months", strtotime($end_date))),
date("Y-m-d", strtotime("-17 months", strtotime($end_date))),
date("Y-m-d", strtotime("-16 months", strtotime($end_date))),
date("Y-m-d", strtotime("-15 months", strtotime($end_date))),
date("Y-m-d", strtotime("-14 months", strtotime($end_date))),
date("Y-m-d", strtotime("-13 months", strtotime($end_date))),
date("Y-m-d", strtotime("-12 months", strtotime($end_date))),
date("Y-m-d", strtotime("-11 months", strtotime($end_date))),
date("Y-m-d", strtotime("-10 months", strtotime($end_date))),
date("Y-m-d", strtotime("-9 months", strtotime($end_date))),
date("Y-m-d", strtotime("-8 months", strtotime($end_date))),
date("Y-m-d", strtotime("-7 months", strtotime($end_date))),
date("Y-m-d", strtotime("-6 months", strtotime($end_date))),
date("Y-m-d", strtotime("-5 months", strtotime($end_date))),
date("Y-m-d", strtotime("-4 months", strtotime($end_date))),
date("Y-m-d", strtotime("-3 months", strtotime($end_date))),
date("Y-m-d", strtotime("-2 months", strtotime($end_date))),
date("Y-m-d", strtotime("-1 months", strtotime($end_date))),
date("Y-m-d", strtotime("-0 months", strtotime($end_date))),
);

/*
Formel für %-Wert: oid=2407309 (berechnet aus Parent-Child) / oid=12663 (berechnet aus Parent-Child) à Ergebnis als Prozent mit einer Nachkommastelle
-          Linie: Wert CC-Gruppe; immer 24 Monate inkl. dem aktuellsten Berichtsmonat
Formel für %-Wert: OID 10999047
*/

// Variablen setzen
// Wert des Händlers
$VHR_2407309 = array(); // Parent Child (Zähler) - Säule
$VHR_12663 = array(); // Parent Child (Nenner)  - Säule

// Linie: Wert CC-Gruppe
$VHR_11016829 = array(); //
// Kennzahl:11007012
$ergebnis = array();

for ($i=0; $i<=24;$i++)
{

    $VHR_2407309[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_2407309', $monate[$i], $kd_nr, 'Credit'));
    $VHR_12663[$i] = floatval(_lucanet_report_get_oid_value_guv_1700('VHR_12663', $monate[$i], $kd_nr, 'Debit'));

    $VHR_11016829[$i] = floatval(_lucanet_report_get_betrag_sum('VHR_11016829', $monate[$i], $monate[$i], 'Cara'));

    $zeller = $VHR_2407309[$i];
    $nenner = $VHR_12663[$i];

    if ($nenner != 0)
    {
        $ergebnis[$i] =  floatval($zeller/$nenner*100) ;
    }
    else
    {
        $ergebnis[$i] = NULL;
    }

}
//dsm($VHR_2407309);
}



    // Die Daten von obern werden später ausgegeben
// ENDE VARIABLEN DEKLARATION


// - Datenausgabe in js
// Falls Unternehmensentwicklung
if ($report_id ==3)
    {
        $data['cara_value'] = json_encode($lucanet_value);
        $data['cara_value_plan'] = json_encode($lucanet_value_plan);

        //$data['cara_value_vor'] = json_encode($lucanet_value_vor);

        $data['cara_value_vor1'] = json_encode($lucanet_value_vor1);
        $data['cara_value_vor2'] = json_encode($lucanet_value_vor2);
        $data['cara_value_vor3'] = json_encode($lucanet_value_vor3);

        $end_date = json_encode($end_date);
        $end_date_jtd = json_encode(date("Y-m-d", strtotime("+11 months", strtotime($start_date_vj)))); // date("Y-m-d", strtotime("-1 months", strtotime($start_date_vj)))
        $end_date_jtd2 = json_encode(date("Y-m-d", strtotime("-1 months", strtotime($start_date_vj))));
        $end_date_jtd3 = json_encode(date("Y-m-d", strtotime("-13 months", strtotime($start_date_vj))));
        $end_date_jtd4 = json_encode(date("Y-m-d", strtotime("-25 months", strtotime($start_date_vj))));

        $start_date_vj2 = json_encode(date("Y-m-d", strtotime("-12 months", strtotime($start_date_vj))));
        $start_date_vj3 = json_encode(date("Y-m-d", strtotime("-24 months", strtotime($start_date_vj))));
        $start_date_vj4 = json_encode(date("Y-m-d", strtotime("-36 months", strtotime($start_date_vj))));


        $start_date_vj = json_encode($start_date_vj);
        $start_date = json_encode($start_date); // nur für Legende


        $monate_neu = json_encode($monate_neu);
        $w_jahr = json_encode(intval($w_jahr));
        $stat_anpassung = json_encode($stat_anpassung);

        $stat_anpassung2 = json_encode($stat_anpassung_vj2);
        $stat_anpassung3 = json_encode($stat_anpassung_vj3);
        $stat_anpassung4 = json_encode($stat_anpassung_vj4);

        $stat_anpassung_vj = json_encode($stat_anpassung_vj);
        $stat_anpassung_plan = json_encode($stat_anpassung_plan);
        $key_forcast = json_encode($key_forcast);

          drupal_add_js(array('lucanet_data' => array(
          'data' => $data,  //cara_value
          'title' => $title,
          'start_date' => $start_date,
          'start_date_vj' => $start_date_vj,
          'start_date_vj2' =>$start_date_vj2,
          'start_date_vj3' =>$start_date_vj3,
          'start_date_vj4' =>$start_date_vj4,
          'end_date' => $end_date,
          'end_date_jtd' => $end_date_jtd,
          'end_date_jtd2' => $end_date_jtd2,
          'end_date_jtd3' => $end_date_jtd3,
          'end_date_jtd4' => $end_date_jtd4,
          'w_jahr' => intval($w_jahr),
          'monate' => $monate_neu,
          'report_id' => $report_id,
          'stat_anpassung' => $stat_anpassung,
          'stat_anpassung2' => $stat_anpassung2,
          'stat_anpassung3' => $stat_anpassung3,
          'stat_anpassung4' => $stat_anpassung4,
          'stat_anpassung_vj' => $stat_anpassung_vj,
          'stat_anpassung_plan' => $stat_anpassung_plan,
            'lucanet_settings' => $lucanet_array_setting_v, // false, false, true zB.
            'lucanet_settings_IST' => $lucanet_array_setting_IST, // kein Wert, da kein Radiobutton
            'lucanet_gruppe_id' => $gruppe_id,
            'key_forcast' => $key_forcast,

          )), 'setting');

          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr.js');
    }

// Falls Aufwandsquote zum Rohertrag
else if ($report_id ==6)
    {
        $data['cara_value'] = json_encode($wert_ist);
        $data['cara_value_vj'] = json_encode($wert_vj);

        $data['wert1_ges'] = json_encode($wert1_ges); // kein array
        $data['wert2_ges'] = json_encode($wert2_ges);

        $start_date = json_encode($start_date); // nur für Legende
        $start_date_vj = json_encode($start_date_vj);
        $end_date = json_encode($end_date);
        $end_date_jtd = json_encode($end_date_jtd);

        $title = json_encode($title);

         drupal_add_js(array('lucanet_data' => array(
          'data' => $data,  //cara_value
          'start_date' => $start_date,
          'end_date' => $end_date,
          'start_date_vj' => $start_date_vj,
          'end_date_jtd' => $end_date_jtd,
          'monate' => $monate_neu,
          'title' => $title,
          'report_id' => $report_id,
          'lucanet_settings' => $lucanet_array_setting_v,
          'lucanet_settings_IST' => $lucanet_array_setting_IST,
          'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');

          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr2.js');
    }

// Falls Abweichungsanalyse Jahresergebnis
else if ($report_id ==7)
    {
        $start_date = json_encode($start_date); // nur für Legende
        $start_date_vj = json_encode($start_date_vj);
        $end_date = json_encode($end_date);
        $end_date_jtd = json_encode($end_date_jtd);

        $delta_ist = json_encode($delta_ist);
        $delta_plan = json_encode($delta_plan);
        $werte = json_encode($werte);

        $title = json_encode($title);

         drupal_add_js(array('lucanet_data' => array(
          //'data' => $data,  //cara_value
          'delta_ist' => $delta_ist,
          'delta_plan' => $delta_plan,
          'start_date' => $start_date,
          'end_date' => $end_date,
          'start_date_vj' => $start_date_vj,
          'end_date_jtd' => $end_date_jtd,
          'monate' => $monate_neu,
          'werte' => $werte,
          'title' => $title,
          'report_id' => $report_id,
             'lucanet_settings' => $lucanet_array_setting_v,
             'lucanet_settings_IST' => $lucanet_array_setting_IST,
             'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');

          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr3.js');
    }

// Falls Betriebsvergleich
else if ($report_id ==8)
{
        $data['cara_value'] = json_encode($lucanet_value);
        $data['cara_value_betr'] = json_encode($lucanet_value_betr);
        $data['cara_value_roh'] = json_encode($lucanet_value_roh);
        $data['cara_value_ges'] = json_encode($lucanet_value_ges);
        $start_date = json_encode(date("Y-m-d", strtotime("-11 months", strtotime($end_date))));
        //dsm($start_date);
        $end_date = json_encode($end_date);
        $monate_neu = json_encode($monate_neu);

        $value_to_mark =  json_encode($value_to_mark);
        $value_to_mark_betr =  json_encode($value_to_mark_betr);
        $value_to_mark_roh =  json_encode($value_to_mark_roh);
        $value_to_mark_ges =  json_encode($value_to_mark_ges);

          drupal_add_js(array('lucanet_data' => array(
          'data' => $data,  //cara_value
          'title' => $title,
          'start_date' => $start_date, // NUR VISUELL
          'end_date' => $end_date,
          'monate' => $monate_neu,
          'report_id' => $report_id,
          'value_to_mark' => $value_to_mark,
          'value_to_mark_betr' => $value_to_mark_betr,
          'value_to_mark_roh' => $value_to_mark_roh,
          'value_to_mark_ges' => $value_to_mark_ges,
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,

          )), 'setting');

          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr8.js');

}
// Hier werden weitere ID's hinzugefügt

// Anteil Umsatz und Rohertrag
else if ($report_id == 9)
{
        $data['daten_plan'] = json_encode($daten_plan);
        $data['daten_ist'] = json_encode($daten_ist);
        $data['daten_vj'] = json_encode($daten_vj);
        drupal_add_js(array('lucanet_data' => array(
          'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr9.js');
}

// Markenvergleich Neuwagen
else if ($report_id ==10)
{

        $data['lucanet_umsatz_rm'] = json_encode($lucanet_umsatz_rm);
        $data['lucanet_umsatz_ww'] = json_encode($lucanet_umsatz_ww);
        $data['lucanet_umsatz_kw'] = json_encode($lucanet_umsatz_kw);

        $data['lucanet_roh_rm'] = json_encode($lucanet_roh_rm);
        $data['lucanet_roh_ww'] = json_encode($lucanet_roh_ww);
        $data['lucanet_roh_kw'] = json_encode($lucanet_roh_kw);

        $data['lucanet_umsatz_rm_ges'] = json_encode($lucanet_umsatz_rm_ges);
        $data['lucanet_umsatz_ww_ges'] = json_encode($lucanet_umsatz_ww_ges);
        $data['lucanet_umsatz_kw_ges'] = json_encode($lucanet_umsatz_kw_ges);

        $data['lucanet_roh_rm_ges'] = json_encode($lucanet_roh_rm_ges);
        $data['lucanet_roh_ww_ges'] = json_encode($lucanet_roh_ww_ges);
        $data['lucanet_roh_kw_ges'] = json_encode($lucanet_roh_kw_ges);

        $data['marken_namen_rm_array'] = json_encode($marken_namen_rm_array);
        $data['marken_namen_ww_array'] = json_encode($marken_namen_ww_array);
        $data['marken_namen_kw_array'] = json_encode($marken_namen_kw_array);

        $data['werte_umsatz_rm'] = json_encode($werte_umsatz_rm);
        $data['werte_rohertrag_rm'] = json_encode($werte_rohertrag_rm);

        $data['werte_umsatz_ww'] = json_encode($werte_umsatz_ww);
        $data['werte_rohertrag_ww'] = json_encode($werte_rohertrag_ww);

        $data['werte_umsatz_kw'] = json_encode($werte_umsatz_kw);
        $data['werte_rohertrag_kw'] = json_encode($werte_rohertrag_kw);

        drupal_add_js(array('lucanet_data' => array(
          'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr10.js');
}


// Markenvergleich Neuwagen
else if ($report_id ==11)
{
        // IST
        $data['lucanet_umsatz_rm'] = json_encode($lucanet_umsatz_rm);
        $data['lucanet_umsatz_ww'] = json_encode($lucanet_umsatz_ww);
        $data['lucanet_umsatz_kw'] = json_encode($lucanet_umsatz_kw);

        $data['lucanet_roh_rm'] = json_encode($lucanet_roh_rm);
        $data['lucanet_roh_ww'] = json_encode($lucanet_roh_ww);
        $data['lucanet_roh_kw'] = json_encode($lucanet_roh_kw);

        // PLAN
        $data['lucanet_umsatz_rm_plan'] = json_encode($lucanet_umsatz_rm_plan);
        $data['lucanet_umsatz_ww_plan'] = json_encode($lucanet_umsatz_ww_plan);
        $data['lucanet_umsatz_kw_plan'] = json_encode($lucanet_umsatz_kw_plan);

        $data['lucanet_roh_rm_plan'] = json_encode($lucanet_roh_rm_plan);
        $data['lucanet_roh_ww_plan'] = json_encode($lucanet_roh_ww_plan);
        $data['lucanet_roh_kw_plan'] = json_encode($lucanet_roh_kw_plan);
        // PLAN ENDE

        $data['marken_namen_rm_array'] = json_encode($marken_namen_rm_array);
        $data['marken_namen_ww_array'] = json_encode($marken_namen_ww_array);
        $data['marken_namen_kw_array'] = json_encode($marken_namen_kw_array);

        // VJ
        $data['lucanet_umsatz_rm_vj'] = json_encode($lucanet_umsatz_rm_vj);
        $data['lucanet_umsatz_ww_vj'] = json_encode($lucanet_umsatz_ww_vj);
        $data['lucanet_umsatz_kw_vj'] = json_encode($lucanet_umsatz_kw_vj);

        $data['lucanet_roh_rm_vj'] = json_encode($lucanet_roh_rm_vj);
        $data['lucanet_roh_ww_vj'] = json_encode($lucanet_roh_ww_vj);
        $data['lucanet_roh_kw_vj'] = json_encode($lucanet_roh_kw_vj);

        $data['lucanet_umsatz_rm_ges_vj'] = json_encode($lucanet_umsatz_rm_ges_vj);
        $data['lucanet_umsatz_ww_ges_vj'] = json_encode($lucanet_umsatz_ww_ges_vj);
        $data['lucanet_umsatz_kw_ges_vj'] = json_encode($lucanet_umsatz_kw_ges_vj);

        $data['lucanet_roh_rm_ges_vj'] = json_encode($lucanet_roh_rm_ges_vj);
        $data['lucanet_roh_ww_ges_vj'] = json_encode($lucanet_roh_ww_ges_vj);
        $data['lucanet_roh_kw_ges_vj'] = json_encode($lucanet_roh_kw_ges_vj);

        $data['marken_namen_rm_array_vj'] = json_encode($marken_namen_rm_array_vj);
        $data['marken_namen_ww_array_vj'] = json_encode($marken_namen_ww_array_vj);
        $data['marken_namen_kw_array_vj'] = json_encode($marken_namen_kw_array_vj);

        $data['start_date_vj'] = json_encode($start_date_vj);
        $data['start_date'] = json_encode($start_date); // nur für Legende
        $data['end_date'] = json_encode($end_date);
        $data['end_date_zahl'] = json_encode(intval(substr($end_date,5,2)));
        $data['end_date_jtd'] = json_encode($end_date_jtd);
        $data['w_jahr'] = json_encode(intval($w_jahr));

        $monate_neu = json_encode($monate_neu);
        $monate_zahl = json_encode($monate_zahl);
        $monate_zahl_plan = json_encode($monate_zahl_plan);


        drupal_add_js(array('lucanet_data' => array(
          'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
            'monate' => $monate_neu,
            'monate_zahl' => $monate_zahl,
            'monate_zahl_plan' => $monate_zahl_plan,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr11.js');
}


else if ($report_id == 13)
{
        $data['unterueber'] = json_encode($unterueber);
        $data['umsatz_kum'] = json_encode($umsatz_kum);
        $data['umsatz_kum_plan'] = json_encode($umsatz_kum_plan);
        $data['umsatz_ges_plan'] = json_encode($umsatz_ges_plan);
        $data['unterdeckung'] = json_encode($unterdeckung);
        $data['ueberdeckung'] = json_encode($ueberdeckung);
        $data['restplan'] = json_encode($restplan);

        $data['start_date_vj'] = json_encode($start_date_vj);
        $data['start_date'] = json_encode($start_date); // nur für Legende
        $data['end_date'] = json_encode($end_date);
        $data['end_date_jtd'] = json_encode($end_date_jtd);

        //Fahrzeug
        $data['unterueber_fahr'] = json_encode($unterueber_fahr);
        $data['umsatz_kum_fahr'] = json_encode($umsatz_kum_fahr);
        $data['umsatz_kum_plan_fahr'] = json_encode($umsatz_kum_plan_fahr);
        $data['umsatz_ges_plan_fahr'] = json_encode($umsatz_ges_plan_fahr);
        $data['unterdeckung_fahr'] = json_encode($unterdeckung_fahr);
        $data['ueberdeckung_fahr'] = json_encode($ueberdeckung_fahr);
        $data['restplan_fahr'] = json_encode($restplan_fahr);

        //Dienst
        $data['unterueber_dienst'] = json_encode($unterueber_dienst);
        $data['umsatz_kum_dienst'] = json_encode($umsatz_kum_dienst);
        $data['umsatz_kum_plan_dienst'] = json_encode($umsatz_kum_plan_dienst);
        $data['umsatz_ges_plan_dienst'] = json_encode($umsatz_ges_plan_dienst);
        $data['unterdeckung_dienst'] = json_encode($unterdeckung_dienst);
        $data['ueberdeckung_dienst'] = json_encode($ueberdeckung_dienst);
        $data['restplan_dienst'] = json_encode($restplan_dienst);


        drupal_add_js(array('lucanet_data' => array(

          'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr13.js');
}

// Liquidität III
else if ($report_id == 16)
{

        $data['ergebnis'] = json_encode($ergebnis);
        $data['VHR_5769265'] = json_encode($VHR_5769265);
        $data['monate_zahl'] = json_encode($monate_zahl);
        drupal_add_js(array('lucanet_data' => array(

          'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr16.js');
}

// Kreditspiegel
else if ($report_id == 17)
{
    $data['monate_zahl'] = json_encode($monate_zahl);
    $data['VHR_2571628'] = json_encode($VHR_2571628);
    $data['VHR_2407309'] = json_encode($VHR_2407309);

    $data['VHR_10067023'] = json_encode($VHR_10067023); // Linie
    $data['VHR_2401429'] = json_encode($VHR_2401429); // iA.


    $data['end_date'] = json_encode($end_date);
    $data['start_date'] = json_encode($start_date);

            drupal_add_js(array('lucanet_data' => array(
            'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr17.js');
}


// Eigenkapital (in TEUR und %)
else if ($report_id == 18)
{

    // 5768874 - "Summe" LTM_neu - Eigenkapital - EUR - (Summe)
    // 5598929 - "Summe" LTM_neu - Eigenkapital - EUR - (Durchschnitt)
    // Keine EK-Quote % vorhanden, da errechnet.

    $data['monate_zahl'] = json_encode($monate_zahl);

    // Stichtag
    $data['VHR_1713'] = json_encode($VHR_1713);
    $data['VHR_5769267'] = json_encode($VHR_5769267);
    $data['VHR_ek_hd_quote_stich'] = json_encode($VHR_ek_hd_quote_stich);

    // Rollierend
    $data['VHR_5598929'] = json_encode($VHR_5598929);
    //$data['VHR_5598943'] = json_encode($VHR_5598943);
    $data['VHR_5705493'] = json_encode($VHR_5705493);
    $data['VHR_ek_hd_quote_roll'] = json_encode($VHR_ek_hd_quote_roll);

    $data['end_date'] = json_encode($end_date);
    $data['start_date'] = json_encode($start_date);

            drupal_add_js(array('lucanet_data' => array(
            'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr18.js');
}

else if ($report_id == 19)
{

    $data['monate_zahl'] = json_encode($monate_zahl);
    $data['monate'] = json_encode($monate);

    $data['fahr_darlehen'] = json_encode($fahr_darlehen); // Fahrzeugfinanzierung
    $data['VHR_2401429'] = json_encode($VHR_2401429); // Kontokorrentkredite
    $data['VHR_2407314'] = json_encode($VHR_2407314); // Verbindlichkeiten LL
    $data['VHR_2407309'] = json_encode($VHR_2407309); // Finanzierungsbanken

    $data['mwert'] = json_encode($mwert); // Mittellinie


    $data['end_date'] = json_encode($end_date);
    $data['start_date'] = json_encode($start_date);

            drupal_add_js(array('lucanet_data' => array(
            'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr19.js');
}


else if ($report_id == 20)
{

    $data['monate_zahl'] = json_encode($monate_zahl);
    $data['monate'] = json_encode($monate);

    /*
    $data['fahr_darlehen'] = json_encode($fahr_darlehen); // Fahrzeugfinanzierung
    $data['VHR_2401429'] = json_encode($VHR_2401429); // Kontokorrentkredite
    $data['VHR_2407314'] = json_encode($VHR_2407314); // Verbindlichkeiten LL
    $data['VHR_2407309'] = json_encode($VHR_2407309); // Finanzierungsbanken
    */
    $data['VHR_2751575'] = json_encode($VHR_2751575);
    $data['VHR_2751574'] = json_encode($VHR_2751574);
    $data['VHR_2751576'] = json_encode($VHR_2751576);

    $data['mwert'] = json_encode($mwert); // Mittellinie


    $data['end_date'] = json_encode($end_date);
    $data['start_date'] = json_encode($start_date);

            drupal_add_js(array('lucanet_data' => array(
            'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr20.js');
}


// Fahrzeugfinanzierungsquote
else if ($report_id == 23)
{

    $data['monate_zahl'] = json_encode($monate_zahl);
    $data['VHR_11016829'] = json_encode($VHR_11016829);
    $data['ergebnis'] = json_encode($ergebnis);

    $data['zeller'] = json_encode($VHR_2407309);
    $data['nenner'] = json_encode($VHR_12663);

    $data['end_date'] = json_encode($end_date);
    $data['start_date'] = json_encode($start_date);

            drupal_add_js(array('lucanet_data' => array(
            'data' => $data,  //
            'lucanet_settings' => $lucanet_array_setting_v,
            'lucanet_settings_IST' => $lucanet_array_setting_IST,
            'lucanet_gruppe_id' => $gruppe_id,
          )), 'setting');
          drupal_add_js(drupal_get_path('module', 'lucanet_report') . '/lucanet_gr23.js');
}

// Rest
else
{
    drupal_set_message(t('Es liegen keine Daten für die Kundennummer '.$kd_nr. ' vor.
    Versuchen Sie bitte später noch ein Mal.'),'warning');
    // weiterleiten zur Auswertungsfunktion
}

}


function _lucanet_report_kommentar_set($form, &$form_state) {
    $commands = array();
    $status_meldung = '#lucanet_report_show_status';
    $commands[] = ajax_command_replace($status_meldung, "<div id ='lucanet_report_show_status'></div>");

    // Beim ersten Aufruf ist _lucanet_report_session('akt_date') = NULL
    $form_state['values']['datum'] = _lucanet_report_get_monat_name(0,_lucanet_report_session('akt_date'));
    //$form_state['values']['datum_hidden'] = _lucanet_report_session('akt_date');

    $kom = serialize($form_state['values']["lucanet_kommentar_".$form_state['storage']['dd_report_id']]);

    if ($kom !='' && $kom != '[Kein Kommentar liegt vor]')
    {
    global $user;
    $projekt_nr = $form_state['values']['kd_nr'];
    $report_id = $form_state['values']['report_id'];
    $datum = _lucanet_report_get_monat_name(1,_lucanet_report_session('akt_date'));
    //$form_state['values']['datum_hidden']; // YYYY-MM
    //dsm($form_state);

        try{
        $insert = db_insert('lucanet_kommentar_berater')
          ->fields(array(
            'kommentar' => $kom,
            'projekt_nr' => $projekt_nr,
            'berater_id' => $user->uid,
            'datum' => $datum.'-01',
            'report_id' => $report_id,
            'unix_timestamp' => REQUEST_TIME,
          ))

          ->execute();

         //drupal_set_message($insert->__toString());
         // Flüchtig angezeigt, weil page reload
          /* $commands[] = ajax_command_replace($status_meldung, "<div id ='status_meldung' class=\"messages status\"><ul><li>".t("Eingabe gespeichert!")."</li></ul></div>"); */
          $commands[] = ajax_command_replace($status_meldung, "<div id ='lucanet_report_show_status' class='messages status'><span style='16px'>".t("Gespeichert!")."</span></div>");
    }
    catch(Exception $e){
        // setzen
        $commands[] = ajax_command_replace($status_meldung, "<div id ='lucanet_report_show_status' class='messages error'><span style='16px'>".t("Fehler bei Speicherung, prüfen Sie Ihre Eingabe.")."</span></div>");
    }

} // IF KOMMENTAR vorhanden

else
{
$commands[] = ajax_command_replace($status_meldung, "<div id ='lucanet_report_show_status' class=\"messages error\"><span style='16px'>".t("Kein Kommentar eingegeben!")."</span></div>");
}
return array('#type' => 'ajax', '#commands' => $commands);
}


//Session handling
function _lucanet_report_session($key, $value = NULL) {
        static $storage;
        // Falls Wert vorhanden, in die Session speichern
        if ($value) {
        $storage[$key] = $value ;
        $_SESSION['lucanet_report'][$key] = $value ;   // I put 'lists' in case some other module uses 'type' in $_SESSION
        }
        // Falls Wert nicht vorhanden ist, auslesen und ausgeben
        else if (empty($storage[$key]) && isset($_SESSION['lucanet_report'][$key])) {
        $storage[$key] = $_SESSION['lucanet_report'][$key];
        }
        return $storage[$key];
}


// Datum der letzten Lieferung ausgeben. EIngabe c_id
function _lucanet_report_get_last_date($c_id)
{
        db_set_active('lucanet_susa');
        try{

        $bwa_oid= 'VHR_2399945'; // GILT für ALLE KENNZAHLEN - - letztes BWA Vorkommnis - - -> Datum der letzten Lieferung
        // Aktuellsten Monat von der Lieferung holen
        // query 1
        $subquery = db_select('betrag','b')
        ->condition('PeriodType', 'M', '=')
        ->condition('c_id', $c_id,'=')
        ->condition('Datenebene', 'OID_1201','=') // NUR IST WERTE!!!! - NEU
        ->condition('datenschluessel', db_like($bwa_oid), 'LIKE');
        $subquery->addExpression('MAX(datum)');

        // query 2
        $query = db_select('betrag', 'b');
        $result = $query
        ->fields('b', array('datum'))
        ->condition('PeriodType', 'M', '=')
        ->condition('c_id', $c_id, '=')
        ->condition('datum', $subquery,'IN')
        ->condition('Datenebene', 'OID_1201','=') // NUR IST WERTE!!!! - NEU
        ->condition('datum', '','!=')
        ->execute();
        db_set_active();

        foreach($result as $values){
        return($values->datum); // Array von ID's
    }

        }
        catch (Exception $e) {
        db_set_active();
        drupal_set_message($e);
    }
}

// SOrtierfunktion
function _lucanet_cockpit_cmp($a, $b)
{
    if ($a == $b) {
        return 0;
    }
    return ($a < $b) ? -1 : 1;
}


// Aktuellsten Wert von übergebener IOD liefern. Oder alle oids liefern
// Entweder übergeben oder von global filter ablesen
function _lucanet_report_get_last_date_value(/*$oid=NULL*/)
{

    $projekt_nr = _lucanet_report_kundennamen_call(); //_lucanet_cockpit_get_projekt_number();
    $matches = array();
    $oid = "";

        db_set_active('lucanet_susa');
        // 2 Select rows that match the string
        try{

        $bwa_oid= 'VHR_2399945'; // GILT für ALLE KENNZAHLEN - - letztes BWA Vorkommnis - - -> Datum der letzten Lieferung
        // Aktuellsten Monat von der Lieferung holen
        $subquery = db_select('betrag','b')
        ->condition('PeriodType', 'M', '=')
        ->condition('c_id', $projekt_nr,'=')
        ->condition('Datenebene', 'OID_1201','=') // NUR IST WERTE!!!! - NEU
        ->condition('datenschluessel', db_like($bwa_oid), 'LIKE');
        $subquery->addExpression('MAX(datum)');


        // Variable OID
        // 3 ALS Ergebnis erwartet 2016-03-01, -> Datum der letzten Lieferung muss genau dem Datum von der Kenzahl entsprechen.
        //$kennzahl1_oid = "VHR_6391750"; // PA Jahresergebnis vor Steuern
        $query = db_select('betrag', 'b');
        $result = $query
        ->fields('b', array('datenschluessel', 'Value', 'datum'))
        ->condition('PeriodType', 'M', '=')
        ->condition('c_id', $projekt_nr, '=')
        ->condition('datum', $subquery,'IN')
        ->condition('Datenebene', 'OID_1201','=') // NUR IST WERTE!!!! - NEU
        ->condition('datum', '','!=')
        //->condition('datenschluessel', db_like($oid), 'LIKE')
        ->execute();
        //$number_of_rows = $result->rowCount();
        db_set_active();

        foreach($result as $values){
            $matches['date'] = $values->datum;
            $matches[$values->datenschluessel] = $values->Value; // Array von ID's
            }
        //dsm($matches);
        return $matches;

    }
    catch (Exception $e) {

        db_set_active();
        drupal_set_message($e);
    }

      db_set_active();
        drupal_set_message('nein');
}

//

/**
 * Custom after build function for form.
 */
function _lucanet_report_form_after_build($form, $form_state) {
  // Hide format selection form.
  $form['lucanet_report_fieldset']["lucanet_kommentar_" . $form_state['storage']['dd_report_id']]['format']['#access'] = FALSE;
  return $form;
}