Найдено 76 результатов

Dmitry_Sol
25 апр 2012, 12:48
Форум: Программирование
Тема: Как добавить кнопку в стандартный интерфейс
Ответы: 76
Просмотры: 30182

Re: Как добавить кнопку в стандартный интерфейс

Мне кажется вы допустили при докомпиляции две ошибки: 1. Этот интерфейс вызывается как embedded, поэтому докомпилировать лучше не cmInit, а функцию InitVidWindow 2. При работе с дизайнером интерфейсов лучше пользоваться именами параметров в кавычках. Вот мой работающий код :-) #component "M_MNP...
Dmitry_Sol
19 апр 2012, 14:35
Форум: Программирование
Тема: Вернуть данные из нормативной таблицы
Ответы: 4
Просмотры: 1007

Re: Вернуть данные из нормативной таблицы

Вот этот текст у меня в javascript отработал Проверьте подключенные библиотеки Должны быть подключены "Сервисные функции" из раздела Спецификации продуктов и "Стандартные функции для работы с нормативными таблицами" NormTable_nRec=281474976710659 Debug.Print(NormTable.FindBynRec(...
Dmitry_Sol
18 апр 2012, 17:32
Форум: Программирование
Тема: Вернуть данные из нормативной таблицы
Ответы: 4
Просмотры: 1007

Re: Вернуть данные из нормативной таблицы

Предлагаю посмотреть на часть исходника SFNORMTAN.VIP, который отвечает за работу с нормативными таблицами вот такой запрос в начале interface iSFNormTAn; create view viSFNormas var wGOwner : word; cGOwner : comp; cGCode : comp; cGRHash : comp; // nRec MnAnal строки cGCHash : comp; // nRec MnAnal ко...
Dmitry_Sol
01 фев 2012, 18:42
Форум: Программирование
Тема: Запись javascriptом в одно из представлений
Ответы: 2
Просмотры: 797

Re: Запись javascriptом в одно из представлений

Насколько я знаю логику таблиц планирования, Если системное представление одно и то же, то представления документа служат только для отображения, запись в spmnpl и valspmnp только одна. А вот если системные представления разные, то и записей будет две. А спозиционироваться на нужную можно если поста...
Dmitry_Sol
13 дек 2011, 16:14
Форум: Программирование
Тема: Запуск скриптов при старте и выходе из системы
Ответы: 1
Просмотры: 1247

Re: Запуск скриптов при старте и выходе из системы

Как то так :smile: #include "epSystem.vih" objInterface objMyExtPoint; function SetGrDescr : boolean; end; vipInterface MyExtPoint implements objMyExtPoint; interface MyExtPoint; function SetGrDescr : boolean; { var ts: string; var tc: comp; SetGrDescr := false; RunInterface('C_COMMON::GET...
Dmitry_Sol
13 дек 2011, 12:53
Форум: Сопровождение
Тема: Запуск алгоритма после изменения статуса
Ответы: 6
Просмотры: 2023

Re: Запуск алгоритма после изменения статуса

Давайте по порядку. 1. В объекте dogovor в JS нет полей status и cnote.Из этого следует, что стандартными методами JS их изменить нельзя. НО 1) Есть возможность для платформ MS SQL и ORACLE подключить библиотеку работы с прямым SQL. Об этом популярно расписано на официальном форуме . https://forum.g...
Dmitry_Sol
30 ноя 2011, 13:29
Форум: Программирование
Тема: Аналитика КПН
Ответы: 2
Просмотры: 856

Re: Аналитика КПН

select * from kpn_sp (readonly), kpn_hdr (readonly), KPN_PRM (readonly) where (( kpn_hdr.nrec ==kpn_sp.ckpn_hdr and kpn_sp.codepar == KPN_PRM.wparam and kpnn ==KPN_PRM.name and kpnk==kpn_hdr.kodgrkau and crec==kpn_hdr.cobject ))and kpn_sp.datestart>=dat order by kpn_sp.datestart; Собственно КПН хра...
Dmitry_Sol
08 ноя 2011, 15:51
Форум: Программирование
Тема: L_SKLAD::GETSOME_ANY - описание интерфейса.
Ответы: 5
Просмотры: 1331

Re: L_SKLAD::GETSOME_ANY - описание интерфейса.

Я партнер разработчик, у меня доступ к исходным текстам есть :-)
про про нахождение параметров через DSK было где то на форуме, но пока нормальных описаний стандартных интерфейсов в общем доступе нет, нет проще спросить на форуме. Здесь достаточно людей, которые могут помочь.
Dmitry_Sol
08 ноя 2011, 14:00
Форум: Программирование
Тема: L_SKLAD::GETSOME_ANY - описание интерфейса.
Ответы: 5
Просмотры: 1331

