RTVDIR UDF für ISF Dateien

[camouflage]

Manchmal muss man sich Niederlagen auch eingestehen können, ähnlich wie den Stromstecker nicht eingesteckt.

Danke an euch, die ihr die Zeit genommen habt.

Die Lösung:
select file into :XFile from table(rtvdir(:mypath))
where file = :myfile;

if sqlcode = 0;
...

Nun die Erklärung:
Das File war so im IFS einfach nicht vorhanden. :-(
(Hab wohl zuviele Saves davon gemacht)

@Andreas:
Es ist nicht nötig den "rtvdir" qualifiziert anzugeben. Ggf. könnte man vorgängig ein RTVOBJD API aufrufen um die Lib zu ermitteln, wenn man denn schon qualifiziert mag.

Uebrigens, für diejenigen die den rtvdir nicht kennen, einfach mal danach googeln (ITJungle).
Dann kann man sich die CHKOUT/IN's oder was auch immer schenken.

[Fuerchau]

Nun ja, CHKOUT/CHKIN dienen ja eher zum Sperren von Objekten. Außerdem sind diese direkt in CLP verfügbar und ich brauche kein RPGle schreiben;-).

[camouflage]

Die CHKOUT's meinte ich mehr im Zusammenhang auf IFS-Dateien zu prüfen. Etwas barbarisch, aber funktioniert (meistens).

[Andreas_Prouza]

Wegen den qualifizierten Aufruf meinte ich nur, falls du in deiner LIBL noch eine andere Version gehabt hättest und du unabsichtlich eben eine andere aufgerufen hättest als jene die du qualifiziert im STRSQL aufgerufen hättest.

[camouflage]

... übrigens, ich hab die UDF und chkout's in die Tonne geklopft und prüfe nun alles über die IFS_OBJECT_STATISTICS table function mit SQL