david
28b02db2ea
git-svn-id: https://192.168.0.254/svn/Proyectos.Incam_SGD/tags/3.7.0.2_original@1 eb19766c-00d9-a042-a3a0-45cb8ec72764
32 lines
759 B
PHP
32 lines
759 B
PHP
<?php
|
|
|
|
require_once("../../config/dmsDefaults.php");
|
|
require_once(KT_LIB_DIR . '/documentmanagement/documentutil.inc.php');
|
|
require_once(KT_LIB_DIR . '/filelike/fsfilelike.inc.php');
|
|
|
|
error_reporting(E_ALL);
|
|
|
|
$oFolder =& Folder::get(1);
|
|
$oUser =& User::get(1);
|
|
|
|
$sLocalname = KT_DIR . "/tests/document/dataset1/critique-of-pure-reason.txt";
|
|
$sFilename = tempnam("/tmp", "kt_tests_document_add");
|
|
copy($sLocalname, $sFilename);
|
|
|
|
DBUtil::startTransaction();
|
|
$oDocument =& KTDocumentUtil::add($oFolder, "testfullupload2.txt", $oUser, array(
|
|
'contents' => new KTFSFileLike($sFilename),
|
|
'metadata' => array(),
|
|
));
|
|
|
|
if (PEAR::isError($oDocument)) {
|
|
print "FAILURE\n";
|
|
var_dump($oDocument);
|
|
exit(0);
|
|
}
|
|
DBUtil::commit();
|
|
|
|
print "SUCCESS\n";
|
|
|
|
?>
|