Hallo liebe Experten,
ich habe eine Funktion die bestimmte Daten in SAP pflegt (und natürlich einen Rückgabewert liefert). Blöderweise bleibt eine bestimmte SAP Transaktion manchmal hängen, so dass die VBA-Funktion bis zum Sankt-Nimmerleinstag darauf wartet, dass SAP endlich mal in die Pötte kommt. Am liebsten wäre mir eine Art timeout Funktion zu implementieren. Die Funktion sollte einfach abgebrochen werden - oder von mir aus an eine bestimmte Stelle innerhalb der Funktion gesprungen werden, falls die Funktion mehr als fünf Sekunden braucht.
DummyCode mässig sieht die Funktion so aus:
Funktion SchreibwasinSAP as Boolean
Dim TimeOutTime As Double
TimeOutTime = Now + TimeValue("0:0:5")
Ontimeout go to TimeOut '=Ist natürlich nur DummyCode
' jetzt mach das ganze Zeug in SAP
SchreibwasinSAP = TRUE
exit function
Timeout:
ErrorStr=ErrStr & "TimeOut "& Material &", "
end function
Hat jemand eine Idee, wie man das hinbekommt?
Danke und Gruss
Theo