Forum .LRN Q&A: Re: .LRN 2.2 Beta1

Collapse
3: Re: .LRN 2.2 Beta1 (response to 1)
Posted by Nima Mazloumi on 07/07/06 03:45 PM
Hi,

I tried to upgrade. For some reason I don't know the installation process hangs. After a couple of restarts I managed to upgrade all packages but for the dotlrn-* packages and Static Portlet. APM complains:

Requires dotlrn of version >= 2.2.0a1.

Even though the installed dotLRN version is now 2.2.0b2.

I therefore forced the installation which worked.

Database operation "dml" failed (exception ERROR, "FEHLER:  Einfügen oder Aktualisieren in Tabelle »acs_objects« verletzt Fremdschlüssel-Constraint »acs_objects_package_id_fk«
DETAIL:  Schlüssel (package_id)=(0) ist nicht in Tabelle »apm_packages« vorhanden.
")
FEHLER:  Einfügen oder Aktualisieren in Tabelle »acs_objects« verletzt Fremdschlüssel-Constraint »acs_objects_package_id_fk«
DETAIL:  Schlüssel (package_id)=(0) ist nicht in Tabelle »apm_packages« vorhanden.
SQL:
            update acs_objects
            set package_id = '0'
            where object_id = '3051260'

    while executing
"ns_pg_bind dml nsdb0 {
            update acs_objects
            set package_id = :object_id
            where object_id = :node_id
        }"
    ("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 update_object_package_id {}"
    (procedure "site_node::mount" line 4)
    invoked from within
"site_node::mount  -node_id $attachments_node_id  -object_id [apm_package_id_from_key attachments]"
    (procedure "dotlrn_forums::add_applet_to_community" line 14)
    invoked from within
"dotlrn_forums::add_applet_to_community $community_id"
    (procedure "AcsSc.dotlrn_applet.addapplettocommunity.dotlrn_forums" line 1)
    invoked from within
"AcsSc.dotlrn_applet.addapplettocommunity.dotlrn_forums 3051039"
    ("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 1)
    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"
    ("foreach" body line 3)
    invoked from within
"foreach applet_key $default_applets_list {
                if {[dotlrn_applet::applet_exists_p -applet_key $applet_key]} {
                    dotlrn_..."
    ("uplevel" body line 68)
    invoked from within
"uplevel 1 $transaction_code "
    (procedure "db_transaction" line 39)
    invoked from within
"db_transaction {
            set user_id [ad_conn user_id]
            set community_id [package_instantiate_object -extra_vars $extra_vars $object_ty..."
    (procedure "dotlrn_community::new" line 26)
    invoked from within
"dotlrn_community::new  -community_key $class_instance_key  -description $description  -community_type $class_key  -object_type [community_type]  -pret..."
    invoked from within
"set community_id [dotlrn_community::new  -community_key $class_instance_key  -description $description  -community_type $class_key  -object_type [comm..."
    ("uplevel" body line 2)
    invoked from within
"uplevel 1 $transaction_code "
    (procedure "db_transaction" line 39)
    invoked from within
"db_transaction {
            set community_id [dotlrn_community::new  -community_key $class_instance_key  -description $description  -community_type $..."
    (procedure "dotlrn_class::new_instance" line 14)
    invoked from within
"dotlrn_class::new_instance  -class_instance_key $class_instance_key  -class_key $class_key  -term_id $term  -pretty_name $pretty_name  -description $d..."
    invoked from within
"set class_instance_id [dotlrn_class::new_instance  -class_instance_key $class_instance_key  -class_key $class_key  -term_id $term  -pretty_name $prett..."
    ("uplevel" body line 3)
    invoked from within
"uplevel #$level $on_submit"
    ("1" arm line 1)
    invoked from within
"switch $errno {
                    0 {
                        # TCL_OK
                    }
                    1 {
                        # TCL_E..."
    (procedure "ad_form" line 612)
    invoked from within
"ad_form -name add_class_instance -form {

    {term:integer(select)
	{label "Semester"}
	{options $term_options}
	{help_text "[_ dotlrn.Term_help..."
    ("uplevel" body line 35)
    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::/www/unima0/packages/dotlrn/www/admin/class-insta..." 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]
            set tcl_url2path_info..."

Same applies when I try to create a new subgroup:

Database operation "dml" failed (exception ERROR, "FEHLER:  Einfügen oder Aktualisieren in Tabelle »acs_objects« verletzt Fremdschlüssel-Constraint »acs_objects_package_id_fk«
DETAIL:  Schlüssel (package_id)=(0) ist nicht in Tabelle »apm_packages« vorhanden.
")
FEHLER:  Einfügen oder Aktualisieren in Tabelle »acs_objects« verletzt Fremdschlüssel-Constraint »acs_objects_package_id_fk«
DETAIL:  Schlüssel (package_id)=(0) ist nicht in Tabelle »apm_packages« vorhanden.
SQL:
            update acs_objects
            set package_id = '0'
            where object_id = '3051452'

    while executing
"ns_pg_bind dml nsdb0 {
            update acs_objects
            set package_id = :object_id
            where object_id = :node_id
        }"
    ("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 update_object_package_id {}"
    (procedure "site_node::mount" line 4)
    invoked from within
"site_node::mount  -node_id $attachments_node_id  -object_id [apm_package_id_from_key attachments]"
    (procedure "dotlrn_forums::add_applet_to_community" line 14)
    invoked from within
"dotlrn_forums::add_applet_to_community $community_id"
    (procedure "AcsSc.dotlrn_applet.addapplettocommunity.dotlrn_forums" line 1)
    invoked from within
"AcsSc.dotlrn_applet.addapplettocommunity.dotlrn_forums 3051262"
    ("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 1)
    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"
    ("foreach" body line 3)
    invoked from within
"foreach applet_key $default_applets_list {
                if {[dotlrn_applet::applet_exists_p -applet_key $applet_key]} {
                    dotlrn_..."
    ("uplevel" body line 68)
    invoked from within
"uplevel 1 $transaction_code "
    (procedure "db_transaction" line 39)
    invoked from within
"db_transaction {
            set user_id [ad_conn user_id]
            set community_id [package_instantiate_object -extra_vars $extra_vars $object_ty..."
    (procedure "dotlrn_community::new" line 26)
    invoked from within
"dotlrn_community::new  -parent_community_id $parent_community_id  -description $description  -community_type dotlrn_community  -pretty_name $pretty_na..."
    invoked from within
"set subcomm_id [dotlrn_community::new  -parent_community_id $parent_community_id  -description $description  -community_type dotlrn_community  -pretty..."
    ("uplevel" body line 2)
    invoked from within
"uplevel 1 $transaction_code "
    (procedure "db_transaction" line 39)
    invoked from within
"db_transaction {
        set subcomm_id [dotlrn_community::new  -parent_community_id $parent_community_id  -description $description  -community_type ..."
    invoked from within
"if {[form is_valid add_subcomm]} {
    form get_values add_subcomm  pretty_name description join_policy referer

    # we set some extra vars based on..."
    ("uplevel" body line 57)
    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::/www/unima0/packages/dotlrn/www/subcommunity-new" 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]
            set tcl_url2path_info..."

Adding sylabus to a community:

Database operation "0or1row" failed (exception NSDB, "Query was not a statement returning rows.")
FEHLER:  Spalte w.description existiert nicht
SQL:
      select w.workflow_id,
             w.short_name,
             w.pretty_name,
             w.object_id,
             w.package_key,
             w.object_type,
             w.description,
             w.description_mime_type,
             a.short_name as initial_action,
             a.action_id as initial_action_id
      from   workflows w left outer join
             workflow_actions a on (a.workflow_id = w.workflow_id
                                and a.parent_action_id is null
                                and a.trigger_type = 'init')
      where  w.workflow_id = '1319'

    while executing
"ns_pg_bind 0or1row nsdb0 {
      select w.workflow_id,
             w.short_name,
             w.pretty_name,
             w.object_id,
             w..."
    ("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 0or1row $db $full_statement_name $sql"
    invoked from within
"set selection [db_exec 0or1row $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 {
        set selection [db_exec 0or1row $db $full_statement_name $sql]
    }"
    (procedure "db_0or1row" line 23)
    invoked from within
"db_0or1row workflow_info {} -column_array row"
    ("uplevel" body line 1)
    invoked from within
"uplevel db_0or1row $args"
    (procedure "db_1row" line 2)
    invoked from within
"db_1row workflow_info {} -column_array row"
    (procedure "workflow::get_not_cached" line 3)
    invoked from within
"workflow::get_not_cached -workflow_id 1319"
    ("eval" body line 1)
    invoked from within
"eval $script"
    invoked from within
"ns_cache eval util_memoize $script {
	    list $current_time [eval $script]
	}"
    (procedure "util_memoize" line 20)
    invoked from within
"util_memoize [list workflow::get_not_cached -workflow_id $workflow_id] [workflow::cache_timeout]"
    (procedure "workflow::get" line 6)
    invoked from within
"workflow::get -workflow_id $workflow_id -array row"
    (procedure "workflow::generate_spec" line 3)
    invoked from within
"workflow::generate_spec  -workflow_id $workflow_id  -workflow_handler $workflow_handler  -handlers $handlers"
    (procedure "workflow::fsm::generate_spec" line 3)
    invoked from within
"${workflow_handler}::generate_spec  -workflow_id $workflow_id  -workflow_handler $workflow_handler"
    (procedure "workflow::clone" line 8)
    invoked from within
"workflow::clone  -workflow_id $workflow_id  -package_key $package_key  -object_id $object_id  -array $array  -workflow_handler workflow::fsm"
    (procedure "workflow::fsm::clone" line 7)
    invoked from within
"workflow::fsm::clone  -workflow_id [get_package_workflow_id]  -object_id $package_id"
    (procedure "curriculum::instance_workflow_create" line 3)
    invoked from within
"curriculum::instance_workflow_create -package_id $package_id"
    (procedure "curriculum::apm::after_instantiate" line 3)
    invoked from within
"curriculum::apm::after_instantiate  -package_id 3052149"
    ("eval" body line 1)
    invoked from within
"eval $command"
    (procedure "apm_invoke_callback_proc" line 37)
    invoked from within
"apm_invoke_callback_proc -package_key $package_key -type "after-instantiate" -arg_list [list package_id $package_id]"
    (procedure "apm_package_instance_new" line 17)
    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_curriculum::add_applet_to_community" line 6)
    invoked from within
"dotlrn_curriculum::add_applet_to_community $community_id"
    (procedure "AcsSc.dotlrn_applet.addapplettocommunity.dotlrn_curriculum" line 1)
    invoked from within
"AcsSc.dotlrn_applet.addapplettocommunity.dotlrn_curriculum 2844599"
    ("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 1)
    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::/www/unima0/packages/dotlrn/www/applet-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]
            set tcl_url2path_info..."

What ever community/class I choose I am always redirected to My Space.