Klicken Sie, um die Bereiche zu durchlaufen!

(Belongs to PmSamplesCas)

(:input filterbox data-selector="table" placeholder="Tabelle filtern" autofocus=1 :)
(:csv #CashBook template=#Template num=Einnahme,Ausgabe,Saldo decimals=2 decisep=',' thousep="." sort=Datum,Text :)

!!Extract for Mrs. Eloquendi

(:csv #CashBook query="*Eloquendi*" template=#Template num=Einnahme,Ausgabe,Saldo decimals=2 decisep=',' thousep="." sort=Datum,Text :)

!!Extract for „Spende“

(:csv #CashBook query="*Spende*" template=#Template num=Einnahme,Ausgabe,Saldo decimals=2 decisep=',' thousep="." sort=Datum,Text :)

(:if false:)
[[#CashBook]]
Datum;Text;Einnahme;Ausgabe;Saldo
2026-02-19;Hanuta;;20,45;
2026-02-19;Lakritz;;2,59;
2026-02-19;Briefmarken;;15,75;
2026-02-19;Kaffeefilter;;0,89;
2026-02-19;Spende Karin Spechta;150,00;;
2026-02-19;Spende Opa Vielmann;50,00;;
2026-02-21;Kaffee;;15,00;
2026-02-19;Briefmarken;;160,20;
2026-02-20;Müll;;123,45;
2026-02-21;Schokolade;;2,89;
2026-02-18;Zucker;;5,45;
2026-02-18;Kaffeefilter;;1,99;
2026-03-17;Lakritzstangen;;20,00;
2026-02-18;Milch;;12,55;
2026-02-03;Eloquendi Klassenkasse;75,00;;
2026-03-10;Perlenböck Klassenkasse;75,00;;
2026-04-07;Eloquendi Klassenkasse;150,00;;
2026-01-16;Spende anonym;80,00;;
[[#CashBookEnde]]

[[#Template]]
(:template first:)
(:table border=1 cellspacing=0 class=an85:)
(:headnr {$:bgc1i}:)#
(:head {$:bgc2i}:)Datum
(:head {$:bgc3i}:)Beleg-Nr.
(:head {$:bgc2i}:)Buchungstext
(:head {$:bgc3i}:)Einnahme
(:head {$:bgc2i}:)Ausgabe
(:head {$:bgc3i}:)Saldo
(:head:)
(:template each:)
(:cellnr align=right {$:bgc1}:)%purple%'''{$$CNT}'''
(:cell align=right {$:bgc2}:)(:if2 !equal {$$Datum} "":){(ftime fmt="%d.%m.%Y" {$$Datum})}(:if2end:)
(:cell {$:bgc3}:){(ftime fmt="%m%d" {$$Datum})}-{(tolower (substr "{$$Text}" 0 3))}
(:cell {$:bgc2}:){$$Text}
(:cell align=right {$:bgc3}:){(numfmt4 (unfmt {$$Einnahme}))}
(:cell align=right {$:bgc2}:)-{(numfmt4 (unfmt {$$Ausgabe}))}
(:cell align=right {$:bgc3}:){$$Saldo}
(:cell width=12%:)%nichtdrucken%(:csv-edit source={$$SOURCE} idx={$$IDX} form=#Bearbeiten popupedit=1:)  (:csv-delete target={$$SOURCE} idx={$$IDX}:)%%
(:template last:)
(:cellnr colspan=4:)
(:cell align=right colspan=3:)Add a new item …
(:cell:)(:csv-edit #CashBook idx=new form=#Neu:)
(:headnr colspan=4:)
(:head align=right {$:bgc3i}:){$$SUM_Einnahme}
(:head align=right {$:bgc2i}:)-{$$SUM_Ausgabe}
(:head align=right {$:bgc3i}:){(numfmt4 (add {$$SUM_Einnahme} -{$$SUM_Ausgabe} ))}
(:cell:)
(:tableend:)
[[#TemplateEnde]]

[[#Bearbeiten]]
(:fox eform  foxaction=csv csvact=replace target={$EditSource}{$EditSection} csvidx={$EditItem}:)
(:foxtemplate "{$$Datum};{$$Text};{$$Einnahme};{$$Ausgabe};{$$Saldo}" :)

!!!! Buchung bearbeiten:
(:input hidden Saldo:)
(:table class=an85:)
(:headnr {$:bgc1i}:)#
(:head {$:bgc2i}:)Datum
(:head {$:bgc3i}:)Beleg
(:head {$:bgc2i}:)Buchungstext
(:head {$:bgc3i}:)Einnahme
(:head {$:bgc2i}:)Ausgabe
(:cellnr {$:bgc1}:) ~ ~
(:cell align=right {$:bgc2}:)(:input date Datum required=1:) 
(:cell {$:bgc3}:)~ ~ ~ 
(:cell {$:bgc2}:)(:input text Text size=20 required=1:)
(:cell align=right {$:bgc3}:)(:input text Einnahme size=10 pattern="[0-9]+,[0-9]{2}" title="Format: 1234,00: keine Tausenderpunkte, Komma, zwei Dezimalstellen angeben!":)
(:cell align=right {$:bgc2}:)(:input text Ausgabe size=10 pattern="[0-9]+,[0-9]{2}" title="Format: 1234,00: keine Tausenderpunkte, Komma, zwei Dezimalstellen angeben!":)
(:table end:)

%right%   (:input submit post "Speichern (s)" focus=1 accesskey="s":)%% (:input submit post2 "In neuen Datensatz speichern":) (:input submit cancel "Abbrechen (w)" accesskey="w":) 

(:foxend eform:)
[[#BearbeitenEnde]]

[[#Neu]]
(:fox addform  foxaction=csv csvact=addnew target={$EditSource}{$EditSection} csvidx={$EditItem}:)
(:foxtemplate "{$$Datum};{$$Text};{$$Einnahme};{$$Ausgabe};{$$Saldo}" :)
!!!! Neue Buchung
(:input hidden Saldo:)
(:table class=an85:)
(:headnr {$:bgc1i}:)#
(:head {$:bgc2i}:)Datum
(:head {$:bgc3i}:)Beleg
(:head {$:bgc2i}:)Buchungstext
(:head {$:bgc3i}:)Einnahme
(:head {$:bgc2i}:)Ausgabe
(:cellnr {$:bgc1}:) ~ ~
(:cell align=right {$:bgc2}:)(:input date Datum required=1:) 
(:cell {$:bgc3}:)~ ~ ~ 
(:cell {$:bgc2}:)(:input text Text size=20 required=1:)
(:cell align=right {$:bgc3}:)(:input text Einnahme size=10 pattern="[0-9]+,[0-9]{2}" title="Format: 1234,00: keine Tausenderpunkte, Komma, zwei Dezimalstellen angeben!":)
(:cell align=right {$:bgc2}:)(:input text Ausgabe size=10 pattern="[0-9]+,[0-9]{2}" title="Format: 1234,00: keine Tausenderpunkte, Komma, zwei Dezimalstellen angeben!":)
(:table end:)

%right%   (:input submit post "Speichern (s)" focus=1 accesskey="s":)%% (:input submit cancel "Abbrechen (w)" accesskey="w":) 


(:foxend addform:)
[[#NeuEnde]]

(:ifend:)

>>b<<