Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / (VFP9) Вычисляемое поле и четыре знака после запятой / 3 сообщений из 3, страница 1 из 1
27.04.2005, 07:59
    #33037347
Диченка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(VFP9) Вычисляемое поле и четыре знака после запятой
Господа, есть курсор, который привязывается к определенному гриду на форме. В курсоре есть два числовых поля, у которых два знака после запятой. В гриде есть третья колонка, которая является вычисляемым полем и равна перемножению двух числовых полей.

Код: plaintext
1.
2.
3.
Create Cursor test (f1 n( 18 , 2 ),f2 n( 18 , 2 ))
Thisform.mygrid.column1.controlsource = f1
Thisform.mygrid.column2.controlsource = f2
Thisform.mygrid.column3.controlsource = f1*f2

Проблема в том, что в третьей колонке отображается четыре знака после запятой, а мне нужно округление до двух. Пробовал устанавливать принудительно SET DECIMALS TO 2 и SET FIXED ON - не помогает.

Thisform.mygrid.column3.controlsource = ROUND(f1*f2,2) дает синтаксическую ошибку.

Thisform.mygrid.column3.controlsource = NTOM(f1*f2) дает по прежнему четыре знака после запятой.

Что делать ?
...
Рейтинг: 0 / 0
27.04.2005, 08:14
    #33037350
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(VFP9) Вычисляемое поле и четыре знака после запятой
Thisform.mygrid.column3.controlsource = "(ROUND(f1*f2,2))"
...
Рейтинг: 0 / 0
27.04.2005, 08:34
    #33037364
Диченка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(VFP9) Вычисляемое поле и четыре знака после запятой
pivaThisform.mygrid.column3.controlsource = "(ROUND(f1*f2,2))"

Проблема решена, работает вот этот вариант - ROUND(f1*f2,2)
Косяк был у меня в парсере, который присваивает controlsource колонкам гриба
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / (VFP9) Вычисляемое поле и четыре знака после запятой / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]