TCL Script - Allgemeines zur Fehlerbehandlung

Jedes AllplanBridge-Kommando gibt eine entsprechende Fehlerinformation zurück, welche von der aufrufenden Prozedur behandelt werden sollte. Die meisten Kommandos retournieren ein TCL-Array mit den notwendigen Informationen. Falls der Rückgabewert eine OBJID ist, dann ist diese 0 im Fehlerfall.

Folgendes Beispiel zeigt die Aufruf des Kommandos zur Abfrage der Liste der Achsen:

array set axes [ABMAXES XGET LIST]

if { $axes(error) != 0 } { ABMERROR "Error: " $axes(error) " Info: " $axes(info) }

Der Aufruf ist nicht korrekt. Der Fehlercode wird abgefangen und eine Fehlermeldung geschrieben.

array set axes [ABMAXES GET LIST]

ABMINFO "First: " $axes(first) \

" Last: " $axes(last) \

" Count: " $axes(count) \

" Error: " $axes(error) \

" Info: " $axes(info)

Der Aufruf ist korrekt. Die Informationen zur Liste der Achsen wird geloggt.