Zähler
Die Zähler definieren die Art des Klick.
Mögliche Zähler sind bspw. S/W, Farbe, Scan.
Typischerweise haben die Zähler unterschiedliche Klickpreise für den Mehrverbrauch.
Freieinheiten
Die Freieinheiten sind die in der Abrechnungspauschale/-miete einkalkulierten Freiseiten je Zähler und beziehen sich auf alle Maschinen innerhalb der Zähler, sowie dem eingestellten Abrechnungsintervall der Mehrverbrauchsabrechnung.
FallbeispieleFallbeispiel
Fehlerhafte Zusammenstellung des Maschinen-Pool
Es wurde S/W und Farbe mit unterschiedlichen Freieinheiten in einer Zählergruppe erfasst.
Es ergibt sich daraus ein Nachteil für Sie, sofern am Ende der Abrechnungsperiode der S/W-Zählerstand weniger den vereinbarten Freieinheiten ist.
Dafür aber bspw. mehr Farbe gedruckt wurde und die Gesamtseitenzahl von S/W und Farbe die Freieinheiten der Zählergruppe nicht überschreitet.
| Info |
|---|
Beispiel.: S/W Volumen: 10.000 Seiten |
Glück im Unglück hätte man, wenn bei beiden Zählern die Freieinheiten überschritten werden. Dann wäre die Abrechnung wieder korrekt.
Korrekte Zusammenstellung des Maschinen-Pool
S/W und Farbe wurden in einer eigenen Zählergruppe erfasst.
Auffinden solcher Verträge
| Confluence prism macro | ||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||||||||||||
LOCAL laMenge[1]
= k_use('svr_kopf', 0)
= k_use('zaehler', 0)
= k_use('zpreise', 0)
_vfp.AutoYield = .T.
CREATE CURSOR __check (vertrag i, gruppe v(50), caption v(50), feinheiten n(18,2), preis n(18,6))
SELECT ;
DISTINCT gruppe ;
, gbez ;
FROM zaehler ;
WHERE vertrag IN (SELECT vertrag ;
FROM svr_kopf ;
WHERE vtyp = 1 ;
AND !gekundigt) ;
INTO CURSOR __gruppen
SCAN
WAIT WINDOW "Aktualisiere " + ALLTRIM(STR(RECNO())) + " von " + ALLTRIM(STR(RECCOUNT())) NOWAIT NOCLEAR
SELECT ;
zaehler.vertrag ;
, zaehler.CAPTION ;
, zaehler.feinheiten ;
, zpreise.preis ;
, zaehler.zid ;
FROM zaehler ;
INNER JOIN zpreise ;
ON zaehler.zid = zpreise.pos_id ;
WHERE gruppe = __gruppen.gruppe ;
GROUP BY zid ;
INTO ARRAY laMenge
IF _TALLY > 1
FOR lnCount = 1 TO ALEN(laMenge,1)
INSERT INTO __check VALUES(laMenge(lnCount, 1), ALLTRIM(__gruppen.gbez), laMenge(lnCount, 2), laMenge(lnCount, 3), laMenge(lnCount, 4))
NEXT
ENDIF
ENDSCAN
_vfp.AutoYield = .F.
SELECT __check
BROW NORM NOCA |