Reading Micro Focus(DOS) indexed files from PowerCobol

[alchemy]

We have been using version 5 of the Micro Focus/Microsoft cobol compiler and have now started to working in Powercobol (Version 4.2). So that we don't have to migrate all parts of our apps at once we would like to be able to read, using the indexes, the Micro Focus files, from within a Powercobol app. While not esential writing back to them would ne nice. Is there anycode available to allow us to do this.

Thanks in advance.

Matthew

 

[Tromba]

Hello Matthew

I suggest you an easy way to obtain the best result:

- Build a little application using Microfocus/Microsoft cobol that reads the records from indexed file, generating a line sequential file.
- Build a little application using Powercobol that reads records from previous line sequential file and generate the indexed file.

Hope this hints help you.

 

[alchemy]

Tromba
Thanks for the hint, we are already doing that but want a single step realtime operation.

Regards

Alchemy

 

[Tromba]

I'm not sure what you need exactly, but coould be a way to obtain the same result using a single step...

- Build an application in Powercobol
- Put a DDE control in the form
- write the statement (i.e. on a Cmcommand-Click event):

INVOKE DDE1 "Execute" using "MF001.EXE" POW-SWHIDE

I'm supposing your Microfocus program is called MF001.EXE

Using this approach you obtain the execution of your MF001.EXE program , hiding screen output, and after it close the DDE connection, you can open the line sequential file reading its records and generate the indexed file directly in Powercobol.

Hope in this help.

 

[Tromba]

I wanted to inform you that a new Cobol Fujitsu forum has been opened on Tek-Tips..

You can post your threads in it...

 

[alchemy]

Tromba
Thanks again for the process outline, it is I path we hadn't considered. Thanks also for the info on new forum.

Regards

Matthew