Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вот задача.. / 4 сообщений из 4, страница 1 из 1
01.10.2004, 10:49
    #32719623
Tone
Tone
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вот задача..
Нужно создать таблицу либо курсор с двумя полями в первом поле число а во втором день недели на весь год ... может кто подскажет кодец ... буду благодарен
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.10.2004, 10:57
    #32719654
Дмитрий Маликов
Дмитрий Маликов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вот задача..
Код: plaintext
1.
2.
3.
4.
5.
6.
create cursor ccc (date D, dow N ( 1 ))
ldDate = { 01 . 01 . 2004 }
do while year(ldDate) =  2004 
    insert into [ccc] value (ldDate, dow(ldDate))
    ldDate = ldDate +  1 
enddo
вместо dow() можно использовать cdow()
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.10.2004, 11:04
    #32719681
Tone
Tone
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вот задача..
Все работает спосибо отгромное
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.10.2004, 11:05
    #32719682
leaf
leaf
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вот задача..
create cursor qq1 (myday n(2),mymonth n (2),myyear n (4))
d1={01.01.2004}
d2={01.01.2005}
nn=d2-d1
select qq1
for i=1 to nn
insert into qq1 value (day(d1),month(d1),year(d1))
d1=d1+1
endfor
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вот задача.. / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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