roko.li/sharee.bike
5
0
Fork 0
mirror of https://gitlab.com/t6353/sharee.bike.git synced 2025-05-14 07:36:29 +02:00
Code Issues Projects Releases Packages Wiki Activity

sigo api rental fork

Browse source
This commit is contained in:
ragu 2022-05-11 08:05:35 +02:00
parent 0163c06893
commit dd9be5f40e
14 changed files with 283 additions and 161 deletions
Download patch file Download diff file Expand all files Collapse all files

36
copri4/main/src/Tpl/BaseEdit.pm
View file

@ -55,9 +55,9 @@ sub tpl(){
my $u_id = $1 if($R::u_id && $R::u_id =~ /(\d+)/);
$u_id = $1 if($R::c_idadr && $R::c_idadr =~ /(\d+)/ && $R::base_edit eq "new_dmsusers");
my ($edit,$copy_key,$save_key,$relate_key,$move_key,$delete_key,$package_key);
my $tpl;
my @tpl_order;
my $edit_template;
my $tpl = {};
my @tpl_order = ();
my $edit_template = "";
my $bg_color = "grey";
my $ctrel = {};
if($node_meta->{ct_table} eq "content" && $node_meta->{tpl_id}){
@ -258,26 +258,41 @@ EOF
;
}
@tpl_order = split /,/,$tpl->{tpl_order};
#2. table content
print $q->start_table({-border=>'0', -width=>'100%',-align=>'center', -cellpadding=>'3', -cellspacing=>'0'});
print "<tr>\n";
my $j=0;
@tpl_order = split /,/,$tpl->{tpl_order};
#2.1 sub-table
print "<td style='border-bottom:1px solid silver;border-right:1px solid silver;vertical-align:top;padding:15px;'>\n";
print $q->start_table({-border=>'0', -width=>'100%',-align=>'center', -cellpadding=>'3', -cellspacing=>'0'});
$j++;
my @_service_valxx = ("","1","2","3","4");
foreach (@tpl_order){
my ($key,$des,$size,$postdes) = split /=/,$_;
my $seldes = $des;
$des .= " ($key)" if($users_dms->{u_id} eq $varenv{superu_id});
$j++;
if($tpl->{tpl_id} == 199){
if($j==1){
print $q->Tr();
print $q->td({-class=>'content1_cms',-colspan=>3},$q->b("under development, $tpl->{tpl_name}")),"\n";
}
my ($key,$tplkey,$des,$size,$service_interval,$service_type) = split /=/,$_;
$des = " ($key:$tplkey)" if($users_dms->{u_id} eq $varenv{superu_id});
if($key =~ /txt\d/ && $tplkey =~ /int\d/){
print $q->Tr();
print $q->td({-class=>'content1_cms'},"Wartung $des",$q->textfield(-class=>'etxt', -style=>"width:15em;",-name=>"$key", -default=>"")),"\n";
print $q->td({-class=>'content1_cms'},"Intervall",$q->textfield(-class=>'etxt', -style=>"width:2em;",-name=>"$key", -default=>""),"Tage"),"\n";
print $q->td({-class=>'content1_cms'},$but->radiobox2("$key","$ctrel->{$key}","aus","weich","hart")),"\n";
$ctrel->{$key} = $q->unescapeHTML("$ctrel->{$key}");
$ctrel->{$key} = $lb->newline($ctrel->{$key},"",1);
}
}else{
my ($key,$des,$size,$postdes) = split /=/,$_;
my $seldes = $des;
$des .= " ($key)" if($users_dms->{u_id} eq $varenv{superu_id});
$ctrel->{$key} = $q->unescapeHTML("$ctrel->{$key}");
$ctrel->{$key} = $lb->newline($ctrel->{$key},"",1);
if($key =~ /c_id|ct_name|barcode|txt/ && $size eq "readonly"){
print $q->Tr();
print $q->td({-class=>'left_italic_cms'},"$des"),"\n";
@ -641,6 +656,7 @@ EOF
$q->textfield(-class=>'etxt',-name=>"e_hh", -override=>'1',-default=>"$e_hh",-size=>"2",-maxlength=>2),":",
$q->textfield(-class=>'etxt',-name=>"e_mi", -override=>'1',-default=>"$e_mi",-size=>"2",-maxlength=>2)),"\n";
}
}#end else
}
print $q->end_table;
print "</td>\n";

3
copri4/main/src/Tpl/Karte.pm
View file

@ -85,6 +85,7 @@ sub tpl(){
#setting to true to keeps lat,lng and zoom
$preserve_view = "true" if($filesize < 200);
print $q->div({-class=>"content2_contact"},"Hier können Lastenfahrräder gemietet werden:"),"\n";
print "<div style='background-color:#cccccc;width:100%;margin-top:1em;'>\n";
print "<div id='map' style='height:$mapheight'></div>\n";
@ -95,7 +96,7 @@ print<<EOF
function initMap() {
var map = new google.maps.Map(document.getElementById('map'), {
scrollwheel: false,
draggable: !("ontouchend" in document),
//draggable: !("ontouchend" in document),
center: {lat: $lat, lng: $lng},
zoom: $map_zoom
});

2
copri4/main/src/Tpl/Liste3.pm
View file

@ -1103,7 +1103,7 @@ sub tpl(){
#print $q->div({-style=>"position:absolute;margin-left:$daymarker;border-right: solid thin #86cb00;height:1.7em;"},"&nbsp;"),"\n";# if("$mon" eq "$mon_today");
my $calpath = "Mietjournal";
$calpath = "Alarmjournal" if($ct4rel->{$id}->{int13} == $cttpos->{$ctid}->{int13} && $cttpos->{$ctid}->{int10} == 7);
print $q->div({-style=>"position:static;margin-left:$day_stpx;width:$rent_day_px;background-color:$scale_color"},$q->a({-class=>"linknav3",-style=>"$time_style",-href=>"$varenv{wwwhost}/$calpath/?cttpos_id=$cttpos->{$ctid}->{c_id}",-title=>"Im $calpath öffnen"},"$hh_en:$mm_en")),"\n";
print $q->div({-style=>"position:static;margin-left:$day_stpx;width:$rent_day_px;background-color:$scale_color"},$q->a({-class=>"linknav3",-style=>"$time_style",-href=>"$varenv{wwwhost}/DMS/$calpath/?cttpos_id=$cttpos->{$ctid}->{c_id}",-title=>"Im $calpath öffnen"},"$hh_en:$mm_en")),"\n";
print "</td>\n";
print $q->Tr();
print $q->td({-style=>'padding-top:1px;'},""),"\n";