17 include_once (
'Class.Action.php');
18 include_once (
'Class.Application.php');
19 include_once (
'Class.Session.php');
20 include_once (
'Class.Log.php');
22 include_once (
'FDL/Class.Doc.php');
23 include_once (
'FDL/Class.DocVaultIndex.php');
26 $usage->setDefinitionText(
"Construct vault index database");
33 print "Database not found : appl->dbaccess";
40 $doc->exec_query(
"select * from doc where id > 0 and doctype!='Z'");
43 loclog(
"Base $dbaccess, " .
$idoc .
" document" . (
$idoc ?
"s" :
"") .
" to process");
44 $dvi->exec_query(
"select * from docvaultindex");
45 loclog(
"Doc/Vault Index contains " .
$dvi->numrows() .
" associations");
48 $row =
$doc->fetch_array(
$c, PGSQL_ASSOC);
53 $dvi->exec_query(
"select * from docvaultindex");
54 loclog(
"Doc/Vault Index contains " .
$dvi->numrows() .
" associations");
67 $fa =
$doc->GetFileAttributes();
68 foreach ($fa as $aid => $oattr) {
69 if ($oattr->inArray()) {
70 $ta =
$doc->getMultipleRawValues($aid);
73 $doc->getMultipleRawValues($aid)
76 foreach ($ta as $k => $v) {
88 if ($vic > 0)
loclog(
"[$i] document [" .
$doc->id .
"::" .
$doc->title .
"] added vault file" . ($vic > 1 ?
"s" :
"") .
" " . $vl);
93 echo
"SetDocVaultIndex> $s\n";
UpdateVaultIndex($i, &$doc, &$dvi)
new_Doc($dbaccess, $id= '', $latest=false)
if($file) if($subject==""&&$file) if($subject=="") $err
Verify arguments for wsh programs.