Liebe Alle,

unterstehend findet ihr unsere HÜ von letzter Woche (die ich an die falsche Mailadresse geschickt habe) und die von dieser Woche.

T04

1)

l1 = .Mitarbeiter~NEW~~"Vertrag="("Angestellt") ~~Kurs .ExternerMitarbeiter~NEW~~"Vertrag="("freier Dienstvertrag") ~Kurs ::CLASS Mitarbeiter ::ATTRIBUTE Vertrag ::METHOD Kurs SAY self~Vertrag":" "Master Lehrveranstaltung" ::CLASS ExternerMitarbeiter SUBCLASS Mitarbeiter ::METHOD Kurs SAY self~Vertrag":" "Bachelor Lehrveranstaltung"

REXXout>Angestellt: Master Lehrveranstaltung REXXout>freier Dienstvertrag: Bachelor Lehrveranstaltung

2)

k1 = .Person~New("Strafrecht", "4302", "55") k2 = .Person~New("StrafverteidigunginderPraxis", "3002", 44) Say k1~Vorlesung k1~LvNummer k1~Studierendenanzahl Say k2~Vorlesung k2~LvNummer k2~~erhoeheStudierendenanzahl(6)~Studierendenanzahl ::CLASS Person ::METHOD INIT EXPOSE Vorlesung LVNummer Studierendenanzahl USE ARG Vorlesung, LVNummer, Studierendenanzahl ::Attribute Vorlesung ::Attribute LvNummer ::Attribute Studierendenanzahl ::Method erhoeheStudierendenanzahl EXPOSE Studierendenanzahl USE Arg erhoehe Studierendenanzahl = Studierendenanzahl + erhoehe

REXXout>Strafrecht 4302 55 REXXout>StrafverteidigunginderPraxis 3002 50

HÜ T05

1)

.Haus~NEW ~~"Kategorie="("Haus") ~groesse

.GrossesHaus~New ~~"Kategorie="("Villa") ~groesse

::CLASS Haus

::ATTRIBUTE Kategorie

::METHOD groesse

SAY self~Kategorie"=" "unter 200qm" "-" self

::CLASS GrossesHaus SUBCLASS Haus

::METHOD groesse

Say self~Kategorie"=" super "aber ueber 200qm"

REXXout>Haus= unter 200qm - a HAUS

REXXout>Villa= The HAUS class aber ueber 200qm

2)

Say "ErfindungGluehbirne:" .Jahr~Erfindung (Test 1)

o=.Jahr~NEW

Say "ErfindungGluehbirne:" o~Erfindung (Test 2)

::CLASS Jahr

::Constant Erfindung "1879"

REXXout>ErfindungGluehbirne: 1879 TEST 1

REXXout>ErfindungGluehbirne: 1879 TEST 2

LG

Magda und Maria