powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Знач. кон=Знач. нач.
6 сообщений из 6, страница 1 из 1
Знач. кон=Знач. нач.
    #32079166
balbes
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здравствуйте!!!Надеюсь ещё ни кого не достал.

В таблице TabAcc TTable имеюся показания на начало периода и на конец периода, хочется при добавлении строки, что бы конечные значения (показаний) периода автоматически (без участия юзера) вставлялись в начальные показания следующего (добавляемого) периода...
примерно догадываюсь что это
Код: plaintext
TabAccPkz_n.Value:=TabAccPkz_e.Value;

но куда это воткнуть?? в какой метод??...подскажите если не трудно.
...
Рейтинг: 0 / 0
Знач. кон=Знач. нач.
    #32079172
Фотография Cat2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что, дата начала следующего периода на равна дате конца предудущего + 1?
Если равна, то поле "Дата конца" просто лишнее.

Но если уж очень надо, то принцип решения следующий

В обработчике BeforInsert надо запомнить в переменные значения, которые будут вставлятся.

В обработчике AfterInsert присвоить полям значения из переменных.

Можно, конечно, все сделать и в AfterInsert.
=============
Смехота. Я сейчас потихоньку пишу базу рассчетов населения за электроэнергию. Правда на MS SQL+Delphi+ADO. На чем и тебе советую. Не обязательно MS SQL, но самый дохлый SQL лучше самого крутого ISAM.

Глянь, может чего еще спрашивать не будешь

Это часть таблиц. Вариант не окончательный и не полный.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
 --Потребители
 
CREATE TABLE [dbo].[Objects] (
	[ObjectID] [int] IDENTITY ( 1 ,  1 ) NOT NULL ,
	[StritID] [char] ( 10 ) NULL ,
	[Building] [varchar] ( 30 ) NULL ,
	[Apartment] [varchar] ( 20 ) NULL ,
	[IsPopulation] [bit] NOT NULL ,
	[SectionID] [int] NULL ,
	[Name] [varchar] ( 60 ) NULL 
) ON [PRIMARY]
GO

 --История платежей
 
CREATE TABLE [dbo].[Pays] (
	[ObjectID] [int] NOT NULL ,
	[PayDate] [datetime] NOT NULL ,
	[Pay] [numeric]( 18 ,  2 ) NULL ,
	[Indications] [int] NULL 
) ON [PRIMARY]
GO


 --История смены квартиросъемщиков
 
CREATE TABLE [dbo].[CLients] (
	[ObjectID] [int] NOT NULL ,
	[ClientDate] [datetime] NOT NULL ,
	[Name] [varchar] ( 60 ) NULL ,
	[ClientID] [int] IDENTITY ( 1 ,  1 ) NOT NULL 
) ON [PRIMARY]
GO

 --История изменения льгот по оплате
 
CREATE TABLE [dbo].[Privileges] (
	[ObjectID] [int] NOT NULL ,
	[PrivilegeDate] [datetime] NOT NULL ,
	[Mans] [numeric]( 3 ,  0 ) NULL ,
	[PrivilegeMan] [numeric]( 3 ,  0 ) NULL ,
	[Privilege] [numeric]( 6 ,  3 ) NULL 
) ON [PRIMARY]
GO

 --История изменения тарифов
 
CREATE TABLE [dbo].[Tarifs] (
	[TarifDate] [datetime] NOT NULL ,
	[Tarif] [numeric]( 12 ,  2 ) NULL 
) ON [PRIMARY]
GO


===========
Все, пошел за пивом.
...
Рейтинг: 0 / 0
Знач. кон=Знач. нач.
    #32079179
balbes
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Cat2

В обще вопрос стоял не о дате речь идёт о показаниях счётчика Эл.Эн....

Спасибо за совет. Описаловку приму к сведению...
Просто в моём случае задача стоит не большая на мой взгляд. Да и сроки поджимают, поэтому делаю в paradox т.к. с SQL знаком по стольку по скольку в дальнейшем собираюсь базу на него переводить..

Еще раз спасибо (коллега если правильно понял)....
...
Рейтинг: 0 / 0
Знач. кон=Знач. нач.
    #32079181
balbes
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Cat2

Очень замечательно все получилось даже самому понравилось. Радуюсь как ребёнок.

К стати о датах. Я тут над твоим предложением подумал. Мне необходимы обе даты и начало и конец периода т.к. существует норма потребления для льготников месячная или годовая и чтобы её пришпондорить к определенному периоду оплаты я считаю дневную и умножаю на количество дней периода оплаты.... вот. А нет конечной даты => нет периода оплаты => нет нормы....
Если что-то есть по этой теме пиши можешь на Асю 167878498.
...
Рейтинг: 0 / 0
Знач. кон=Знач. нач.
    #32079189
Фотография Cat2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Чё получилось то, поделись. Мне тоже интересно. Деление отработало?
=====================
Разумеется, мы коллеги. БДП - баз данных программисты ( DBP - Date Base Programmer). Вот. Только что придумал. Счас закину в ПРОСТО ТРЕП.
=====================
Моя "электрическая база" - мелкий эпизод из жизни джентльмена. "
=====================
Ты бы разъяснил задачу. Мое глубокое убеждение, что не существует общих решений, но конкретная проблема всегда решается.
=====================
Аски у меня нет, но в профиле есть мое мыло.
Хотя, я думаю, что наш диалог будет интересен многим. Так что давай здесь разбираться.
==========
Оба-на. Одна банка осталась. Но выпью я ее с удовольствием.
...
Рейтинг: 0 / 0
Знач. кон=Знач. нач.
    #32079191
Фотография Cat2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот что значит много пива...
Получилось, это BeforInsert-AfterInsert?
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Знач. кон=Знач. нач.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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