<font face="Default Sans Serif,Verdana,Arial,Helvetica,sans-serif" size="2"> <span>Lieber Thomas<br><br>Ich habe dein untenstehendes Skript - bevor ich es ins Wiki stelle - ausprobiert.<br><br>Es hat funktioniert in einem Verzeichnis, in dem sich nur zwei XML-Dateien befanden; in einem anderen, in dem sich 14 XML-Dateien befanden, ist es mit folgendem Fehler ausgestiegen:<br><br>"Satz wird zu lang (379541 > 64000 - abgeschnitten<br>WRITE/ADJUST<br>CLOSE wegen vorangehender Fehler nicht ausgeführt"<br><br>Herr Neumann sprach ja von mehreren hundert Dateien in seinem Verzeichnis. Aber vielleicht ist nicht die Anzahl der Dateien entscheidend (sonst hätte Herr Neumann wohl schon reklamiert), sondern ihre Beschaffenheit.<br><br>Wie kann das Skript so gestaltet werden, dass es in jedem Fall funktioniert?<br><br>Herzliche Grüße aus Zürich<br><br>Wolfram Schneider-Lastin<br><br>Das Skript von Herrn Ott ("'Weiß auf Schwarz setzen") befindet sich jetzt im Wiki.<br><br>---<br><br>Dr. Wolfram Schneider-Lastin<br>Universität Zürich<br>Leiter der Abteilung E-Learning an der Philosophischen Fakultät<br>Koordinator für Computerphilologie<br>1. Vorsitzender der International TUSTEP User Group (ITUG)<br>Rämistrasse 69<br>CH-8001 Zürich<br><br>Tel.:  +41 - 44 - 634 50 82<br>       (wenn keine Antwort: +41 - 44 - 252 07 67)<br><br>Mail: wolfram.schneider-lastin@phil.uzh.ch<br>Web:  http://www.phil.uzh.ch/fakultaet/elearning.html</span><br><br><font color="#990099">-----tustep-liste-bounces@lists.uni-wuerzburg.de schrieb: -----</font><div style="padding-left:5px;"><div style="padding-right:0px;padding-left:5px;border-left:solid black 2px;">An: tustep-liste@itug.de<br>Von: Thomas Kollatz <kol@steinheim-institut.org><br>Gesendet von: tustep-liste-bounces@lists.uni-wuerzburg.de<br>Datum: 16.10.2013 10:21<br>Betreff: Re: [Tustep-Liste] Datei in Unterverzeichnis lesen und     zusammenkopierne<br><br><div><font face="Courier New,Courier,monospace" size="2">Diskussionsforum Tustep-Liste<br>Weitere Informationen: www.itug.de<br>------------------------------------------------------------<br><br></font></div><!--Notes ACF <meta http-equiv="Content-Type" content="text/html charset=utf8">-->Lieber Herr Neumann, <div>ich habe es mit den XML-Dateien meines Mainzer workshops  (der demnächst auch im Wiki sein wird, spätestens in meinem Herbsturlaub) einmal ausprobiert, herzliche Grüße</div><div>THOMAS KOLLATZ</div><div><br></div><div><div><div>$$! ziel=xml2tustep.tf</div><div>$$ MODE TUSCRIPT,{}</div><div>- Dateinamen aus Standardprojekt und -träger</div><div>files=FILE_NAMES (-std-,-std-)</div><div><br></div><div>- xml-Dateien herausfiltern</div><div>xmlfiles=FILTER (files,":*.xml:",-)</div><div>sz_xml=SIZE(xmlfiles)</div><div>IF (sz_xml==0) STOP</div><div><br></div><div>- Einlesen der XML-Dateien und in TUSTEP Zieldatei schreiben</div><div> ERROR/STOP CREATE (ziel,seq-o,-std-)</div><div> ERROR/STOP ERASE  (ziel)</div><div><br></div><div>COMPILE</div><div> ACCESS z: WRITE/RECORDS     $ziel s.z/u, text</div><div>  LOOP file=xmlfiles</div><div>   ERROR/STOP OPEN (file,READ,-std-)</div><div>    ACCESS q: READ/RECORDS/UTF8 $file s,text</div><div>     LOOP/9999999</div><div>      READ/NEXT/EXIT q</div><div>      WRITE/ADJUST z</div><div>     ENDLOOP</div><div>    ENDACCESS q</div><div>   ERROR/STOP CLOSE (file)</div><div>  ENDLOOP</div><div> ENDACCESS/PRINT z</div><div>ENDCOMPILE</div></div></div><div><br><div><div>Am 16.10.2013 um 07:52 schrieb Thomas Neumann <<a href="mailto:tho.neumann@gmx.de">tho.neumann@gmx.de</a>>:</div><br class="Apple-interchange-newline"><blockquote type="cite">Diskussionsforum Tustep-Liste<br>Weitere Informationen: <a href="http://www.itug.de">www.itug.de</a><br>------------------------------------------------------------<br><br><div><div style="font-family: Verdana;font-size: 12.0px;"><div>Hallo Liste,</div> <div>ein kleines Problem.</div> <div>Ausgangslage: Mehrere hundert xml-Dateien befinden sich in einem Unterverzeichnis eines Projektes.</div> <div>1. Alle XML-Dateien auflisten und in eine TUSTEP-Datei schreiben (im Projektverzeichnis)</div> <div>2. Alle Dateien alphabetisch nacheinander in einen TUSTEP-Datei kopieren.</div> <div>TUSCRIPT wäre die richtige Wahl, oder?</div> <div>In diesem Kontext noch eine Frage zu: <div><font face="Courier New,Courier,monospace" size="2">FILE_NAMES (+,-std-)</font></div> <div>Wie ist das Format für eine direkte Pfadangebe auf einem Windows-System für Parameter 2 (hier "-std-")?</div> <div>Ein direkter Pfad funktioniert nicht, oder?</div> <div> </div> <div>Dank in die Runde.</div> <div>Lg Thomas Neumann</div> <div> </div> </div> <div class="signature">-------------------------------------<br> Dr. Thomas Neumann<br> Hertfelderstrasse 12<br> 73733 Esslingen<br> -------------------------------------<br> mail <a href="mailto:tho.neumann@gmx.de">tho.neumann@gmx.de</a><br> fax +4932121431182<br> -------------------------------------<br> <a href="http://www.thomas-neumann.com">www.thomas-neumann.com</a><br> <a href="http://www.caroline-fouque.de">www.caroline-fouque.de</a><br> <a href="http://www.hoererlebnis.de">www.hoererlebnis.de</a><br> -------------------------------------</div></div></div> <br>------------------------------------------------------------<br><a href="mailto:Tustep-Liste@itug.de">Tustep-Liste@itug.de</a><br>https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste</blockquote></div><br></div><br><br><div apple-content-edited="true"> <div><div><span class="Apple-style-span"><div><span class="Apple-style-span"><div><span class="Apple-style-span"><div><span class="Apple-style-span"><div><span class="Apple-style-span"><div><span class="Apple-style-span"><div><span class="Apple-style-span"><div><div>drs Thomas Kollatz  - wissenschaftlicher Mitarbeiter / research assistant<br>Salomon Ludwig Steinheim-Institut fuer deutsch-juedische Geschichte<br>D-45127 Essen * Edmund-Koerner-Platz 2 * T  0201-82162910  * skype kollatzthomas<br>HP <a href="http://www.steinheim-institut.de/wiki/index.php/Mitarbeiter:Thomas_Kollatz">http://www.steinheim-institut.de/wiki/index.php/Mitarbeiter:Thomas_Kollatz</a><br><br>===  Projekte / projects ===<br>Epigraphische Datenbank <<a href="http://www.steinheim-institut.de/cgi-bin/epidat">http://www.steinheim-institut.de/cgi-bin/epidat</a>><br>RiR - Relationen im Raum <<a href="https://dev2.dariah.eu/wiki/display/RIRPUB/RiR">https://dev2.dariah.eu/wiki/display/RIRPUB/RiR</a>><br>DARIAH-DE <<a href="http://de.dariah.eu/">http://de.dariah.eu</a>></div><div>=== btw / sonst noch ===<br>TUSTEP-TUSCRIPT module on Rosetta Code <<a href="http://rosettacode.org/wiki/Category:TUSCRIPT">http://rosettacode.org/wiki/Category:TUSCRIPT</a>></div></div></span></div></span></div></span></div></span></div></span></div></span></div></span></div></div> </div> <br> <div><font face="Courier New,Courier,monospace" size="2">------------------------------------------------------------<br>Tustep-Liste@itug.de<br><a href="https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste">https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste</a></font></div></kol@steinheim-institut.org></div></div><div></div></font>