diff --git a/ChangeLog.txt b/ChangeLog.txt
index 669348360..8ef34f95f 100644
--- a/ChangeLog.txt
+++ b/ChangeLog.txt
@@ -39,6 +39,7 @@
 - Fixed Valentina crash. Used way to avoid Qt's bug QTBUG-61213.
 - Fixed behaviour on Windows. Valentina asks about synchronization measurements twice.
 - Fixed bug. Tape app saved default size value in wrong place.
+- [#737] Valentina produces corrupted file if unite two pieces with pins.
 
 # Version 0.5.0 May 9, 2017
 - [#581] User can now filter input lists by keyword in function wizard.
diff --git a/src/libs/vtools/tools/vtooluniondetails.cpp b/src/libs/vtools/tools/vtooluniondetails.cpp
index 2c269310d..cb5761112 100644
--- a/src/libs/vtools/tools/vtooluniondetails.cpp
+++ b/src/libs/vtools/tools/vtooluniondetails.cpp
@@ -1575,7 +1575,8 @@ QVector<quint32> VToolUnionDetails::GetReferenceObjects() const
 
     const QStringList parts = QStringList() << VAbstractPattern::TagNodes     /*0*/
                                             << VToolSeamAllowance::TagCSA     /*1*/
-                                            << VToolSeamAllowance::TagIPaths; /*2*/
+                                            << VToolSeamAllowance::TagIPaths  /*2*/
+                                            << VToolSeamAllowance::TagPins;   /*3*/
 
     const QDomNodeList nodesList = tool.childNodes();
     for (qint32 i = 0; i < nodesList.size(); ++i)
@@ -1599,6 +1600,19 @@ QVector<quint32> VToolUnionDetails::GetReferenceObjects() const
                             list += ReferenceObjects(element, VToolSeamAllowance::TagRecord,
                                                      VAbstractPattern::AttrPath);
                             break;
+                        case 3://VToolSeamAllowance::TagPins
+                        {
+                            const QDomNodeList children = element.childNodes();
+                            for (qint32 i = 0; i < children.size(); ++i)
+                            {
+                                const QDomElement record = children.at(i).toElement();
+                                if (not record.isNull() && record.tagName() == VToolSeamAllowance::TagRecord)
+                                {
+                                    list.append(record.text().toUInt());
+                                }
+                            }
+                            break;
+                        }
                         default:
                             break;
                     }