Найдено 150 результатов
- 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...
- 25 авг 2008, 08:46
- Форум: Программирование
- Тема: Где пройти экзамен на сертификат по Галактике?
- Ответы: 2
- Просмотры: 1250
- 19 авг 2008, 16:43
- Форум: Программирование
- Тема: AQA
- Ответы: 23
- Просмотры: 8029
То есть, активируете нужный модуль и вызываете тест :
Код: Выделить всё
[AQA]
StartModule=Z_STAFF::staffmainmenu2
StartPlan=Exp
- 19 авг 2008, 16:04
- Форум: Программирование
- Тема: AQA
- Ответы: 23
- Просмотры: 8029
- 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...
- 25 июл 2008, 15:20
- Форум: Программирование
- Тема: Как вытянуть nrec зная kotable и код аналитики
- Ответы: 16
- Просмотры: 4041
- 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...
- 23 июл 2008, 16:09
- Форум: Программирование
- Тема: Свой интерфейс
- Ответы: 5
- Просмотры: 1815
- 20 июн 2008, 16:16
- Форум: Программирование
- Тема: Множественный выбор
- Ответы: 16
- Просмотры: 3798
- 20 июн 2008, 08:23
- Форум: Программирование
- Тема: Множественный выбор
- Ответы: 16
- Просмотры: 3798
L_DOGOVOR::GetSomKatNotes Parameters pVidDoc, // фильтр вида документа ( 0 - фильтр не задан ) pSysNum, // системная группа: нужна для выбора статусов из нескольких видов документов (VidDoc) // word(1) - платежные документы // word(7) - кассовые документы // word(37) - налоговый учет pStatus, // 0 -...
- 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...
- 17 июн 2008, 08:41
- Форум: Программирование
- Тема: Мультивыбор организаций
- Ответы: 6
- Просмотры: 2016
- 16 июн 2008, 15:43
- Форум: Программирование
- Тема: Нагибаю маркеры
- Ответы: 9
- Просмотры: 2546
- 16 июн 2008, 11:02
- Форум: Программирование
- Тема: Мультивыбор организаций
- Ответы: 6
- Просмотры: 2016
- 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')...