Forum OpenACS Q&A: DB Error while creating portal

Hi everyone, I´m trying to create new portal and get following error: [openacs4, postgresql 7.2, Suse 7.1] Thanks for helps!

Request Error
Database operation "0or1row" failed (exception NSDB, "Query was not a 
statement returning rows.")
    while executing
"ns_pg_bind 0or1row nsdb0 {
	select portal__new (
                     :portal_id,
                     :template_id,
                     :name,
     ..."
    ("uplevel" body line 1)
    invoked from within
"uplevel $ulevel [list ns_pg_bind $type $db $sql"
    invoked from within
"db_exec 0or1row $db $full_statement_name $sql"
    invoked from within
"if {[regexp -nocase -- {^s*select} $test_sql match]} {
            db_qd_log Debug "PLPGSQL: bypassed anon function"
            set selection [db_ex..."
    ("uplevel" body line 6)
    invoked from within
"uplevel 1 $code_block "
    invoked from within
"db_with_handle db {
        # plsql calls that are simple selects bypass the plpgsql 
        # mechanism for creating anonymous functions (OpenACS - ..."
    (procedure "db_exec_plsql" line 13)
    invoked from within
"db_exec_plsql insert_def_portal  "declare
                   pid portals.portal_id%TYPE;
                 begin
                   pid := portal.new (..."
    invoked from within
"if { [info exists portal_exists_p] } {
	# the portal exists.  Can this user edit it?
	if { ! $portal_write_p } {
	    ad_return_complaint 1 "You don't..."
    ("uplevel" body line 10)
    invoked from within
"uplevel 1 $transaction_code "
    (procedure "db_transaction" line 39)
    invoked from within
"db_transaction {
    # does the portal exist?
    db_0or1row determine_portal_existence  "select
           1 as portal_exists_p,
           decode(po..."
    ("uplevel" body line 63)
    invoked from within
"uplevel {
    	  # www/admin/portal-ae-2.tcl

ad_page_contract {
    Generate a page with the same layout as the portal, for editing.

    @author Ian..."
    (procedure "code::tcl::/web/openacs4/packages/portal/www/portal-
ae-2" 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 3)
    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..."

----------------------------------------------------------------------
----------