diff --git a/OperationOnSolid.lua b/OperationOnSolid.lua
index 408780e..e30065d 100644
--- a/OperationOnSolid.lua
+++ b/OperationOnSolid.lua
@@ -924,6 +924,7 @@ function ASS.PairAll()
       EgtOutLog(tostring(nPart))
       -- controllo se il pezzo è già stato accoppiato con la sua destinazione
       local tbPaired = EgtGetInfo(nPart, "Paired","vi")
+      if not tbPaired then EgtSetInfo(nPart, "Paired", EgtNumToString(nPart)) end
       local bAlreadyPaired = false
       if not tbPaired then goto NEXT end
       for _, nPaired in pairs(tbPaired) do