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:
Code:
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;
Bookmarks