http://projop/intranet/users/view?user_id=1273
Go the the "Cust Tomers" user page, click the check box
of "Text Folder" and press the "+" button (above the "-"
button) to add folder permissions.
Click the diagonal (just enable one permission of every
type) and press ok.
=>
Database operation "dml" failed
while executing
"ns_pg_bind dml nsdb0 {
insert into im_fs_folders
(folder_id, object_id, path)
values (:folder_id, :object_id, :path)
}"
("uplevel" body line 1)
invoked from within
"uplevel $ulevel [list ns_pg_bind $type $db $sql"
("postgresql" arm line 2)
invoked from within
"switch $driverkey {
oracle {
return [uplevel $ulevel [list ns_ora $type
$db $sql] $args]
}
..."
invoked from within
"db_exec dml $db $full_statement_name $sql"
("uplevel" body line 2)
invoked from within
"uplevel 1 $code_block "
invoked from within
"db_with_handle -dbn $dbn db {
db_exec dml $db $full_statement_name $sql
}"
(procedure "db_dml" line 100)
invoked from within
"db_dml insert_folder_sql "
insert into im_fs_folders
(folder_id, object_id, path)
values (:folder_id, :object_id, :path)
""
("foreach" body line 15)
invoked from within
"foreach id [array names dir_id] {
set path $id_path($id)
ns_log Notice "add-perms-2: object_id=$object_id,
path=$path"
# ---------------..."
("uplevel" body line 124)
invoked from within
"uplevel {
# /packages/intranet-filestorage/www/add-
perms-2.tcl
#
# Copyright (C) 2003-2004 Project/Open
#
# All rights reserved. Please check
#..."
(procedure "code::tcl::/web/projop/packages/intranet-
filestorage/www/add..." line 2)
invoked from within
"code::tcl::$__adp_stub"
invoked from within
"if { [file exists $__adp_stub.tcl] } {
# ensure that data source preparation procedure
exists and is up-to-date
adp_init tcl $__adp_stub
..."
("uplevel" body line 3)
invoked from within
"uplevel {
if { [file exists $__adp_stub.tcl] } {
# ensure that data source preparation procedure
exists and is up-to-date
adp_init t..."
(procedure "adp_prepare" line 2)
invoked from within
"adp_prepare "
(procedure "template::adp_parse" line 30)
invoked from within
"template::adp_parse [file root [ad_conn file]] {}"
(procedure "adp_parse_ad_conn_file" line 5)
invoked from within
"$handler"
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
$handler
} ad_script_abort val {
# do nothing
}"
invoked from within
"rp_serve_concrete_file [ad_conn file]"
(procedure "rp_serve_abstract_file" line 60)
invoked from within
"rp_serve_abstract_file "$root/$path""
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
rp_serve_abstract_file "$root/$path"
set tcl_url2file([ad_conn url]) [ad_conn file]
Anonymous
