January 2023 - Wu_bp_2022w

Probleme mit Zoom, bitte folgenden Jitsilink für heute verwenden
by Rony G. Flatscher 23 Jan '23

23 Jan '23

Liebe TeilnehmerInnen, momentan habe ich Probleme mit Zoom (mein WU-Account ist anscheinend deaktiviert). Bitte für die heutige Einheit folgenden ad-hoc-Jitsilink verwenden: <https://meet.jit.si/20230123-wubp> Ist open-source und frei und kann (auch für privates Nutzen) problemlos über "https://mett.jit.si" eingerichtet werden. Mit freundlichem Gruß Rony G. Flatscher -- -- __________________________________________________________________________________ Prof. Dr. Rony G. Flatscher Department Wirtschaftsinformatik und Operations Management Institut für Wirtschaftsinformatik und Gesellschaft D2c 2.086 WU Wien Welthandelsplatz 1 A-1020 Wien/Vienna, Austria/Europe http://www.wu.ac.at __________________________________________________________________________________

1 0

HÜ Gruppe 1
by Müller-Weismann, Katharina 17 Jan '23

17 Jan '23

Liebe alle, Wir haben bei dieser Hausübung leider auch eine Fehlermeldung ausgespuckt bekommen. Liebe Grüße Kenan Selak und Katharina Müller "test=https://www.rexxla.org/events/" /* create an instance of the JAXP DocumentBuilderFactory */ factory=bsf.loadClass("javax.xml.parsers.DocumentBuilderFactory")~newInstance factory~setNamespaceAware(.true) -- set desired parser to namespace aware eh=.errorHandler~new -- create an error handler Rexx object -- wrap up the Rexx error handler as a Java object javaEH=BsfCreateRexxProxy(eh, , "org.xml.sax.ErrorHandler") /* make important constants available via .local */ clzDomNode=bsf.loadClass("org.w3c.dom.Node") -- load the Java interface class .local~CDATA_SECTION_NODE=clzDomNode~CDATA_SECTION_NODE -- save field value .local~TEXT_NODE =clzDomNode~TEXT_NODE -- save field value /* now collect all text and CDATA nodes and display them */ call followNode rootNode ::requires BSF.CLS /* get the Java support */ ::routine followNode /* walks the document tree recursively */ use arg node call processNode node -- process received node if node~hasChildNodes then do children=node~getChildNodes -- get NodeList loop i=0 to children~length-1 -- 0-based indexes! call followNode children~item(i) -- recurse end end ::routine processNode /* processes each node */ use arg node if nodeType=.text_node | nodeType=.cdata_section_node then say pp(node~nodeValue) ::class ErrorHandler -- a Rexx error handler ("org.xml.sax.ErrorHandler") ::method unknown /* handles "warning", "error" and "fatalError" events */ use arg methName, argArray -- arguments from the Java SAX parser exception=argArray[1] -- retrieve SAXException argument .error~say(methName":" - "line="exception~getLineNumber",col="exception~getColumnNumber":" - pp(exception~getMessage)) Code Is Executing REXXerr>org.rexxla.bsf.engines.rexx.RexxException: BSF4ooRexx850/routine/jniRexxRunProgram(), error 9: REXXerr> 18 *-* if node~hasChildNodes REXXerr>Error 97 running testcode.code line 18: Object method not found. REXXerr>Error 97.1: Object "ROOTNODE" does not understand message "HASCHILDNODES". Mag.a Katharina Müller-Weismann Rechtsabteilung Legal Affairs Office WU Wirtschaftsuniversität Wien Vienna University of Economics and Business Welthandelsplatz 1, 1020 Vienna, Austria Building AR (Perspektivstraße 4) Tel: +43-1-313 36-5265 Fax: +43-1-313 36-90 9208 E-Mail: katharina.mueller(a)wu.ac.at<mailto:katharina.mueller@wu.ac.at> www.wu.ac.at<http://www.wu.ac.at/> [https://owncloud.wu.ac.at/index.php/s/YRsDyRMZs6MozKM/download?path=%2FSign…] wu.at/125jahre wu.at/125years

2 1

WG: BP: Hü 11- Gr03
by Hietel, Birgit 17 Jan '23

17 Jan '23

