Good question. I was confused due to an omission in the documentation for the CREATE statement. In the Reference Guide, it says this: Format 2 CREATE assembly-name creates a non-graphical .NET object. CREATE "assembly-name" NAMESPACE { IS } "namespace" CLASS-NAME { IS } "class-name" HANDLE { IN } object-handle { IS } Remaining phrases are optional. VERSION { IS } "version" CULTURE { IS } "culture" STRONG-NAME { IS } "strong-name" CONSTRUCTOR { IS } CONSTRUCTOR parameters... MODULE { IS } "module" FILE-PATH { IS } "file-path" Notice that there is no EVENT PROCEDURE clause listed above for Format 2. However, just now I noticed that there is an EVENT PROCEDURE clause in the sample program under: extend Programming Guides A Guide to Interoperating with ACUCOBOL-GT Version 9.2.2 Working with .NET Assemblies Calling .NET from COBOL Using .NET Assemblies in COBOL Sample Program. The sample program does this, which looks like the complete answer: *CREATE - instantiate a NON-GUI CLASS. CREATE "@My.Assembly" NAMESPACE IS "My.Test.Namespace" CLASS-NAME IS "MyClass" EVENT PROCEDURE IS EVENT-PROC HANDLE IS MY-NONGUI-HANDLE. Thanks for making me dig deeper. If possible, I'd like Micro Focus to update the Reference Guide so that this is better documented under Format 2 of the CREATE statement.
↧