diff --git a/copri4/main/src/Mod/APIfunc.pm b/copri4/main/src/Mod/APIfunc.pm
index fcd8fe8..a1a985c 100755
--- a/copri4/main/src/Mod/APIfunc.pm
+++ b/copri4/main/src/Mod/APIfunc.pm
@@ -1494,28 +1494,6 @@ sub booking_update(){
$booking_values->{co2saving} = $co2saving;
}
}
-
- #to LV only if available
- if($varenv{dbname} eq "sharee_lv" && $booking->{int10} == 1){
- #system(`$varenv{basedir}/src/scripts/xml2lastenvelo.pl pos2xml $booking->{c_id} "contenttranspos" ""`);
- my $xml = "\n";
- $xml .= "\n";
- $xml .= "available\n";
- $xml .= "$booking_values->{bike}\n";
- $xml .= "$auth->{int01}\n";
- $xml .= "$auth->{txt08}\n";
- $xml .= "\n";
-
- my $avail_file = "$varenv{xmlfile}/sharee_available.xml";
- unlink "$avail_file";
- open(FILE,">$avail_file");
- print FILE "$xml";
- close(FILE);
- chmod 0666, "$avail_file";
- $bw->log("scp $avail_file",$xml,"");
- system("/usr/bin/scp -P 50001 $avail_file pi\@localhost:/home/pi/lvfserver/inbox_xml_files/.") if($dbt->{copri_conf}->{stage} eq "live");
- }
-
}
}
return ($rows,$booking_values);
diff --git a/copri4/main/src/Mod/APIjsonserver.pm b/copri4/main/src/Mod/APIjsonserver.pm
index 6616c59..c37350e 100755
--- a/copri4/main/src/Mod/APIjsonserver.pm
+++ b/copri4/main/src/Mod/APIjsonserver.pm
@@ -120,7 +120,12 @@ if(!$coo && !$q->param('merchant_id')){
#if($aowner && ($aowner == 195 || $aowner == 185 || $aowner == 176)){
if($return_merchant->{project_id} eq "Konstanz"){
$response->{agb_html} = "$dbt->{project_conf}->{Konstanz}->{agb_html}";
+ $response->{tariff_info_html} = "$dbt->{project_conf}->{Konstanz}->{tariff_info_html}";
$response->{bike_info_html} = "$dbt->{project_conf}->{Konstanz}->{bike_info_html}";
+ if($lang ne "de"){
+ $response->{tariff_info_html} =~ s/\.html/_en\.html/;
+ $response->{bike_info_html} =~ s/\.html/_en\.html/;
+ }
}
if($return_merchant->{project_id} eq "Bayern"){
$response->{agb_html} = "$dbt->{project_conf}->{Bayern}->{agb_html}";
@@ -717,16 +722,16 @@ elsif($q->param('request') eq "stations_available"){
}
#App merchant message
- if($user_agent =~ /konrad/i){
- if($epoch_now >= $epoch_start && $epoch_now <= $epoch_end){
+ if($user_agent =~ /konrad/i && $varenv{cms}->{'App-merchant-message'}->{txt}){
+ #if($epoch_now >= $epoch_start && $epoch_now <= $epoch_end){
$response->{merchant_message} = $varenv{cms}->{'App-merchant-message'}->{txt};
- }
+ #}
}
- #disabled sig is offline message
- if(1==2 && $user_agent =~ /bayern/i){
- if($epoch_now >= $epoch_start && $epoch_now <= $epoch_end){
+ #App merchant message bayern
+ if($user_agent =~ /bayern/i && $varenv{cms}->{'App-merchant-message-bayern'}->{txt}){
+ #if($epoch_now >= $epoch_start && $epoch_now <= $epoch_end){
$response->{merchant_message} = $varenv{cms}->{'App-merchant-message-bayern'}->{txt};
- }
+ #}
}
$response = { %$response, %$auth };
diff --git a/copri4/main/src/Mod/Basework.pm b/copri4/main/src/Mod/Basework.pm
index c3d307c..a082d6b 100755
--- a/copri4/main/src/Mod/Basework.pm
+++ b/copri4/main/src/Mod/Basework.pm
@@ -78,9 +78,9 @@ EOF
if($feedb->{message} && $feedb->{message} =~ /[a-z]/ && $feedb->{message} !~ /failure::/){
print $q->div({-id=>'retm'},"$feedb->{message} $debug"),"\n";
}else{
- print $q->div({-id=>'retm'},"$node_meta->{node_name} angelegt $debug"),"\n" if($feedb->{i_rows});
- print $q->div({-id=>'retm'},"$node_meta->{node_name} aktualisiert $debug"),"\n" if($feedb->{u_rows});
- print $q->div({-id=>'retm'},"$node_meta->{node_name} gelöscht $debug"),"\n" if($feedb->{d_rows});
+ print $q->div({-id=>'retm'},"Datensatz in \"$node_meta->{node_name}\" angelegt $debug"),"\n" if($feedb->{i_rows});
+ print $q->div({-id=>'retm'},"Datensatz in \"$node_meta->{node_name}\" aktualisiert $debug"),"\n" if($feedb->{u_rows});
+ print $q->div({-id=>'retm'},"Datensatz in \"$node_meta->{node_name}\" gelöscht $debug"),"\n" if($feedb->{d_rows});
}
}
diff --git a/copri4/main/src/Mod/Modalbox3.pm b/copri4/main/src/Mod/Modalbox3.pm
index cc40733..6ab57a6 100755
--- a/copri4/main/src/Mod/Modalbox3.pm
+++ b/copri4/main/src/Mod/Modalbox3.pm
@@ -23,9 +23,7 @@ sub new {
sub mobox3(){
my $node_meta = shift;
my $users_dms = shift;
- my $feedb = shift || "";
- my $return = shift || "";
- my $mode = shift || "";
+ my $feedb = shift || {};
my $q = new CGI;
my $cf = new Config;
@@ -102,10 +100,10 @@ EOF
if($R::node2edit && $R::node2edit =~ /new_relation|edit_relation/){
if($node_meta->{ct_table} eq "content" && $node_meta->{template_id} eq "205"){
require "Mod/NodeEdit.pm";
- &NodeEdit::admin_tpl($node_meta,$users_dms,$mode,$return);
+ &NodeEdit::admin_tpl($node_meta,$users_dms);
}elsif($users_dms->{u_id} == $dbt->{copri_conf}->{superu_id}){
require "Mod/NodeEdit.pm";
- &NodeEdit::admin_tpl($node_meta,$users_dms,$mode,$return,"only superu_id");
+ &NodeEdit::admin_tpl($node_meta,$users_dms,"only superu_id");
}else{
print $q->div("Dieses Menue ist zur Bearbeitung nicht freigegeben.");
}
diff --git a/copri4/main/src/Mod/NodeEdit.pm b/copri4/main/src/Mod/NodeEdit.pm
index f861712..750944e 100755
--- a/copri4/main/src/Mod/NodeEdit.pm
+++ b/copri4/main/src/Mod/NodeEdit.pm
@@ -26,8 +26,6 @@ sub new {
sub admin_tpl(){
my $node_meta = shift;
my $users_dms = shift;
- my $u_group = shift;
- my $return = shift;
my $superu_id = shift || "";
my $q = new CGI;
diff --git a/copri4/main/src/Tpl/Liste3.pm b/copri4/main/src/Tpl/Liste3.pm
index 2c79cea..561fce4 100755
--- a/copri4/main/src/Tpl/Liste3.pm
+++ b/copri4/main/src/Tpl/Liste3.pm
@@ -436,7 +436,7 @@ EOF
}
#it will takes only one dataset
- if($node_meta->{ct_table} eq "contenttrans" && $c_id4trans && $c_id4trans =~ /^\d+$/ && (($users_dms->{faksum}) || ($node_meta->{tpl_id} == 209 && $v_journal && !$R::detail_search))){
+ if($node_meta->{ct_table} eq "contenttrans" && $c_id4trans && $c_id4trans =~ /^\d+$/ && (($users_dms->{faksum}) || ($full_url ne $referer) || ($node_meta->{tpl_id} == 209 && $v_journal && !$R::detail_search))){
$ct4rel = $db->collect_cid($table,$lang,$tplids,$R::rel_id,$R::barcode,"c_id",$c_id4trans);
}elsif(!$start_chck && !$end_chck){
diff --git a/copri4/main/src/Tpl/MandantConf.pm b/copri4/main/src/Tpl/MandantConf.pm
index f20c624..58ed762 100755
--- a/copri4/main/src/Tpl/MandantConf.pm
+++ b/copri4/main/src/Tpl/MandantConf.pm
@@ -26,8 +26,7 @@ sub new {
sub tpl(){
my $node_meta = shift;
my $users_dms = shift;
- my $u_group = shift;
- my $return = shift || "";
+ my $feedb = shift || {};
my $q = new CGI;
my $cf = new Config;
@@ -63,7 +62,7 @@ sub tpl(){
$rel = $db->get_rel4tpl($node_meta->{main_id},$lang,"","197","","",">0");
$ct = $db->get_content1("contentuser",$rel->{content_id});
}else{
- $return = "failure::Abbruch. Keine Zugriffsberechtigung";
+ $feedb->{message} = "failure::Abbruch. Keine Zugriffsberechtigung";
}
}
@@ -79,7 +78,7 @@ sub tpl(){
#Content
print $q->start_table({-border=>'0', -width=>'100%',-align=>'center', -cellpadding=>'3', -cellspacing=>'0'});
- if($return !~ /failure/){
+ if($feedb->{message} !~ /failure/){
print $q->Tr();
if($R::config2edit){
print "
";
@@ -142,6 +141,6 @@ sub tpl(){
$debug = "(ct_table: $node_meta->{ct_table} | main_id: $node_meta->{main_id} | c_id: $ct->{c_id} | tpl_id: $tpl->{tpl_id} | rel_id: $rel->{rel_id})";
print $q->div({-style=>'z-index:10;font-size:13px;'},"$debug"),"\n" if($users_dms->{u_id} == $dbt->{copri_conf}->{superu_id});
- return $return;
+ return $feedb;
}
1;
diff --git a/copri4/shareedms-operator/src/Lib/Mlogic.pm b/copri4/shareedms-operator/src/Lib/Mlogic.pm
index 2664e93..cba6f2d 100755
--- a/copri4/shareedms-operator/src/Lib/Mlogic.pm
+++ b/copri4/shareedms-operator/src/Lib/Mlogic.pm
@@ -302,9 +302,8 @@ sub tplselect(){
my $users_dms = shift;
my $mode = shift || "";
my $varenv = shift;
- my $feedb = shift || "";
+ my $feedb_req = shift || {};
- my $return = "";
my $sort = "";
my $lang = "de";
my $tpl_name = $node_meta->{tpl_name};
@@ -312,15 +311,14 @@ sub tplselect(){
my $ct_table = $node_meta->{ct_table};
my $parent_id = $node_meta->{parent_id};
my $main_id = $node_meta->{main_id};
- #print Dumper($node_meta);
- #exit;
+ my $feedb = { message => '' };
if($node_meta->{tpl_id} =~ /194|195|199/ && $node_meta->{ct_table} eq "contentuser"){
require "Tpl/SubListe.pm";
$feedb = &SubListe::tpl($node_meta,$users_dms,$feedb);
}elsif($node_meta->{ct_table} eq "contentuser"){
require "Tpl/MandantConf.pm";
- $return = &MandantConf::tpl($node_meta,$users_dms,$mode,$feedb);
+ $feedb = &MandantConf::tpl($node_meta,$users_dms,$feedb);
}elsif($node_meta->{tpl_id} == 1 && $node_meta->{main_id} == 200017){
require "Tpl/Karte_osm.pm";
&Karte_osm::tpl($node_meta,$users_dms,$mode,$varenv,"",$feedb);
@@ -334,24 +332,26 @@ sub tplselect(){
require "Tpl/Calorin.pm";
&Calorin::tpl($node_meta,$users_dms,$mode,$feedb);
}
+ #print Dumper($feedb);
+ #exit;
- if(ref($feedb) eq "HASH" && $feedb->{message} =~ /failure/){
+ if(ref($feedb_req) eq "HASH" && $feedb_req->{message} =~ /failure/){
require "Mod/Failure.pm";
- &Failure::tpl($varenv,$users_dms->{u_id},$feedb);
- }elsif($return =~ /failure/){
- $feedb->{message} = "$return";
- require "Mod/Failure.pm";
- &Failure::tpl($varenv,$users_dms->{u_id},$feedb);
+ &Failure::tpl($varenv,$users_dms->{u_id},$feedb_req);
}else{
if(($R::ct_trans !~ /close/) && ($ct_table =~ /contenttrans/) && ($R::ct_trans || $R::trans2edit || $R::ctpos_activ || $R::select_part || $R::set_main_id)){
- &Modalbox::mobox($node_meta,$users_dms,$return);
+ &Modalbox::mobox($node_meta,$users_dms,$feedb_req);
}elsif(($R::ct_trans !~ /close/) && ($ct_table =~ /content$|contentadr|contentuser|contentpos|users$|contenttranspos/ && ($R::ct_trans || $R::rel_edit || $R::base_edit)) || ($R::node2edit && $R::node2edit =~ /edit/)){
- &Modalbox3::mobox3($node_meta,$users_dms,$feedb,$return,$mode) if($R::rel_edit !~ /delete|save/ && $R::ct_trans !~ /delete/ && $R::base_edit !~ /delete|save_pos/ && !$R::service_id);
+ &Modalbox3::mobox3($node_meta,$users_dms,$feedb_req) if($R::rel_edit !~ /delete|save/ && $R::ct_trans !~ /delete/ && $R::base_edit !~ /delete|save_pos/ && !$R::service_id);
}
}
- if(ref($feedb) eq "HASH" && $feedb->{message}){
+ #prio feedback on data request
+ if(ref($feedb_req) eq "HASH"){
+ $bw->return_feedback($node_meta,$users_dms,$feedb_req);
+ }elsif(ref($feedb) eq "HASH" && $feedb->{message}){
$bw->return_feedback($node_meta,$users_dms,$feedb);
}
+
}
1;
|