Le portail francophone de la géomatique

Bonjour,
je suis sur un projet où j'importe des lignes iso depuis un dxf dans mapinfo. le but est qu'en fin de traitement, le client puisse avoir une surface de chaque polygone entre deux courbes iso.
Le problème vient de certains endroits où les courbes iso sont les unes à l'intérieur des autres (sommets, fosses).  Il faut don créer des polygones à trous.
Jusque là, pas de problème.
cependant j'ai une grosse quantité de données à traiter, donc j'ai voulu automatiser la tache avec mapbasic. Dans l'ensemble cela fonctionne bien, mais j'ai quelques surfaces irréductibles dans lesquelles les découpes ne se font pas.
Je vous joins une copie de mon code si vous vous voulez tester, constater, résoudre...
Je pense qu'un des problèmes est dans la méthode de désagrégation, mais je ne sais pas quoi mettre d'autre...

dim i as Integer
Set Map 
Layer 1 Editable On
Layer 1 Selectable On
Open Table "....Polygones_nettoyes.TAB" as Polygones_nettoyes

for i=1 to 93
Select * From Polygones_nettoyes where Id=i into Selection1
Set Target On
Select * from Polygones_nettoyes where (obj Within any (Select obj from Polygones_nettoyes where ID=i)and Polygones_nettoyes.ID <> i) into Selection2
if Selection1<>Selection2 and Selection1.ID_char<>"" and Selection2.ID_char<>"" then Objects Erase into Target Data ID=ID
else
end if
Set Target Off
next

Cordialement