diff --git a/mr/mr0500.cpp b/mr/mr0500.cpp
index c89350eb0..dd1eee99b 100755
--- a/mr/mr0500.cpp
+++ b/mr/mr0500.cpp
@@ -52,20 +52,16 @@ bool TLoadfile_mask::on_field_event(TOperable_field& o, TField_event e, long jol
   case F_FILE:
     if(e==fe_button)                   //se e (che é l'evento) = pressione del bottone 'cerca' (fe button)
     {
-      DIRECTORY dir; 
-      FILE_SPEC fs;
-    
       TFilename fname=o.get();         //se il nome del file non esiste -> gli assegna automaticamente il nome
       if(fname == "")                  //articoli.dat
         fname = "articoli";
+      fname.ext("dat");
       
-      xvt_fsys_get_dir(&dir);          //funzioni di xvt (grafica); utilizzate per creare la finestra di ricerca del
-      xvt_fsys_get_dir(&fs.dir);       //file di tipo .dat (é una finestra tipo gestione risorse Windows)
-      strcpy(fs.type, "dat");
-      strcpy(fs.name, fname);
-      strcpy(fs.creator, "ELD");
-        
+      DIRECTORY dir;  xvt_fsys_get_dir(&dir); //funzioni di xvt (grafica); utilizzate per creare la finestra di ricerca del
+      
+      FILE_SPEC fs; xvt_fsys_convert_str_to_fspec(fname, &fs);
       const bool good = xvt_dm_post_file_open(&fs, "Selezionare il file ...") == FL_OK;
+      
       xvt_fsys_set_dir(&dir);
                      
       if (good)
@@ -352,7 +348,7 @@ void TRilprod_mask::load_prod_file(const char * nomefile, bool savefile, bool on
     {
 			const TTipo_rec tipo = (TTipo_rec) atoi(rec.get(type_field));
 
-			p.setstatus(prod.read_file()->tellg());
+			p.setstatus((long)prod.read_file()->tellg());
 			if (tipo == _no_type)
 			{
 				display_error(vwin, TR("Tipo record non valido - record scartato"), trec, rec);
diff --git a/mr/mr2.cpp b/mr/mr2.cpp
index 640afdfbc..7b4cf6df2 100755
--- a/mr/mr2.cpp
+++ b/mr/mr2.cpp
@@ -7,11 +7,11 @@ int main(int argc, char** argv)
   int a = argc > 1 ? (argv[1][1] - '0') : 0;
   switch (a)
   {
-  case 1: // master schedule planning
+  case 1: // Pianificazione ordini
     mr2200(argc,argv); break;  
-  case 2: // generic planning
+  case 2: // Master Schedule plan
     mr2300(argc,argv); break;  
-  case 3: // generic planning
+  case 3: // pianificazione ordini acquisto
     mr2400(argc,argv); break;  
   case 4: // generic planning
     mr2500(argc,argv); break;  
diff --git a/mr/mr2200a.uml b/mr/mr2200a.uml
index ff8a6d99c..7413906e7 100755
--- a/mr/mr2200a.uml
+++ b/mr/mr2200a.uml
@@ -12,7 +12,7 @@ END
 BUTTON F_CHECK 10 2
 BEGIN
   PROMPT -26 -1 "Controlla"
-  PICTURE  TOOL_CHECK
+  PICTURE TOOL_CHECK
   GROUP G_POSTPROCESS
   FLAGS "D"
 END
@@ -101,6 +101,7 @@ BEGIN
   FLAGS "D"
   GROUP G_BUCKET_WEEK
 END
+
 NUMBER F_BUCKET 2
 BEGIN
   PROMPT 41 5  "= "
@@ -109,18 +110,21 @@ BEGIN
   MESSAGE COPY,H_BUCKET
   GROUP G_PREPROCESS G_BUCKET_DEF
 END
+
 LIST F_DAYXBUCK 1 9
 BEGIN
   PROMPT 48 5  ""
   ITEM "1|giorni"
   ITEM "7|settimane"
   FLAGS "D"
-  GROUP G_BUCKET_WEEK 
+  GROUP G_BUCKET_WEEK
 END
+
 NUMBER F_LIM 2
 BEGIN
   PROMPT 2 6 "Gg.limite residui"
 END
+
 BOOL F_RESCHEDULING
 BEGIN
   PROMPT 2 9  "Permetti rescheduling"
@@ -128,6 +132,7 @@ BEGIN
   MESSAGE TRUE SHOW,F_RESCHED_ALERT
   MESSAGE FALSE HIDE,F_RESCHED_ALERT
 END
+
 LIST F_RESCHED_ALERT 16
 BEGIN
   PROMPT 30 9  "Segnalazioni "
diff --git a/mr/mrplib.cpp b/mr/mrplib.cpp
index 8e90bb295..6f63240a7 100755
--- a/mr/mrplib.cpp
+++ b/mr/mrplib.cpp
@@ -1124,8 +1124,7 @@ TCalendar_mask::TCalendar_mask(const char* name, int num)
 }
 
 //***********************************
-//********
-TImpianto  * get_impianto(const char * codice)
+TImpianto* get_impianto(const char * codice)
 {
   static TImpianto *buffer=NULL;
   if (!buffer)