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

Alexander
26 дек 2006, 12:31
Форум: Программирование
Тема: DobleToStr
Ответы: 14
Просмотры: 5397

aleks1232321 а как по-вашему должно делаться округление? В данном примере делается округление до сотых(параметр \2р - до сотых). Так что 22.225 ~ 22.23 все правильно! Делайте либо так: doubleToStr(Trunc('22.225',2),'\m4 р. \f5 к.') = 'двадцать два р. двадцать две сотых к.' либо так: doubleToStr('22...
Alexander
26 дек 2006, 12:09
Форум: Программирование
Тема: Маркеры в Support
Ответы: 6
Просмотры: 2865

aleks1232321
а поподробнее можно?
есть такой пункт, все перепробовал, но толку 0! какой статуслайн грузить?
Alexander
26 дек 2006, 11:56
Форум: Программирование
Тема: RunInterface
Ответы: 4
Просмотры: 2414

Max_Fin не работает! тестовый пример: Interface test1 'test1' doaccept, cyan; Create View; handleevent cmInit:{ message('Выполнились!'); Abort; exit; } end; end. Interface test 'test' doaccept, cyan; Create View; procedure DoInit(sInterface:string); { RunInterface(sInterface); } handleevent cmInit:...
Alexander
26 дек 2006, 10:47
Форум: Программирование
Тема: Маркеры в Support
Ответы: 6
Просмотры: 2865

Маркеры в Support

В Support, при вызове интерфейса с выбором, не работают маркеры!
Запускаю галактику - все ОК!
В Чем причина??
Какой res, или dll нужно подключать???
Alexander
26 дек 2006, 10:19
Форум: Программирование
Тема: RunInterface
Ответы: 4
Просмотры: 2414

RunInterface

Есть несколько интерфейсов с одинаковыми параметрами: Interface1 Interface2 Interface3 .... Хочу сделать процедуру для вызова интерфейса: procedure RunMyInt(sInterfase: string; p1: word; p2: word); //some code RunInterfase(sInterface, p1, p2); //some code end; однако как это сделать? в таком виде: R...
Alexander
26 дек 2006, 09:47
Форум: Программирование
Тема: DobleToStr
Ответы: 14
Просмотры: 5397

Doubletostr(22.225,'\m4 р. \2p\f5 к.') = 'двадцать два р. двадцать три сотых к.'
кстати пример из документации у меня тоже нормально отрабатывает,
doubleToStr('22.225','\m4 р. \f\2p5 к.') = 'двадцать два р. двадцать три сотых к.'
Alexander
25 дек 2006, 08:41
Форум: Программирование
Тема: DobleToStr
Ответы: 14
Просмотры: 5397

Ruh
у меня так все работает...
Alexander
21 дек 2006, 15:14
Форум: Программирование
Тема: Акт сверки расчётов(сводный)
Ответы: 12
Просмотры: 6389

а лучше так: select saldmoun.datesal, saldmoun.sums where((katorg.nrec==saldmoun.kauos[1] (noindex) and date(01,9,2006)==saldmoun.datesal /* and katpodr.nrec == saldmoun.kodspo (noindex) and katpodr.corg==katorg.nrec*/)) and katorg.name='ОРГАНИЗАЦИЯ'; при желании комментарии можно убрать... а еще лу...
Alexander
21 дек 2006, 14:52
Форум: Программирование
Тема: Акт сверки расчётов(сводный)
Ответы: 12
Просмотры: 6389

а если так??
select saldmoun.datesal, saldmoun.sums
where((saldmoun.kodsp==katpodr.nrec and katpodr.corg==katorg.nrec))
and katorg.name='ОАО"Полигон ТБО"' and saldmoun.kauos[1]=katorg.nrec and saldmoun.datesal=date(01.01.2006);
Alexander
21 дек 2006, 11:46
Форум: Программирование
Тема: FCOM
Ответы: 6
Просмотры: 2889

edward_K

понятно! Спасибо!
Alexander
21 дек 2006, 09:15
Форум: Программирование
Тема: FCOM
Ответы: 6
Просмотры: 2889

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

.Form 'TEST_FRM'
.NameInList 'test_form'
.var
prev:string;
s:double;
.endvar
.fields
s
.endfields
.begin
s:=1;
end.
  s=^
.EndForm
Компилятор ругается: попытка описать поле с именем, уже использованным для описания переменной!
В чем ошибка???
Alexander
20 дек 2006, 12:45
Форум: Программирование
Тема: FCOM
Ответы: 6
Просмотры: 2889

FCOM

Опишу вопрос в общем виде: Пусть vip передает поток данных в форму: .Fields SomeField1 SomeField2 .EndFields Пример Потока, отсортированного по SomeField1: a 1 b 2 c 2 .... Необходимо, сделать группировку по SomeField1, те: Поток: a 1 b 2 b 3 b 1 c 2 Требуемый Результат: a 1 b 2 b 3 b 1 Итог по b: 6...
Alexander
20 дек 2006, 10:28
Форум: Программирование
Тема: как просмотреть не корневую вьюху??
Ответы: 4
Просмотры: 2308

как просмотреть не корневую вьюху??

Пример: Interface test 'test' doaccept, cyan; Create View vKatOrg select * from katorg; Create View vKatSopr select * from KatSopr; tabbedsheet tabs; browse b1 'KatOrg'; table KatOrg; Fields nrec; name; end; browse b1 'KatSopr'; table katSopr; //Компилятор ругается vKatSopr.KatSopr - тоже не проходи...
Alexander
19 дек 2006, 16:45
Форум: Программирование
Тема: Обороты и Кау
Ответы: 2
Просмотры: 1823

Обороты и Кау

Люди, объясните темному, есть таблица проводок, у нее поля KAUOS[...] И KAUKS[...] что и в каких случаях в них прописывается??? суть такова: есть организация SomeOrg, Есть моя организация: MyOrg требуется: 1. суммы по документам MyOrg 2. суммы по документам SomeOrg как будет правильно: select * from...
Alexander
19 дек 2006, 13:34
Форум: Программирование
Тема: DobleToStr
Ответы: 14
Просмотры: 5397

Doubletostr(22.225,'\m4 р. \2p\f5 к.')