Hi
ich glaube ich habe einen Denkfehler bei einem OPNQRYF finde den einfach nicht. Hier die relevanten Zeilen aus dem RPG Programm:
Die DSPLY sind nur zum Debuggen.Code:fafkdn if e k disk usropn // Geänderte Kunden suchen cmdtxt = 'OPNQRYF FILE((STDPROD/AFKDN)) KEYFLD((KUKDN)) ' + 'QRYSLT(''KUDNEU *GE ''''' + %editc(pdat:'Z') + ''''' *OR KUDAEN *GE ''''' + %editc(pdat:'Z') + ''''''')'; dsply %subst(cmdtxt:1:52); dsply %subst(cmdtxt:53:52); dsply %subst(cmdtxt:105:52); // Geänderte Kunden suchen callp cmd(cmdtxt:512); // Datei öffnen open afkdn; // Schleife zum Lesen der Datei dou %eof(afkdn); // Lesen des Satzes read afkdnss;
Das Programm verarbeitet ALLE Sätze aus AFKDN. Wenn ich den mit DSPLY angezeigten OPNQRYF manuell ausführe und ein CRYFRMQRYF mache bekomme ich nur diejenigen die ich will.
![[NEWSboard IBMi Forum]](images/duke/nblogo.gif)



Mit Zitat antworten
Bookmarks