User lines are not retained across SORT

MUEH: 22194 source is there, I just tried DL'ing it and it started just fine. If you don't even see the link, then clear/refresh your browser cache.

I'll check out the :TAG and .LABEL, they probably suffer the same error.

Stefan: Sigh! I'm sure you're right, I'll go extend the fix.

George

MUEH: Good catch, I've included it. If we get more, this is going to become messy.

George


===>  Going to be? Far, far too late for that :-))  R

George: Some more issues after 22204 .
1. TLP = Get_Trk_LPtr(TID) returns LPtr+1 .
  METHOD LLTrakScan (BYVAL key AS STRING * 4) AS LONG
  LOCAL k AS LONG
  ARRAY SCAN L(), FROM 37 TO 40, = key, TO k
  METHOD = k
  END METHOD
seems to return it .
Maybe TrkID 2 returned by Get_Trk_TrkID for Top line is the problem . Shouldn't it be 1 . 
2. LTrak is ZERO if Lines are Insert Repeat Copy or Primary cmd Paste is done .
    LTrak is set to Line's included if Primary cmd COPY is done .
    Lines have now either zero LTrak or multiple lines having same LTrak .
   (accordig TRACK doc it should have a permanently assigned Track ID "unique for every Data Line" )
  result is LPtr of first match in L Array .
Use below macro to display result after Insert Repeat Copy lines or paste/copy of a file 
You can use this macro as test data .
Invoke macro with Cursor on a line .
3. If reload is done LTrak increased by 100000 .
Thanks
' MUHa.MACRO

DIM HA, LA, TID, TPO, TP2, TP3 AS STRING

DIM LN, LP, TLP AS number

LP = Get_Csr_LPtr

LN = Get_LNum(LP)

' LA = Get_Label$(LP)

HA = Get_Handle$("."+LN)

TID = Get_Trk_TrkID(LP)

if Get_RC > 0 then halt(Get_RC,Get_Msg$)

TLP = Get_Trk_LPtr(TID)

if Get_RC > 0 then halt(Get_RC,Get_Msg$)

TPO = Get_Trk_Pos$(1)

TP2 = Get_Trk_Pos$(2)

TP3 = Get_Trk_Pos$(3)

Halt(2,LP+"/"+LN+"|"+TLP+"/"+Get_LNum(TLP)+"|"+LA+"|"+HA+"|"+TID+"|"+TPO+"|"+TP2+"|"+TP3)