[NEWSboard IBMi Forum]
  1. #1
    Registriert seit
    Jan 2007
    Beiträge
    904

    RTVDIR UDF für ISF Dateien

    Menno, der 13. war doch vor einer Woche.

    Ich steig da nicht durch. Wenn ich folgende SQL-Abfrage im ACS oder auch mit STRSQL mache, erhalte ich das gewünschte Resultat.

    select file from table(mylib.rtvdir('/mydir/myfiles '))
    where upper(file) like upper(trim('Muster.pdf '))

    Im RPG Programm definiert als:

    select file into :XFile from table(rtvdir(trim(:myPath)))
    where upper(file) like upper(trim(:myFile));

    knallt's mit SQL-Code 100.

    Vielleicht hat jemand wieder mal einen Tipp für mich. Danke.

    p.s.
    es sollte natürlich IFS Dateien heissen und über die Trims müssen wir nicht diskutieren, es braucht sie nicht überall.
    kf

  2. #2
    Registriert seit
    Aug 2001
    Beiträge
    2.869
    1. Du hast einen LIKE ohne Platzhalter % ist das so gewollt?

    Birgitta
    Birgitta Hauser

    Anwendungsmodernisierung, Beratung, Schulungen, Programmierung im Bereich RPG, SQL und Datenbank
    IBM Champion seit 2020 - 4. Jahr in Folge
    Birgitta Hauser - Modernization - Education - Consulting on IBM i

  3. #3
    Registriert seit
    Jan 2007
    Beiträge
    904
    Birgitta,
    ja das ist so gewollt. Ich hab vorgängig durchaus recherchiert und da wurde der Like empfohlen. Ausserdem möchte ich explizit auf den Filenamen testen.
    kf

  4. #4
    Registriert seit
    Nov 2020
    Beiträge
    315
    Hallo Karl,

    Beim RPG Part hast du die Funktion unqualifiziert angegeben. Ich weiß jetzt nicht, ob da auch die richtige aufgerufen wird.

    Im Beispiel: select file from table(mylib.rtvdir('/mydir/myfiles '))
    Hast du ein Blank am Ende.
    Es gibt tatsächlich Blanks im IFS am Anfang und/oder Ende.
    Hat mir auch schon mal Stunden gekostet, da es nicht so schnell ersichtlich ist wenn da ein Blank am Ende steht.
    Sonst lass mal das WHERE weg und mach zum Test ein FETCH FIRST ROW ONLY.

    lg Andreas

  5. #5
    Registriert seit
    Jan 2007
    Beiträge
    904
    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.
    kf

  6. #6
    Registriert seit
    Feb 2001
    Beiträge
    20.207
    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;-).
    Dienstleistungen? Die gibt es hier: http://www.fuerchau.de
    Das Excel-AddIn: https://www.ftsolutions.de/index.php/downloads
    BI? Da war doch noch was: http://www.ftsolutions.de

  7. #7
    Registriert seit
    Jan 2007
    Beiträge
    904
    Die CHKOUT's meinte ich mehr im Zusammenhang auf IFS-Dateien zu prüfen. Etwas barbarisch, aber funktioniert (meistens).
    kf

  8. #8
    Registriert seit
    Nov 2020
    Beiträge
    315
    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.

  9. #9
    Registriert seit
    Jan 2007
    Beiträge
    904
    ... ü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
    kf

Similar Threads

  1. XML Dateien auf der AS400
    By alex61 in forum IBM i Hauptforum
    Antworten: 2
    Letzter Beitrag: 06-09-18, 14:58
  2. XLM-Dateien
    By jajonowak in forum NEWSboard Programmierung
    Antworten: 2
    Letzter Beitrag: 05-04-17, 11:12
  3. Excel-Dateien im IFS
    By dino in forum IBM i Hauptforum
    Antworten: 1
    Letzter Beitrag: 18-12-14, 16:50
  4. OV-Dokumente in PC-Dateien
    By GfD in forum NEWSboard Server Software
    Antworten: 8
    Letzter Beitrag: 04-02-03, 12:59
  5. DDM-Dateien über TCP/IP
    By Joshua in forum IBM i Hauptforum
    Antworten: 5
    Letzter Beitrag: 12-02-01, 15:23

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •