diff --git a/ps/ps0398100.cpp b/ps/ps0398100.cpp
index d29c4702a..5cc65e5ac 100755
--- a/ps/ps0398100.cpp
+++ b/ps/ps0398100.cpp
@@ -69,6 +69,7 @@ TTrasferimento_ordini_recordset::TTrasferimento_ordini_recordset(const char* fil
 class TTrasferimento_ordini : public TSkeleton_application
 {
   TTrasferimento_ordini_mask*  _mask;
+  TString4 _codmag;
 
 protected:
   virtual bool check_autorization() const {return false;}
@@ -260,7 +261,9 @@ void TTrasferimento_ordini::elab_ra(const TString& riga_txt, const int curr_nrig
   curr_ini.set(RDOC_CODART, codart);
   curr_ini.set(RDOC_QTA, str_qta);
 
-  const real prezzo = riga_ord.get();   //per adesso non ci va?
+  TString80 str_prezzo = riga_ord.get();   //per adesso ci si mette il prezzo sull'ordine
+  str_prezzo.replace(',', '.');
+  curr_ini.set(RDOC_PREZZO, str_prezzo);
   //e per ultime le eventuali note
   const TString nota = riga_ord.get();
   if (nota.full())
@@ -268,6 +271,9 @@ void TTrasferimento_ordini::elab_ra(const TString& riga_txt, const int curr_nrig
     curr_ini.set(RDOC_DESCLUNGA, "X");
     curr_ini.set(RDOC_DESCEST, nota);
   }
+
+  //anzi, per ultimissimo il magazzino
+  curr_ini.set(RDOC_CODMAG, _codmag);
 }
 
 
@@ -436,6 +442,9 @@ bool TTrasferimento_ordini::elabora()
   TProgind pi(n_files_txt, TR("Acquisizione ordini in corso..."), true, true);
   TLog_report log("ERRORI DI TRASFERIMENTO");
 
+  //si accatta anche il magazzino
+  _codmag = _mask->get(F_CODMAG);
+
   //ciclo su tutti i files .txt da esaminare
   for (int i = 0; i < n_files_txt; i++)
   {
diff --git a/ps/ps0398100a.h b/ps/ps0398100a.h
index f51fff6ef..152f57caf 100755
--- a/ps/ps0398100a.h
+++ b/ps/ps0398100a.h
@@ -4,3 +4,5 @@
 #define F_DESNUM      105
 #define F_TIPODOC     106
 #define F_DESTIPODOC  107
+#define F_CODMAG      108
+#define F_DESMAG      109
diff --git a/ps/ps0398100a.uml b/ps/ps0398100a.uml
index 22e38ca83..49f307373 100755
--- a/ps/ps0398100a.uml
+++ b/ps/ps0398100a.uml
@@ -1,6 +1,6 @@
 #include "ps0398100a.h"
 
-PAGE "Trasferimento Ordini Web->Campo" -1 -1 78 10
+PAGE "Trasferimento Ordini Web->Campo" -1 -1 78 12
 
 GROUPBOX DLG_NULL 76 4
 BEGIN
@@ -81,6 +81,28 @@ BEGIN
   COPY OUTPUT F_TIPODOC
 END
 
+STRING F_CODMAG 3
+BEGIN
+  PROMPT 2 9 "Magazzino "
+  USE MAG
+  INPUT CODTAB F_TIPODOC
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CODMAG CODTAB
+  OUTPUT F_DESMAG S0
+  CHECKTYPE REQUIRED
+END
+
+STRING F_DESMAG 50
+BEGIN
+  PROMPT 24 9 ""
+  USE MAG KEY 2
+  INPUT S0 F_DESMAG
+  DISPLAY "Descrizione@60" S0
+  DISPLAY "Codice" CODTAB
+  COPY OUTPUT F_CODMAG
+END
+
 STRING DLG_PROFILE 50
 BEGIN
   PROMPT 1 -1 "Profilo "