A liest
B liest
A schreibt
B schreibt

B gewinnt gemäß dem Humoristenprinzip (wer zuletzt lacht...)

dagegen hat man im vorigen Jahrhundert Datenbanken erfunden, da nennt man das lost update und es ist geradezu ein Treppenwitz der Geschichte und Realsatire, dass man auf der Maschine, die als erste Datenbank konnte, dann so wichtige Informationen in eine DTAARA reinschreibt... mich schüttelts schon wieder

D*B

Zitat Zitat von stefan24 Beitrag anzeigen
@fuerchau: Danke für den Tip mit dem formatieren..

@Bender: jo DecimalFormat hab ich jetzt benutzt.. (siehe Code).. hälst du das jetzt für zu fehleranfällig oder wie darf ich dich verstehen?

Code:
    public static void main(String[] args) {
    AS400 systemI = new AS400();
    String value;
    int intValue;
    String valueFormat = "0";
    try{        
        QSYSObjectPathName path = new QSYSObjectPathName("GRANER","DTTEST","DTAARA");
        CharacterDataArea dataArea = new CharacterDataArea(systemI, path.getPath());
        value = dataArea.read().trim();
        for (int i = 0; i < value.length()-1; i++) {
        valueFormat = valueFormat + "0";
        }
        intValue = Integer.valueOf(value).intValue();
        value =  new java.text.DecimalFormat(valueFormat).format(intValue+1);
        
        dataArea.write(value);
    
    } catch (Exception e) {
        System.out.println(e);
    }