Zeilen in txt mit Batchskript aussortieren

Hallo zusammen,

Ich hab ein kleines Problem und würde mich über euere Hilfe freuen.

Das Ausgangsdokument um das es geht, behinhaltet etwa folgendes:

010-070200|Lorem ipsum dolor sit amet|
010-030160|consetetur sadipscing elitr|
020-070100|sed diam nonumy eirmod tempor|
010-070200|Lorem ipsum dolor sit amet|
020-070100|invidunt ut labore et dolore magna aliquyam erat|
020-040110|Stet clita kasd gubergren|
010-070100|sed diam voluptua|
010-030160|consetetur sadipscing elitr|

Mein Wunsch ist es nun, dieses Dokument mit Hilfe einer Batchdatei zu sortieren. Und zwar sollten Zeilen,
die mit der gleichen Nummer anfangen z.B. 010-070200, aus der Datei gelöscht werden (nur die Duplikate sollen gelöscht werden).
Wichtig ist, dass am Ende die Reihenvolge der Zeilen in der sie ursprünglich in dem Dokument standen weiterhin beibehalten wird.

Das heißt, dass das Dokument nach der durchlauf der Batch folgendermaßen aussehen sollte:

010-070200|Lorem ipsum dolor sit amet|
010-030160|consetetur sadipscing elitr|
020-070100|sed diam nonumy eirmod tempor|
020-040110|Stet clita kasd gubergren|
010-070100|sed diam voluptua|

Ich hoffe mir kann jemand bei dem Problem behilflich sein!

Danke und Gruß

Magnuts

:: Magnuts.cmd ::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: LotPings  administrator.de 2010-07-14
@echo off & setlocal EnableDelayedExpansion
Set Dok="Ausgang.txt"  
Set Neu="Neu.txt"  
Type NUL > %Neu%
For /F "Usebackq Tokens=1,2 delims=|" %%A in ( %Dok%   
  ) Do Findstr "%%A" %Neu% >NUL 2>&1 || >>%Neu% Echo.%%A^|%%B^|  

:: Magnuts2.cmd ::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: LotPings  administrator.de 2010-07-14
@echo off & setlocal EnableDelayedExpansion
Set Dok="Ausgang.txt"  
Set Neu="Neu.txt"  
Type NUL > %Neu%
For /F "Usebackq delims=" %%A in ( %Dok%   
  ) Do Set "Line=%%A"&Findstr "!Line:~0,10!" %Neu% >NUL 2>&1 || >>%Neu% Echo.%%A  

:: Magnuts3.cmd ::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: LotPings  administrator.de 2010-07-16
@echo off & Setlocal EnableDelayedExpansion
set Prompt=$G
Set Dok="Ausgang.txt"  
Set Neu="Neu.txt"  
Type NUL > %Neu%
For /F "Usebackq delims=" %%A in ( %Dok%   
  ) Do Set "Line=%%A"&Findstr "!Line:~0,10!" %Neu% >NUL 2>&1 || CAll :LineOut  
Goto :eof
:LineOut
Set "Line=%Line:|=^|%"  
>>%Neu% Echo.%Line%