Add 'void' command
This commit is contained in:
Juerd Waalboer
parent
f479060576
commit
10d1965bf0
6 changed files with 128 additions and 9 deletions
|
|
@ -5,8 +5,9 @@ products - RevBank plugin for selling products
|
|||
=head1 SYNOPISIS
|
||||
|
||||
8710447032756 0.80 Festini Peer
|
||||
4029764001807,clubmate 1.40 Club-Mate +pf
|
||||
4029764001807,clubmate 1.40 Club-Mate +half +pf
|
||||
pf 0.15@+pfand Pfand NRW-Flasche
|
||||
+half -50% 50% discount \o/
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
|
|
|
|||
|
|
@ -1,12 +1,11 @@
|
|||
#!perl
|
||||
|
||||
# TODO:
|
||||
# voiding of tokens
|
||||
# querying of tokens
|
||||
# expiry of tokens
|
||||
|
||||
use List::Util;
|
||||
|
||||
HELP void => "Destroy deposit tokens";
|
||||
|
||||
my $ttl = 100 * 86400; # expiry time in seconds
|
||||
my $filename = "revbank.statiegeld";
|
||||
|
||||
|
|
@ -159,6 +158,9 @@ sub hook_checkout_prepare($class, $cart, $username, $transaction_id, @) {
|
|||
$entry->quantity($available);
|
||||
$warnings_by_type{$type}++;
|
||||
}
|
||||
if ($entry->attribute('statiegeld_VOID_TOKENS')) {
|
||||
$cart->delete($entry);
|
||||
}
|
||||
|
||||
splice @{ $tokens_by_type->{$type} }, 0, $entry->quantity;
|
||||
$tokens_changed++;
|
||||
|
|
@ -197,3 +199,33 @@ sub hook_user_info ($class, $username, @) {
|
|||
@info = ("none") if not @info;
|
||||
print "Deposit tokens: ", join(", ", @info), "\n";
|
||||
}
|
||||
|
||||
sub command($self, $cart, $command, @) {
|
||||
$command eq 'void' or return NEXT;
|
||||
|
||||
my $found =0;
|
||||
for my $entry ($cart->entries('plugin')) {
|
||||
next if $entry->attribute('plugin') ne 'statiegeld';
|
||||
$found++;
|
||||
}
|
||||
$found or return REJECT, "Add deposit returns first.";
|
||||
|
||||
return "\e[31;1mDeposit token destruction mode.\e[0m\n\n"
|
||||
. "The tokens will be deleted irrevokably and you will NOT RECEIVE THE MONEY.\n"
|
||||
. "Type 'yes' if you are sure", \&void;
|
||||
}
|
||||
|
||||
sub void :Tab(yes,no) ($self, $cart, $input, @) {
|
||||
if ($input ne 'yes') {
|
||||
print "Destruction cancelled.\n";
|
||||
return ACCEPT;
|
||||
}
|
||||
|
||||
for my $entry ($cart->entries('plugin')) {
|
||||
next if $entry->attribute('plugin') ne 'statiegeld';
|
||||
$entry->attribute('statiegeld_VOID_TOKENS', 1);
|
||||
}
|
||||
|
||||
print "\e[31;1mDeposit token destruction mode activated.\e[0m\n";
|
||||
return ACCEPT;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -1,2 +1,27 @@
|
|||
juerd +163.48 2022-06-04_02:19:56 +@2021-12-03_18:27:54
|
||||
bla -36.00 2022-01-19_17:11:25 -@2022-01-19_17:00:43
|
||||
-cash -89663.00 2023-01-19_02:25:17 -@2022-08-28_23:45:54
|
||||
+sales/products +627.00 2023-01-19_05:23:33 +@2022-08-28_23:46:08
|
||||
ZeroCool +4 2022-08-29_17:46:21 +@2022-08-28_23:51:21
|
||||
CrashOverride -108.52 2023-01-05_20:49:17 -@2022-08-29_17:52:51
|
||||
xyzzy -95.07 2023-01-19_05:23:33 -@2023-01-19_03:11:44
|
||||
aoeu -20.67 2022-12-25_04:07:20 -@2022-12-25_01:56:03
|
||||
juerd -26.05 2023-01-19_03:11:06 -@2023-01-16_06:01:47
|
||||
+sales/market +16.00 2023-01-16_05:44:46 +@2022-08-29_17:40:38
|
||||
-undo 0.00 2022-08-29_16:13
|
||||
-pfand +0.75 2022-12-12_22:30:11 +@2022-11-24_22:32:35
|
||||
meh 0.00 2022-10-29_00:23:10
|
||||
mekker +0 2022-10-29_01:03:27 0@2022-10-29_01:03:27
|
||||
#foo 0.00 2022-11-01_04:26:16
|
||||
testje -215.00 2022-11-01_04:43:28 -@2022-11-01_04:27:53
|
||||
-deposits/reimburse -12.34 2022-12-12_23:34:33 -@2022-12-12_23:34:33
|
||||
+sales/unlisted +0.15 2022-12-24_05:40:39 +@2022-12-24_05:40:39
|
||||
+sta 0.00 2022-12-24_21:13:52
|
||||
+test 0.00 2022-12-24_21:13:52
|
||||
+statiegeld +40.80 2023-01-19_05:23:33 +@2022-12-24_21:35:01
|
||||
+stroomgebruik +0.80 2022-12-24_22:35:47 +@2022-12-24_22:35:47
|
||||
+sales/batt +2.40 2023-01-05_20:39:46 +@2022-12-24_22:30:08
|
||||
-korting +0.00 2022-12-25_04:28:09 0@2022-12-25_04:28:09
|
||||
-deposits/other -321.00 2023-01-16_04:24:21 -@2023-01-07_00:35:46
|
||||
-bounties -45.00 2022-12-25_05:05:39 -@2022-12-25_04:23:46
|
||||
-expenses/bounties -20.00 2022-12-25_05:06:40 -@2022-12-25_05:06:34
|
||||
kookpotje +3.00 2023-01-05_20:49:17 +@2023-01-05_20:49:17
|
||||
-deposits/iban 0.00 2023-01-16_05:47:03
|
||||
|
|
|
|||
|
|
@ -1,5 +1,5 @@
|
|||
# Price =
|
||||
#aeouaoeuaeou# Price =
|
||||
# Seller Barcode Seller + Space Description
|
||||
|
||||
Juerd sku81873 6.00 2.00 Cijfertjes/ledjes/knopjes-module
|
||||
Juerd sku81873 6 2 Cijfertjes/ledjes/knopjes-module
|
||||
|
||||
|
|
|
|||
|
|
@ -22,14 +22,17 @@ adduser
|
|||
edit
|
||||
|
||||
beep_terminal
|
||||
dinnerbonus
|
||||
|
||||
# Then, plugins that apply heuristics
|
||||
|
||||
repeat
|
||||
statiegeld
|
||||
statiegeld_tokens
|
||||
products # matches product IDs (barcodes)
|
||||
market # also matches product IDs
|
||||
withdraw # matches amounts
|
||||
users # matches usernames
|
||||
deposit # wants to be after 'users'
|
||||
#deposit_methods # Extra options for 'deposit'. Edit/configure first!
|
||||
deposit_methods # Extra options for 'deposit'. Edit/configure first!
|
||||
#deposit_iban_qr # QR code display, edit/configure first! (needs qrencode(1))
|
||||
|
|
|
|||
|
|
@ -1,5 +1,16 @@
|
|||
### THIS IS THE EXAMPLE FILE; DON'T ADD PRODUCTS, BUT MAKE A NEW FILE ###
|
||||
|
||||
# Deze in principe niet veranderen want dat heeft invloed op producten
|
||||
# die al eerder verkocht zijn. Omschrijving aanpassen kan geen kwaad.
|
||||
+sb 0.15@+statiegeld Statiegeld blikje
|
||||
+sf 0.15@+statiegeld Statiegeld plastic flesje
|
||||
+sm 0.15@+statiegeld Statiegeld Mehrwegflasche
|
||||
matekrat 1.50@+statiegeld Statiegeld matekrat excl. inhoud
|
||||
|
||||
# Let op: als een product een statiegeld addon (bijv. +sb) heeft, dat niet
|
||||
# meer veranderen, want dan kan het product niet meer worden ingeleverd.
|
||||
|
||||
|
||||
|
||||
# Empty lines and lines beginning with # are ignored.
|
||||
|
||||
|
|
@ -23,3 +34,50 @@
|
|||
05414359710322 0.50 Chips
|
||||
05414359710315 0.50 Chips
|
||||
zakjechips 0.50 Chips
|
||||
|
||||
|
||||
clubmate,4029764001807 1.40 Club-Mate +sm
|
||||
87124385 1.10 Chocomel
|
||||
8710447032756 0.80 Festini peer
|
||||
tostikaas 1.15 Tosti kaas
|
||||
4001724035848 5.10 Pizza Veggie Mix
|
||||
|
||||
cola,5000112638745 0.90 Coca-Cola Zero, blik 33 cl +korting +sb
|
||||
pizza 4.50 Pizza +sgo
|
||||
+korting -50% Yay korting
|
||||
|
||||
dinges 0.00 Dingeskitje +aa +pcb +koppla +j +korting
|
||||
aa 0.20@+sales/batt Batterij
|
||||
pcb 0.80 pcb
|
||||
koppla 5.00 Koppla
|
||||
j 0.10@juerd Gratis geld voor juerd
|
||||
|
||||
#moo 2,151 bla
|
||||
#meh 1.00 blaaat +mekker
|
||||
bla -5
|
||||
|
||||
#aap 1.00 ding +noot
|
||||
#noot 9.99 dinges deze niet
|
||||
#+noot 2.00 dinges +mies
|
||||
#mies 3.00 donges +aap
|
||||
|
||||
sgo 0.80@+stroomgebruik Stroomgebruik oven
|
||||
|
||||
nietsb -0.15@+statiegeld WHoaaa
|
||||
|
||||
korting -0.10@-korting Korting \o/
|
||||
|
||||
BOUNTY1 -10.00@-expenses/bounties Bedankt voor dingen!! +j
|
||||
BOUNTY2 -5.00@-expenses/bounties Bedankt en zo
|
||||
|
||||
|
||||
example_id 1.00 Example product +something
|
||||
+something 1.00 Product that has an id that starts with plus
|
||||
example,+alias 1.00 Product that has an alias that starts with plus
|
||||
|
||||
|
||||
example_id1 1.00 Example product+something
|
||||
example_id2 1.00 Example product + something
|
||||
more_stuff 1.00 Example product with +something but not at the end
|
||||
bbq 1.00 3+ pieces of meat
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue