Forum OpenACS CMS: Re: Examples of OpenACS CMS
James,
For now, your best bet is to read all the OpenACS documentation. You also might want to follow along with the effort to improve content management within OpenACS.
I have the CMS package documentation. On the section for admnistrator's guide, under content type, it says to use methods from the content_type package. I do not have the content_type package, I dont think it is available for OpenACS 4.6.3. So anyways, I am trying to create a new content type, under "basic item". After filling the form, and submitting it, I get this error:
Request Error
Query did not return any rows.
while executing
"db_1row get_storage_type {select
storage_type, item_id
from
cr_items
where
item_id = (select
..."
(procedure "upload_content" line 15)
invoked from within
"upload_content $revision_id $tmpfile $filename"
invoked from within
"if { ![string equal $tmpfile {}] } {
set revision_id [ns_set get $bind_vars revision_id]
upload_content $revision_id $tmpfile..."
("uplevel" body line 5)
invoked from within
"uplevel 1 $transaction_code "
(procedure "db_transaction" line 39)
invoked from within
"db_transaction {
db_dml add_revision $statement -bind $bind_vars
if { ![string equal $tmpfile {}] } {
set revision_id ..."
(procedure "add_revision_dml" line 2)
invoked from within
"add_revision_dml $insert_statement $bind_vars $tmpfile $filename"
(procedure "add_revision" line 26)
invoked from within
"add_revision $form_name $tmpfile $prefix [expr !$exists]"
("uplevel" body line 8)
invoked from within
"uplevel 1 $transaction_code "
(procedure "db_transaction" line 39)
invoked from within
"db_transaction {
if {!$exists} {
set item_id [db_exec_plsql get_item_id "
begin
:1 ..."
(procedure "content::new_item" line 56)
invoked from within
"content::new_item create_item $storage_type"
invoked from within
"if { [form is_valid create_item] } {
# check for duplicate name within same folder or parent item.
if { ![content::validate_name create_item]..."
("uplevel" body line 67)
invoked from within
"uplevel {
# /create-2.tcl
# Get the folder where the item is being created
# Parameters:
#
# parent_id - create the item under this pare..."
(procedure "code::tcl::/web/service0/packages/cms/www/modules/items/crea..." 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 7)
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]
set tcl_url2path_info([ad_conn url]) [ad_conn path_inf..."
Also when I try to use the search function, this is the error I get after submitting:
Request Error
no value given for parameter "user_id" to "AcsSc.FtsEngineDriver.search.openfts-driver"
while executing
"AcsSc.FtsEngineDriver.search.openfts-driver test 0 100"
("uplevel" body line 1)
invoked from within
"uplevel $func_and_args"
(procedure "apply" line 3)
invoked from within
"apply $proc_name $arguments"
(procedure "acs_sc_call" line 5)
invoked from within
"acs_sc_call FtsEngineDriver search [list $q $offset $limit] $driver"
(procedure "content_search__search_ids" line 5)
invoked from within
"content_search__search_ids $keywords"
invoked from within
"join [content_search__search_ids $keywords] ,"
invoked from within
"subst -nobackslashes {
select
i.item_id, content_item__get_path(i.item_id,null) as item_path,
r.revision_id,
t.pretty_name as ..."
("uplevel" body line 1)
invoked from within
"uplevel 1 [list subst -nobackslashes $sql"
(procedure "db_map" line 7)
invoked from within
"db_map sql_query"
invoked from within
"if { [form is_valid search] } {
form get_values search content_type keywords mime_type which_revisions start_date end_date
# Assemble the litera..."
("uplevel" body line 36)
invoked from within
"uplevel {
request create
request set_param id -datatype keyword -optional
request set_param mount_point -datatype keyword -optional -value sear..."
(procedure "code::tcl::/web/service0/packages/cms/www/modules/search/ind..." 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 7)
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]
set tcl_url2path_info([ad_conn url]) [ad_conn path_inf..."
What do those error mean? What do I need to do to fix them?
Thank you
