mirror of
https://gitlab.com/t6353/sharee.bike.git
synced 2025-02-23 04:06:27 +01:00
log pid and sites
This commit is contained in:
parent
df19863a86
commit
3bb934ee18
6 changed files with 18 additions and 17 deletions
|
@ -76,8 +76,8 @@ my $response = {
|
||||||
user_group => [],
|
user_group => [],
|
||||||
user_tour => [],
|
user_tour => [],
|
||||||
response_state => "OK, nothing todo",
|
response_state => "OK, nothing todo",
|
||||||
agb_html => "site/agb_sharee_1.html",
|
agb_html => "site/agb_sharee_2.html",
|
||||||
privacy_html => "site/privacy_2.html",
|
privacy_html => "site/privacy_sharee_2.html",
|
||||||
impress_html => "site/impress_1.html",
|
impress_html => "site/impress_1.html",
|
||||||
tariff_info_html => "site/tariff_info.html",
|
tariff_info_html => "site/tariff_info.html",
|
||||||
bike_info_html => "site/bike_info_sharee_1.html",
|
bike_info_html => "site/bike_info_sharee_1.html",
|
||||||
|
|
|
@ -39,7 +39,7 @@ sub log {
|
||||||
my $logfile = "/var/log/copri4/$varenv{syshost}-process.log";
|
my $logfile = "/var/log/copri4/$varenv{syshost}-process.log";
|
||||||
#if($varenv{debug}){
|
#if($varenv{debug}){
|
||||||
if(1==1){
|
if(1==1){
|
||||||
warn "$what" . "\n" . Dumper($message) . "\n";#to apache2/error.log
|
warn "$$ $what" . "\n" . Dumper($message) . "\n";#to apache2/error.log
|
||||||
|
|
||||||
#2021-07-21 disabled. error.log is enough
|
#2021-07-21 disabled. error.log is enough
|
||||||
if(1==2){
|
if(1==2){
|
||||||
|
@ -51,7 +51,7 @@ sub log {
|
||||||
#also to stdout
|
#also to stdout
|
||||||
if($stdout){
|
if($stdout){
|
||||||
#print "\n--- $now_dt $0 ---\n";
|
#print "\n--- $now_dt $0 ---\n";
|
||||||
print "$what" . "\n" . Dumper($message) . "\n";
|
print "$$ $what" . "\n" . Dumper($message) . "\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
|
@ -651,8 +651,9 @@ td {
|
||||||
my ($mandant_main_id,$top,$site,$site_all,$wc,$footer_bank,$logo) = @_;
|
my ($mandant_main_id,$top,$site,$site_all,$wc,$footer_bank,$logo) = @_;
|
||||||
my $ctf = $db->get_content1("contentuser","$mandant_main_id");
|
my $ctf = $db->get_content1("contentuser","$mandant_main_id");
|
||||||
$ctf->{txt01} = $q->unescapeHTML("$ctf->{txt01}");
|
$ctf->{txt01} = $q->unescapeHTML("$ctf->{txt01}");
|
||||||
my @txt11 = split (/;/,"$ctf->{txt11}");#www
|
my @txt11 = split (/;/,"$ctf->{txt11}");#Tel usw.
|
||||||
my @txt19 = split (/;/,"$footer_bank");#Fußzeile
|
my @txt12 = split (/;/,"$ctf->{txt12}");#Geschäftsführer
|
||||||
|
my @txt19 = split (/;/,"$footer_bank");#Bank usw.
|
||||||
|
|
||||||
$top *= $site;
|
$top *= $site;
|
||||||
my $top2 = $top + 120;
|
my $top2 = $top + 120;
|
||||||
|
@ -672,13 +673,13 @@ td {
|
||||||
print "<td style='width:25%;'>";
|
print "<td style='width:25%;'>";
|
||||||
print $q->start_table({-border=>'0',-align=>'left'});
|
print $q->start_table({-border=>'0',-align=>'left'});
|
||||||
print $q->Tr();
|
print $q->Tr();
|
||||||
print $q->td({-class=>'tdpdf2'}, "KONTAKT:","\n");
|
print $q->td({-class=>'tdpdf2'}, "Geschäftsführer:","\n");
|
||||||
print $q->Tr();
|
print $q->Tr();
|
||||||
print $q->td({-class=>'tdpdf2'}, "$ctf->{txt01}","\n");
|
print $q->td({-class=>'tdpdf2'}, "$txt12[0]","\n");
|
||||||
print $q->Tr();
|
print $q->Tr();
|
||||||
print $q->td({-class=>'tdpdf2'}, "$ctf->{txt04}","\n");
|
print $q->td({-class=>'tdpdf2'}, "$txt12[1]","\n");
|
||||||
print $q->Tr();
|
print $q->Tr();
|
||||||
print $q->td({-class=>'tdpdf2'}, "$ctf->{txt05}","\n");
|
print $q->td({-class=>'tdpdf2'}, "$txt12[2]","\n");
|
||||||
print $q->end_table;
|
print $q->end_table;
|
||||||
print "</td>";
|
print "</td>";
|
||||||
|
|
||||||
|
|
|
@ -286,7 +286,7 @@ sub save_account(){
|
||||||
fetch => "one",
|
fetch => "one",
|
||||||
template_id => "228",
|
template_id => "228",
|
||||||
int03 => ">::0",
|
int03 => ">::0",
|
||||||
ct_name => "$bonusnr",
|
ct_name => "ilike::$bonusnr",
|
||||||
};
|
};
|
||||||
my $bonus_record = $dbt->fetch_record($dbh_operator,$pref_bo);
|
my $bonus_record = $dbt->fetch_record($dbh_operator,$pref_bo);
|
||||||
my $bonus_collect = {};#will be hash on matchin SWK bonus
|
my $bonus_collect = {};#will be hash on matchin SWK bonus
|
||||||
|
|
|
@ -42,11 +42,11 @@ sub tpl(){
|
||||||
if($users_sharee->{c_id} && $R::sharee_edit ne "delete_account2" && ($users_sharee->{c_id} eq $varenv->{superu_id} || $dbt->{copri_conf}->{stage} eq "test" || $users_sharee->{txt08} eq "sigo\@sharee.bike")){
|
if($users_sharee->{c_id} && $R::sharee_edit ne "delete_account2" && ($users_sharee->{c_id} eq $varenv->{superu_id} || $dbt->{copri_conf}->{stage} eq "test" || $users_sharee->{txt08} eq "sigo\@sharee.bike")){
|
||||||
my $coo = $q->cookie('domcookie') || $q->param('sessionid') || "";
|
my $coo = $q->cookie('domcookie') || $q->param('sessionid') || "";
|
||||||
|
|
||||||
#my $api_test = "sharee_fr01"; my $bike="FR1538";
|
my $api_test = "sharee_fr01"; my $bike="FR1538";
|
||||||
#my $api_test = "sharee_fr01"; my $bike="FR4781";#Tracking and BVB test
|
#my $api_test = "sharee_fr01"; my $bike="FR4781";#Tracking and BVB test
|
||||||
#my $api_test = "sharee_kn"; my $bike="KN205";
|
#my $api_test = "sharee_kn"; my $bike="KN205";
|
||||||
#my $api_test = "sharee_wue"; my $bike="WUE5525";
|
#my $api_test = "sharee_wue"; my $bike="WUE5525";
|
||||||
my $api_test = "sharee_sx"; my $bike="S3X1001";
|
#my $api_test = "sharee_sx"; my $bike="S3X1001";
|
||||||
#my $api_test = "sharee_ren"; my $bike="REN2";
|
#my $api_test = "sharee_ren"; my $bike="REN2";
|
||||||
|
|
||||||
print $q->div({-style=>'float:right;text-align:right;height:25px;padding:6px 15px;background-color:white'},$q->a({-style=>"background-color:#ffffff;color:#$bgcolor1;", -href=>"$varenv->{metahost}/src/scripts/tests/index.pl?sessionid=$coo\&api_test=$api_test\&bike=$bike", -target=>'_blank'}," [ tests --> $api_test ] "),"$users_sharee->{txt08}",$q->a({-style=>"color:#$bgcolor1;", -href=>"logout_sharee$session"},"logout")),"\n";
|
print $q->div({-style=>'float:right;text-align:right;height:25px;padding:6px 15px;background-color:white'},$q->a({-style=>"background-color:#ffffff;color:#$bgcolor1;", -href=>"$varenv->{metahost}/src/scripts/tests/index.pl?sessionid=$coo\&api_test=$api_test\&bike=$bike", -target=>'_blank'}," [ tests --> $api_test ] "),"$users_sharee->{txt08}",$q->a({-style=>"color:#$bgcolor1;", -href=>"logout_sharee$session"},"logout")),"\n";
|
||||||
|
|
|
@ -84,7 +84,7 @@ sub tpl(){
|
||||||
my $bonus_avail = "Die Bonusnummer ist nicht vorhanden.";
|
my $bonus_avail = "Die Bonusnummer ist nicht vorhanden.";
|
||||||
my $bonus_conflict = "Die Bonusnummer kann pro Registrierung nur einmal verwendet werden. So wird verhindert dass weitere Personen von den Freiminuten widerrechtlich Gebrauch nehmen.<br />
|
my $bonus_conflict = "Die Bonusnummer kann pro Registrierung nur einmal verwendet werden. So wird verhindert dass weitere Personen von den Freiminuten widerrechtlich Gebrauch nehmen.<br />
|
||||||
Weitere Personen aus Ihrem Haushalt profitieren jedoch ebenfalls, falls Sie weitere Produkte (Gas, SeeConnect, Fähre- oder Bus-Zeitkarten) nutzen. Dann könnte sich die zweite Person mit der weiteren Nummer registrieren.";
|
Weitere Personen aus Ihrem Haushalt profitieren jedoch ebenfalls, falls Sie weitere Produkte (Gas, SeeConnect, Fähre- oder Bus-Zeitkarten) nutzen. Dann könnte sich die zweite Person mit der weiteren Nummer registrieren.";
|
||||||
my $bonus_saved = "Gespeicherte Bonusnummer:";
|
my $bonus_saved = "Aktiviert:";
|
||||||
|
|
||||||
#sharee.bike text
|
#sharee.bike text
|
||||||
if($aowner == 186 || $aowner == 197){
|
if($aowner == 186 || $aowner == 197){
|
||||||
|
@ -92,7 +92,7 @@ Weitere Personen aus Ihrem Haushalt profitieren jedoch ebenfalls, falls Sie weit
|
||||||
$bonus_ak = "Ihr Freischaltcode wurde angenommen. Bitte beachten sie dass der Freischaltcode mit einem Mietradtarif verbunden ist. Der Tarif wird bei der Mietrad Reservierung angezeigt.";
|
$bonus_ak = "Ihr Freischaltcode wurde angenommen. Bitte beachten sie dass der Freischaltcode mit einem Mietradtarif verbunden ist. Der Tarif wird bei der Mietrad Reservierung angezeigt.";
|
||||||
$bonus_avail = "Der Freischaltcode ist nicht vorhanden.";
|
$bonus_avail = "Der Freischaltcode ist nicht vorhanden.";
|
||||||
$bonus_conflict = "Der Freischaltcode kann nur einmal verwendet werden.";
|
$bonus_conflict = "Der Freischaltcode kann nur einmal verwendet werden.";
|
||||||
$bonus_saved = "Gespeicherte Freischaltcodes:";
|
$bonus_saved = "Aktiviert:";
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -166,10 +166,10 @@ Weitere Personen aus Ihrem Haushalt profitieren jedoch ebenfalls, falls Sie weit
|
||||||
|
|
||||||
my $sharee_agb_text = {};
|
my $sharee_agb_text = {};
|
||||||
$sharee_agb_text->{ct_name} = "AGB";
|
$sharee_agb_text->{ct_name} = "AGB";
|
||||||
$sharee_agb_text->{txt01} = "<iframe src='$varenv->{wwwhost}/site/agb_sharee_1.html' style='width:100%;height:10000px;border:none;' scrolling='auto'></iframe>";
|
$sharee_agb_text->{txt01} = "<iframe src='$varenv->{wwwhost}/site/agb_sharee_2.html' style='width:100%;height:10000px;border:none;' scrolling='auto'></iframe>";
|
||||||
my $sharee_privacy_text = {};
|
my $sharee_privacy_text = {};
|
||||||
$sharee_privacy_text->{ct_name} = "Datenschutzhinweise";
|
$sharee_privacy_text->{ct_name} = "Datenschutzhinweise";
|
||||||
$sharee_privacy_text->{txt01} = "<iframe src='$varenv->{wwwhost}/site/privacy_2.html' style='width:100%;height:8000px;border:none;' scrolling='auto'></iframe>";
|
$sharee_privacy_text->{txt01} = "<iframe src='$varenv->{wwwhost}/site/privacy_sharee_2.html' style='width:100%;height:8000px;border:none;' scrolling='auto'></iframe>";
|
||||||
|
|
||||||
if($project eq "Konstanz"){
|
if($project eq "Konstanz"){
|
||||||
$sharee_agb_text->{txt01} = "<iframe src='$varenv->{wwwhost}/site/agb_konrad_1.html' style='width:100%;height:10000px;border:none;' scrolling='auto'></iframe>";
|
$sharee_agb_text->{txt01} = "<iframe src='$varenv->{wwwhost}/site/agb_konrad_1.html' style='width:100%;height:10000px;border:none;' scrolling='auto'></iframe>";
|
||||||
|
|
Loading…
Add table
Reference in a new issue