package Kernel::GenericInterface::Operation::CustomerUser::CustomerUserGet;

use strict;
use warnings;

use Kernel::System::ObjectManager;

sub new {
    my ( $Type, %Param ) = @_;
    my $Self = {%Param};
    bless( $Self, $Type );
    return $Self;
}

sub Run {
    my ( $Self, %Param ) = @_;

    if ( !$Param{Data} || !$Param{Data}->{UserLogin} ) {
        return {
            Success      => 0,
            ErrorMessage => "UserLogin is required",
        };
    }

    my $UserLogin = $Param{Data}->{UserLogin};
    my $CustomerUserObject = $Kernel::OM->Get('Kernel::System::CustomerUser');

    my %User = $CustomerUserObject->CustomerUserDataGet(
        User => $UserLogin,
    );

    if ( !%User ) {
        return {
            Success      => 0,
            ErrorMessage => "Customer user not found: $UserLogin",
        };
    }

    return {
        Success => 1,
        Data => {
            CustomerUser => {
                UserLogin     => $User{UserLogin},
                UserFirstname => $User{UserFirstname},
                UserLastname  => $User{UserLastname},
                UserEmail     => $User{UserEmail},
                UserCustomerID=> $User{UserCustomerID},
            },
        },
    };
}

1;