Søgning gennem mapper og filer i XAL

I "gamle dage", brugte man kommandoen /s hvis man ville søge i subdirectories.

f.eks. P:\*.txt /s
finder alle filer af typen .txt i drevet P:, og søger også i alle undermapper.

En rekursiv kørsel kan i XAL laves i en rapport, linjekørsel der kalder sig selv. Udfordringen er at holde rede på lokale og globale variabler.

Eller kald Shell som #1 beskriver
P:\*.txt /s > tlpfile
og læs tmpfile linje for linje.

Rekursivitet har jeg styr på. Har man en gang set StockBillMat rapporten, så ved man det.

Det er det basale kald til at få mapperne jeg mangler.

PROCESS #PROC_Os 'COMMAND=\"ECHO P:\\*.* /s > C:\\Tmpfile.csv\"'

Virker ikke. Bær over med mig. Jeg er ikke DOS specialist.

Det er mapperne jeg gerne vil finde.
Directory 8 finder alle filerne ganske fint, men ikke mapperne.

Kan I hjælpe ?

Jeg har selv haft store problemer med at køre dos kommandoer via XAL kald, specielt med parametre var der problemer. Jeg løste problemet ved at skrive .BAT eller .CMD filer og afvikle dem efterfølgende. (Undgå mellemrum i sti/filenavne).
1)    Dan filen rum.bat indeholdende
DIR P:\*.* /s > C:\tmp\Tmpfile.csv\
2)    Kør filen
Bemærk windows 7 har et problem med at skrive direkte til C:\ Hvorimod at skrive en file til C:\tmp er OK
( C:\tmp er oprettet manuelt)

INT &idx
STR 255 &Folders[]
STR 255 &Path = &PARM
PROCESS #PROC_Os 'COMMAND=\"DIR '+&Path+' > C:\\Tmpfile.txt\"'
Virker fint!
Plus READ <kode> END, hvor <kode> kalder rekursivt på &Folders[].

Men når der er " " <Space> i mappe-navnene, så fejler kaldet.

Hvordan løses det ?
Jeg har prøvet med \' og \" i alle mulige kombinationer uden held.

Jeg har løst det ved at lave en tmp.bat file der indeholder selve DOS kommandoen med " omkring filnavne.
Filen oprettes med WRITE kommandoen

Feks. filen tmp.bat
DIR "P:\mappe med mellemrum\"  >  "C:\tmp.txt"

Herefter køre jeg filen med noget i retning med.
PROCESS #PROC_Os 'COMMAND=\"C:\run.bat"

LUKKET

Hov! Hvordan tildeler jeg dig points J-Jam ?

points er ikke vigtig for mig :-)

Ved godt at spørgsmålet er lukket... Men her er løsningen:

Du har glemt at sætte den globale variabel &InFldDel.
Hvis ikke du sætter den, så vil XAL/C5 bruge "space" som field delimeter. Og dermed "stopper" dit felt ved første mellemrum.
Når man bruger READ AS TEXT skal man altid sætte &InFldDel og &InRecDel.


STR 50 &Filnavn = "c:/olebole.txt"
STR 50 &Txt1

SET &InFldDel = "£££" //Dette findes ikke i din fil, så derfor indlæses hele linien i dit felt.

SET &InRecDel = "\r\n" //I Dos deles en fil med "Carriage Return/LineFeed. Hvis det er på Unix, er det kun LineFeed "\n".


READ &Filnavn AS TEXT INTO (&Txt1)
  Print &Txt1
END
PAUSE


Mvh Ole