diff --git a/BtlGeomCoStru.h b/BtlGeomCoStru.h
index a251e89..c087123 100644
--- a/BtlGeomCoStru.h
+++ b/BtlGeomCoStru.h
@@ -54,6 +54,9 @@ static const std::string IKEY_GROUP = "GRP" ;
 static const std::string IKEY_PROC = "PRC" ;
 static const std::string IKEY_SIDE = "SIDE" ;
 static const std::string IKEY_PAR = "P" ;
+static const std::string IKEY_DES = "DES" ;
+static const std::string IKEY_PRID = "PRID" ;
+static const std::string IKEY_FRAME = "FRAME" ;
 static const std::string IKEY_AUXID = "AUXID" ;
 static const std::string IKEY_START_FACE = "FCS" ;
 static const std::string IKEY_END_FACE = "FCE" ;
diff --git a/BtlGeomProc.cpp b/BtlGeomProc.cpp
index f7437b4..55cebd5 100644
--- a/BtlGeomProc.cpp
+++ b/BtlGeomProc.cpp
@@ -3138,6 +3138,8 @@ BtlGeom::AddPocket( int nGroup, int nProc, int nSide, const string& sDes, int nP
       return false ;
   // nome e info con tipo
    SetNameAndInfo( nId, nGroup, nProc, nSide, sDes, nProcId) ;
+  // riferimento
+   m_pGDB->SetInfo( nId, IKEY_FRAME, frRef) ;
   // parametri
    SetParams( nId, vnDPar, vdPar, vsUAtt) ;
 
@@ -6474,6 +6476,8 @@ BtlGeom::CreateFreeContours( void)
       }
      // nome e info con tipo
       SetNameAndInfo( nId, nGroup, 250, nSide, sDes, nProcId) ;
+     // riferimento
+      m_pGDB->SetInfo( nId, IKEY_FRAME, frRef) ;
      // segnalo se svuotatura
       if ( bClosed  &&  bPocket)
          m_pGDB->SetInfo( nId, IKEY_POCKET, 1) ;
@@ -6985,6 +6989,8 @@ BtlGeom::SetNameAndInfo( int nId, int nGroup, int nProc, int nSide, const string
    m_pGDB->SetInfo( nId, IKEY_GROUP, nGroup) ;
    m_pGDB->SetInfo( nId, IKEY_PROC, nProc) ;
    m_pGDB->SetInfo( nId, IKEY_SIDE, nSide) ;
+   m_pGDB->SetInfo( nId, IKEY_DES, sDes) ;
+   m_pGDB->SetInfo( nId, IKEY_PRID, nProcId) ;
    return true ;
 }
 
diff --git a/EgtExchange.rc b/EgtExchange.rc
index 8cdc44b..fc79538 100644
Binary files a/EgtExchange.rc and b/EgtExchange.rc differ