Kommst Du bei den APIs mit 4 Zeilen hin?
Code:
DCL-S YourCLOBFile SQLTYPE(CLOB_FILE);
YourClobFile_Name = '/YourDir/YourDir2/File.Txt';
YourClobFile_NL = %Len(%Trim(YourClobFile_Name));
YourClobFile_FO = SQFOVR; //Erstelle Datei oder ersetze eine vorhandene Datei
Exec SQL Set :YourClobFile = 'Mein erster Text im IFS';
YourCLOBFile_FO = SQFAPP //Zu IFS Datei hinzufügen
Exec SQL Set :YourClobFile = 'Und jetzt geht''s weiter';
SQLCODE oder SQLSTATE sollten natürlich noch abgefangen werden.
Übrigens soooo neu ist das auch nicht, seit V5R1M0!
Und die Grenze liegt bei 2GB.
Birgitta
Bookmarks