[Hw4mdl-svn] SF.net SVN: hw4mdl: [10] trunk/moodle/mod

[<hu...@us...>]

Revision: 10
Author:   hugues
Date:     2006-04-21 12:35:50 -0700 (Fri, 21 Apr 2006)
ViewCVS:  http://svn.sourceforge.net/hw4mdl/?rev=10&view=rev

Log Message:
-----------
Added the deletion for Voice Direct

Modified Paths:
--------------
    trunk/moodle/mod/voicedirect/lib.php
    trunk/moodle/mod/voicetoolapi.php
Modified: trunk/moodle/mod/voicedirect/lib.php
===================================================================
--- trunk/moodle/mod/voicedirect/lib.php	2006-04-21 13:42:47 UTC (rev 9)
+++ trunk/moodle/mod/voicedirect/lib.php	2006-04-21 19:35:50 UTC (rev 10)
@@ -89,10 +89,12 @@
         return false;
     }
 
+    if (! ($result = voicetool_delete_resource ($voicedirect->rid))) {
+        error('Cannot modify the resource on the VT server');
+    }
+
     $result = true;
-
     # Delete any dependent records here #
-
     if (! delete_records("voicedirect", "id", "$voicedirect->id")) {
         $result = false;
     }

Modified: trunk/moodle/mod/voicetoolapi.php
===================================================================
--- trunk/moodle/mod/voicetoolapi.php	2006-04-21 13:42:47 UTC (rev 9)
+++ trunk/moodle/mod/voicetoolapi.php	2006-04-21 19:35:50 UTC (rev 10)
@@ -18,6 +18,7 @@
 $VT_API_SERVICES        = '/services/Broker?wsdl';
 $VT_API_CREATE_RESOURCE = 'createResource';
 $VT_API_MODIFY_RESOURCE = 'modifyResource';
+$VT_API_DELETE_RESOURCE = 'deleteResource';
 $VT_API_CREATE_SESSION  = 'createSession';
 
 
@@ -85,8 +86,36 @@
     return $result;
 }
 
+/**
+ * Send an SDK request to the VT server to delete a resource.
+ * @uses CFG
+ * @uses VT_API_SERVICES
+ * @uses VT_API_DELETE_RESOURCE
+ * @param $rid - the rid of the resource to delete
+ * @return - the object returned by the call, or false if something goes wrong
+ */
+function voicetool_delete_resource ($rid) {
+    global $CFG,
+           $VT_API_SERVICES,
+           $VT_API_DELETE_RESOURCE;
 
+    $soapclient = new soapclient($CFG->voicetool_servername.$VT_API_SERVICES,true);
+    
+    $resource = array ($CFG->voicetool_adminusername,
+                       $CFG->voicetool_adminpassword,
+                       $rid);
+    
+    $result = $soapclient->call($VT_API_DELETE_RESOURCE, $resource);
+       
+    if (!voicetool_check_result ($result)) {
+        return false;
+    }
+    
+    return $result;
+}
 
+
+
 /**
  * Create the session for a voice direct applet.
  * @uses CFG
@@ -146,6 +175,10 @@
       if ($item['name'] == 'error_message') {
         error_log( "voicetool_check_result: ".$item['name'].': '.$item['value']);
         return false;
+      }
+      
+      if (($item['name'] == 'status_code') && ($item['value'] == 'ok')) {
+        return true;
       }
     }
     


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.