ReSQL.ru
     
powered by simpleCommunicator - 2.0.40     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Помогите с добавлением данных через курсорадаптер
25 сообщений из 57, страница 1 из 3
  1  все
Помогите с добавлением данных через курсорадаптер
    #37348408
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
Создаю курсорадаптер и отображаю данные в grid:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
WITH THIS

	SET STEP ON 
	
	SET MULTILOCKS ON 
	
	.AddProperty('lo_CA')
	.lo_CA = CREATEOBJECT("CursorAdapter")
	.lo_CA.Alias='fin'
	.lo_CA.DataSourceType = 'ODBC'
	.lo_CA.DataSource=PubCon
	.lo_CA.fetchsize=- 1 
	.lo_CA.FetchAsNeeded=.f.
	.lo_CA.SelectCmd = 'select * from test_fin order by fin_id, god'
	.lo_CA.Tables = 'count.dbo.test_fin'
	.lo_CA.BufferModeOverride =  3 
	.lo_CA.AllowUpdate=.t.
	.lo_CA.UpdateType= 2 
	.lo_CA.keyFieldList = 'fin_id'	

	IF .lo_CA.AutoOpen()=.t.
	
			
	.grid1.recordsource=.lo_CA.Alias
	
	
		.lo_CA.UpdateNameList=" LPUCODE fin.LPUCODE, DATE fin.DATE, SUM fin.SUM, PRIM fin.PRIM, SKIND fin.SKIND, NDOC fin.NDOC, RF fin.RF, GOD fin.GOD, PRIZ fin.PRIZ, OSTATOK fin.OSTATOK"
		.lo_CA.UpdatableFieldList=" LPUCODE, DATE, SUM, PRIM, SKIND, NDOC, RF, GOD, PRIZ, OSTATOK"
		
		.lo_CA.UpdateCmdDataSourceType="ODBC"
		.lo_CA.UpdateCmdDataSource=PubCon

	ENDIF
	
	
	ELSE
		MESSAGEBOX('Произошла ошибка при создании курсорадаптера')		
	ENDIF 
ENDWITH

Затем в click() кнопки пишу
APPEND BLANK
TABLEUPDATE()

sqlsetprop(PubCon, 'Transactions', 2)

if !tableupdate(.t.,.t.,.lo_CA.alias)
sqlrollback(PubCon)
aerror(laErrors)
messagebox(iif(type('laErrors[2]')='C',laErrors[2],'Неопознанная ошибка!'),16,'Ошибка')
else
sqlcommit(PubCon)
.lo_CA.CursorRefresh()
.SetFocus()
ENDIF

Подскажите что не так делаю, как правильно данные добавить?
...
Рейтинг: 0 / 0
12.07.2011, 16:55
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37348512
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Sizov
Участник
НадеждаМ,

ошибку мы должны отгадать? Или она только для лохов пишется?
...
Рейтинг: 0 / 0
12.07.2011, 17:38
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37348523
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
прошелмимо
Участник
Sergey SizovНадеждаМ,

ошибку мы должны отгадать? Или она только для лохов пишется?

а как ты ее отгадаешь?

там написано TABLEUPDATE()

буфер сброшен без анализа


я вот одно не понимаю: реальные ли люди пишут на данном форуме?
...
Рейтинг: 0 / 0
12.07.2011, 17:42
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350065
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
Честно говоря я вобще запуталась с курсорадаптером.
...
Рейтинг: 0 / 0
13.07.2011, 15:49
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350087
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IgorNG
Участник
НадеждаМ,

Пока можно сказать, что в вашем коде один ENDIF лишний
...
Рейтинг: 0 / 0
13.07.2011, 15:53
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350132
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
IgorNG,

Это да, увидела.
...
Рейтинг: 0 / 0
13.07.2011, 16:06
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350212
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
не могу отловить ошибку
...
Рейтинг: 0 / 0
13.07.2011, 16:39
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350234
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
if tableupdate(.t.,.t.,.lo_CA.alias)<>.t.
sqlrollback(PubCon)
aerror(laErrors)
messagebox(iif(type('laErrors[2]')='C',laErrors[2],'Íåîïîçíàííàÿ îøèáêà!'),16,'Îøèáêà')

