forum.clarionlife.net

Admin писал(а):В одном бровзе у меня с чего то локатор реестрозависимым стал. Почему? Все опции по дефолту! Мистика...

Admin писал(а):Как то раньше при использовании двух MAVBufferInsert (импорт счетов и дитейлов) у меня падала программа. Сейчас что нибудь изменилось?

StillZero писал(а): 2. Фокус на лист-боксе, набираем первые буквы (поиск), фокус перемещается на строку локатора, зачем? Хочу чтобы фокус оставался на листе.

StillZero писал(а):4. Всего 5 записей в таблице, установил в настройках листа - показывать 2 записи, в хэлп контроле показывает [2], а ожидал увидеть [2:5]

Admin писал(а):Берем твою программу MAV_tvDemo\abcmavt.exe
Запускаем на двух компьютерах.
Открываем Browse Vendors
Первый комп открывает форму и второй открывает форму на той же записи.
Первый изменяет имя вендора и жмет Ok. Все записывается и все в порядке.
Второй пытается нажать Ok… По идее должно выскочить сообщение о том что запись изменена. Сообщения НЕТ!
Мало того. Жмем Cancel… Форма закрылась. Программу не закрываем.

Admin писал(а):В первой программе жмем Refresh на окне и получаем мертвый зависон программы.
Развешать первую программу можно только выйдя из второй программы…

Тестировалось на разных программах, на разных серверах и на разных компьютерах…
Везде результат один и тот же.

Admin писал(а):Я так понял что после выполнения MAVINSERT выполняется AUTOCOMMIT ?

P.S. Кстати можешь в двух словах описать что такое в MAV транзакция?

MAVLOGOUT:
SELF.RetCode = SQLSetConnectAttr(SELF.hdbc, SQL_ATTR_AUTOCOMMIT,SQL_AUTOCOMMIT_OFF,SQL_IS_UINTEGER)


MAVCOMMIT:
SQLEndTran(SQL_HANDLE_DBC,SELF.HDBC,SQL_COMMIT)

MAVROLLBACK:
SQLEndTran(SQL_HANDLE_DBC,SELF.HDBC,SQL_ROLLBACK)

после MAVCOMMIT и MAVROLLBACK:
SELF.RetCode = SQLSetConnectAttr(SELF.HDBC, SQL_ATTR_AUTOCOMMIT,SQL_AUTOCOMMIT_ON,SQL_IS_UINTEGER)

Andrew Myalin писал(а):

StillZero писал(а):сортировки по колонкам теперь не чувствительны к регистру
как этого добился? ...

пока с помощью промежуточной очереди, но хотелось бы от неё в дальнейшем отказаться

Код: Выделить всё

mySort                          PROCEDURE(Queue Q,LONG FieldNo,LONG RowFieldNo,LONG fDESC=0)
tmpQ            QUEUE,PRE(tmpQ)
Field           STRING(512)
Row             LONG
 END
I               LONG
pField          ANY
pRow            ANY
RowName         MAVString
        CODE

 pField &= WHAT(Q,FieldNo)
 pRow   &= WHAT(Q,RowFieldNo)

 RowName.Reset(WHO(Q,RowFieldNo))

 LOOP I = 1 TO RECORDS(Q)
  GET(Q,I)
  tmpQ:Field = UPPER(CLIP(pField))
  tmpQ:Row   = pRow
  ADD(tmpQ)
 END

 IF fDESC
  SORT(tmpQ,-tmpQ.Field)
 ELSE
  SORT(tmpQ,+tmpQ.Field)
 END

 LOOP I = RECORDS(tmpQ) TO 1 BY -1
  GET(tmpQ,I)
  pRow = tmpQ.Row
  GET(Q,RowName.S[1 : RowName.Pos])
  DELETE(Q)
  ADD(Q,1)
 END

 FREE(tmpQ)

Admin писал(а):Молодец! Это супер...
Вот еще бы QBE и документацию разрулить...

Ты кстати в этом форуме повешай тему с типом "Объявление" о том что ищешь документатора... Этот тред вверху будет всегда висеть!

Andrew Myalin писал(а): пока с помощью промежуточной очереди, но хотелось бы от неё в дальнейшем отказаться

Alexander Ivanovsky писал(а):

Andrew Myalin писал(а): пока с помощью промежуточной очереди, но хотелось бы от неё в дальнейшем отказаться

Андрей, начал работу по переводу нашей кадровой программы под SQL.
И вот всплыла еще одна проблема с сортировкой. Буква "Ё".
Человек с фамилией начинающейся на "Ё" стоит первым в списке
Пофиксишь?

Andrew Myalin писал(а):

Alexander Ivanovsky писал(а): Андрей, начал работу по переводу нашей кадровой программы под SQL.
И вот всплыла еще одна проблема с сортировкой. Буква "Ё".
Человек с фамилией начинающейся на "Ё" стоит первым в списке
Пофиксишь?

конЭчно, если уже не пофиксил, механизмы сортировки я вчера уже поменял, проверю.