sub checkActor {
    my $self = shift;
    my %args = @_;

    die "Must supply value for name" unless ($args{name});

    my $retval = $self->_execute( handle    => 'appfme',
                                  statement => 'findActor',
                                  bindvar   => [ $args{name} ],
                                  output    => 1);

}

sub addActor {
    my $self = shift;
    my %args = @_;

    die "Must supply value for name" unless ($args{name});

    my $retval = $self->_execute( handle    => 'appfme',
                                  statement => 'addActor',
                                  bindvar   => [ $args{name} ],
                                  output    => 1);

}