не отлавливается ошибка. tableupdate(.t.,.t.,.lo_CA.alias) =.t. получается.
...
Рейтинг: 0 / 0
13.07.2011, 16:47
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350339
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
прошелмимо
Участник
НадеждаМ tableupdate(.t.,.t.,.lo_CA.alias) =.t. получается.

перед этой командой какой код у Вас в кнопке?

вот это у Вас написано?
Код: plaintext
1.
2.
3.
4.
Затем в click() кнопки пишу 
APPEND BLANK
TABLEUPDATE()
...
Рейтинг: 0 / 0
13.07.2011, 17:33
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350905
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
ага
...
Рейтинг: 0 / 0
14.07.2011, 07:56
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350909
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
тоесть было написано.
...
Рейтинг: 0 / 0
14.07.2011, 08:08
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350910
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
НадеждаМif tableupdate(.t.,.t.,.lo_CA.alias)<>.t.
sqlrollback(PubCon)
aerror(laErrors)
messagebox(iif(type('laErrors[2]')='C',laErrors[2],'Íåîïîçíàííàÿ îøèáêà!'),16,'Îøèáêà')

не отлавливается ошибка. tableupdate(.t.,.t.,.lo_CA.alias) =.t. получается.
Проверяется ошибка функции sqlrollback(). Оно так и задумано? или все-таки aerror() надо перед sqlrollback() сделать?
...
Рейтинг: 0 / 0
14.07.2011, 08:08
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350912
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
Сейчас добавила еще одну кнопку, по клику которой просто пустая строка появляется в grid.

Код: plaintext
1.
2.
3.
4.
5.
WITH this.parent.grid1
	Select (.recordsource)
	Append Blank
	.setFocus()
EndWith
...
Рейтинг: 0 / 0
14.07.2011, 08:11
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350914
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
Dima T,

Нет, не задумано. Вы правы.
...
Рейтинг: 0 / 0
14.07.2011, 08:14
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350917
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
И надо ли тут sqlrollback() ?
sqlrollback() откатывает на сервере изменения сделанные в текущей транзакции.
Т.к. tableupdate() не сработал - сервер изменения не принял, т.е. в базе ничего не менялось, т.е. имеем курсор в котором есть изменения для сохранения на сервер. Для возврата курсора в исходное состояние надо использовать tablerevert()
...
Рейтинг: 0 / 0
14.07.2011, 08:17
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350924
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
Перечитал топик, вопросы возникли:
НадеждаМsqlsetprop(PubCon, 'Transactions', 2)
if !tableupdate(.t.,.t.,.lo_CA.alias)
sqlrollback(PubCon)
else
sqlcommit(PubCon)
ENDIF
Зачем вообще вручную рулить транзакциями? Нужны проблемы с блокировками на сервере?

НадеждаМif tableupdate(.t.,.t.,.lo_CA.alias)<>.t.
sqlrollback(PubCon)
aerror(laErrors)
messagebox(iif(type('laErrors[2]')='C',laErrors[2],'Íåîïîçíàííàÿ îøèáêà!'),16,'Îøèáêà')

не отлавливается ошибка. tableupdate(.t.,.t.,.lo_CA.alias) =.t. получается.
Если tableupdate(.t.,.t.,.lo_CA.alias) =.t. то в чем вообще ошибка? .t. это значит все на сервер успешно сохранилось.
...
Рейтинг: 0 / 0
14.07.2011, 08:29
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350961
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
прошелмимо
Участник
Dima TТ.к. tableupdate() не сработал - сервер изменения не принял, т.е. в базе ничего не менялось,

вай ит из?

если буфериз-я табличная, в курсор добавили 2 записи, и если 1 запись легла, а вторая нет?

