Dateigröße begrenzt ?

[mischwarz]

Hallo,

ich habe mir eine Routine geschrieben die, wenn ein Ereignis auftritt, eine Meldung in eine *.txt Datei in mein Home/MyMeldung schreibt.
Dies funktioniert soweit ganz gut. Allerdings funktioniert dies nicht mehr, wenn diese Datei größer als 1 KB ist. Es wird aber keine Fehlermeldung ausgegeben. Sind solche Dateien in ihrer größe begrenzt ???
Kann mir dabei jemand helfen ?

[Programmiersklave]

Eine Begrenzung in dieser Größenordnung ist mir unbekannt. Habe schon riesige Logs erzeugt. Muss eine andere Ursache haben.

Grüße

[mischwarz]

mmh   

[Programmiersklave]

Das hier loggt bei einer meiner Anlagen (5er Steuerung) jeden Tag ca. 50 kb:

Code:

const string messlognam:="mes5";
const string messlogerw:=".csv";
var string mlnameganz;

proc logit (string text1,
num wert1,
string text2,
num wert2)
!Jeder Tag erzeugt eine neue Datei, Werte werden angehaengt.

    VAR iodev LogFile;
    var string wert1string;
    var string wert2string;
   
    wert1string:=zahl2string2(wert1,3);
    wert2string:=zahl2string2(wert2,3);
   
    !Dateinamen machen
    mlnameganz:=messlognam +cdate()+ messlogerw;
    Open "home:/"\File:=mlnameganz,LogFile\Append;
    !--Datum--Zeit--
    Write LogFile,cdate()+","+ctime()+","+text1+","+wert1string+","+text2+","+wert2string;
    Close LogFile;
  ERROR
    IF ERRNO=ERR_FILEACC THEN
      TPWrite "Dateizugriffsfehler 1!";
      TRYNEXT;
    ENDIF
    IF ERRNO=ERR_FILEOPEN THEN
      TPWrite "Datei neu anlegen";
      Open "home:/"\File:=mlnameganz,LogFile\Write;
      Close LogFile;
      RETRY;
    ENDIF
endproc

(Zahl2String2 ist nur eine modifizierte num to string Konversion)

???

Grüße,
Michael

[mischwarz]

Danke zunächst für Deine Antwort. ich werde mich in der kommenden Woche nochmals darum kümmern.