R
Also für den ersten Blick ist schon Recht, obwohl ich nicht recht verstehe warum bei Dir immer "case X:;break;" steht. Fehlt da noch was ?
Ansonsten wirst Du wohl immer ein -1 zurückkriegen, wenn deine Datei "verbrauch.dat" heißt Du aber versuchst
pt=fopen("vberbrauch.dat","r")
zu öffnen.
Dann ist deine Fehlerausgabe etwas irreführend. Mit ´nem "r" kannst Du nur lesen (was du ja auch mit fsanf() machen kannst), aber als Fehlermeldung erzählst Du dem Anwender, das er nicht schreiben kann.
...