$folder->getName()) ) );
printTitleBar($folder);
printCenterStart();
printStartBox(getMLText("add_subfolder"));
print "
";
if ($folder->getAccessMode($user) < M_READWRITE)
{
printMLText("operation_not_allowed");
printGoBack();
}
else
{
print lang('Agregando subcarpeta "%1" en la carpeta "%2"...', $fname, $folder->getName());
$fname = sanitizeString($fname);
$comment = sanitizeString($comment);
if (!is_numeric($sequence))
die ("valor de secuencia invalida");
$subFolder = $folder->addSubFolder($fname, $comment, $user, $sequence);
if (is_object($subFolder))
{
printMLText("op_finished");
printGoto(array(array($folder->getName(), "../out/out.ViewFolder.php?folderid=".$folder->getID()),
array($subFolder->getName(), "../out/out.ViewFolder.php?folderid=".$subFolder->getID())));
}
else
{
printMLText("error_occured");
printGoBack();
}
}
print "
";
printEndBox();
printCenterEnd();
printHTMLFoot();
?>