diff --git a/DrawImport/ImportPageUC.xaml.vb b/DrawImport/ImportPageUC.xaml.vb index ab823b0..85b9294 100644 --- a/DrawImport/ImportPageUC.xaml.vb +++ b/DrawImport/ImportPageUC.xaml.vb @@ -809,7 +809,7 @@ Public Class ImportPageUC PartId = EgtGetNextPart(PartId) End While - ' identificativo univoico del gruppo di pezzi, se più di un pezzo + ' identificativo univoico del gruppo di pezzi, se più di un "Repeat" Dim sGUICode As New List(Of String) ' Scrivo testi per nesting @@ -851,6 +851,7 @@ Public Class ImportPageUC EgtInsertFile(sTmpFile) Dim FirstOfImport As Integer = EgtGetNextPart(nFirst2Id) + If FirstOfImport = GDB_ID.NULL Then FirstOfImport = EgtGetFirstPart() Dim Index As Integer = 1 While FirstOfImport <> GDB_ID.NULL And Index <= sGUICode.Count If Not String.IsNullOrEmpty(sGUICode(Index - 1)) Then @@ -887,6 +888,7 @@ Public Class ImportPageUC ' Passo al pezzo successivo nId = EgtGetNextPart(nId) End While + ' Ciclo sui pezzi inseriti nId = nFirstId While nId <> GDB_ID.NULL