GUI ScreenIO for Windows

 ScreenIO.com


Fujitsu COBOL

Copy the file GS.COB from the GUI ScreenIO installation directory to wherever you keep your COBOL program source code.

Launch your COBOL program editor.

Open GS.COB so that you can edit it.

Examine the source code (it's pretty simple). The comments at the beginning of the program explain what you need to do.  Remove the comments from the Fujitsu section of code as shown below:

DATA DIVISION

No changes.

PROCEDURE DIVISION

 0001-PASSTHROUGH-CALL.
*----------------------------------------------------------
*--> Fujitsu COBOL <--*
*
     CALL 'GS32' WITH STDCALL USING BY REFERENCE A B C D.
     GOBACK.
     ENTRY 'GSWINAPI' USING W A B C D E F.
     CALL 'GSWAPI' WITH STDCALL
                   USING BY REFERENCE W A B C D E F.
     GOBACK.

Be sure that the source code for other compilers is commented out.

Save GS.COB.

Compile GS.COB.

Related topics:

We have tested GUI ScreenIO with various Fujitsu compilers, some as old as PowerCobol 3, and found it to work.  The linker shipped with some of the earlier compilers can not read our GS32.LIB, and a later version of link.exe is needed (We recommend version 6 from Microsoft).  PowerCobol 3 is both a 16 bit and 32 bit compiler, so be sure you use the correct version. (cobol32.exe).  You will find GUI ScreenIO dramatically easier to use than the older PowerCobol screen handling techniques.


2000-2019 Norcom, all rights reserved 

TOC

Send feedback to Norcom