19 include_once (
"FDL/import_file.php");
24 print
"file needed :usage --file=<csv file>\n";
29 $fdoc = fopen($cvsfile,
"r");
37 while (!feof(
$fdoc)) {
39 $buffer = rtrim(fgets(
$fdoc, 16384));
40 $data = explode(
";", $buffer);
43 if ($data[0] ==
'ORDER') {
44 if (is_numeric($data[1])) $orfromid = $data[1];
46 $tcolorder[$orfromid] =
getOrder($data);
48 $ta = $cdoc->GetTitleAttributes();
49 $titles[$orfromid] = array();
50 foreach (
$ta as $k => $v) {
51 $titles[$orfromid][] = $v->id;
54 foreach (
$idoc->fields as $k => $v) {
55 if ($cdoc->$v !=
"") $tval[$orfromid][$v] =
"'" . $cdoc->$v .
"'";
57 $tval[$orfromid][
"id"] =
"(select nextval ('seq_id_doc'))";
58 $tval[$orfromid][
"initid"] =
"(select currval ('seq_id_doc'))";
59 $tval[$orfromid][
"owner"] =
$action->user->id;
60 }
else if ($data[0] ==
'DOC') {
61 if (is_numeric($data[1])) $fromid = $data[1];
64 if (!isset($tval[$fromid])) {
65 print
"-- order not defined for $fromid;\n";
69 $ini = $tval[$fromid];
72 foreach ($tcolorder[$fromid] as $k => $v) {
73 $ini[$v] =
"'" . pg_escape_string($data[$idx]) .
"'";
77 foreach ($titles[$orfromid] as $k => $v) {
78 $title.= substr($ini[$v], 1, -1) .
" ";
80 $ini[
"title"] =
"'" . pg_escape_string(trim(
$title)) .
"'";
82 $sval = implode($ini,
",");
83 $skey = implode(array_keys($ini) ,
",");
84 $sql = sprintf(
"INSERT INTO doc%d (%s) values (%s);\n", $fromid, $skey, $sval);
89 foreach ($titles as $fromid => $v) {
90 $sql = sprintf(
"select setval ('seq_doc%d',(select max(id) from doc%d));\n", $fromid, $fromid);