Micro Focus Cobol

[LindaC]

We need to access a Micro Focus indexed ascii file with our Micro Focus cobol programs.&nbsp;&nbsp;The program runs but no output is produced.&nbsp;&nbsp;Can anyone point us in the right direction? <p>LindaC<br><a href=mailto:lcastner@co.orange.ny.us>lcastner@co.orange.ny.us</a><br><a href= > </a><br>

 

[MuadDubby]

The answer to this question could be one of a thousand ...<br><br>You need more info in order to debug this. Your problem could be any one of these (or other) examples :<br><br>* file locking (the file is being used by another user/app at the same time and is locked for exclusive use), <br>* the file is not in the correct directory (or even has the wrong name),<br>* the user account under which the pgm is running does not have adequate network rights to the directory/file in question,<br>* or very simply, the program could have a logic error in it (failing to find necessary records, bad program structure, etc).<br><br>Can you give any more details about your problem? Have you tried debugging the program?

 

[LindaC]

We are working on bring a 'Genesys' payroll system from an IBM mainframe down to Server/Client PC System.&nbsp;&nbsp;The programs we are using come from the mainframe and have been running for years.&nbsp;&nbsp;We just downloaded the code to a text file.&nbsp;&nbsp;With minor adjustments to access the SQL database we have had no problems except with the programs which read this particular 'Genesys' file.&nbsp;&nbsp;We were able to access this file on the mainframe but now it may be protected in some way.&nbsp;&nbsp;We are getting an open error 35.&nbsp;&nbsp;We are going to check the permissions <p>LindaC<br><a href=mailto:lcastner@co.orange.ny.us>lcastner@co.orange.ny.us</a><br><a href= > </a><br>

 

[Crox]

Hi Linda,<br><br>Did you convert the indexed Genesys file on the mainframe into a EBCDIC sequential file without binairy fields and downloaded that text file and did you convert that ASCII text file (assume that the downloading software converts) with a COBOL program into a new PC indexed Genesys file? <br><br>An other thing is when you are working on a network environment, using Windows NT, without noticing it, it can be that the properties/security/access possibilities are not right, that you have to change your rights into something better before it will work.

 

[Thane]

A File status 35 is file does not exist.&nbsp;&nbsp;Check your select and path for the file.

 

[LindaC]

Oops.&nbsp;&nbsp;Made a typo.&nbsp;&nbsp;Error 39 not 35.&nbsp;&nbsp;Sorry. <p>LindaC<br><a href=mailto:lcastner@co.orange.ny.us>lcastner@co.orange.ny.us</a><br><a href= > </a><br>

 

[Crox]

My MicroFocus pocket guide about 39: file not compatible. About 35: attempt to access a file with incorrect permission.<br><br>So: did you download the text file and rebuild it when it was downloaded? You cannot run the mainframe file.

 

[LindaC]

This is a file supplied by the vendor Geneyss.&nbsp;&nbsp;It came with their package.&nbsp;&nbsp;Their programs use it with no problem.&nbsp;&nbsp;It is our inhouse cobol program which we are having problems with. <p>LindaC<br><a href=mailto:lcastner@co.orange.ny.us>lcastner@co.orange.ny.us</a><br><a href= > </a><br>

 

[Crox]

If it is not compatible, the runtime system of your COBOL environment is different from them, so, try to find out who has the newest COBOL....

 

[Guest_imported]

Hi, Linda
The 39 error - definition the structure file in program incompatible with existing file
Execute xm rebuild file /f (display the keys of file and others).

Sorry my english !!!

Bye

 

[Guest_imported]

I am using Micro Focus as our CGI on our OS/2 website. I need to execute command file and get what the command file returns. I can execute the command file by using X&quot;91&quot; function 35. But I can not figure out how to get the information the command file is returning. Is this possible?

Thanks Darren