Bei Aufruf _C_IFS_FOPEN Deskriptor - Fehler

[WiedemeierP]

Hallo Fuerchau!

Die Fehlermeldung ist 'ERR ' ohne weitere Dokumentation beim Drücken der F1-Taste!

Ich gebe den Namen mit '/PCTransfer/SAP_PI/SAP_DISPO/Filename' vor.

Vor dem _C_IFS_fopen steht das Default - Verzeichnis aber auf /home/

[WiedemeierP]

Hallo Fuerchau!

Die Fehlermeldung ist 'ERR OPEN Deskriptor ungültig' ohne weitere Dokumentation beim Drücken der F1-Taste!

Ich gebe den Namen mit '/PCTransfer/SAP_PI/SAP_DISPO/Filename' vor.

Vor dem _C_IFS_fopen steht das Default - Verzeichnis aber auf /home/

[TheDevil]

Hallo.

Versuch doch mal
'/home/PCTransfer/SAP_PI/SAP_DISPO/Filename'

Gruß
Ralf

[Fuerchau]

Mittels "/xxx" gibst du einen absoluten Pfad an.
Somit sollte die Datei auch da stehen, wo du sie erwartest.
Wie mein Vorredner ja schrieb, ist der Pfad ja vielleicht in "/Home/....".

[WiedemeierP]

Guten Morgen!
Ich weiss, das ich damit den absoluten Pfad angebe! Das File steht in diesem Pfad. Das File sehe ich sowohl im IFS des RDi als auch im Green Screen über den Befehl WRKLNK. Über beide Wege kann ich auch auf diesen Pfad zugreifen und die Datei öffenen, nur nicht mit dem '_C_IFS_fopen' im CL-Programm!

Gruss Peter

[Fuerchau]

Wo liegt denn nun deine Datei wirklich:

Zitat: "Dieses Steht auch dem Home Verzeichnis '/home/"
'/PCTransfer/SAP_PI/SAP_DISPO/Filename'

oder

'/Home/PCTransfer/SAP_PI/SAP_DISPO/Filename'

Desweiteren sind manche API's auch noch case sensitive und da benötigt man die genau Schreibweise.
Manchmal, das habe ich auch schon erlebt, ist es auch nur ein zusätzliches Leerzeichen am Ende, was weder per WRKLNK noch in Windows angezeigt wird.
In Windows hilft da u.U. mal der Versuch, den Namen zu ändern. In dem Eingabefeld findet man dann die am Ende vorhandenen Leerzeichen.

[WiedemeierP]

Hallo!

Der genaue Pfad ist '/PCTransfer/SAP_PI/SAP_DISPO/BEST.TXT'. Dieser ist so über den wrklink zu erreichen und wird auch so als Variable an den '_C_IFS_fopen' übergeben!

Gruß Peter

[Fuerchau]

Ja ja, die C-Funktionen:
C-Funktionen benötigen i.d.R. einen Nul-Terminated String, also X'00'.
Hänge mal per *TCAT ein X'00' an den Dateinamen. Dasselbe gilt auch für den Openmode.
Definiere die Felder 1 Byte größer also du brauchst für das X'00'.

[WiedemeierP]

Hallo!

Danke für die Hilfe !Leider verlief der Test negativ
CHGVARVAR(&FNAME)VALUE(&PATH*TCAT&X00)
CHGVARVAR(&OMODE)VALUE('r, crln=y'*CAT&X00)
CALLPRC'_C_IFS_fopen'(&fname&omode)rtnval(&atfdi)

[Fuerchau]

Warum muss es denn unbedingt CLP sein?
Kannst du das nicht per SQLRPGLE ganz einfach mit "set : MyBuffer = : MyFileVar" machen?
Das Stichwort hier ist CLOB/BLOB/DBCLOB für den Puffer und CLOB_FILE:

 dcl-ds IFS_File             qualified inz;
      Filename                SQLTYPE(CLOB_FILE);    // Standard-ANSI ISO-8859-1
  END-DS;

  dcl-ds *n                   static;
    FileString                SQLTYPE(DBCLOB:8000000) ccsid(1200);
  END-DS;

   IFS_File.FILENAME_NAME = %trim(Filename);
   IFS_File.FILENAME_NL   = %len(%trim(IFS_File.FILENAME_NAME));
   IFS_File.FILENAME_FO   = SQFRD;      // Datei lesen

   exec sql values(:IFS_File.Filename) into  :FileString;

[WiedemeierP]

Hallo!

Danke für die Idee! Das muss ich jetzt ins Festformat umgesetzt bekommen!

Gruss Peter

[WiedemeierP]

Hallo!

Danke für die Hilfe! Lider verlief der nachfolgende Test mit der gleichen Fehlermeldung!

Nachfolgend der Ausschnitt aus dem Coding mit entsprechend groß definierten Feldern:

CHGVARVAR(&FNAME)VALUE(&PATH*TCAT&X00)
CHGVARVAR(&OMODE)VALUE('r, crln=y'*TCAT&X00)
CALLPRC'_C_IFS_fopen'(&fname&omode)rtnval(&atfdi)

Gruss Peter