Fachmentorielle Betreuung

Wichtiger Hinweis:

Zur besseren Planung und Organisation der Mentoriate ist es notwendig, dass Sie sich für die mentoriellen Veranstaltungen Ihrer Module verbindlich und frühzeitig anmelden!
Nur so wird auch sichergestellt, dass Sie bei Terminänderungen persönlich benachrichtigt werden!
Darüber hinaus finden Sie selbstverständlich weiterhin alle Änderungen auf unserer Homepage!

Die Online-Anmeldung ist erst ab Anfang März/ Oktober möglich, diese erreichen Sie über die entsprechende Modulseite.

Aus organisatorischen Gründen erhalten Sie keine Anmeldebestätigung.

use Imperia; # Konstanten $filemaske = ".*\.shtml"; $root_dir = $imperia->common->{system_conf}->{'SITE-DIR'}; $root_dir =~ s/site/htdocs/; $readdir = $metainfo->getValues("directory"); $ssi_dir_rewi = '/rewi/include'; $stzurl = $metainfo->getValues("stz_url"); $ssi_dir = $stzurl.'/include'; $stzname = $metainfo->getValues("stz"); $stz = lc($stzname); $stz =~ s/ä/ae/g; $stz =~ s/ö/oe/g; $stz =~ s/ü/ue/g; $stz =~ s/ß/ss/g; $maxRSS = 5; # Anzahl der Nachrichten im RSS-Feed $xmlRSS = "\n\n\nAktuelle Aenderungen zur fachmentoriellen Betreuung im Regional-/Studienzentrum $stzname\nhttp://www.fernuni-hagen.de$stzurl/betreuung\n\n"; sub vergleichen_kurs() { #Sortierung nach Fakultät,Titel my $a_faku = $FILE_META{$a}->{fakultaet_name}; my $b_faku = $FILE_META{$b}->{fakultaet_name}; $a_faku = "zzz" if ($a_faku eq ""); $b_faku = "zzz" if ($b_faku eq ""); if($a_faku ne $b_faku){ return ($a_faku cmp $b_faku); } return ($FILE_META{$a}->{titel} cmp $FILE_META{$b}->{titel}); }#sub sub schreibeSSI { my $inhalt = shift; my $datei_name = shift; #&log("Schreibe:" . $datei_name); open(DATEI, ">$datei_name") || die "Kann nicht oeffnen: $datei_name"; print DATEI $inhalt; close(DATEI); } clearlist(); filemask($filemaske); ireaddir($readdir); @FILELIST = sort(vergleichen_kurs @FILELIST); #&log("<--->"); my $laenge = @FILELIST; my $zaehler = 0; my $fakultaet = ''; my $ssi_inhalt = ''; my $stz_inhalt = ''; my $rdfSeq = ''; my $items = ''; my $rss_inhalt = ''; foreach my $file (@FILELIST) { my $directory = $FILE_META{$file}->{directory}; my $filename = $FILE_META{$file}->{filename}; my $mentor = $FILE_META{$file}->{mentor_name}; my $aenderung = $FILE_META{$file}->{aenderungen}; my $kurs_nr = $FILE_META{$file}->{kurs_nr}; my $rssUrl = "https://www.fernuni-hagen.de$directory/$filename"; my $semester = $FILE_META{$file}->{semester}; $semester =~ s/Wintersemester/WiSe/; $semester =~ s/Sommersemester/SoSe/; my $mentor_name = $FILE_META{$file}->{mentor_name}; my $fakultaet_name = $FILE_META{$file}->{fakultaet_name}; my $faku_kurz = $FILE_META{$file}->{fakultaet}; my $modultitel = $FILE_META{$file}->{modultitel}; my $modul_nr = $FILE_META{$file}->{modul_nr}; my $modul_nr_ksw = $FILE_META{$file}->{modul_nr_ksw}; $modul_nr = $modul_nr_ksw if ($modul_nr_ksw); my $virtuell = $FILE_META{$file}->{virtuell}; my $keineIndexseite = not( $filename =~ /^index\.(shtml|php)$/ ); #Ausgabe fuer Uebersichtsseite if ($keineIndexseite) { my $fakultaet_neu = "".$fakultaet_name; if ($fakultaet_neu ne $fakultaet) { print "\n" if ($fakultaet ne ''); $fakultaet = $fakultaet_neu; if ($fakultaet ne ''){ print "\n

$fakultaet