Re: L_SKLAD::GETSOME_ANY - описание интерфейса.

Попробуйте считать из DSK ReadMyDsk(sDate0, 'sDate0_GetSome_Any',dateChanged); // дата начала ReadMyDsk(sDate, 'sDate_GetSome_Any',dateChanged); //дата окончания или ReadMyDsk(sDate0,'dStart_GetSome_Any',vb);// дата начала ReadMyDsk(sDate,'dStop_GetSome_Any',vb);// дата окончания
Dmitry_Sol
08 ноя 2011, 12:40
Форум: Программирование
Тема: Объектный фейс L_Sklad::Makeorder
Ответы: 16
Просмотры: 5090

Re: Объектный фейс L_Sklad::Makeorder

По поводу makeprihorder. Там для получения даты оприходования существует event функция omakeorder.canMakeOrder function canmakeorder:date; { canmakeorder:=katsopr.dsopr; } ...... BindEvent(CanMakeOrder, oMakeOrder.CanMakeOrder); oMakeOrder.MakePrihOrder (nrecKatSopr,false,false,false,0,1,32); UnBind...
Dmitry_Sol
03 ноя 2011, 14:50
Форум: Программирование
Тема: Привязать ТХО, создать проводки. Программно.
Ответы: 1
Просмотры: 1007

Re: Привязать ТХО, создать проводки. Программно.

Если раздельный учет по регистрам не ведется, проще всего использовать ф-ию
MakeTXODoc(0,SoprHoz.NRec,hozoper.nrec,hozoper.nrec,0,0);
Dmitry_Sol
19 сен 2011, 17:24
Форум: Программирование
Тема: Запуск AQA из vip интерфейса
Ответы: 0
Просмотры: 1003

Запуск AQA из vip интерфейса

Добрый день, уважаемые знатоки :-)
Появилась настоятельная потребность запуска AQA скрипта из VIP, сталкивался ли кто нибудь с подобным?

Проблема в том, что необходимо закрывать отчет Fast Report автоматически, после открытия, а это может делать только aqa скрипт :-(
Dmitry_Sol
19 сен 2011, 17:10
Форум: Программирование
Тема: Java
Ответы: 43
Просмотры: 14708

Re: Java

Там двумя этими файлами не обойдешься, это верхушка айсберга. oiJSWork.vih потребует наличия -oiJSWork.obj, потом понадобится objintpl.vin. А затем окажется, что нужна половина исходников из M_MNPLAN и М_SCRIPTS В итоге я два дня выковыривал файлы из исходников, но результатом доволен. Написал уже н...
Dmitry_Sol
18 май 2011, 14:06
Форум: Опыт
Тема: Быстрая проверка в run-time
Ответы: 6
Просмотры: 7966

Re: Быстрая проверка в run-time

Возможно ли использование в этом механизме - работы с физическими таблицами, например create view? или record as table persons; begin type trecperson = record as table persons with x$position; var buf:trecperson; buf:=Trecperson(buf) Message('Hello'+buf.nrec) Написал так. Вроде не ругается. Теперь н...
Dmitry_Sol
22 апр 2011, 15:33
Форум: Программирование
Тема: Имя маркера пометки спецификации ДО
Ответы: 0
Просмотры: 920

Имя маркера пометки спецификации ДО

С последними патчами, появилась возможность пометки позиций спецификации ДО.
Пометка складывается в маркер, как узнать его имя?