Forum OpenACS Q&A: Re: Res: How to integrate an existing application package with dotLRN

I ran the file run.tcl and installed my package into dotlrn and all went ok. But after all this, I tried to add my applet to a community or course in the admin-panel and I got the following error ... and I can't stand what's wrong because all the installation progess went ok. Can you help me to get running my firt applet in dotlrn? The foo-package I called it my-package.

Thanks in advance.

Selection did not return a value, and no default was provided
while executing
"db_string pretty_name_from_key {select pretty_name
from apm_enabled_package_versions
..."
(procedure "apm_package_instance_new" line 4)
invoked from within
"apm_package_instance_new -package_id $package_id -package_key $package_key -instance_name $package_name -context_id $context_id"
(procedure "site_node::instantiate_and_mount" line 39)
invoked from within
"site_node::instantiate_and_mount -node_name $mount_point -parent_node_id $parent_node_id -package_key $package_key -context_id $package_id "
(procedure "dotlrn::instantiate_and_mount" line 15)
invoked from within
"dotlrn::instantiate_and_mount $community_id [package_key]"
(procedure "dotlrn_my-package::add_applet_to_community" line 6)
invoked from within
"dotlrn_my-package::add_applet_to_community $community_id"
(procedure "AcsSc.dotlrn_applet.addapplettocommunity.dotlrn_my_package" line 1)
invoked from within
"AcsSc.dotlrn_applet.addapplettocommunity.dotlrn_my_package 5532"
("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 6)
invoked from within
"acs_sc_call dotlrn_applet $op $list_args $applet_key"
(procedure "applet_call" line 2)
invoked from within
"applet_call $applet_key AddAppletToCommunity [list $community_id]"
invoked from within
"set package_id [applet_call $applet_key AddAppletToCommunity [list $community_id]]"
("uplevel" body line 2)
invoked from within
"uplevel 1 $transaction_code "
(procedure "db_transaction" line 39)
invoked from within
"db_transaction {
set package_id [applet_call $applet_key AddAppletToCommunity [list $community_id]]

register_a..."
(procedure "dotlrn_community::add_applet_to_community" line 2)
invoked from within
"dotlrn_community::add_applet_to_community $community_id $applet_key"
("uplevel" body line 43)
invoked from within
"uplevel {
#
# Copyright (C) 2001, 2002 MIT
#
# This file is part of dotLRN.
#
# dotLRN is free software; you can redistribute it and/or modify it u..."
(procedure "code::tcl::/var/www/dotlrn-2.3.0/packages/dotlrn/www/applet-..." 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"
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]
set tcl_url2path_info..."