diff --git a/ve/velib04f.cpp b/ve/velib04f.cpp
index d00aba0b7..2c62c2fd7 100755
--- a/ve/velib04f.cpp
+++ b/ve/velib04f.cpp
@@ -349,7 +349,7 @@ bool TContabilizzazione_analitica::elabora(TDocumento& doc, long numreg_cg, TVis
 {
   TDate datareg, datacomp;
   int annoes = 0;
-  TString descr, msg;
+  TString descr, msg, codcaus;
   bool dare = false;
 
   if (numreg_cg > 0)
@@ -373,6 +373,7 @@ bool TContabilizzazione_analitica::elabora(TDocumento& doc, long numreg_cg, TVis
 
 		const TString8 rif = doc.get(DOC_NUMDOCRIF);
     TCausale & caus = (TCausale &) doc2caus(doc);
+		codcaus = caus.codice();
 		const bool use_rif = caus.iva() == iva_acquisti && rif.not_empty();
 		if (use_rif)
 		{
@@ -415,11 +416,13 @@ bool TContabilizzazione_analitica::elabora(TDocumento& doc, long numreg_cg, TVis
   mov.put(MOVANA_ANNOES,   annoes);
   mov.put(MOVANA_DESCR,    descr);
   mov.put(MOVANA_NUMREGCG, numreg_cg);               // Movimento contabile associato
+	mov.put(MOVANA_CODCAUS,  codcaus);
   mov.put(MOVANA_DPROVV,   doc.get(DOC_PROVV));      // Documento originale
   mov.put(MOVANA_DANNO,    doc.get(DOC_ANNO));
   mov.put(MOVANA_DCODNUM,  doc.get(DOC_CODNUM));
   mov.put(MOVANA_DNDOC,    doc.get(DOC_NDOC));
 
+
   TImporto totdoc; // Totale movimento analitico
 
  // Scandisco le righe del documento, 
@@ -501,7 +504,7 @@ bool TContabilizzazione_analitica::elabora(TLista_documenti& doc_in, TLista_docu
                                            const TDate& data_elab, bool interattivo)
 { 
   const TImporto zero;
-	TViswin v;
+	TViswin v(NULL, TR("Contabilizzazione documenti in analitica"), false, true, true);
 
 	v.open_modal();                   
   for (int i = 0; i < doc_in.items(); i++)