Index: lang/perl/WebService-Coneco/trunk/lib/WebService/Coneco.pm
===================================================================
--- lang/perl/WebService-Coneco/trunk/lib/WebService/Coneco.pm (revision 266)
+++ lang/perl/WebService-Coneco/trunk/lib/WebService/Coneco.pm (revision 270)
@@ -85,12 +85,12 @@
 
     my $parser = XML::Simple->new();
-    my $header = $parser->XMLin( $res->content )->{Header};
-    if ( $header->{Status} ne 'Success' ) {
+    my $data = $parser->XMLin( $res->content, %$parser_options );
+
+    $data->{Header} = $parser->XMLin( $res->content )->{Header};
+    if ( $data->{Header}->{Status} ne 'Success' ) {
         $self->{errstr} =
-          qq/Response error: $header->{Status}: $header->{Detail}/;
+          qq/Response error: $data->{Header}->{Status}: $data->{Header}->{Detail}/;
         return;
     }
-
-    my $data = $parser->XMLin( $res->content, %$parser_options );
 
     $self->{res} = $data;