Sorry, ist ja schon die 11. HÜ. Nun richtig. LG Birgit Hietel Studienrecht study regulations WU Wirtschaftsuniversität Wien Vienna University of Economics and Business Gebäude LC, Ebene +2 Welthandelsplatz 1, 1020 Wien, Austria Tel: +43-1-313 36-5836 E-Mail: birgit.hietel(a)wu.ac.at<mailto:birgit.hietel@wu.ac.at> Web: www.wu.ac.at<http://www.wu.ac.at/> [https://owncloud.wu.ac.at/index.php/s/YRsDyRMZs6MozKM/download?path=%2FSign…] wu.at/125jahre wu.at/125years Von: Hietel, Birgit Gesendet: Dienstag, 17. Jänner 2023 11:19 An: 'wu_bp_2022w(a)alice.wu.ac.at' <wu_bp_2022w(a)alice.wu.ac.at> Betreff: BP: Hü 09- Gr03 Liebe Alle, HÜ im Anhang. Liebe Grüße von Jana und Birgit Birgit Hietel Studienrecht study regulations WU Wirtschaftsuniversität Wien Vienna University of Economics and Business Gebäude LC, Ebene +2 Welthandelsplatz 1, 1020 Wien, Austria Tel: +43-1-313 36-5836 E-Mail: birgit.hietel(a)wu.ac.at<mailto:birgit.hietel@wu.ac.at> Web: www.wu.ac.at<http://www.wu.ac.at/> [https://owncloud.wu.ac.at/index.php/s/YRsDyRMZs6MozKM/download?path=%2FSign…] wu.at/125jahre wu.at/125years

2 3

BP: Hü 09- Gr03
by Hietel, Birgit 17 Jan '23

17 Jan '23

Liebe Alle, HÜ im Anhang. Liebe Grüße von Jana und Birgit Birgit Hietel Studienrecht study regulations WU Wirtschaftsuniversität Wien Vienna University of Economics and Business Gebäude LC, Ebene +2 Welthandelsplatz 1, 1020 Wien, Austria Tel: +43-1-313 36-5836 E-Mail: birgit.hietel(a)wu.ac.at<mailto:birgit.hietel@wu.ac.at> Web: www.wu.ac.at<http://www.wu.ac.at/> [https://owncloud.wu.ac.at/index.php/s/YRsDyRMZs6MozKM/download?path=%2FSign…] wu.at/125jahre wu.at/125years

1 0

BP-Gr03-Hü10
by Hietel, Birgit 12 Jan '23

12 Jan '23

Liebe Alle, unsere HÜ im Anhang. LG Jana und Birgit Birgit Hietel Studienrecht study regulations WU Wirtschaftsuniversität Wien Vienna University of Economics and Business Gebäude LC, Ebene +2 Welthandelsplatz 1, 1020 Wien, Austria Tel: +43-1-313 36-5836 E-Mail: birgit.hietel(a)wu.ac.at<mailto:birgit.hietel@wu.ac.at> Web: www.wu.ac.at<http://www.wu.ac.at/> [https://owncloud.wu.ac.at/index.php/s/YRsDyRMZs6MozKM/download?path=%2FSign…] wu.at/125jahre wu.at/125years

1 0

Gr. 1 HÜ 10
by Selak, Kenan 12 Jan '23

12 Jan '23

