Liebes Team,
zunächst einmal: sehr schön, wie Sie das Problem gelöst haben!
Hier eine leicht überarbeitete Variante:
* UTF-8-Codepage für Windows (vgl. heutige Kurseinheit) * ad PARSE-Schlüsselwortanweisung: kann etwas vereinfacht werden
Hier der Code:
address system "chcp 65001" -- change Windows codepage to UTF-8 command='curl "https://research.wu.ac.at/ws/oai?verb=ListRecords&set=publications:year2..."' outArr=.array~new ADDRESS SYSTEM commandWITH OUTPUT USING (outArr)-- curl yields data in UTF-8 data=outArr~makeString
DO i= 1 TO 5 -- parse positioniert ans Ende der gegebenen Textfragmente; jeder Eintrag ended mit '</record>' parse var data'<title' '>' titel'</title>' '<creator>' name'</creator>' '</record>' data Say name":" Say " " titel
Say bsf.iconv(name,"utf-8","cp1252")":" -- uses Java conversion infrastructure Say " " bsf.iconv(titel,"utf-8","cp1252") say END /* Alternative wäre bsf.iconv() in die aktuelle CP, die möglicherweise nicht alle UTF-8 Zeichen beinhaltet. */ ::requires BSF.CLS
(Die Farbhervorhebungen kommen von der IntelliJ-Entwicklungsumgebung: einfach Code in die Zwischenablage kopieren und daraus in die Textverarbeitung einfügen.)
Mit freundlichem Gruß
Rony G. Flatscher
On 09.12.2022 14:13, Selak, Kenan wrote:
Liebe alle,
nachstehend unser Projekt.
Projekt GR1:
command='curl "https://research.wu.ac.at/ws/oai?verb=ListRecords&set=publications:year2... https://research.wu.ac.at/ws/oai?verb=ListRecords&set=publications:year2022:withFiles&metadataPrefix=oai_dc"'
outArr=.array~new
ADDRESS SYSTEM command WITH OUTPUT USING (outArr)
source=outArr~makeString
DO i = 1 TO 5
parse var source '<creator>' name '</creator>'
parse var source '<title xml:lang="eng">' titel '</title>'
Say name
Say titel
parse var source '</title>' source
END
OUTPUT:
REXXout>Komori-Glatz, Miya
REXXout>Exploratory Interactive Explaining (EXINTEX): Constructing Disciplinary Knowledge in Two Multilingual University Settings
REXXout>Komori-Glatz, Miya
REXXout>Fiscal Multipliers in a Small Open Economy: The Case of Austria
REXXout>ÄŒapek, Jan
REXXout>Multi-mode standardization under extreme time-pressure – the case of COVID-19 contact-tracing apps
REXXout>Marhold, Klaus
REXXout>A study into the contingencies of process improvement methods
REXXout>Malinova Mandelburger, Monika
REXXout>A hybrid multi-regional input-output model of China: Integrating the physical agricultural biomass and food system into the monetary supply chain