• Re: IFS Read error message CPF5129

    From agus hy@21:1/5 to Iknir on Tue Mar 7 23:02:11 2023
    On Saturday, 30 September 2006 at 21:20:59 UTC+7, Iknir wrote:
    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.

    how to solve the problem above?

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From Buck@21:1/5 to agus hy on Wed Mar 8 10:25:44 2023
    On Wednesday, March 8, 2023 at 2:02:13 AM UTC-5, agus hy wrote:
    On Saturday, 30 September 2006 at 21:20:59 UTC+7, Iknir wrote:
    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.

    how to solve the problem above?

    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

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From [email protected]@21:1/5 to agus hy on Wed Mar 8 22:16:03 2023
    agus hy <[email protected]> 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

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)