Hallo, mal was ganz besonders seltsames:
ich habe folgenden input für eine Rechenschleife:
1 Durchlauf: 1320
2 Durchlauf: 1320 + 101.83
3. Durchlauf: 1421 + 84.2105
4 Druchlauf: 843526 + 0
5 Durchlauf: 843526 + 101.7
6 Durchlauf: 843627,7
Was soll das? Wieso rechnet er die 84.2105 als 842105 - bei allen anderen Komma werten gehts.
Hier nochmal der Code, glaub aber net das es daran liegt (Die Promts geben den Output von oben):
@While(start<ende;
@Prompt([OK];"i";"Neu gesamt= " +@Text(trans));
@Prompt([OK];"i";"+ "+@Text(transactions[start]));
trans:=trans+@ToNumber(transactions[start]);
start:=start+1 );
erg:=erg+@NewLine+@Text(slot)+"|"+@Text(trans/delta);
tmperg:=trans/delta;
erg2:=erg2+@NewLine+@Text(slot)+"|"+"-20%|"+@Text(tmperg*0,8);
i:=i+1);
Function komma2dot(sstring As String)
'Wird von Sub "wareneingang_loeschen" aufgerufen, dieses wiederung ggfls. via Button "Letzte Eingabe widerrufen" in Maske "Bestpos"
Dim retval As String
Dim char As String
For x = 1 To Len(sstring)
char$ = Mid(sstring, x, 1)
If char$ = "," Then
char$ = "."
End If
retval$ = retval$ + char$
Next
komma2dot = retval$
End Function
klaus