Есть база на MSSQL 2005, есть 3 оператора, которые в эту базу могут одновременно добавлять записи.
Вид:
идентификатор (napr_id),номер (number) дата(date), цель(purpose), Сумма(insbal), код оператора(kod_o), дата изменения(date_ch), Исключения(iskl)
Как сделать так, чтобы номера добавлялись под разными номерами (по порядку)?
Сейчас делаю вот так:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
IF 0 > sql_exec('Select (max(number)+1)as number from napr where YEAR(date)=YEAR(getdate()) ','pnum') &&осн.запрос
=messagebox ("Во время выполнения SQL запроса произошла ошибка!", 0 + 16 + 0 , _SCREEN.CAPTION)
RETURN
else
.numbern.caption=alltrim(str(pnum))
endif
IF 0 > sql_exec('{call mn_getnapr;4(?pnum,?ppol,?plpu,?pdate_hosp,?ppur,?pdoctor,?pkod_o,?insbal,?iskl)}','pins') &&осн.запрос
=messagebox("Во время выполнения SQL запроса произошла ошибка!", 0 + 16 + 0 , _SCREEN.CAPTION)
RETURN
else
=messagebox("Добавление данных выполнено успешно.", 0 + 64 + 0 , _SCREEN.CAPTION)
.RELEASE
ENDIF
