Галактика в вопросах и ответах

Может оно и правильно, наверняка правильно, но вот не всегда у меня, почему-то работает такое выражение doubleToStr('22.31','\m4 р \f4 к'). Поэтому приходится изгалаяться.

В саппорте "компиляция интерфейсов" есть такой пункт меню "загрузить статус-лайн". Посмотри там

В любом случае, разве "двадцать три сотых к" это правильно?

Alexander писал(а):Ruh
у меня так все работает...

Doubletostr(22.225,'\m4 р. \2p\f5 к.') = 'ноль р. двадцать две сотых к.'

doubletostr(25,' \m4 руб.')+' '+doubletostr(21,'\f4 коп.')
Т.е. выделяешь целую часть. Потом выделяешь дробную, приводя ее к целому виду

А := 25.21 // исходное число
В := integer(A) // целая часть
C := integer((A-integer(A))*100) // дробная часть

doubletostr(B,' \m4 руб.')+' '+doubletostr(C,'\f4 ...

Точного ответа дать не могу, но если после .endvar вставить пустую view, то все компиляется.
Например
.Form 'TEST_FRM'
.NameInList 'test_form'
.var
prev:string;
s:double;
.endvar

.create view a1;

.begin
s:=1;
end.
.fields
s
.endfields
s = ^
.EndForm

Что-нибудь типа (общая идея):
.var
mm : string
sum : integer
.endvar

.begin
mm := ''
sum := 0
end.
.
.
.
.


.begin
mm := SomeField1
sum := sum + SomeField2
end.


.{?internal; (SomeField1<> mm and mm <> '');
.Fields
mm //SomeField1
sum //SomeField2
.EndFields
^ ^
.begin
mm := SomeField1 ...

Все зависит от аналитики.
Например, аналитика по дебету -Организация/подразделение/МОЛ
То: KAUOS[1] - nrec организации
KAUOS[2] - nrec подразделения
KAUOS[3] - nrec МОЛ

По кредиту - аналогично

Вообще-то InitSerKau без параметров

// Проинициализировать сервис
function InitServKau : boolean;
{$ifndef ForExport} external LibName name 'INITSERVKAU';{$endif}
// Проданить сервис
procedure DoneServKau;
{$ifndef ForExport} external LibName name 'DONESERVKAU';{$endif}

Может я чего-то не понимаю, конечно, но печататься все отчеты сразу могут если они все отмечены для печати, т.е. непротив всех стоят 'V'.

Опять же, если правильно понял ваше сообщения, в платежных ведомостях нет выборки отчетов? Ну значит там только один отчет и нечего выбирать

"они все сразу формируются при печати платежок" - как это все сразу? Т.е. при нажатии CTRL-P, не спрашивая у пользователей, все 12 печатаются? А причем тут FCENV?
FCENV - подключать редактор-компилятор FCOM

И вообще, интерфейсы чувствуют себя нормально только если одна view

А на какую? Зачем?

//║ Галактика (с) 1995, 97 TOP SOFT Ltd., Новый АТЛАНТ
//║ Версия : 5.20
//║ Назначение: Баундсы документов-оснований

Bounds MainBound = tipDO == BaseDoc.VidDoc
ordered by BaseDoc.dDoc,BaseDoc.NoDoc
Bounds VscBound = tipDO == BaseDoc.VidDoc and
curdescr == BaseDoc.Descr
ordered by BaseDoc ...

parameters Parent, StaffStruct.NRec, lFSt, dCurrent;

lFSt : boolean


Parent == DepartmentCat.NRec

StaffStruct.Nrec == VacationSts.cStaffStruct

( dCurrent >= Appointments.AppointDate and
dCurrent <= Appointments.DismissDate