Liebe alle, anbei unsere Hausübung. Liebe Grüße Kenan Selak und Katharina Müller-Weismann OUTPUT: Siehe Screenshots INPUT: If arg(1)='?' Then Do Parse Source source Say source Say 'Create a window with a choice-object and two text-fields and buttons;' Say ' if the ok-button is pressed then popup another window and display' Say ' what was chosen and entered, respectively.' Exit End if BsfInvokedBy()=1 then say "This Rexx program was invoked by Java!" else if BsfInvokedBy()=2 then say "This Rexx program was invoked by Rexx, JVM loaded by Rexx!" else say "No JVM present, we got troubles ..." /* create userData for use with the Greetings routine and event handlers; this allows us to access the registered objects */ userData=.directory~new rexxCloseEH=.RexxCloseAppEventHandler~new -- create Rexx event handler -- create a RexxProxy for our Rexx event handler rpCloseEH=BsfCreateRexxProxy(rexxCloseEH, , "java.awt.event.ActionListener", - "java.awt.event.WindowListener") /* create Object Rexx prox-classes for the following "java"-classes: */ .BSF~bsf.import('java.awt.Button' , 'awtButton' ) .BSF~bsf.import('java.awt.Choice' , 'awtChoice' ) .BSF~bsf.import('java.awt.Color' , 'awtColor' ) .BSF~bsf.import('java.awt.Frame' , 'awtFrame' ) .BSF~bsf.import('java.awt.GridLayout', 'awtGridLayout' ) .BSF~bsf.import('java.awt.Label' , 'awtLabel' ) .BSF~bsf.import('java.awt.TextField' , 'awtTextField' ) /* create 3 labels */ label1 = .awtLabel~new('Geschlecht: ') label2 = .awtLabel~new('Name: ') label3 = .awtLabel~new('Nachname: ') /* create a drop down list with 3 entries */ dropDown = .awtChoice~new dropDown~~addItem('männlich')~~addItem('weiblich') ~~addItem('divers') /* create 2 textfields */ Nachname = .awtTextField~new Name = .awtTextField~new /* create userData for use with the Greetings routine; this allows us to access the registered objects */ userData~DropDown = DropDown userData~Nachname = Nachname userData~Name = Name /* create 2 buttons and add addEventListeners to them */ oK = .awtButton~new('OK') rpOk=BsfCreateRexxProxy(.RexxOkHandler~new, userData, "java.awt.event.ActionListener") ok~addActionListener(rpOk) cancel = .awtButton~new('Cancel') cancel~addActionListener(rpCloseEH) /* set the window layout */ -- Background = .awtColor~new(150, 150, 250) background = .awtColor~newStrict("int", 150, "int", 150, "int", 250) gLayout = .awtGridLayout~new(4, 2) window = .awtFrame~new('OO-Greetings!') window~addWindowListener(rpCloseEH) /* add all the elements to the window */ window~setLayout(GLayout) window~~add(Label1)~~add(DropDown) window~~add(Label2)~~add(Name) window~~add(Label3)~~add(Nachname) window~~add(OK) ~~add(Cancel) window~setSize(200, 200) window~setBackground(Background) window~~pack~~setVisible(.true)~~toFront /* no access needed anymore, free the references to the objects (just to demonstrate this feature) */ drop label1 drop label2 drop label3 rexxCloseEH~waitForExit -- wait until we are allowed to end the program window~dispose -- dispose of the Window call syssleep .25 -- if Java was loaded by Rexx, then terminate Java's RexxEngine to inhibit callbacks from Java call BSF.terminateRexxEngine ::REQUIRES BSF.CLS -- get the Java support --open up a new window and greet the user ::ROUTINE Greetings use arg userData window2 = .awtFrame~new /* create another window */ greet = .awtLabel~new /* create a label */ bye = .awtButton~new('Bye!') /* create a button */ /* add label and button to the window */ window2~~add('North', greet)~~add('South', Bye) /* now prepare to put something into that window */ Geschlecht = userData~DropDown~getSelectedItem /* get chosen Item */ n1 = userData~Name~getText /* get entered text */ n2 = userData~Nachname~getText /* get entered text */ if Geschlecht = "männlich" then Greet~setText('Lieber Herr' N1 N2) if Geschlecht = "weiblich" then Greet~setText('Liebe Frau' N1 N2) if Geschlecht = "divers" then Greet~setText('GutenTag' N1 N2) window2~~pack~~setVisible(.true)~~toFront rexxCloseEH=.RexxClosePopupEventHandler~new -- create Rexx event handler -- create a RexxProxy for our Rexx event handler rp=BsfCreateRexxProxy(rexxCloseEH, , "java.awt.event.ActionListener", - "java.awt.event.WindowListener") window2~addWindowListener(rp) bye~addActionListener(rp) rexxcloseEH~waitForExit -- wait until we are allowed to end the program window2~dispose -- dispose of this window /* ------------------------------------------------------------------------ */ /* Rexx event handler to set "close app" indicator */ ::class RexxCloseAppEventHandler ::method init /* constructor */ expose closeApp closeApp = .false -- if set to .true, then it is safe to close the app ::attribute closeApp -- indicates whether app should be closed ::method unknown -- intercept unhandled events, do nothing ::method actionPerformed -- event method (from ActionListener) expose closeApp closeApp=.true -- indicate that the app should close ::method windowClosing -- event method (from WindowListener) expose closeApp closeApp=.true -- indicate that the app should close ::method waitForExit -- method blocks until attribute is set to .true expose closeApp guard on when closeApp=.true /* ------------------------------------------------------------------------ */ /* Rexx event handler to process tab changes */ ::class RexxOkHandler ::method actionPerformed use arg eventObject, slotDir reply -- do not block awt-thread, proceed execution on a new thread call Greetings slotDir~userData /* ------------------------------------------------------------------------ */ /* Rexx event handler to set "close app" indicator */ ::class RexxClosePopupEventHandler ::method init /* constructor */ expose closeApp closeApp = .false -- if set to .true, then it is safe to close the app ::attribute closeApp -- indicates whether app should be closed ::method unknown -- intercept unhandled events, do nothing ::method actionPerformed -- event method (from ActionListener) expose closeApp closeApp=.true -- indicate that the app should close ::method windowClosing -- event method (from WindowListener) expose closeApp closeApp=.true -- indicate that the app should close ::method waitForExit -- method blocks until attribute is set to .true expose closeApp guard on when closeApp=.true

