From 9630f95e51dd5739d6a4566959f7c8b5d07dc723 Mon Sep 17 00:00:00 2001 From: Gerald Simane Date: Thu, 25 Jun 2009 06:11:41 +0000 Subject: [PATCH] --- vilesci/moodle/account_verwaltung.php | 482 +++++++++-------- vilesci/moodle/kurs_verwaltung.php | 712 +++++++++++++------------- 2 files changed, 594 insertions(+), 600 deletions(-) diff --git a/vilesci/moodle/account_verwaltung.php b/vilesci/moodle/account_verwaltung.php index 18887bc70..10835e8d4 100644 --- a/vilesci/moodle/account_verwaltung.php +++ b/vilesci/moodle/account_verwaltung.php @@ -1,242 +1,240 @@ - - * Andreas Oesterreicher < andreas.oesterreicher@technikum-wien.at > - * Rudolf Hangl < rudolf.hangl@technikum-wien.at > - * Gerald Simane-Sequens < gerald.simane-sequens@technikum-wien.at > - */ - -/* - Dieses Programm listet nach einem Suchbegriff bestehender Benutzer auf. - Fuer jede UserID wird geprueft ob dieser bereits einen Moodle ID besitzt. - Bestehende Moodle IDs werden angezeigt, fuer alle anderen wird die moeglichkeit - der neuanlage geboten. -*/ - -// ---------------- Standart Include Dateien einbinden - require_once('../config.inc.php'); - require_once('../../include/functions.inc.php'); - require_once('../../include/globals.inc.php'); -// ---------------- Moodle Daten Classe - require_once('../../include/moodle_user.class.php'); - -// *********************************************************************************************** -// Variable Initialisieren -// *********************************************************************************************** -// AusgabeStream - $content=''; - -// *********************************************************************************************** -// POST oder GET Parameter einlesen -// *********************************************************************************************** - -// $cUID UserID fuer Moodelaccount anlage - $cUID = (isset($_REQUEST['uid'])?trim($_REQUEST['uid']):''); -// @$cMdl_user_id Moodleaccount zum loeschen - $cMdl_user_id = (isset($_REQUEST['mdl_user_id'])?trim($_REQUEST['mdl_user_id']):''); -// @cSearchstr Suchtext in Tabelle Benutzer - $cSearchstr = (isset($_REQUEST['searchstr'])?trim($_REQUEST['searchstr']):''); -// @cCharset Zeichensatz - Ajax mit UTF-8 - $cCharset= (isset($_REQUEST['client_encode'])?trim($_REQUEST['client_encode']):'UTF-8'); -// *********************************************************************************************** -// Datenbankverbindungen zu Moodle und Vilesci und Classen -// *********************************************************************************************** - // DB Connect - $conn=@pg_pconnect(CONN_STRING) or die('

Datenbank zurzeit NICHT Online.
Bitte etwas Geduld.
Danke
');// Datenbankverbindung - $conn_moodle = pg_pconnect(CONN_STRING_MOODLE) or die('

MOODLE Datenbank zurzeit NICHT Online.
Bitte etwas Geduld.
Danke
'); - // Classen Instanzen - $objMoodle = new moodle_user($conn, $conn_moodle); - -// *********************************************************************************************** -// Verarbeitung einer Moodle-Account Anlageaktion -// *********************************************************************************************** - if ($cUID!='') // Bearbeiten User UID Anfrage - { - // Check ob User nicht bereits angelegt ist - if (!$bStatus=$objMoodle->loaduser($cUID)) - { - $objMoodle->errormsg=''; - // User ist noch nicht in Moodle angelegt => Neuanlage - if (!$bStatus=$objMoodle->createUser($cUID)) - $content.=$objMoodle->errormsg; - } - } -// *********************************************************************************************** -// HTML Suchfeld (Teil 1) -// *********************************************************************************************** - $content.=' -
- Bitte Suchbegriff eingeben: - - -
-
'; -// *********************************************************************************************** -// HTML Listenanzeige (Teil 2) -// *********************************************************************************************** - if($cSearchstr!='' && $cSearchstr!='?' && $cSearchstr!='*') - { - // SQL Select-String - $qry = "SELECT distinct tbl_person.person_id,tbl_person.nachname,tbl_person.vorname,tbl_person.aktiv,tbl_benutzer.uid - FROM public.tbl_person - LEFT JOIN public.tbl_benutzer ON tbl_benutzer.person_id=tbl_person.person_id - WHERE ( - tbl_person.nachname ~* '".addslashes($cSearchstr)."' OR - tbl_person.vorname ~* '".addslashes($cSearchstr)."' OR - tbl_benutzer.alias ~* '".addslashes($cSearchstr)."' OR - tbl_person.nachname || ' ' || tbl_person.vorname = '".addslashes($cSearchstr)."' OR - tbl_person.vorname || ' ' || tbl_person.nachname = '".addslashes($cSearchstr)."' OR - tbl_benutzer.uid ~* '".addslashes($cSearchstr)."' - ) - and tbl_benutzer.uid >'' - and tbl_benutzer.uid IS NOT NULL - ORDER BY nachname, vorname;"; - - if($result = @pg_query($conn, $qry)) - { - // Header Top mit Anzahl der gelisteten Kurse - $content.= ''. @pg_num_rows($result).' Person(en) gefunden'; - - $content.=''; - - // Header Teil Information der Funktion - $content.=''; - $content.=''; - $content.=''; - - // Headerinformation der Tabellenfelder - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; -# $content.=''; - $content.=''; - - // Alle gefundenen User in einer Schleife anzeigen. - $iTmpCounter=0; - while($row = @pg_fetch_object($result)) - { - // ZeilenCSS (gerade/ungerade) zur besseren Ansicht - $iTmpCounter++; - if ($iTmpCounter%2) - $showCSS=' style="text-align: left;border: 1px outset #F7F7F7;padding: 1px 5px 1px 5px; background:#FEFFEC" '; - else - $showCSS=' style="text-align: left;border: 1px outset #F7F7F7;padding: 1px 5px 1px 5px; background:#FCFCFC" '; - - // Listenzeile - $content.= ''; - $content.= ''; - $content.= ''; - $content.= ''; - $content.= ''; - $arrMoodleUser=array(); - $objMoodle->errormsg=''; - $objMoodle->mdl_user_id=''; - if (!empty($row->uid)) - { - if (!$boolReadMoodle=$objMoodle->loaduser($row->uid)) - $objMoodle->mdl_user_id=''; - } - // Es gibt noch keinen Moodle User - Anlage ermoeglichen - if (!isset($objMoodle->mdl_user_id) || empty($objMoodle->mdl_user_id)) - { - $content.= ''; - } - else // Anzeige bestehende Moodle User ID - { - $content.= ''; - } - // Tastatureingabe ermoeglichen - $content.= ''; - } // Ende Schleife der gefundenen User - $content.= '
Benutzer
 Nachname  Vorname  UserID  Status  MoodleAccount  Bearbeitung 
