File: /home/austral3d/fourdplan.com/webservices/RemoverWPVacios.php
<?php
include ("Comun.php");
$db = Conectar();
$assembly_id = mysql_real_escape_string($_GET['assembly_id'], $db);
$workpackages_vacios = ejecutar("SELECT id, nombre FROM WorkPackage WHERE assembly_id = '$assembly_id' AND id NOT IN (SELECT DISTINCT workpackage_id FROM Descripcion d, Elemento e, Instancia i WHERE d.assembly_id = '$assembly_id' AND e.descripcion_id = d.id AND i.elemento_id = e.id)");
$n = mysql_num_rows($workpackages_vacios);
$xml = new SimpleXMLElement("<WorkPackagesVacios></WorkPackagesVacios>");
for ($i = 0; $i < $n; $i++)
{
$tupla = mysql_fetch_row($workpackages_vacios);
$wp_id = $tupla[0];
$xml->addChild("wp", $tupla[1]);
ejecutar("DELETE FROM WorkPackage WHERE id = '$wp_id'");
}
echo($xml->asXML());
?>