[KIA]

Помогите пожалуйста кто-нибудь сделать вычисляемое поле!!!! Никто не может мне помоч, а курсовую уже пора сдавать(( Вся надежда только на форум!!! Если кто-то согласится мне помочь, я расскажу что там нужно, даже могу базу выслать, что б понятней было. Для меня всё это оч сложно, не могу сама сделать (((((((((((

[xchrom]

помочь можно но задание надо излагать сразу же за просьбой

[KIA]

Не знаю смогу ли понятно объяснить........Вобщем, у меня крсач по автосервису.....оформление заказов. И мне нужно чтобы он подсчитывал сумму заказа. У мен есть отдельно табличка с деталям где указано их наименование и стоимоть, есть табличка где перечислены виды работ и их стоимость. Вот, а когда идёт оформление заказа я допустим выбираю конкретную работу, ниже в гриде выскакивает какие к этой работе необходимы детали. Ниже идёт DBLookupComboBox в котором ещё нужно выбрать чья будет детать клиента или автосервиса. если деталь клиента то стоимость заказа = только стоимоти работы, а если деталь автосервиса, то нужно к стоимости заказа прибавить ещё и стоимость всех необходимых деталей. НО в одном заказе может быть ещё и несколько видов работ ( у меня мах в одном заказе 3 работы можно) вот....так что если работ несколько то их ещё между собой потом надо сложить и в конце вывести итоговую сумму...вот..............

[Phedor]

Сообщение от KIA

Помогите пожалуйста кто-нибудь сделать вычисляемое поле!!!! Никто не может мне помоч, а курсовую уже пора сдавать(( Вся надежда только на форум!!! Если кто-то согласится мне помочь, я расскажу что там нужно, даже могу базу выслать, что б понятней было. Для меня всё это оч сложно, не могу сама сделать (((((((((((

Какая база? MSSQL? Interbase?
1. Вычисляемое поле делается при объявлении базы
2. Второй вариант обыкновенное поле, но с расчетом по триггеру.

[Phedor]

Сообщение от KIA

Не знаю смогу ли понятно объяснить........Вобщем, у меня крсач по автосервису.....оформление заказов. И мне нужно чтобы он подсчитывал сумму заказа. У мен есть отдельно табличка с деталям где указано их наименование и стоимоть, есть табличка где перечислены виды работ и их стоимость. Вот, а когда идёт оформление заказа я допустим выбираю конкретную работу, ниже в гриде выскакивает какие к этой работе необходимы детали. Ниже идёт DBLookupComboBox в котором ещё нужно выбрать чья будет детать клиента или автосервиса. если деталь клиента то стоимость заказа = только стоимоти работы, а если деталь автосервиса, то нужно к стоимости заказа прибавить ещё и стоимость всех необходимых деталей. НО в одном заказе может быть ещё и несколько видов работ ( у меня мах в одном заказе 3 работы можно) вот....так что если работ несколько то их ещё между собой потом надо сложить и в конце вывести итоговую сумму...вот..............

Тогда только через триггер или программно высчитывать Итого:
Если используете grid-компонент EhLib, то он автоматом может это делать :-)

[KIA]

если честно ничё в этом не понимаю и ни слова не поняла что вы сказали))

[Phedor]

Сообщение от KIA

если честно ничё в этом не понимаю и ни слова не поняла что вы сказали))

Вы запросами пользоваться умеете? (Query)

[KIA]

немного умею)

[Phedor]

Сообщение от KIA

немного умею)

При добавлении делайте запрос на расчет суммы, что-то вроде:

Query1.SQL.Clear;
Query1.SQL.Add('select sum(Таблица.Сумма) from Таблица where Таблица.Заказ=:Заказ group by Таблица.Заказ');
Query1.Open;
Summa.Text := Query1.FieldByName('Сумма').AsFloat;
Query1.Close;

[Phedor]

Сообщение от KIA

немного умею)

Если есть аска пиши на XXXXXXXX

[KIA]

Помогите кто-нибудь, пожалуйста!!!!!!!

[xchrom]

вычисляемые поля хм...
ну видимо тебе нужно выбирать сумму деталей с признаком что деталь автосервиса
select sum(стоимость_детали) as SUMMA_DETAL from детали
where деталь_автосервиса // не знаю какой у тебя тип поля ну в общем сравнение

и сумму работ всех
select sum(стоимость_работы) as SUMMA_RABOT from работы

, а потом суммировать

заказы.сумма := запрос_работы.FieldByName('SUMMA_RABOT')+запрос_де тали.FieldByName('SUMMA_DETAL');

[KIA]

блин, ничё не понимаю..........

[KIA]

может мне кто-нибудь сделать это поле???

[lmikle]

Если надо куда-то выводить кроме как на форме самого заказа, то надо делать физическое поле, вычисляемое по триггеру.

Если достаточно показать на самой форме, то можно посчитать прямо там без всяких полей.

Как я понял, у тебе 2 таблички - работы и детали. Делаешь обработчик AfterPost, в котором пробегаешься по табличкам и суммируешь то, что надо. Если есть возможность удаления, то еще afterDelete такой-же.
Если надо поизвращаться, что бы было красиво, то еще нужны 2 возможности - отключение контролов и букмарки. Отключение контролов -для тго что бы не мельтишило на экране пока бегаешь по табличке, а букмарки - для того, что бы потом восстановить исходную позицию курсора.

Суммирование одной таблицы (названия от балды):

Код:

var
  B : Pointer;
  S : Currency;
begin
  S := 0;
  Table1.DisableControls;
  B := Table1.GetBookmark;
  Try
    Table1.First;
    While Not Table1.Eof Do
      begin
        S := S + Table1.FieldByName('SUMMA').AsCurrency;
        Table1.Next;
      end;
  Finally
    Table1.GotoBookmark(P);
    Table1.FreeBookmark(B);
    Table1.EnableControls;
  End;

  // Edit1 - типа сумма
  Edit1.Text := CurrToStr(S);
end;