[rt-users] Re: modifing users

[victor]

Thank you.
It works.

>> I want to do same export from a software that I use into rt.
>
> please don't ask question twice.
>
>> But I can't make get the UpdateRecordObject to work.
>
> it's been a bit since I started at the code, but when I did this, I
> didn't use UpdateRecordObject. It doesn't sound familer. Here's most
> of my subroutine:
>
>   # set up the attributes array:
>   my %user_attributes;
>   $user_attributes{'Name'} = $user_name;
>   $user_attributes{'Gecos'} = $login;
>   # let's create an rt user object, and we'll see
>   my $user_obj = new RT::User($CurrentUser);
>   $user_obj->Load($user_name);
>
>   # alrighty, create the user, if they don't exist.
>   unless ($user_obj->id) {
>     print "User '$user_name' not found, creating\n" if($verbose);
>     my ($status, $msg) =
>       $user_obj->Create( %user_attributes );
>
>     print "$msg\n" if($verbose);
>   }
>   # if they already exist, let's just frob them...
>   else {
>     # now that we know we have a user, let's set it's attributes
>     # this bit of code lifted from rtadmin
>     my @attributes = ('Name', 'Gecos',
>                       'EmailAddress', 'Privileged', 'Comments',
> 'Signature',
>                       'Organization', 'RealName', 'NickName',
>                       'ExternalContactInfoId', 'ContactInfoSystem',
>                       'ExternalAuthId', 'AuthSystem',
>                       'HomePhone', 'WorkPhone', 'MobilePhone',
> 'PagerPhone',
>                       'Address1', 'Address2', 'City', 'State', 'Zip',
>                       'Country', 'FreeformContactInfo');
>     foreach my $attrib (@attributes) {
>       if ( (exists ($user_attributes{"$attrib"})) and
>            ($user_obj->$attrib() ne $user_attributes{"$attrib"})) {
>
>         my $method = "Set$attrib";
>         my ($val, $msg) = $user_obj->$method($user_attributes{"$attrib"});
>         print "User ".$user_obj->Name. " $attrib:  $msg\n" if($verbose);
>
>       }
>     }
>
>
> seph
> _______________________________________________
> rt-users mailing list
> rt-users at lists.fsck.com
> http://lists.fsck.com/mailman/listinfo/rt-users
>
> Have you read the FAQ? The RT FAQ Manager lives at http://fsck.com/rtfm
>
>