deldirfile.php

Go to the documentation of this file.

<?php
/*
 * @author Anakeen
 * @license http://creativecommons.org/licenses/by-nc-sa/2.0/fr/ Anakeen - licence CC
 * @package FDL
*/
/**
 * Generated Header (not documented yet)
 *
 * @author Anakeen 2000
 * @version $Id: deldirfile.php,v 1.14 2005/06/28 08:37:46 eric Exp $
 * @license http://creativecommons.org/licenses/by-nc-sa/2.0/fr/ Anakeen - licence CC
 * @package FDL
 * @subpackage GED
 */
/**
 */

include_once ("FDL/Class.Dir.php");
include_once ("FDL/freedom_util.php");
// -----------------------------------
function deldirfile(&$action)
{
    // -----------------------------------
    
    // Get all the params
    $dirid = GetHttpVars("dirid");
    $docid = GetHttpVars("docid");
    $folio = GetHttpVars("folio", "N") == "Y"; // return in folio
    //  print "deldirfile :: dirid:$dirid , docid:$docid";
    $dbaccess = $action->GetParam("FREEDOM_DB");
    
    $dir = new_Doc($dbaccess, $dirid); // use initial id for directories
    $err = $dir->DelFile($docid);
    if ($err != "") $action->exitError($err);
    
    if ($folio) {
        $doc = new_Doc($dbaccess, $docid);
        $refreshtab = (($doc->doctype == "F") ? "N" : "Y");
        redirect($action, "FREEDOM", "FOLIOLIST&refreshtab=$refreshtab&dirid=" . $dir->initid);
    } else redirect($action, "FREEDOM", "FREEDOM_VIEW&dirid=" . $dir->initid);
}
?>