DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=gamma;
	h=message-id:date:from:user-agent:mime-version:to:subject
	:content-type:content-transfer-encoding;
	b=S4PutPnYimXDdn5o6FIRvL/RriRwQngZfaweMTTKy3kwUgeMsFNXtcUL/VUSzshKvl
	9QqNNzkZceA7M4bLURbUz4pBVLvqdwryO9fj0GmZ5HczRpOdUuC0mn8KSdQbLWGUI5CB
	zdwZHN0y2XiVBcrPsA6XLFZFkoaluHWU50h8c=
Message-ID: <4B7E4331.1050308@gmail.com>
Date: Fri, 19 Feb 2010 04:52:17 -0300
From: iuri de araujo sampaio <iuri.sampaio@gmail.com>
User-Agent: Thunderbird 2.0.0.23 (X11/20090817)
MIME-Version: 1.0
To: pgsql-sql@postgresql.org
Subject: sintax error
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit

Hi there,
i have got the followed error in the pgsql function bellow. 
Log messages point to:

********************
ERROR:  syntax error at end of input
LINE 1: SELECT
               ^
QUERY:  SELECT
CONTEXT:  SQL statement in PL/PgSQL function 
"cms_permission__revoke_permission" near line 67

********** Error **********

ERROR: syntax error at end of input
SQL state: 42601
Context: SQL statement in PL/PgSQL function 
"cms_permission__revoke_permission" near line 67

********************

However, I couldn't find any sintax error in those SELECT statements
does anyone have any idea what is wrong with it?

cheers,
iuri


-- procedure revoke_permission
create or replace function cms_permission__revoke_permission 
(integer,integer,varchar,integer,varchar)
returns integer as '
declare
  p_item_id                        alias for $1;
  p_holder_id                      alias for $2;
  p_privilege                      alias for $3;
  p_revokee_id                     alias for $4;
  p_is_recursive                   alias for $5;  -- default ''f''
  -- v_items                          item_array_type;
  v_item_id                        cr_items.item_id%TYPE;
  v_idx                            integer;
  v_count                          integer;
  -- v_perms                          perm_array_type;
  v_perm                           acs_privileges.privilege%TYPE;
  v_perm_idx                       integer;
  v_perm_count                     integer;
  c_perm_cur                       record;
  c_item_cur                       record;
begin

    PERFORM update_permissions(p_item_id, p_is_recursive);

    -- Select the child permissions
    v_perm_count := 0;
    for c_perm_cur in
     select
        child_privilege
      from
        acs_privilege_hierarchy
      where
        privilege = p_privilege
      and
        child_privilege <> p_privilege
    LOOP
      v_perm := c_perm_cur.child_privilege;
   v_perm_count := v_perm_count + 1;
      -- v_perms(v_perm_count) := v_perm;
      update v_perms set value[v_perm_count] = v_perm;
    end LOOP;

    -- Select child items
    v_count := 0;
    for c_item_cur in
     select c1.item_id from cr_items c1, cr_items c2
     where c2.item_id = p_item_id
       and c1.tree_sortkey between c2.tree_sortkey and 
tree_right(c2.tree_sortkey)
      and
        cms_permission__has_revoke_authority (
          item_id,
          p_holder_id,
          p_privilege,
          p_revokee_id
        ) = ''t''
      and
        acs_permission__permission_p (
          item_id,
          p_revokee_id,
          p_privilege
        ) = ''t''
    LOOP
      v_item_id := c_item_cur.item_id;
      v_count := v_count + 1;
      -- v_items(v_count) := v_item_id;
      update v_items set value[v_count] = v_item_id;
      exit when p_is_recursive = ''f'';
    end loop;

    if v_count < 1 then
      return;
    end if;

    -- Grant child permissions
    for v_idx in 1..v_count loop
      for v_perm_idx in 1..v_perm_count loop
        PERFORM acs_permission__grant_permission (
          -- v_items(v_idx), p_revokee_id, v_perms(v_perm_idx)
          v_items.value[v_idx], p_revokee_id, v_perms.value[v_perm_idx]
    );
       end loop;
    end loop;

    -- Revoke the parent permission
    for v_idx in 1..v_count loop
      PERFORM acs_permission__revoke_permission (
        -- v_items(v_idx),
        v_items.value[v_idx],
        p_revokee_id,
        p_privilege
      );
    end loop;

    return 0;
end;' language 'plpgsql';