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

operator faktura config

Browse source
This commit is contained in:
ragu 2022-10-18 20:15:11 +02:00
commit ae4ff98d9b
16 changed files with 186 additions and 260 deletions
Download patch file Download diff file Expand all files Collapse all files

32
copri4/main/src/scripts/Ilockit_CSV2DB.pl
View file

@ -62,7 +62,8 @@ my $template_id = 205;
#'quote_char' => "\"",
'escape_char' => undef,
'file' => $csv_file,
'col_names' => ["serialnr","ilockit_id","ilockit_key","c1","c2","c3","c4","c5","c6"]
#'col_names' => ["serialnr","ilockit_id","ilockit_key","c1"]
'col_names' => ["serialnr","ilockit_id","ilockit_key","c1","bikeid","rahmen","stationid","bike_name"]
};
my $sth = $dbh_csv->prepare("SELECT * FROM ilockitcsv where serialnr like 'C2-%'");
@ -75,12 +76,13 @@ my $template_id = 205;
if($csv->{$id}->{serialnr}){
$csv->{$id}->{ilockit_id} =~ s/\+/\-/;
$csv->{$id}->{c1} =~ s/Rot/red/;$csv->{$id}->{c1} =~ s/Blau/blue/;$csv->{$id}->{c1} =~ s/Gr.+n/green/;
$csv->{$id}->{c2} =~ s/Rot/red/;$csv->{$id}->{c2} =~ s/Blau/blue/;$csv->{$id}->{c2} =~ s/Gr.+n/green/;
$csv->{$id}->{c3} =~ s/Rot/red/;$csv->{$id}->{c3} =~ s/Blau/blue/;$csv->{$id}->{c3} =~ s/Gr.+n/green/;
$csv->{$id}->{c4} =~ s/Rot/red/;$csv->{$id}->{c4} =~ s/Blau/blue/;$csv->{$id}->{c4} =~ s/Gr.+n/green/;
$csv->{$id}->{c5} =~ s/Rot/red/;$csv->{$id}->{c5} =~ s/Blau/blue/;$csv->{$id}->{c5} =~ s/Gr.+n/green/;
$csv->{$id}->{c6} =~ s/Rot/red/;$csv->{$id}->{c6} =~ s/Blau/blue/;$csv->{$id}->{c6} =~ s/Gr.+n/green/;
$csv->{$id}->{c1} =~ s/R/red /g;
$csv->{$id}->{c1} =~ s/B/blue /g;
$csv->{$id}->{c1} =~ s/G/green /g;
$csv->{$id}->{c1} =~ s/\s$//;#empty last space
$csv->{$id}->{bikeid} =~ s/THU//;
$csv->{$id}->{stationid} =~ s/THU//;
print "$i) $csv->{$id}->{serialnr}|\n";
my $ct = &select_content($csv->{$id});
@ -92,15 +94,15 @@ my $template_id = 205;
txt22 => "$csv->{$id}->{serialnr}",
txt18 => "$csv->{$id}->{ilockit_id}",
byte01 => "\\x$csv->{$id}->{ilockit_key}",
int04 => "0",#station Werkstatt
int10 => "5",#defect
barcode => "$csv->{$id}->{bikeid}",
int04 => "$csv->{$id}->{stationid}",#station
txt01 => "$csv->{$id}->{bike_name}",
txt11 => "$csv->{$id}->{rahmen}",
txt23 => "$csv->{$id}->{c1}",
int10 => "1",#available
int20 => "1",#locked
int11 => "2",#Ilockit
int20 => "2",#unlocked
txt01 => "Mietrad neu", #Bezeichnung #TODO
txt04 => "", #Besonderheiten
txt15 => "", #Firmware
txt17 => "", #GUID from APP
txt23 => "$csv->{$id}->{c1} $csv->{$id}->{c2} $csv->{$id}->{c3} $csv->{$id}->{c4} $csv->{$id}->{c5} $csv->{$id}->{c6}",
txt04 => "", #Sonstiges
mtime => "now()",
owner => "1842",
};

2
copri4/main/src/scripts/sms_message.pl
View file

@ -137,6 +137,6 @@ if($todo eq "fraud_rental" && $pos_id){
my $booking = { c_id => 0 };
$booking = $dbt->fetch_tablerecord($dbh,$booking_pos);
#$smstrans->sms_message($todo,"",$sms_to,$booking->{ct_name});
$smstrans->sms_message($todo,"",$sms_to,$booking->{ct_name});
}#end