Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Порядковый номер в новом году / 13 сообщений из 13, страница 1 из 1
16.09.2010, 17:54
    #36850993
by_marader
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
есть таблица № регистрации, № дела, ФИО, Дата регистрации, регистратор.
данные вносятся по порядку, по № регистрации автоматически кодом по нажатию кнопки в форме:
PRIVATE nom_reg
nom_reg=1
GOTO TOP
SCAN
nom_reg=max(nom_reg,reg.n_reg)
ENDSCAN


а в свойствах текстбокса идет приращение на 1
If EMPTY(This.Value)
This.Value=nom_reg+1
This.Refresh
ENDIF

Мне надо чтоб при наступлении нового года нумерация началась с 1 и шла попорядку возрастания с 1 и не путалась с прошлым годом

HELP!!!!!!
...
Рейтинг: 0 / 0
16.09.2010, 18:00
    #36851009
Порядковый номер в новом году
by_marader,
вместо
Код: plaintext
1.
2.
3.
GOTO TOP 
SCAN
nom_reg=max(nom_reg,reg.n_reg)
ENDSCAN 
и
Код: plaintext
This.Value=nom_reg+ 1 
напиши
Код: plaintext
select nvl(max(n_reg),  0 )+ 1  from reg where year(<поле с датой>)=year(date()) into array nom_reg
...
Рейтинг: 0 / 0
16.09.2010, 18:03
    #36851019
gotko
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
что-то типа
declare arr(1)
store 0 to arr(1)
select max(no_reg) from table ;
where year(date_reg)=year(date());
into array arr
new_no=arr(1)+1
всегда будет зависеть от текущей даты...
...
Рейтинг: 0 / 0
16.09.2010, 18:05
    #36851027
tanglir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
Кхм...
С табличкой одновременно, я надеюсь, только 1 пользователь работает?
И зачем вам текстбокс, если номер должен генериться автоматом?
Если уж так хочется извращаться, то вот
Код: plaintext
1.
private nom_reg
nom_reg=(select max(n_reg)+ 1  from reg where year(reg.data_reg)=year(date()))
...
Рейтинг: 0 / 0
16.09.2010, 18:07
    #36851033
Порядковый номер в новом году
gotko,
как тепереь принято мерять на foxclub :), в Вашем коде как минимум 75% мусора. В смысле 3 команды из 4-х - бесполезны.
...
Рейтинг: 0 / 0
16.09.2010, 18:07
    #36851034
igorbik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
by_maraderМне надо чтоб при наступлении нового года нумерация началась с 1 и шла попорядку возрастания с 1 и не путалась с прошлым годомВ таком разе нужно не с единицы начинать, а с "года" из даты. Напрмер, в этом году номера типа 1012003, а в след.- 1112003. Тогда путаницы не будет.
...
Рейтинг: 0 / 0
16.09.2010, 18:08
    #36851037
tanglir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
Я тупень... пока писал, уже двое отпостились. Один ещё и правильней (nvl).
...
Рейтинг: 0 / 0
16.09.2010, 18:10
    #36851043
tanglir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
Это навсегда? ))
igorbik, не лучше ли наоборот - ГодНомер?
...
Рейтинг: 0 / 0
16.09.2010, 18:11
    #36851047
Порядковый номер в новом году
tanglir
Код: plaintext
nom_reg=(select max(n_reg)+ 1  from reg where year(reg.data_reg)=year(date()))
И это работает?
...
Рейтинг: 0 / 0
16.09.2010, 18:16
    #36851058
tanglir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
щас фокса под рукой нет. может, и не работает )
...
Рейтинг: 0 / 0
16.09.2010, 18:19
    #36851064
Порядковый номер в новом году
tanglirщас фокса под рукой нет. может, и не работает )У меня под рукой есть. На всякий случай таки проверил. Не работает.
...
Рейтинг: 0 / 0
16.09.2010, 18:29
    #36851076
igorbik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
tanglirЭто навсегда? ))
igorbik, не лучше ли наоборот - ГодНомер?Ну так и написано: начинать с года...
...
Рейтинг: 0 / 0
17.09.2010, 09:16
    #36851616
by_marader
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Порядковый номер в новом году
проходящий.,

спасибо помогло!!!!
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Порядковый номер в новом году / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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