--- PamVMC/cal/src/PamVMCCaloDig.cxx	2010/01/20 11:34:14	1.6
+++ PamVMC/cal/src/PamVMCCaloDig.cxx	2010/09/15 06:54:17	1.7
@@ -721,7 +721,7 @@
     //
     DataCALO[fCALOlength] = Getevtcalo() ;
     fCALOlength++;
-    cout<<" evtcalo?"<<Getevtcalo()<<endl;
+    //cout<<" evtcalo?"<<Getevtcalo()<<endl;
     //
     // Start here with data 
     //
@@ -881,7 +881,8 @@
     //
     // Write the length 
     //
-    DataCALO[fSecPointer+1] = fCALOlength-fSecPointer+1 ;
+    DataCALO[fSecPointer+1] = (fCALOlength-fSecPointer+1)-2 ;
+    // total length of the packet: -2: because the words with status and length are not included
     DataCALO[fNofTStripsPointer] = NofTransmittedStrips ;
     //
     // here we calculate and save the CRC