15 июл. 2013 г.

Эффект Гедымина

Заметьте, что ни одного мясокомбината, где Гедымин внедрен в более-менее полном объеме, в списке ТОП-20 убыточных предприятий Беларуси нет. Из шести там присутствующих Гедымин используется только на Гомельском, да и то вскользь, на участках далеких от производства. Выводы напрашиваются сами собой.

9 июл. 2013 г.

А воз и ныне там

Цитата из одного компьютерного текста 1985 года:
It is virtually a cliche to say there is a software crisis. (...) The symptoms appear in the form of software that is nonresponsive to user needs, unreliable, excessively expensive, untimely, inflexible, difficult to maintain, and not reusable There are many ways to improve things a little and they are being tried. But to achieve a fundamental jump in our programming capacity, we need to rethink what we are doing from the beginning.
Тридцать лет прошло, а все сказанное, слово в слово, применимо к любой современной ERP системе.

Интересно, что примеры запросов к БД в указанной работе написаны на языке Quel:

range of E,M is employee
range of D is dept
retrieve (E.name)
where E. salary > M. salary
and E. manager = M.name
and E.dept = D.dept
and D. floor = 1
and E.age > 40
Очевидно SQL в 1985 г. еще не стал всеобщим стандартом.

13 июн. 2013 г.

Гедымин 2.6 на подходе

В понедельник, 17 июня 2013 г., в 15:00, в офисе компании Golden Software of Belarus, Ltd состоится презентация возможностей новой версии платформы Гедымин по совместной разработке прикладных программных решений. Приглашаются все заинтересованные лица.

17 мар. 2013 г.

Новое руководство по кассовой системе

Объединяет руководство администратора и кассира. Содержит раздел по установке и быстрому запуску. Скачать можно тут.

18 февр. 2013 г.

Требуется дизайнер интерфейса

Ищем дизайнера, который возьмется перерисовать интерфейс нашего ресторанного софта. Старый выглядел как-то так:

Хочется поменять цветовую гамму, осовременить вид кнопок, перерисовать под большее разрешение. На выходе нужны векторные файлы, желательно в формате Corel Draw.

Резюме слать сюда.

14 февр. 2013 г.

Delphi исполнилось 18 лет

На видео Delphi 1 под управлением Windows 3.1. Как же не хватает сейчас такого простого, строгого, незамутненого, прямоугольного интерфейса.

На первой версии были написаны наши программы Секрет Анжелики, Зарплата Анжелики, Средства Анжелики.

9 февр. 2013 г.

Мега Исследователь

Так выглядит Исследователь одного из наших клиентов (крупного предприятия пищевой промышленности):

8 февр. 2013 г.

Первая неделя

Как видно на скриншоте, больше недели отработал Gedemin Web Server без перезагрузок. And we are counting!

25 янв. 2013 г.

Пока не забыл

TestCorrect в диалоговом окне не так надо было делать. Сейчас метод возвращает булевское значение -- удовлетворяют ли введенные в полях диалогового окна значения условиям или нет. А можно было бы возвращать список ошибок, где каждая запись содержала бы сообщение пользователю, экранный элемент и поле БД. Тогда, по нажатию на кнопку Ок, можно было бы обойтись без лишних диалоговых окон, а просто подсвечивать неверные поля и против каждого во всплывающем окошке вывести поясняющее сообщение. Подобно тому, как это принято в веб интерфейсах.

23 янв. 2013 г.

Автоматическое добавление доменов в настройку

Запрос автоматом добавляет в указанную настройку все домены, которые используются полями таблиц, входящими в эту настройку:
INSERT INTO at_settingpos (
  settingkey,
  objectclass,
  category,
  objectname,
  xid,
  dbid,
  objectorder,
  withdetail,
  needmodify,
  autoadded
)

SELECT DISTINCT
  p.settingkey,
  'TgdcField',
  'Домен',
  f.FIELDNAME,
  fr.xid,
  fr.dbid,
  1, /* домены должны располагаться перед полями */
  0,
  1,
  0
FROM
  at_settingpos p
  JOIN gd_ruid pr
    ON pr.xid = p.xid
      AND pr.dbid = p.dbid
  JOIN at_relation_fields rf
    ON rf.id = pr.id
  JOIN at_fields f
    ON f.id = rf.FIELDSOURCEKEY
  JOIN gd_ruid fr
    ON fr.id = f.id
  LEFT JOIN at_settingpos p2
    ON p2.XID = fr.xid
      AND p2.DBID = fr.dbid
      /* если убрать это условие, то */
      /* исключим домены, которые    */
      /* входят хотя бы в одну настр.*/
      AND p2.settingkey = :SK
WHERE
  f.fieldname LIKE 'USR$%'
  AND
  p.settingkey = :SK
  AND
  p2.id IS NULL

16 янв. 2013 г.

Курсы для системных администраторов

Очередная группа пройдет обучение с 29 января по 1 февраля. Записываемся тут.