Let's take the sample code in C#:
private void button1_Click(object sender, System.EventArgs e)Now here is the same method in COBOL:
button1.Text = "Call COBOL";
METHOD-ID. button1_Click PRIVATE.Am I the only one that finds this maddening. OK, OK, for the record there are still more lines of COBOL running then any other language. It could be that COBOL is just that great or it could be the fear of re-engineering systems are working just fine.
01 sender OBJECT REFERENCE CLASS-OBJECT.
01 e OBJECT REFERENCE CLASS-EVENTARGS.
PROCEDURE DIVISION USING BY VALUE sender e.
SET PROP-TEXT OF button1 TO "Call COBOL".
END METHOD button1_Click.