WiedemeierP
05-04-19, 09:28
Hallo!
Ich bin gerade dabei eine Datei aus dem IFS mit der c-Funktion '_C_IFS_FOPEN zu laden. Dabei habe ich die Schwierigkeit, das ich einen 'ERR <open ungültig.="" Deskriptor=""> Fehler bekomme.
Ich habe mir die Berechtigungen für das Verzeichnis angesehen. diese stehen alle auf *Public *RWK. Das Problem scheint das Initiale Verzeichnis zu sein! Dieses Steht auch dem Home Verzeichnis '/home/<user>. Meiner Meinung nach müsste es aber auf dem Root Verzeichnis stehen. Leider hat auch der Befehl CHGCURDIR DIR('/') keine Auswirkungen auf den _C_IFS_FOPEN- Befehl!
Wie kann ich das initiale Verzeichnis des Benutzers noch ändern, das der OPEN-Befehl greift!
</user></open>CHGVAR VAR(&FNAME) VALUE(&FNMI *TCAT &X00)
CHGVAR VAR(&OMODE) VALUE('r, crln=y' *TCAT &X00)
CALLPRC '_C_IFS_fopen' ( &fname &omode ) rtnval( &atfdi )
IF COND(&ATFDI *EQ &ATNULL) THEN(DO)
CHGVAR VAR(&ERRLOCN) VALUE('OPEN')
CALLSUBR SUBR(GETERROR)
RETURN
ENDDO
Danke für eure Hilfe!
Gruß Peter
Ich bin gerade dabei eine Datei aus dem IFS mit der c-Funktion '_C_IFS_FOPEN zu laden. Dabei habe ich die Schwierigkeit, das ich einen 'ERR <open ungültig.="" Deskriptor=""> Fehler bekomme.
Ich habe mir die Berechtigungen für das Verzeichnis angesehen. diese stehen alle auf *Public *RWK. Das Problem scheint das Initiale Verzeichnis zu sein! Dieses Steht auch dem Home Verzeichnis '/home/<user>. Meiner Meinung nach müsste es aber auf dem Root Verzeichnis stehen. Leider hat auch der Befehl CHGCURDIR DIR('/') keine Auswirkungen auf den _C_IFS_FOPEN- Befehl!
Wie kann ich das initiale Verzeichnis des Benutzers noch ändern, das der OPEN-Befehl greift!
</user></open>CHGVAR VAR(&FNAME) VALUE(&FNMI *TCAT &X00)
CHGVAR VAR(&OMODE) VALUE('r, crln=y' *TCAT &X00)
CALLPRC '_C_IFS_fopen' ( &fname &omode ) rtnval( &atfdi )
IF COND(&ATFDI *EQ &ATNULL) THEN(DO)
CHGVAR VAR(&ERRLOCN) VALUE('OPEN')
CALLSUBR SUBR(GETERROR)
RETURN
ENDDO
Danke für eure Hilfe!
Gruß Peter