while($sth->fetch()) {
		my %hash;
		
		# Hash zusammenbasteln
		$hash{"kurzname"} = $kurzname;
		$hash{"plz"} = $plz;
		$hash{"stadt"} = $stadt;
		$hash{"status"} = $status;
		$hash{"typ"} = $typ;
		$hash{"zusatz"} = $zusatz;
		
		push(@ary,%hash);
	}
	$sth->finish();
			  $dss->updatePLZInformationen(@ary);	

##</code><code>##

sub updatePLZInformationen() {
	my @data = shift;
	
	my $plz = SOAP::Lite
    -> service('file:/home/orca/oracle/DataSyncTool/config/SKADataService.wsdl');
	
	my $serializer = $plz->serializer();
	
	print($serializer->envelope(
							  method => 'updatePLZInformationen',  
							  SOAP::Data->type("xsd:string")->name( "clientid"    => "test" ),
							  SOAP::Data->type("xsd:string")->name( "securitytoken" => "test" ),
							  SOAP::Data->type("tns2:PLZInfo")->name("plzinfos")->value(
								\SOAP::Data->value(&format_plz_infos(@data)))));
	
	$plz->updatePLZInformationen();
}
# ------------------------------------------------------------------------------------------------ #

sub format_plz_infos() {
	my @plz = shift();
	my @plz_info;
	
	foreach(@plz) {
		my $hash = $_;
		
		push(@plz_info,SOAP::Data->name("kurzname")->value($hash->{"kurzname"})->type("xsd:string"));
		push(@plz_info,SOAP::Data->name("plz")->value($hash->{"plz"})->type("xsd:string"));
		push(@plz_info,SOAP::Data->name("stadt")->value($hash->{"stadt"})->type("xsd:string"));
		push(@plz_info,SOAP::Data->name("status")->value($hash->{"status"})->type("xsd:string"));
		push(@plz_info,SOAP::Data->name("typ")->value($hash->{"typ"})->type("xsd:string"));
		push(@plz_info,SOAP::Data->name("zusatz")->value($hash->{"zusatz"})->type("xsd:string"));
	}
	
	return(@plz_info);
}
# ------------------------------------------------------------------------------------------------ #

##</code><code>##

?xml version="1.0" encoding="UTF-8"?>
<soap:Envelope 
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" 
xmlns:xsd="http://www.w3.org/2001/XMLSchema" 
soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" 
xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">

<soap:Body><updatePLZInformationen>
<clientid xsi:type="xsd:string">test</clientid>
<securitytoken xsi:type="xsd:string">test</securitytoken>
<plzinfos xsi:type="tns2:PLZInfo">
<kurzname xsi:nil="true" xsi:type="xsd:string" />
<plz xsi:nil="true" xsi:type="xsd:string" />
<stadt xsi:nil="true" xsi:type="xsd:string" />
<status xsi:nil="true" xsi:type="xsd:string" />
<typ xsi:nil="true" xsi:type="xsd:string" />
<zusatz xsi:nil="true" xsi:type="xsd:string" />
</plzinfos>
</updatePLZInformationen>
</soap:Body>
</soap:Envelope>