View of /branches/rel-2-4-patches/webwork2/lib/WebworkSOAP/Classes/GlobalProblem.pm

    1 package WebworkSOAP::Classes::GlobalProblem;
    2 =pod
    3 =begin WSDL
    4         _ATTR set_id        $string set_id
    5         _ATTR problem_id    $string problem_id
    6         _ATTR source_file   $string source_file
    7         _ATTR value         $string value
    8         _ATTR max_attempts  $string max_attempts
    9 =cut
   10 sub new {
   11     my $self = shift;
   12     my $data = shift;
   13     $self = {};
   14     $self->{set_id} = SOAP::Data->type( 'string', $data->set_id );
   15     $self->{problem_id} = SOAP::Data->type( 'string', $data->problem_id );
   16     $self->{source_file} = SOAP::Data->type( 'string', $data->source_file );
   17     $self->{value} = SOAP::Data->type( 'string', $data->value );
   18     $self->{max_attempts} = SOAP::Data->type( 'string', $data->max_attempts );
   19     bless $self;
   20     return $self;
   21 }
   22 
   23 1;