Error 37000

UD042: No instance method 'set_tags' in the user defined type DB.Wiki.page__DAV_VAD_wiki_Root_tags_vspx matches the call: wrong number and/or type of parameters passed
while executing the following statement:
#line 3496 "/DAV/VAD/wiki/Root/tags.vspx-sql"
create method vc_user_post_add (inout control vspx_button, inout e vspx_event) for "DB"."Wiki".page__DAV_VAD_wiki_Root_tags_vspx
{
  --no_c_escapes-

  declare path, params, lines any;
  path := e.ve_path;
  params := e.ve_params;
  lines := e.ve_lines;
  
  if (udt_instance_of (control, fix_identifier_case ('vspx_field')) and
    0 = control.vc_parent.vc_focus or not e.ve_is_post)
    {
      
      return;
    }
  
 {
   declare form vspx_form;
   form := null;
   if(udt_instance_of (control, fix_identifier_case ('vspx_field'))
      and not udt_instance_of (control, fix_identifier_case ('vspx_button'))) {
      form := control.vc_find_parent_form (control);
   }
   if(control.vc_focus or (form is not null and form.vc_focus)) {

--no_c_escapes-
   {
   
#line push  
#line 139 "virt://WS.WS.SYS_DAV_RES.RES_FULL_PATH.RES_CONTENT:/DAV/VAD/wiki/Root/tags.vspx"

                    
                      declare exit handler for sqlstate '42WV9' {
                        self.vc_error_message := regexp_match('[^\n]*',__SQL_MESSAGE);
                        self.vc_is_valid := 0;
                      }
                      ;
                      declare _target_tags any;
                      declare _target_uid int;
                      if (not self.allow_change or not self.public_tagsp.ufl_selected)
                      {
                        _target_tags := self.privtags;
                        _target_uid := self.uid;
                      }
                      else
                      {
                        _target_tags := self.pubtags;
                        _target_uid := self.nobody_uid;
                      }
                      declare _new_tags any;
                      declare _val, _matched_val varchar;
                      _val := self.tags_f.ufl_value;
                      if (_val is null)
                        WV.WIKI.APPSIGNAL (11001, 'Empty tag is not allowed', vector ());
                      _matched_val := regexp_match ('([A-Za-z][A-Z a-z_0-9]*)([ ]*,[ ]*[A-Za-z][A-Z a-z_0-9]+[ ]*)*', _val);
                      -- dbg_obj_print (_val, _matched_val);
                      if (_matched_val is null or (length (_matched_val) <> length (_val)))
                        WV.WIKI.APPSIGNAL (11001, '"&Val;" is not valid tags string', vector ('Val', _val) );
                      _new_tags := WV.WIKI.VECTOR_DROP_NOISE_WORDS(
                        WV.WIKI.VECTOR_CONCAT_UNIQ (
                          _target_tags,
                          WV.WIKI.TRIM_EX(split_and_decode (WV.WIKI.TRIM_EX(cast (self.tags_f.ufl_value as varchar)), 0, '\0\0,'))));
                      if (_new_tags <> _target_tags)
                      {
                        self.set_tags(_target_uid, WV.WIKI.STRJOIN(',',_new_tags));
                        self.vc_redirect (sprintf ('tags.vspx?id=%ld', self.topic.ti_id));
                      }
                    
                  
#line pop

   }
   }
 }

}