\n\n\n\n\n\n\n\n\n\n"; } } # if fakultaet_neu if ($modul_nr){ print "\n\n"; print "\n\n"; print "\n"; print "\n\n"; } $zaehler++; } # if keineIndexseite #Ausgabe fuer stz_module-SSI erzeugen if ((($faku_kurz eq "rewi") || ($modul_nr eq "31061")) and $keineIndexseite){ my $li = "\n\n"; $li .= "\n\n\n\n"; $ssi_inhalt .= $li; } } # foreach file print "
"; print "ModulNr" if not($faku_kurz eq "mi"); print "KursNr" if ($faku_kurz eq "mi"); print ""; print "Modultitel" if not($faku_kurz eq "mi"); print "Kurstitel" if ($faku_kurz eq "mi"); print ""; print "Mentor/-in" if ($faku_kurz ne "ksw"); print "Mentor/-in | Tutor/-in" if ($faku_kurz eq "ksw"); print "SemesterAktuelle Änderungen RSS"; print "
$modul_nr$modultitel"; print " (Kurs $kurs_nr)" if ($kurs_nr && not($kurs_nr eq $modul_nr)); print " (virtuelle Veranstaltung)" if ($virtuell); print "$mentor$semester"; print "$aenderung" if ($aenderung); print "Termine und Anmeldung unter 55103" if ($modul_nr eq "55106"); print "
$modul_nr $modultitel$mentor$semester$aenderung
\n" if ($fakultaet ne ''); if ($zaehler == 0) { print ''; }else{ print "\n"; } if ($ssi_inhalt){ $stz_inhalt = "$stzname\n\n"; $ssi_inhalt = $stz_inhalt.$ssi_inhalt; schreibeSSI($ssi_inhalt, $root_dir.$ssi_dir_rewi."/".$stz."_module.ssi"); } clearlist(); filemask($filemaske); ireaddir($readdir); sort_latest_first(); #&log("<--->"); my $zaehler = 0; my $rdfSeq_wi = ''; my $items_wi = ''; my $rss_inhalt_wi = ''; my $rdfSeq_re = ''; my $items_re = ''; my $rss_inhalt_re = ''; my $rdfSeq_ksw = ''; my $items_ksw = ''; my $rss_inhalt_ksw = ''; my $rdfSeq_mi = ''; my $items_mi = ''; my $rss_inhalt_mi = ''; foreach my $file (@FILELIST) { my $directory = $FILE_META{$file}->{directory}; my $filename = $FILE_META{$file}->{filename}; my $modul_nr = $FILE_META{$file}->{modul_nr}; my $modul_nr_ksw = $FILE_META{$file}->{modul_nr_ksw}; $modul_nr = $modul_nr_ksw if ($modul_nr_ksw); my $kurs_nr = $FILE_META{$file}->{kurs_nr}; my $virtuell = $FILE_META{$file}->{virtuell}; my $aenderung = $FILE_META{$file}->{aenderungen}; my $faku_kurz = $FILE_META{$file}->{fakultaet}; my $rssUrl = "https://www.fernuni-hagen.de$directory/$filename"; $keineIndexseite = not( $filename =~ /^index\.(shtml|php)$/ ); if ($keineIndexseite and $aenderung){ #Ausgabe fuer RSS-REWI if ($faku_kurz eq "rewi"){ $rdfSeq_re .= "\n"; $items_re .= "\n$rssUrl\n<![CDATA[Modul $modul_nr"; $items_re .= " (Kurs $kur_nr)" if ($kur_nr); $items_re .= " (virtuelle Veranstaltung)" if ($virtuell); $items_re .= " Aktuelle Meldung: $aenderung]]>\n\n"; } #Ausgabe fuer RSS-WIWI if ($faku_kurz eq "wiwi"){ $rdfSeq_wi .= "\n"; $items_wi .= "\n$rssUrl\n<![CDATA[Modul $modul_nr"; $items_wi .= " (Kurs $kur_nr)" if ($kur_nr && not($kurs_nr eq $modul_nr)); $items_wi .= " (virtuelle Veranstaltung)" if ($virtuell); $items_wi .= " Aktuelle Meldung: $aenderung]]>\n\n"; } #Ausgabe fuer RSS-KSW if ($faku_kurz eq "ksw"){ $rdfSeq_ksw .= "\n"; $items_ksw .= "\n$rssUrl\n<![CDATA[Modul $modul_nr"; $items_ksw .= " (Kurs $kur_nr)" if ($kur_nr && not($kurs_nr eq $modul_nr)); $items_ksw .= " (virtuelle Veranstaltung)" if ($virtuell); $items_ksw .= " Aktuelle Meldung: $aenderung]]>\n\n"; } #Ausgabe fuer RSS-MI if ($faku_kurz eq "mi"){ $rdfSeq_mi .= "\n"; $items_mi .= "\n$rssUrl\n<![CDATA[Modul $modul_nr"; $items_mi .= " (Kurs $kur_nr)" if ($kur_nr && not($kurs_nr eq $modul_nr)); $items_mi .= " (virtuelle Veranstaltung)" if ($virtuell); $items_mi .= " Aktuelle Meldung: $aenderung]]>\n\n"; } $zaehler++; } # if keineIndexseite } # foreach file $rss_inhalt_re = "$xmlRSS$rdfSeq_re
\n$items_re\n"; $rss_inhalt_wi = "$xmlRSS$rdfSeq_wi\n$items_wi\n"; $rss_inhalt_ksw = "$xmlRSS$rdfSeq_ksw\n$items_ksw\n"; $rss_inhalt_mi = "$xmlRSS$rdfSeq_mi\n$items_mi\n"; schreibeSSI($rss_inhalt_re, $root_dir.$ssi_dir."/rss_mentoriate_re.xml") if ($rdfSeq_re); schreibeSSI($rss_inhalt_wi, $root_dir.$ssi_dir."/rss_mentoriate_wi.xml") if ($rdfSeq_wi); schreibeSSI($rss_inhalt_ksw, $root_dir.$ssi_dir."/rss_mentoriate_ksw.xml") if ($rdfSeq_ksw); schreibeSSI($rss_inhalt_mi, $root_dir.$ssi_dir."/rss_mentoriate_mi.xml") if ($rdfSeq_mi);
Studienzentrum Eschweiler | 03.02.2017 13:23