powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / пронумеровать.....
5 сообщений из 5, страница 1 из 1
пронумеровать.....
    #33463044
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть курсор выбранный по условию, как в новый курсор загнать все поля из старого + добавить поле в котором идет нумерация строк (1,2,3,4,...... и т.д.)?
...
Рейтинг: 0 / 0
пронумеровать.....
    #33463075
Oopyr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
SELECT * FROM SomeTable ORDER BY Whatever INTO CURSOR TempCursor 
SELECT *, RECNO() AS Rec_No FROM TempCursor INTO FinalCursor
...
Рейтинг: 0 / 0
пронумеровать.....
    #33463215
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
еще вопрос. в 9-е можно как-то прописать условие для нумерации? Мне нужно пронумеровать те строки, в которых в поле status <> 6. Так можно как-то?
...
Рейтинг: 0 / 0
пронумеровать.....
    #33464903
Oopyr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
SELECT *, IIF(Status <>  6 , RECNO(), xyz) AS Rec_No FROM TempCursor INTO FinalCursor
Но в этом случае нумерация будет сквозная. Т.е. записи, у которых Status <> 6 получат номера не подряд, а в соответствии с их положением в курсоре - 2, 4, 7, 18 итд.
Если нужно подряд, то
Код: plaintext
1.
2.
3.
4.
5.
SELECT *,  000000  AS Num FROM SomeTable ORDER BY Whatever INTO CURSOR TempCursor READWRITE
i =  1 
SCAN FOR Status <>  6 
    REPLACE Num WITH i IN TempCursor
    i = i +  1 
ENDSCAN
...
Рейтинг: 0 / 0
пронумеровать.....
    #33465080
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / пронумеровать.....
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]