ну или триггер какой хитрый на инсерт, апдейт и т.д.?
...
Рейтинг: 0 / 0
14.07.2011, 09:21
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37350965
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
прошелмимо
Участник
Dima TЗачем вообще вручную рулить транзакциями? Нужны проблемы с блокировками на сервере?


а как ими рулить?

да еще и учитывая косяки в рантайме относительно св-ва UseTransactions.
...
Рейтинг: 0 / 0
14.07.2011, 09:26
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37351011
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
Использую BufferModeOverride = 3 - Мягкую буферизация строк.

Записи я добвляю по одной. Вроде как tableupdate () = .t., только понять не могу почему в таблице нет добавляемых данных.
...
Рейтинг: 0 / 0
14.07.2011, 10:05
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37351031
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
прошелмимоDima TТ.к. tableupdate() не сработал - сервер изменения не принял, т.е. в базе ничего не менялось,

вай ит из?

если буфериз-я табличная, в курсор добавили 2 записи, и если 1 запись легла, а вторая нет?

ну или триггер какой хитрый на инсерт, апдейт и т.д.?
А фокс (по дефолтным настройкам) апдейты разве не в одной транзакции сервера делает? Второй не пройдет - первый откатиться вместе с изменениями хитрых триггеров и т.п.

прошелмимоDima TЗачем вообще вручную рулить транзакциями? Нужны проблемы с блокировками на сервере?


а как ими рулить?

да еще и учитывая косяки в рантайме относительно св-ва UseTransactions.
В простых случаях оно само разрулится. Любое изменение MS-SQL оборачивает в транзакцию, другое дело кто ее закрывает, сам сервер автоматом, фокс где-то во внутренностях КА, либо явно в коде прописывать.
Зачем велосипед усложнять на простых конструкциях? Забыли/пропустили в одном месте sqlcommit() вставить и висит база заблокированная транзакцией, остальное у юзера работает как вложенное в эту транзакцию, а по закрытию фокса транзакция откатывается, т.к. этот sqlcommit() никто не дает.
Согласен что для изменения нескольких связанных таблиц нужна транзакция, но тут нет нескольких таблиц.

Лично я предпочитаю явно открывать транзакцию для сложных случаев. Примерно так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
if SQLEXEC(SQLhandle, 'begin tran') >  0 
   ... тут куча TABLEUPDATE() 
   if <все нормально>
      SQLEXEC(SQLhandle, 'commit tran')
   else
      SQLEXEC(SQLhandle, 'rollback tran')
   endif
endif
PS описал примерно, реально это в объект обернуто, который всегда закроет транзакцию: принудительно или автоматом при уничтожении этого объекта.
...
Рейтинг: 0 / 0
14.07.2011, 10:17
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37351079
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
сейчас добавила пустую строку и сделала browse, данные в курсорадаптере есть.
...
Рейтинг: 0 / 0
14.07.2011, 10:42
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37351190
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
НадеждаМсейчас добавила пустую строку и сделала browse, данные в курсорадаптере есть.
Поздравляю. А если попробовать непустые строки добавлять? После APPEND BLANK заполнить запись REPL ... а потом уже сохранять.
...
Рейтинг: 0 / 0
14.07.2011, 11:31
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37351253
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
Dima T,

не получается
...
Рейтинг: 0 / 0
14.07.2011, 11:51
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37351352
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: НадеждаМ
> не получается


Очень информативно

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
14.07.2011, 12:25
| Ответить | Цитировать | Написать  
Помогите с добавлением данных через курсорадаптер
    #37351623
НадеждаМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
НадеждаМ
Участник
Dima T,

Мне надо чтобы пользователь мог в грид добавить новую строку и заполнить ее своими данными.
...
Рейтинг: 0 / 0
14.07.2011, 13:38
| Ответить | Цитировать | Написать  
25 сообщений из 57, страница 1 из 3
  1  все
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Помогите с добавлением данных через курсорадаптер
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=37351190&tid=1581993]:
 0ms
get settings:
 8ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 35ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 53ms
get tp. blocked users:
 1ms
others: 11ms
total:  141ms
созд. / загр.: 141ms
x
x
Закрыть


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