é possibile richiamare classi e metodi Java da codice Infobasic

sintassi (da analizzare)


packageName ="uk.jms"
className ="MessageProducer"
methodName = "sendToFircosoft"

V_VERSION.TAG = CHAR(01):'001' ; * '\u0001\u0030\u0030\u0031'
param = V_VERSION.TAG : TYPE.MESSAGE

CALLJ packageName :"." :className, methodName, param SETTING ret ON ERROR
GOSUB CATCH.ERROR
END

IF ERROR.CODE EQ "" THEN
IF UPCASE(ret[1,5]) EQ "FALSE" THEN
ERROR.CODE = "99"
ERROR.TEXT = ret
END
END


CATCH.ERROR:
*===========

ERROR.CODE = SYSTEM(0)
BEGIN CASE

CASE ERROR.CODE = 1
ERROR.TEXT = "CALLJ Fatal error creating thread"

CASE ERROR.CODE = 2
ERROR.TEXT = "Cannot find the JVM"

CASE ERROR.CODE = 3 OR ERROR.CODE = 0
ERROR.TEXT = "Cannot find class"

CASE ERROR.CODE = 4
ERROR.TEXT = "CALLJ Unicode conversion error"

CASE ERROR.CODE = 5
ERROR.TEXT = "Cannot find method"

CASE ERROR.CODE = 6
ERROR.TEXT = "Cannot find object constructor"

CASE ERROR.CODE = 7
ERROR.TEXT = "Cannot instantiate object"
END CASE

RETURN