Hi Monks,
I a problem with filling cells with data in OpenOffice::OODoc
The cells befor row 22 are updated the cells after line 22 not , any idea's ?

sub hospipluscalc {
     my $sjabloon = shift @_ ;
     my $path_to_files = shift @_;
     my $prestatiedat = shift @_;
     
     my $doc = ooMeta(file => "$path_to_files\\sjabloon\\$sjabloon.ots
+");
     
     $doc->title("$nam{'natregnr'}");
     $doc->subject("$sjabloon - $prestatiedat");
     $doc->removeKeywords;
     $doc->keywords("Harry Conings 0475464289");
     $doc->user_defined (
     'info 1'    => "$nam{'naam'} $nam{'voornaam'}",
     'info 2'      => "$addr{'straat'} ",    
     'info 3'       => "$addr{'woonplaats'}",           #gestruktureer
+de mededeling
     'info 4'    => "$sjabloon"                   # plaats en datum
    );
     $doc->save("$path_to_files\\$nam{'natregnr'}-$prestatiedat-$sjabl
+oon.ods");
     my $document = ooDocument(file => "$path_to_files\\$nam{'natregnr
+'}-$prestatiedat-$sjabloon.ods");
#THIS WORKS OK !!!!!    
   #adres inzetten
         $document->cellValue ("gegevens","B3","$nam{'naam'}");
         $document->cellValue ("gegevens","D3","$nam{'voornaam'}");
         $document->cellValue ("gegevens","B6","$addr{'straat'}");
         $document->cellValue ("gegevens","B7","$addr{'woonplaats'}");
         $document->cellValue ("gegevens","D5","$postaddr{'bewoner'}")
+;
         $document->cellValue ("gegevens","D6","$postaddr{'straat'}");
         $document->cellValue ("gegevens","D7","$postaddr{'woonplaats'
+}");
         $document->cellValue ("gegevens","B8","$nam{'natregnr'}");
         $document->cellValue ("gegevens","B9","$nam{'externr'}");
         $document->cellValue ("gegevens","B3","$nam{'naam'}");
         $document->cellValue ("gegevens","B14","$cgi{'code'}");
         $document->cellValue ("gegevens","B11","$sjabloon-$gebruiktev
+erzekering{'type'}");
         $document->cellValue ("gegevens","B12","$gebruikteverzekering
+{'begindatum'}");
         $document->cellValue ("gegevens","D12","$gebruikteverzekering
+{'einddatum'}");
         $document->cellValue ("gegevens","D13","$gebruikteverzekering
+{'ontslagcode'}");
       #inzetten totalen
         my $cell =$document-> getCellValue("hospiplus",10,8); 
         $document->updateCell ("hospiplus",10,8,"$totaalbedragnomencl
+atuur{'882000'}");
         $cell =$document-> getCellValue("hospiplus",12,8); 
         $document->updateCell ("hospiplus",12,8,"$totaalbedragnomencl
+atuur{'882011'}");
         $cell =$document-> getCellValue("hospiplus","I14"); 
         $document->updateCell ("hospiplus","I14","$totaalbedragnomenc
+latuur{'882173'}");
         $cell =$document-> getCellValue("hospiplus","I15"); 
         $document->updateCell ("hospiplus","I15","$totaalbedragnomenc
+latuur{'882033'}");
         $cell =$document-> getCellValue("hospiplus","I17"); 
         $document->updateCell ("hospiplus","I17","$totaalbedragnomenc
+latuur{'882022'}");
         $cell =$document-> getCellValue("hospiplus","I19"); 
         $document->updateCell ("hospiplus","I19","$totaalbedragnomenc
+latuur{'882044'}");
         $cell =$document-> getCellValue("hospiplus","I21"); 
         $document->updateCell ("hospiplus","I21","$totaalbedragnomenc
+latuur{'882173'}");

#AFTER THIS IT NOTHIING HAPPENS
         $cell =$document-> getCellValue("hospiplus",22,8); 
         $document->updateCell ("hospiplus",22,8,1765);
#THIS WORKS
         $cell =$document-> getCellValue("hospiplus",10,9); 
         $document->updateCell ("hospiplus",10,9,1765);
         
     $document -> save;
    }
1;
[download]

thanks >/br> HarryC