'.$row->nachname.''.$row->vorname.''.$row->uid.''.(mb_strtoupper($row->aktiv)=='T' || mb_strtoupper($row->aktiv)=='TRUE' ?'aktiv':'deaktiviert').''; - $content.='
'; - $content.= ''; - $content.= ''; - $content.= 'table_row_insert.png'; - $content.= ''; - $content.= 'anlegen'; - $content.='
'; - $content.= '		'.((isset($objMoodle->mdl_user_id) && !empty($objMoodle->mdl_user_id))?$objMoodle->mdl_user_id:'').'
'; - $content.= 'zum Anfang'; - } // Ende SQL Result abfrage - } // Ende ob Suchanfrage gestellt (Submit) wurde - $content=' - - - Moodle - Accountverwaltung - - - - - -

Moodle - Accountverwaltung

- - '.$content.' - - - '; - exit($content); -#------------------------------------------------------------------------------------------- -# Testfunktion zur Anzeige einer übergebenen Variable oder Array, Default ist GLOBALS -function Test($arr=constLeer,$lfd=0,$displayShow=true,$onlyRoot=false ) -{ - - $tmpArrayString=''; - if (!is_array($arr) && !is_object($arr)) return $arr; - if (is_array($arr) && count($arr)<1 && $displayShow) return ''; - if (is_array($arr) && count($arr)<1 && $displayShow) return "
function Test (???)
"; - - $lfdnr=$lfd + 1; - $tmpAnzeigeStufe=''; - for ($i=1;$i<$lfdnr;$i++) $tmpAnzeigeStufe.="="; - $tmpAnzeigeStufe.="=>"; - while (list( $tmp_key, $tmp_value ) = each($arr) ) - { - if (!$onlyRoot && (is_array($tmp_value) || is_object($tmp_value)) && count($tmp_value) >0) - { - $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key".Test($tmp_value,$lfdnr); - } else if ( (is_array($tmp_value) || is_object($tmp_value)) ) - { - $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key -- 0 Records"; - } else if ($tmp_value!='') - { - $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key :== ".$tmp_value; - } else { - $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key :-- (is Empty :: $tmp_value)"; - } - } - if ($lfd!='') { return $tmpArrayString; } - if (!$displayShow) { return $tmpArrayString; } - - $tmpArrayString.="
"; - $tmpArrayString="

******* START *******
".$tmpArrayString."
******* ENDE *******

"; - if (defined('Sprache_ISO')) - { - $tmpArrayString.="
Language:: ".Sprache_ISO; - } - $tmpArrayString.="
Server:: ".$_SERVER['PHP_SELF']."
"; - return "$tmpArrayString"; - - -} - -?> + + * Andreas Oesterreicher < andreas.oesterreicher@technikum-wien.at > + * Rudolf Hangl < rudolf.hangl@technikum-wien.at > + * Gerald Simane-Sequens < gerald.simane-sequens@technikum-wien.at > + */ + +/* + Dieses Programm listet nach einem Suchbegriff bestehender Benutzer auf. + Fuer jede UserID wird geprueft ob dieser bereits einen Moodle ID besitzt. + Bestehende Moodle IDs werden angezeigt, fuer alle anderen wird die moeglichkeit + der neuanlage geboten. +*/ + +// ---------------- Standart Include Dateien einbinden + require_once('../config.inc.php'); + require_once('../../include/functions.inc.php'); + require_once('../../include/globals.inc.php'); +// ---------------- Moodle Daten Classe + require_once('../../include/moodle_user.class.php'); + +// *********************************************************************************************** +// Variable Initialisieren +// *********************************************************************************************** +// AusgabeStream + $content=''; + +// *********************************************************************************************** +// POST oder GET Parameter einlesen +// *********************************************************************************************** + +// $cUID UserID fuer Moodelaccount anlage + $cUID = (isset($_REQUEST['uid'])?trim($_REQUEST['uid']):''); +// @$cMdl_user_id Moodleaccount zum loeschen + $cMdl_user_id = (isset($_REQUEST['mdl_user_id'])?trim($_REQUEST['mdl_user_id']):''); +// @cSearchstr Suchtext in Tabelle Benutzer + $cSearchstr = (isset($_REQUEST['searchstr'])?trim($_REQUEST['searchstr']):''); +// @cCharset Zeichensatz - Ajax mit UTF-8 + $cCharset= (isset($_REQUEST['client_encode'])?trim($_REQUEST['client_encode']):'UTF-8'); + +// *********************************************************************************************** +// Datenbankverbindungen zu Moodle und Vilesci und Classen +// *********************************************************************************************** + // Classen Instanzen + $objMoodle = new moodle_user(); + +// *********************************************************************************************** +// Verarbeitung einer Moodle-Account Anlageaktion +// *********************************************************************************************** + if ($cUID!='') // Bearbeiten User UID Anfrage + { + // Check ob User nicht bereits angelegt ist + if (!$bStatus=$objMoodle->loaduser($cUID)) + { + $objMoodle->errormsg=''; + // User ist noch nicht in Moodle angelegt => Neuanlage + if (!$bStatus=$objMoodle->createUser($cUID)) + $content.=$objMoodle->errormsg; + } + } +// *********************************************************************************************** +// HTML Suchfeld (Teil 1) +// *********************************************************************************************** + $content.=' +
+ Bitte Suchbegriff eingeben: + + +
+
'; +// *********************************************************************************************** +// HTML Listenanzeige (Teil 2) +// *********************************************************************************************** + if($cSearchstr!='' && $cSearchstr!='?' && $cSearchstr!='*') + { + // SQL Select-String + $qry = "SELECT distinct tbl_person.person_id,tbl_person.nachname,tbl_person.vorname,tbl_person.aktiv,tbl_benutzer.uid + FROM public.tbl_person + LEFT JOIN public.tbl_benutzer ON tbl_benutzer.person_id=tbl_person.person_id + WHERE ( + tbl_person.nachname ~* '".addslashes($cSearchstr)."' OR + tbl_person.vorname ~* '".addslashes($cSearchstr)."' OR + tbl_benutzer.alias ~* '".addslashes($cSearchstr)."' OR + tbl_person.nachname || ' ' || tbl_person.vorname = '".addslashes($cSearchstr)."' OR + tbl_person.vorname || ' ' || tbl_person.nachname = '".addslashes($cSearchstr)."' OR + tbl_benutzer.uid ~* '".addslashes($cSearchstr)."' + ) + and tbl_benutzer.uid >'' + and tbl_benutzer.uid IS NOT NULL + ORDER BY nachname, vorname;"; + + if($result = @pg_query($conn, $qry)) + { + // Header Top mit Anzahl der gelisteten Kurse + $content.= ''. @pg_num_rows($result).' Person(en) gefunden'; + + $content.=''; + + // Header Teil Information der Funktion + $content.=''; + $content.=''; + $content.=''; + + // Headerinformation der Tabellenfelder + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; +# $content.=''; + $content.=''; + + // Alle gefundenen User in einer Schleife anzeigen. + $iTmpCounter=0; + while($row = @pg_fetch_object($result)) + { + // ZeilenCSS (gerade/ungerade) zur besseren Ansicht + $iTmpCounter++; + if ($iTmpCounter%2) + $showCSS=' style="text-align: left;border: 1px outset #F7F7F7;padding: 1px 5px 1px 5px; background:#FEFFEC" '; + else + $showCSS=' style="text-align: left;border: 1px outset #F7F7F7;padding: 1px 5px 1px 5px; background:#FCFCFC" '; + + // Listenzeile + $content.= ''; + $content.= ''; + $content.= ''; + $content.= ''; + $content.= ''; + $arrMoodleUser=array(); + $objMoodle->errormsg=''; + $objMoodle->mdl_user_id=''; + if (!empty($row->uid)) + { + if (!$boolReadMoodle=$objMoodle->loaduser($row->uid)) + $objMoodle->mdl_user_id=''; + } + // Es gibt noch keinen Moodle User - Anlage ermoeglichen + if (!isset($objMoodle->mdl_user_id) || empty($objMoodle->mdl_user_id)) + { + $content.= ''; + } + else // Anzeige bestehende Moodle User ID + { + $content.= ''; + } + // Tastatureingabe ermoeglichen + $content.= ''; + } // Ende Schleife der gefundenen User + $content.= '
Benutzer
 Nachname  Vorname  UserID  Status  MoodleAccount  Bearbeitung 
'.$row->nachname.''.$row->vorname.''.$row->uid.''.(mb_strtoupper($row->aktiv)=='T' || mb_strtoupper($row->aktiv)=='TRUE' ?'aktiv':'deaktiviert').''; + $content.='
'; + $content.= ''; + $content.= ''; + $content.= 'table_row_insert.png'; + $content.= ''; + $content.= 'anlegen'; + $content.='
'; + $content.= '		'.((isset($objMoodle->mdl_user_id) && !empty($objMoodle->mdl_user_id))?$objMoodle->mdl_user_id:'').'
'; + $content.= 'zum Anfang'; + } // Ende SQL Result abfrage + } // Ende ob Suchanfrage gestellt (Submit) wurde + $content=' + + + Moodle - Accountverwaltung + + + + + +

Moodle - Accountverwaltung

+ + '.$content.' + + + '; + exit($content); +#------------------------------------------------------------------------------------------- +# Testfunktion zur Anzeige einer übergebenen Variable oder Array, Default ist GLOBALS +function Test($arr=constLeer,$lfd=0,$displayShow=true,$onlyRoot=false ) +{ + + $tmpArrayString=''; + if (!is_array($arr) && !is_object($arr)) return $arr; + if (is_array($arr) && count($arr)<1 && $displayShow) return ''; + if (is_array($arr) && count($arr)<1 && $displayShow) return "
function Test (???)
"; + + $lfdnr=$lfd + 1; + $tmpAnzeigeStufe=''; + for ($i=1;$i<$lfdnr;$i++) $tmpAnzeigeStufe.="="; + $tmpAnzeigeStufe.="=>"; + while (list( $tmp_key, $tmp_value ) = each($arr) ) + { + if (!$onlyRoot && (is_array($tmp_value) || is_object($tmp_value)) && count($tmp_value) >0) + { + $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key".Test($tmp_value,$lfdnr); + } else if ( (is_array($tmp_value) || is_object($tmp_value)) ) + { + $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key -- 0 Records"; + } else if ($tmp_value!='') + { + $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key :== ".$tmp_value; + } else { + $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key :-- (is Empty :: $tmp_value)"; + } + } + if ($lfd!='') { return $tmpArrayString; } + if (!$displayShow) { return $tmpArrayString; } + + $tmpArrayString.="
"; + $tmpArrayString="

******* START *******
".$tmpArrayString."
******* ENDE *******

"; + if (defined('Sprache_ISO')) + { + $tmpArrayString.="
Language:: ".Sprache_ISO; + } + $tmpArrayString.="
Server:: ".$_SERVER['PHP_SELF']."
"; + return "$tmpArrayString"; + + +} + +?> diff --git a/vilesci/moodle/kurs_verwaltung.php b/vilesci/moodle/kurs_verwaltung.php index e6913abef..81efad488 100644 --- a/vilesci/moodle/kurs_verwaltung.php +++ b/vilesci/moodle/kurs_verwaltung.php @@ -1,359 +1,355 @@ - - * Andreas Oesterreicher < andreas.oesterreicher@technikum-wien.at > - * Rudolf Hangl < rudolf.hangl@technikum-wien.at > - * Gerald Simane-Sequens < gerald.simane-sequens@technikum-wien.at > - */ - -/* -* Dieses Programm listet nach Selektinskreterien alle Moodelkurse zu einem Studiengang auf. -* Fuer jede MoodleID werden die Anzahl Benotungen, und erfassten sowie angelegte Zusaetze angezeigt. -* Jeder der angezeigten Moodle IDs kann geloescht werden nach bestaetigung eines PopUp Fenster. -*/ - - -// *********************************************************************************************** -// Include Dateien -// *********************************************************************************************** -// ---------------- Standart Include Dateien einbinden - require_once('../config.inc.php'); - require_once('../../include/functions.inc.php'); - require_once('../../include/globals.inc.php'); -// ---------------- Moodle Daten Classe - include_once('../../include/moodle_course.class.php'); - -// *********************************************************************************************** -// Variable Initialisieren -// *********************************************************************************************** - // AusgabeStream - $content=''; - // Vergleichsdatum Jahr und Monat fuer Studiensemester (Select-Auswahl) - $cYYYYMM=date("Ym", mktime(0,0,0,date("m"),date("d"),date("y"))); - - -// *********************************************************************************************** -// POST oder GET Parameter einlesen -// *********************************************************************************************** -// @$studiensemester_kurzbz Studiensemester xxJJJJ - xx fuer SS Sommer oder WW Winter - $studiensemester_kurzbz=(isset($_REQUEST['studiensemester_kurzbz'])?trim($_REQUEST['studiensemester_kurzbz']):''); -// @$studiengang_kz Studiengang - $studiengang_kz=(isset($_REQUEST['studiengang_kz'])?trim($_REQUEST['studiengang_kz']):''); -// @$semester Semester des Studienganges - $semester=(isset($_REQUEST['semester'])?trim($_REQUEST['semester']):''); - -// @$semester Semester des Studienganges - $kursid=(isset($_REQUEST['kursid'])?trim($_REQUEST['kursid']):''); - - -// @$mdl_course_id Moodle Kurs ID - $mdl_course_id= (isset($_REQUEST['mdl_course_id'])?$_REQUEST['mdl_course_id']:''); -// @$moodle_id Moodle SubKurs (Unterkat.) ID zu Moodle Kurs ID (mdl_course_id) - $moodle_id= (isset($_REQUEST['moodle_id'])?$_REQUEST['moodle_id']:''); -// @$bAnzeige Listenanzeige wenn Submitbottom Anzeige gedrueckt wurde - $bAnzeige= ($studiensemester_kurzbz!=''?True:False); -// @cCharset Zeichensatz - Ajax mit UTF-8 - $cCharset= (isset($_REQUEST['client_encode'])?trim($_REQUEST['client_encode']):'UTF-8'); -// @debug_switch Anzeige der xml-rfc Daten moegliche Stufen sind 0,1,2,3 - $debug_switch= (isset($_REQUEST['debug'])?$_REQUEST['debug']:0); - - -// *********************************************************************************************** -// Datenbankverbindungen zu Moodle und Vilesci und Classen -// *********************************************************************************************** - // DB Connect - $conn=@pg_pconnect(CONN_STRING) or die('

Datenbank zurzeit NICHT Online.
Bitte etwas Geduld.
Danke
');// Datenbankverbindung - $conn_moodle = pg_pconnect(CONN_STRING_MOODLE) or die('

MOODLE Datenbank zurzeit NICHT Online.
Bitte etwas Geduld.
Danke
'); - // Classen Instanzen - $objMoodle = new moodle_course($conn, $conn_moodle); - - -// *********************************************************************************************** -// Verarbeitung einer Moodle-Kurs Loeschaktion -// *********************************************************************************************** - - if ($mdl_course_id!='' && $studiensemester_kurzbz!='') // Kurs wird zum bearbeiten (loeschen) freigegeben - { - include(dirname(__FILE__)."/xmlrpcutils/utils.php"); - // Aktuellen Moodle Server ermitteln. - if (defined('MOODLE_PATH')) // Eintrag MOODLE_PATH in Vilesci config.inc.php. Hostname herausfiltern - { - $host = mb_eregi_replace('https://','',mb_eregi_replace('http://','',mb_eregi_replace('/moodle','',mb_eregi_replace('/moodle/','',MOODLE_PATH)))); - } - elseif ($_SERVER["HTTP_HOST"]=="dav.technikum-wien.at" ) // Vilesci config.inc.php nicht erweitert HTTP_HOST pruefen - { - $host = 'dav.technikum-wien.at'; - } - elseif ($_SERVER["HTTP_HOST"]=="calva.technikum-wien.at" ) // Vilesci config.inc.php nicht erweitert HTTP_HOST pruefen - { - $host = 'calva.technikum-wien.at'; - } - else // Produktivessystem - { - $host = 'cis.technikum-wien.at'; - } -#exit($host); - - // Variable Daten Initialisieren - $uri = "/moodle/xmlrpc/xmlrpc.php"; - $method = "DeleteCourseByID"; - $args['CourseID']="$mdl_course_id"; - $port=$_SERVER["SERVER_PORT"]; - if ($debug_switch) - { - $content.="
Host:$host , Port:$port , Uri:$uri , Method:$method
"; - } - $callspec = array( - 'method' => $method, - 'host' => $host, - 'port' => $port, - 'uri' => $uri, - 'user' => (isset($_SERVER["PHP_AUTH_USER"])?$_SERVER["PHP_AUTH_USER"]:""), - 'pass' => (isset($_SERVER["PHP_AUTH_PW"])?$_SERVER["PHP_AUTH_PW"]:""), - 'secure' =>false, - 'debug' => $debug_switch, - 'args' => $args); - $result = xu_rpc_http_concise($callspec); - // Return Information - // $result[0] = Status true/false - // $result[1] = Informationstext - // $result[2] = Ausgabetext von Moodle - if (!is_array($result)) // Server wurde nicht erreicht. - { - $content.="Fehler xmlrpc call $result"; - } - else if ($result[0]==1) // Methodenaufruf erfolgreich - { - #$content.=(isset($result[1])?$result[1]:"Moodel-Kurs gelöscht "); - $qry = "DELETE FROM lehre.tbl_moodle WHERE mdl_course_id='".addslashes($mdl_course_id)."' "; - if ($moodle_id!='') - $qry.= " and moodle_id='".addslashes($moodle_id)."'"; - if(!pg_query($conn, $qry)) - $content.="

Moodlekurs $mdl_course_id wurde NICHT gelöscht in Lehre.

"; - $content.="

Moodlekurs $mdl_course_id wurde gelöscht.

"; - } - else // Result = 0 ein Fehler im RFC wurde festgestellt - { - $content.=(isset($result[1])?$result[1]:"Fehler beim Kurs löschen "); - } - } - - - -// *********************************************************************************************** -// HTML Auswahlfelder (Teil 1) -// *********************************************************************************************** - // FormName erzeugen - $cFormName='searchMoodleCurse'.$studiensemester_kurzbz.$studiengang_kz.$semester; - $content.=' -
- '; - - // Studiensemester public.tbl_studiensemester_kurzbz - $content.=''; - - // Studiengang public.tbl_studiengang_kz - $content.=''; - - // Semster public.tbl_studiengang_kz - max Semester des Selektierten Studiengangs - $content.=''; - - $content.=' -
StudiensemesterStudiengangSemsterKurs ID'; - - $content.=' -
-
-
'; - -// *********************************************************************************************** -// HTML Listenanzeige (Teil 2) -// *********************************************************************************************** - // Bedingung zur Listenanzeige : Anzeige und Datengefunden - if ($bAnzeige && $objMoodle && $objMoodle->getAllVariant('',$studiensemester_kurzbz,$studiengang_kz,$semester,true)) - { - // Header Top mit Anzahl der gelisteten Kurse - $content.= ''. count($objMoodle->result).' Kurs(e) gefunden'; - - $content.=''; - // Header Teil Information der Funktion - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - - // Headerinformation der Tabellenfelder - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - - - // Alle Moodlekurse in einer Schleife anzeigen. - for($i=0;$iresult);$i++) - { - // ZeilenCSS (gerade/ungerade) zur besseren Ansicht - if ($i%2) - $showCSS=' style="text-align: left;border: 1px outset #F7F7F7;padding: 1px 5px 1px 5px; background:#FEFFEC" '; - else - $showCSS=' style="text-align: left;border: 1px outset #F7F7F7;padding: 1px 5px 1px 5px; background:#FCFCFC" '; - - if (!empty($kursid) && $kursid!=$objMoodle->result[$i]->mdl_course_id) - continue; - - - // Listenzeile - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - $content.=''; - - // Anzahl Benotungen - $content.=''; - // Anzahl Aktivitaeten und Lehrmaterial - $content.=''; - - // Bearbeitung Submit - $content.= ''; - $content.=''; - } // Ende Moodlekurse in einer Schleife anzeigen. - $content.= '
MoodlekursAnzahlKurs
 Lehrveranstaltung  Kurzbz.  LV Id  StudiengangKz  Kursbezeichnung  ID  Benotungen  Aktivitäten  Bearbeiten 
'.$objMoodle->result[$i]->lehrveranstaltung_bezeichnung.''.$objMoodle->result[$i]->lehrveranstaltung_kurzbz.''.$objMoodle->result[$i]->lehrveranstaltung_id.''.$objMoodle->result[$i]->lehrveranstaltung_studiengang_kz.''.$objMoodle->result[$i]->mdl_shortname.''.$objMoodle->result[$i]->mdl_course_id.''.$objMoodle->result[$i]->mdl_benotungen.''.($objMoodle->result[$i]->mdl_resource+$objMoodle->result[$i]->mdl_quiz+$objMoodle->result[$i]->mdl_chat + $objMoodle->result[$i]->mdl_forum + $objMoodle->result[$i]->mdl_choice ).''; - $content.='
'; - $content.= ''; - $content.= ''; - $content.= ''; - $content.= ''; - $content.= ''; - $content.= 'table_row_delete.png'; - $content.= ''; - $content.= 'entfernen'; - $content.='
'; - $content.= '
'; - $content.= 'zum Anfang'; - } // Ende IF Bedingung Anzeige + Datengefunden - - -// *********************************************************************************************** -// HTML Header und Foot zum Content (Ausgabestring) hinzufuegen, und Anzeigen -// *********************************************************************************************** - $content=' - - - Moodle - Kursverwaltung - - - - - -

Moodle - Kursverwaltung

- - '.$content.' - - - '; - exit($content); - - - -#------------------------------------------------------------------------------------------- -# Testfunktion zur Anzeige einer übergebenen Variable oder Array, Default ist GLOBALS -function Test($arr=constLeer,$lfd=0,$displayShow=true,$onlyRoot=false ) -{ - - $tmpArrayString=''; - if (!is_array($arr) && !is_object($arr)) return $arr; - if (is_array($arr) && count($arr)<1 && $displayShow) return ''; - if (is_array($arr) && count($arr)<1 && $displayShow) return "
function Test (???)
"; - - $lfdnr=$lfd + 1; - $tmpAnzeigeStufe=''; - for ($i=1;$i<$lfdnr;$i++) $tmpAnzeigeStufe.="="; - $tmpAnzeigeStufe.="=>"; - while (list( $tmp_key, $tmp_value ) = each($arr) ) - { - if (!$onlyRoot && (is_array($tmp_value) || is_object($tmp_value)) && count($tmp_value) >0) - { - $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key".Test($tmp_value,$lfdnr); - } else if ( (is_array($tmp_value) || is_object($tmp_value)) ) - { - $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key -- 0 Records"; - } else if ($tmp_value!='') - { - $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key :== ".$tmp_value; - } else { - $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key :-- (is Empty :: $tmp_value)"; - } - } - if ($lfd!='') { return $tmpArrayString; } - if (!$displayShow) { return $tmpArrayString; } - - $tmpArrayString.="
"; - $tmpArrayString="

******* START *******
".$tmpArrayString."
******* ENDE *******

"; - $tmpArrayString.="
Server:: ".$_SERVER['PHP_SELF']."
"; - return "$tmpArrayString"; - - -} + + * Andreas Oesterreicher < andreas.oesterreicher@technikum-wien.at > + * Rudolf Hangl < rudolf.hangl@technikum-wien.at > + * Gerald Simane-Sequens < gerald.simane-sequens@technikum-wien.at > + */ + +/* +* Dieses Programm listet nach Selektinskreterien alle Moodelkurse zu einem Studiengang auf. +* Fuer jede MoodleID werden die Anzahl Benotungen, und erfassten sowie angelegte Zusaetze angezeigt. +* Jeder der angezeigten Moodle IDs kann geloescht werden nach bestaetigung eines PopUp Fenster. +*/ + + +// *********************************************************************************************** +// Include Dateien +// *********************************************************************************************** +// ---------------- Standart Include Dateien einbinden + require_once('../config.inc.php'); + require_once('../../include/functions.inc.php'); + require_once('../../include/globals.inc.php'); +// ---------------- Moodle Daten Classe + include_once('../../include/moodle_course.class.php'); + +// *********************************************************************************************** +// Variable Initialisieren +// *********************************************************************************************** + // AusgabeStream + $content=''; + // Vergleichsdatum Jahr und Monat fuer Studiensemester (Select-Auswahl) + $cYYYYMM=date("Ym", mktime(0,0,0,date("m"),date("d"),date("y"))); + + +// *********************************************************************************************** +// POST oder GET Parameter einlesen +// *********************************************************************************************** +// @$studiensemester_kurzbz Studiensemester xxJJJJ - xx fuer SS Sommer oder WW Winter + $studiensemester_kurzbz=(isset($_REQUEST['studiensemester_kurzbz'])?trim($_REQUEST['studiensemester_kurzbz']):''); +// @$studiengang_kz Studiengang + $studiengang_kz=(isset($_REQUEST['studiengang_kz'])?trim($_REQUEST['studiengang_kz']):''); +// @$semester Semester des Studienganges + $semester=(isset($_REQUEST['semester'])?trim($_REQUEST['semester']):''); + +// @$semester Semester des Studienganges + $kursid=(isset($_REQUEST['kursid'])?trim($_REQUEST['kursid']):''); + + +// @$mdl_course_id Moodle Kurs ID + $mdl_course_id= (isset($_REQUEST['mdl_course_id'])?$_REQUEST['mdl_course_id']:''); +// @$moodle_id Moodle SubKurs (Unterkat.) ID zu Moodle Kurs ID (mdl_course_id) + $moodle_id= (isset($_REQUEST['moodle_id'])?$_REQUEST['moodle_id']:''); +// @$bAnzeige Listenanzeige wenn Submitbottom Anzeige gedrueckt wurde + $bAnzeige= ($studiensemester_kurzbz!=''?True:False); +// @cCharset Zeichensatz - Ajax mit UTF-8 + $cCharset= (isset($_REQUEST['client_encode'])?trim($_REQUEST['client_encode']):'UTF-8'); +// @debug_switch Anzeige der xml-rfc Daten moegliche Stufen sind 0,1,2,3 + $debug_switch= (isset($_REQUEST['debug'])?$_REQUEST['debug']:0); + + +// *********************************************************************************************** +// Datenbankverbindungen zu Moodle und Vilesci und Classen +// *********************************************************************************************** + $objMoodle = new moodle_course(); + + +// *********************************************************************************************** +// Verarbeitung einer Moodle-Kurs Loeschaktion +// *********************************************************************************************** + + if ($mdl_course_id!='' && $studiensemester_kurzbz!='') // Kurs wird zum bearbeiten (loeschen) freigegeben + { + include(dirname(__FILE__)."/xmlrpcutils/utils.php"); + // Aktuellen Moodle Server ermitteln. + if (defined('MOODLE_PATH')) // Eintrag MOODLE_PATH in Vilesci config.inc.php. Hostname herausfiltern + { + $host = mb_eregi_replace('https://','',mb_eregi_replace('http://','',mb_eregi_replace('/moodle','',mb_eregi_replace('/moodle/','',MOODLE_PATH)))); + } + elseif ($_SERVER["HTTP_HOST"]=="dav.technikum-wien.at" ) // Vilesci config.inc.php nicht erweitert HTTP_HOST pruefen + { + $host = 'dav.technikum-wien.at'; + } + elseif ($_SERVER["HTTP_HOST"]=="calva.technikum-wien.at" ) // Vilesci config.inc.php nicht erweitert HTTP_HOST pruefen + { + $host = 'calva.technikum-wien.at'; + } + else // Produktivessystem + { + $host = 'cis.technikum-wien.at'; + } +#exit($host); + + // Variable Daten Initialisieren + $uri = "/moodle/xmlrpc/xmlrpc.php"; + $method = "DeleteCourseByID"; + $args['CourseID']="$mdl_course_id"; + $port=$_SERVER["SERVER_PORT"]; + if ($debug_switch) + { + $content.="
Host:$host , Port:$port , Uri:$uri , Method:$method
"; + } + $callspec = array( + 'method' => $method, + 'host' => $host, + 'port' => $port, + 'uri' => $uri, + 'user' => (isset($_SERVER["PHP_AUTH_USER"])?$_SERVER["PHP_AUTH_USER"]:""), + 'pass' => (isset($_SERVER["PHP_AUTH_PW"])?$_SERVER["PHP_AUTH_PW"]:""), + 'secure' =>false, + 'debug' => $debug_switch, + 'args' => $args); + $result = xu_rpc_http_concise($callspec); + // Return Information + // $result[0] = Status true/false + // $result[1] = Informationstext + // $result[2] = Ausgabetext von Moodle + if (!is_array($result)) // Server wurde nicht erreicht. + { + $content.="Fehler xmlrpc call $result"; + } + else if ($result[0]==1) // Methodenaufruf erfolgreich + { + #$content.=(isset($result[1])?$result[1]:"Moodel-Kurs gelöscht "); + $qry = "DELETE FROM lehre.tbl_moodle WHERE mdl_course_id='".addslashes($mdl_course_id)."' "; + if ($moodle_id!='') + $qry.= " and moodle_id='".addslashes($moodle_id)."'"; + if(!pg_query($conn, $qry)) + $content.="

Moodlekurs $mdl_course_id wurde NICHT gelöscht in Lehre.

"; + $content.="

Moodlekurs $mdl_course_id wurde gelöscht.

"; + } + else // Result = 0 ein Fehler im RFC wurde festgestellt + { + $content.=(isset($result[1])?$result[1]:"Fehler beim Kurs löschen "); + } + } + + + +// *********************************************************************************************** +// HTML Auswahlfelder (Teil 1) +// *********************************************************************************************** + // FormName erzeugen + $cFormName='searchMoodleCurse'.$studiensemester_kurzbz.$studiengang_kz.$semester; + $content.=' +
+ '; + + // Studiensemester public.tbl_studiensemester_kurzbz + $content.=''; + + // Studiengang public.tbl_studiengang_kz + $content.=''; + + // Semster public.tbl_studiengang_kz - max Semester des Selektierten Studiengangs + $content.=''; + + $content.=' +
StudiensemesterStudiengangSemsterKurs ID'; + + $content.=' +
+
+
'; + +// *********************************************************************************************** +// HTML Listenanzeige (Teil 2) +// *********************************************************************************************** + // Bedingung zur Listenanzeige : Anzeige und Datengefunden + if ($bAnzeige && $objMoodle && $objMoodle->getAllVariant('',$studiensemester_kurzbz,$studiengang_kz,$semester,true)) + { + // Header Top mit Anzahl der gelisteten Kurse + $content.= ''. count($objMoodle->result).' Kurs(e) gefunden'; + + $content.=''; + // Header Teil Information der Funktion + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + + // Headerinformation der Tabellenfelder + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + + + // Alle Moodlekurse in einer Schleife anzeigen. + for($i=0;$iresult);$i++) + { + // ZeilenCSS (gerade/ungerade) zur besseren Ansicht + if ($i%2) + $showCSS=' style="text-align: left;border: 1px outset #F7F7F7;padding: 1px 5px 1px 5px; background:#FEFFEC" '; + else + $showCSS=' style="text-align: left;border: 1px outset #F7F7F7;padding: 1px 5px 1px 5px; background:#FCFCFC" '; + + if (!empty($kursid) && $kursid!=$objMoodle->result[$i]->mdl_course_id) + continue; + + + // Listenzeile + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + $content.=''; + + // Anzahl Benotungen + $content.=''; + // Anzahl Aktivitaeten und Lehrmaterial + $content.=''; + + // Bearbeitung Submit + $content.= ''; + $content.=''; + } // Ende Moodlekurse in einer Schleife anzeigen. + $content.= '
MoodlekursAnzahlKurs
 Lehrveranstaltung  Kurzbz.  LV Id  StudiengangKz  Kursbezeichnung  ID  Benotungen  Aktivitäten  Bearbeiten 
'.$objMoodle->result[$i]->lehrveranstaltung_bezeichnung.''.$objMoodle->result[$i]->lehrveranstaltung_kurzbz.''.$objMoodle->result[$i]->lehrveranstaltung_id.''.$objMoodle->result[$i]->lehrveranstaltung_studiengang_kz.''.$objMoodle->result[$i]->mdl_shortname.''.$objMoodle->result[$i]->mdl_course_id.''.$objMoodle->result[$i]->mdl_benotungen.''.($objMoodle->result[$i]->mdl_resource+$objMoodle->result[$i]->mdl_quiz+$objMoodle->result[$i]->mdl_chat + $objMoodle->result[$i]->mdl_forum + $objMoodle->result[$i]->mdl_choice ).''; + $content.='
'; + $content.= ''; + $content.= ''; + $content.= ''; + $content.= ''; + $content.= ''; + $content.= 'table_row_delete.png'; + $content.= ''; + $content.= 'entfernen'; + $content.='
'; + $content.= '
'; + $content.= 'zum Anfang'; + } // Ende IF Bedingung Anzeige + Datengefunden + + +// *********************************************************************************************** +// HTML Header und Foot zum Content (Ausgabestring) hinzufuegen, und Anzeigen +// *********************************************************************************************** + $content=' + + + Moodle - Kursverwaltung + + + + + +

Moodle - Kursverwaltung

+ + '.$content.' + + + '; + exit($content); + + + +#------------------------------------------------------------------------------------------- +# Testfunktion zur Anzeige einer übergebenen Variable oder Array, Default ist GLOBALS +function Test($arr=constLeer,$lfd=0,$displayShow=true,$onlyRoot=false ) +{ + + $tmpArrayString=''; + if (!is_array($arr) && !is_object($arr)) return $arr; + if (is_array($arr) && count($arr)<1 && $displayShow) return ''; + if (is_array($arr) && count($arr)<1 && $displayShow) return "
function Test (???)
"; + + $lfdnr=$lfd + 1; + $tmpAnzeigeStufe=''; + for ($i=1;$i<$lfdnr;$i++) $tmpAnzeigeStufe.="="; + $tmpAnzeigeStufe.="=>"; + while (list( $tmp_key, $tmp_value ) = each($arr) ) + { + if (!$onlyRoot && (is_array($tmp_value) || is_object($tmp_value)) && count($tmp_value) >0) + { + $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key".Test($tmp_value,$lfdnr); + } else if ( (is_array($tmp_value) || is_object($tmp_value)) ) + { + $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key -- 0 Records"; + } else if ($tmp_value!='') + { + $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key :== ".$tmp_value; + } else { + $tmpArrayString.="
$tmpAnzeigeStufe $tmp_key :-- (is Empty :: $tmp_value)"; + } + } + if ($lfd!='') { return $tmpArrayString; } + if (!$displayShow) { return $tmpArrayString; } + + $tmpArrayString.="
"; + $tmpArrayString="

******* START *******
".$tmpArrayString."
******* ENDE *******

"; + $tmpArrayString.="
Server:: ".$_SERVER['PHP_SELF']."
"; + return "$tmpArrayString"; + + +} ?> \ No newline at end of file