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

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

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

}