this is right source and tested.
-------------------------------------jvm cobol source-----------------------------------------------------------------------
method-id execute.
local-storage section.
linkage section.
01 myconnection object.
01 WK-TEST PIC X(9).
procedure division using by value myconnection.
*jvmcobolから呼び出してｄｂを接続の場合、下記ようにを書かなければならない
exec sql bind connection myconnection to :myconnection
end-exec.
IF SQLCODE NOT = 0
DISPLAY "CONNECTION ERROR"SQLCODE
END-IF.
EXEC SQL UNBIND CONNECTION :myconnection
END-EXEC.
end method.