Text processing/2: Difference between revisions
Content added Content deleted
Line 1,713: | Line 1,713: | ||
If exist(k,Left$(b$, 10)) then |
If exist(k,Left$(b$, 10)) then |
||
m++ : where=eval(k) |
m++ : where=eval(k) |
||
exp$=format$("Duplicate for {0} at {1}", |
exp$=format$("Duplicate for {0} at {1}",where, i)+nl$ |
||
Else |
Else |
||
Append k, Left$(b$, 10):=i |
Append k, Left$(b$, 10):=i |
||
Line 1,735: | Line 1,735: | ||
<pre> |
<pre> |
||
Records: 5471 |
Records: 5471 |
||
Duplicate for |
Duplicate for 84 at 85 |
||
Duplicate for |
Duplicate for 455 at 456 |
||
Duplicate for |
Duplicate for 819 at 820 |
||
Duplicate for |
Duplicate for 1183 at 1184 |
||
Duplicate for |
Duplicate for 1910 at 1911 |
||
Duplicates 5 |
Duplicates 5 |
||
Valid Records 5017 |
Valid Records 5017 |
||
</pre> |
</pre> |
||