Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

IFS Read error message CPF5129

534 views
Skip to first unread message

Iknir

unread,
Sep 30, 2006, 10:20:59 AM9/30/06
to
I have uploaded a Flat file into QDLS folder and when try to read via
RPG I get this error message:

Message ID . . . . . . : CPF5129 Severity . . . . . . . : 50

Message type . . . . . : Escape

Date sent . . . . . . : 09/30/06 Time sent . . . . . . :
09:09:32

Message . . . . : I/O is not allowed because the program device or
member
QAOKL02A file QAOKL02A in library QUSRSYS is in error.

RPG IV Code:

file = open('/QDLS/PCFILES/DOCUMENT.DAT' : O_RDONLY);
if file < 0;
die('open(): ' + %str(strerror(errno)));
endif;

FYI, It worked yesterday and today I can't access it. I am on V5R3.

Please help.

agus hy

unread,
Mar 8, 2023, 2:02:13 AM3/8/23
to
how to solve the problem above?

Buck

unread,
Mar 8, 2023, 1:25:46 PM3/8/23
to
Some places to start:
1) Check for diagnostic messages in the joblog
2) Check that the file name in the open() statement is EXACTLY the same name as the one in QDLS. No extra/trailing spaces in the RPG or the QDLS file.
3) Check that the user profile has the appropriate authority
4) Check that the QDLS file is not already open/in use/locked by another process

I would strongly advise that QDLS not be used these days; it has restrictions the full IFS does not.
--buck

p...@pocnet.net

unread,
Mar 8, 2023, 5:16:07 PM3/8/23
to
agus hy <heriyun...@gmail.com> wrote:

> On Saturday, 30 September 2006 at 21:20:59 UTC+7, Iknir wrote:
>> Message ID . . . . . . : CPF5129 Severity . . . . . . . : 50
>> Message type . . . . . : Escape
>> Date sent . . . . . . : 09/30/06 Time sent . . . . . . :
>> 09:09:32
>> Message . . . . : I/O is not allowed because the program device or
>> member
>> QAOKL02A file QAOKL02A in library QUSRSYS is in error.

> how to solve the problem above?

What has been changed meanwhile?

Can you access the file with strdfu?

Try an IPL. Maybe the object is damaged?

:wq! PoC

0 new messages