1 0

Gr. 1 HÜ 9
by Müller-Weismann, Katharina 04 Jan '23

04 Jan '23

Liebe alle, anbei unsere Hausübung. Liebe Grüße Kenan Selak und Katharina Müller Input: .bsf.dialog~messageBox("Hallo lieber User!","Begrüssung") txtButtons=.list~of("Ja", "Nein") defButton ="Ja" res=.bsf.dialog~dialogBox( "Wir probieren jetzt gemeinsam ein paar Funktionen in Rexx aus!","Information", "info", , , txtButtons, defButton) say "dialogBox: Du hast dich für" res "entschieden" txtButtons=.list~of("Ja", "Nein", "Bin mir nicht sicher") defButton ="Nein" res=.bsf.dialog~dialogBox( "Gefällt Dir die Frageoption in Rexx?","Frage", "question", , , txtButtons, defButton) say "Du hast dich für" res "entschieden" txtButtons=.list~of("Warum?", "OK", "Nix falsch gemacht!") defButton ="Nix falsch gemacht!" res = .bsf.dialog~dialogBox("Jetzt siehst Du eine Fehlermeldung","Fehler", "error", , , txtButtons, defButton) say "dialogBox: Du hast dich für" res "entschieden" txtOptions=.list~of("Na klar!", "Meistens", "Manchmal", "Es ist schon ziemlich schwer!") defaultTxtOption="Meistens" res=.bsf.dialog~inputBox("Kommst du mit Rexx gut zurecht?", "Auswahlfeld", "plain", , txtOptions, defaultTxtOption) say "inputBox: Du hast dich für" pp(res) "entschieden" /* arguments: message, title, messageType, icon, textOfOptions, defaultValue */ res=.bsf.dialog~inputBox( "Sag uns bitte noch Deine Meinung zu dieser Übung!", "Kommentar" , "question") say "inputBox: Du hast" pp(res) "eingetragen" .bsf.dialog~messageBox("Danke fürs Mitmachen!","Verabschiedung") ::requires BSF.CLS Output: REXXout>dialogBox: Du hast dich für 0 entschieden REXXout>Du hast dich für 1 entschieden REXXout>dialogBox: Du hast dich für 2 entschieden REXXout>inputBox: Du hast dich für [Na klar!] entschieden REXXout>inputBox: Du hast [Spannend] eingetragen Von: Wu_bp_2022w <wu_bp_2022w-bounces(a)alice.wu.ac.at> Im Auftrag von Rony G. Flatscher Gesendet: Donnerstag, 22. Dezember 2022 18:58 An: wu_bp_2022w(a)alice.wu.ac.at Betreff: Re: [Wu_bp_2022w] G04 T09 On 22.12.2022 18:56, Rony G. Flatscher wrote: Liebe Jana, On 22.12.2022 18:47, Jana Korunovska wrote: den Fehler, dass wir es nicht in BS4ooRexx GUI ausführen können. Es scheint, als ob es die jdor-Routine nicht finden kann, aber warum. Output: REXXerr>org.rexxla.bsf.engines.rexx.RexxException: BSF4ooRexx850/routine/jniRexxRunProgram(), error 9: REXXerr> 67 *-* ::requires "jdor.cls" -- makes routine addJdorHandler([environmentName]) available REXXerr>Error 43 running testcode.code line 67: Routine not found. REXXerr>Error 43.901: Could not find file "jdor.cls" for ::REQUIRES.. Na, ja, das Programm "jdor.cls" wird nicht gefunden! :) Am einfachsten, es ins gleiche Verzeichnis zu kopieren, wo das Programm liegt. Also die Datei "samples/jdor.cls".

1 0

2025

2024

2023

2022

Wu_bp_2022w January 2023