Fox_88Этот код написан Фоксе можно ли перевести копию СГЛ сервере
Заранее благодарен .
Select T_Mas
Index On Left(f1,3)+F_Km+F_Addr5 Tag f_ID
Set Order To f_ID
Go Top

Do While !Eof()
lcP = Left(f1,3)
lcT = F_Km
lcF = F_Addr5
N = 1
Do While lcP = Left(f1,3) And lcT = F_km And lcF =F_Addr5
Replace loc_Code With Alltrim(lcP) + Alltrim(lcT) + Alltrim(lcF) +Padl(N,3,"0")
N = N + 1
Skip
Enddo
Enddo

Автор кода в поле loc_Code кладёт строку составленную из полей той же таблицы Alltrim(lcP) + Alltrim(lcT) + Alltrim(lcF) и добавляет порядковый номер в группе Padl(N,3,"0").

те фактически выполняется:


Здесь, как пронумеровать на TSQL