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

k_vit
26 авг 2008, 13:25
Форум: Программирование
Тема: AQA
Ответы: 23
Просмотры: 8029

1.Закомментируйте в своём конфиге: [AQA] Delay=1 StartModule=C_EXPIMP::exp_imp StartPlan=Export 2.Запустите Гал-ку: \\Fs-terminal\Gal81sql\exe\galnet.exe /c:C:\GAL810\Start\export.cfg 3. Заново сгенерируйте тест. 4. Раскоментарьте то, что закоментарили в п.1. 5.Запустите Гал-ку : \\Fs-terminal\Gal81...
k_vit
25 авг 2008, 08:46
Форум: Программирование
Тема: Где пройти экзамен на сертификат по Галактике?
Ответы: 2
Просмотры: 1250

Если вы говорите о партнере разработчике.
Незнаю, как с администррированием, а вот с программированием, по-мимо сдачи теста нужно еще пройти практику на территории Минска 4 недели по-моему.
А вобще вам лучше позвонить в Москву в Корпорацию Гал-ка, там скажут.
k_vit
19 авг 2008, 16:43
Форум: Программирование
Тема: AQA
Ответы: 23
Просмотры: 8029

То есть, активируете нужный модуль и вызываете тест :

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

[AQA]
  StartModule=Z_STAFF::staffmainmenu2
  StartPlan=Exp
k_vit
19 авг 2008, 16:04
Форум: Программирование
Тема: AQA
Ответы: 23
Просмотры: 8029

Rishat
Вероятно, нужно прописать еще один параметр.

<StartModule=<имя модуля> - имя модуля системы, в который будет осуществлен вход при автоматическом запуске плана тестирования;
k_vit
08 авг 2008, 14:15
Форум: Программирование
Тема: Выбор остатков по договору.
Ответы: 4
Просмотры: 1750

сделать цикл по SaldMoun выяснить : SaldMoun.TblOs = cgKau_Dogovor затем выяснить SaldMoun.KauOs = nRec_нужного_договора function IfExistKau : integer; { var i : integer; IfExistKau := 0; for (i := 1; i <= 6; Inc(i)) { if SaldMoun.TblOs[i] = cgKau_Dogovor { //cgKau_Dogovor = 14 IfExistKau := i; brea...
k_vit
25 июл 2008, 15:20
Форум: Программирование
Тема: Как вытянуть nrec зная kotable и код аналитики
Ответы: 16
Просмотры: 4041

нет, это я невнимательнно прочитал вопрос :grin:
прошу прощения.


Боюсь ошибится, по-моему никак вы не вытащите nRec, вам не зачто прицепится
k_vit
25 июл 2008, 14:51
Форум: Программирование
Тема: Как вытянуть nrec зная kotable и код аналитики
Ответы: 16
Просмотры: 4041

есть функции If ( GetAnyKAU(Word(0), KodTable[], KodKau[]), GivenAnName(1)), '') Параметры GivenAnName() : cgAnName = 1; // Наименование КАУ cgAnStrKod = 2; // системные String(NRec), ручные SpKau.Code cgAnStrKey = 3; // ключ для сортировки в отчетах, определяется по настройкам (StrName+StrKod) (Str...
k_vit
23 июл 2008, 16:09
Форум: Программирование
Тема: Свой интерфейс
Ответы: 5
Просмотры: 1815

1.Продлить лицензию
2.Откатить дату и откомпилировать заново
k_vit
20 июн 2008, 16:16
Форум: Программирование
Тема: Множественный выбор
Ответы: 16
Просмотры: 3798

А зачем вам такое нужно?


Просто создайте маркер в своём интерфейсе и копируйте туда элементы из маркера интерфейса выбора, если вы хотите сохранять установленный фильтр.
k_vit
20 июн 2008, 08:23
Форум: Программирование
Тема: Множественный выбор
Ответы: 16
Просмотры: 3798

L_DOGOVOR::GetSomKatNotes Parameters pVidDoc, // фильтр вида документа ( 0 - фильтр не задан ) pSysNum, // системная группа: нужна для выбора статусов из нескольких видов документов (VidDoc) // word(1) - платежные документы // word(7) - кассовые документы // word(37) - налоговый учет pStatus, // 0 -...
k_vit
17 июн 2008, 15:34
Форум: Программирование
Тема: Мультивыбор организаций
Ответы: 6
Просмотры: 2016

Алексей Почему бы и нет? var cOrg : comp; var Marker : longint; Marker := initmarker... for (i := 0; i <= GetMarkerCount(Marker); Inc(i)) { GetMarker(Marker, i, cOrg); if GetFirst FastFirstRow KatOrg where ((cOrg == KatOrg.NRec)) = tsOk { ClearBuffer(#Organ); Organ.mark:=cOrg; s2 := s2 + KatOrg.Nam...
k_vit
17 июн 2008, 08:41
Форум: Программирование
Тема: Мультивыбор организаций
Ответы: 6
Просмотры: 2016

Ну маркеры работают быстрее чем таблицы.
Хотя в вашем случае я не думаю, что вы много организаций собираете. :grin:
k_vit
16 июн 2008, 15:43
Форум: Программирование
Тема: Нагибаю маркеры
Ответы: 9
Просмотры: 2546

приводит к тому, что в browse пропадают все записи


может у вас на tblMy наложены ограничения? поэтому записи при updat'e пропадают.

а так, проверял : update tblMy set tblMy.Checked := true; работает
k_vit
16 июн 2008, 11:02
Форум: Программирование
Тема: Мультивыбор организаций
Ответы: 6
Просмотры: 2016

Interface L_KATORG::GetSomeKontrPrim

Интерфейс множественного выбора организаций. Выбор сохраняется в маркера KatOrg, KatOrgDescr
k_vit
15 апр 2008, 11:20
Форум: Программирование
Тема: Ищу функцию
Ответы: 5
Просмотры: 1911

Посмотреть можно в файле Excel.doc А вам можно сделать так VIP-ом : ... LogStrToFile('c:\Macro.bas', ShortStrToWin('Sub Макрос1()')); LogStrToFile('c:\Macro.bas', ShortStrToWin('ActiveSheet.PageSetup.Zoom = 80')); LogStrToFile('c:\Macro.bas', ShortStrToWin('End Sub')); xlImportModule('c:\Macro.bas')...