Welcome Serena Central users! CLICK HERE
The migration of the Serena Central community is currently underway. Be sure to read THIS MESSAGE to get your new login set up to access your account.
picci Absent Member.
Absent Member.
2149 views

error codes with I$IO

Is it possible to get the standard error codes when I$IO fails for some reason?

By "standard error codes" i mean those raised by the standard functions write, read key, read next, open, close and so on.

For example if try to rewrite a record  with I$IO (set rewrite-function to true in I$IO)  and the record key is not found i would like to get the error code "23", like with the "rewrite" statement, while F-ERRNO return "4" (E-MODE-CLASH in filesys.def).

Does it exist a way to get the code i need?

Tags (3)
0 Likes
3 Replies
picci Absent Member.
Absent Member.

RE: error codes with I$IO

Another question: how can i tell that i have reached the end of file using NEXT-FUNCTION in i$IO? Documentation says that the return code is set to 0... but it is also when the function fails when errors occur...

0 Likes
Micro Focus Expert
Micro Focus Expert

RE: error codes with I$IO

I don't know of a function or configuration variable to turn the f-errno values into a proper COBOL file status

0 Likes
Micro Focus Expert
Micro Focus Expert

RE: error codes with I$IO

Not sure if you have seen this, alfred.cbl .. AcuGT\sample\alfred\source .. is a good example of using I$IO

0 Likes
The opinions expressed above are the personal opinions of the authors, not of Micro Focus. By using this site, you accept the Terms of Use and Rules of Participation. Certain versions of content ("Material") accessible here may contain branding from Hewlett-Packard Company (now HP Inc.) and Hewlett Packard Enterprise Company. As of September 1, 2017, the Material is now offered by Micro Focus, a separately owned and operated company. Any reference to the HP and Hewlett Packard Enterprise/HPE marks is historical in nature, and the HP and Hewlett Packard Enterprise/HPE marks are the property of their respective owners.