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

operator access to customer

Browse source
This commit is contained in:
ragu 2022-07-04 15:30:17 +02:00
parent 5c68b91b14
commit df19863a86
5 changed files with 15 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

5
copri4/main/src/Mod/APIfunc.pm
View file

@ -505,6 +505,7 @@ sub service_update(){
"ct.close_time" => "is::null",
int10 => "1",
int28 => "3",
end_time => ">=::(now() - interval '5 min')",
};
my $ctpos = { c_id => 0 };
@ -553,7 +554,7 @@ sub service_update(){
table_pos => "contenttranspos",
fetch => "one",
ca_id => "$auth->{c_id}",
#end_time => ">=::(now() - interval '10 minutes')",
end_time => ">=::(now() - interval '5 min')",
};
my $post_record = { c_id => 0 };
$post_record = $dbt->collect_post($dbh_operator,$postref);
@ -1749,7 +1750,7 @@ sub rental_to_feedback{
int10 => "1",
int11 => "3",#sig system
int28 => "3",#set count on sig rental_end
#end_time => ">=::(now() - interval '5 min')",
end_time => ">=::(now() - interval '5 min')",
};
my $ctpos = { c_id => 0 };
$ctpos = $dbt->collect_post($dbh,$pref);

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

@ -104,7 +104,7 @@ sub tpl(){
$save_key = "save_adr";
$edit_template = "$ctrel->{template_id}" . "000";
$tpl = $db->get_tpl($edit_template);
}elsif($node_meta->{ct_table} eq "users" && $u_id){
}elsif($node_meta->{ct_table} eq "users" && $node_meta->{tpl_id} == 198 && $u_id){
my $ref = {
table => "$node_meta->{ct_table}",
fetch => "one",

4
copri4/main/src/Tpl/Calorin.pm
View file

@ -125,7 +125,7 @@ sub tpl(){
print $q->end_form;
print $q->start_form();
print "<div id='Content4list' style='font-size:0.91em;min-width:1400px;'>\n";
print "<div id='Content4list' style='font-size:0.91em;min-width:1500px;'>\n";
my $start_date_time = $R::start_date_time;
my $end_date_time = $R::end_date_time;
@ -278,7 +278,7 @@ sub tpl(){
}
else{
$size="9px" if($key =~ /int/);
if($key =~ /ct_name/){
if($key =~ /ct_name|barcode/){
print $q->textfield(-class=>'stxt2',-name=>"$key",-default=>"$valxx",-size=>"$size",-override=>'1',-maxlength=>40, -placeholder=>"$des",-autofocus=>1),"\n";
}else{
print $q->textfield(-class=>'stxt2',-name=>"$key",-default=>"$valxx",-size=>"$size",-override=>'1', -maxlength=>40, -placeholder=>"$des"),"\n";