6 Nov
2006
6 Nov
'06
5:17 p.m.
At 06:22 PM 11/6/2006, David Griffith wrote:
I took a class taught by a professor who would
constantly talk about a new
form of COBOL coming soon called COOL for COBOL Object Oriented Language.
Does anyone here know what this is/was?
Object-Oriented COBOL. As in Cobol .NET. All the GUI goodness with all
of COBOL's verbosity.
Nifty code segments like
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
PROCEDURE DIVISION.
INVOKE "segText" OF addForm "SetFocus".
(Equivalent to addForm.SegText.SetFocus() in other languages)
and
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 DOC-NAME.
05 DOC-OFFICE PIC X(5).
05 DOC-DOCUMENT PIC X(10).
05 DOC-SEGMENT PIC X(10).
PROCEDURE DIVISION.
INVOKE POW-SELF "CallForm" USING "findBoilerForm".
IF DOC-OFFICE NOT = SPACES
MOVE DOC-OFFICE TO "Text" OF "officeText" OF addForm
MOVE DOC-DOCUMENT TO "Text" OF "docText" OF addForm
MOVE DOC-SEGMENT TO "Text" OF "segText" OF addForm.
(i.e. addForm.segText.Text = DOC-SEGMENT, etc.)
Yes, I've used this quite successfully to migrate some "legacy" VMS
code to Windows.
-Rick