NETDEFGEN Events

NETDEFGEN generates event handlers for each class in the assembly. This MSIL code listens for .NET assembly events and routes them to the ACUCOBOL-GT runtime, which in turn delivers events to the COBOL program. If you see EVENT in the NETDEFGEN COPY file, as shown below, you know that event handlers were generated for this particular class.

* ooHHello  (Int32, System.String)
       EVENT, 1984084948, @MyClass_ooHHello

To capture events and data, write an event procedure using the COBOL EVENT PROCEDURE IS phrase on the DISPLAY, CREATE, and Screen section statements. Call the C$GETNETEVENTDATA library routine described in C$GETNETEVENTDATA. For example:

EVALUATE EVENT-DATA-2 
  WHEN @MyClasss_ooHHello
  CALL "C$GETNETEVENTDATA" USING EVENT-DATA-2 PARAM1