powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вывод остатков из 2-х таблиц
4 сообщений из 4, страница 1 из 1
Вывод остатков из 2-х таблиц
    #34783729
@rs3tev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Привет всем!Вообщем вопрос в следующем: Есть 2 таблицы приход(receipts) и расход(consumpt). Так вот из них необходимо вывести остаток по количеству(quantity).Все вроде как надо работает , но вот только появилась одна проблемка, оказалось что есть одинаковые строки в расходе, так вот как можно их просуммировать. Код приведен ниже.Спасибо за ранее.

clea all
use locf([receipts]) in 0 orde code_k
use locf([consumpt]) in 0 orde code_k

sele receipts
go top
sele consumpt
go top
scan
mkey = str(receipts.code_k,4,0)+[ ] + str(code_cl,2,0)
if seek(mkey,[receipts]) = .f.
wait window str(recno())
else
repla receipts.ostatok with receipts.quantity - consumpt.quantity
endif
endscan
...
Рейтинг: 0 / 0
Вывод остатков из 2-х таблиц
    #34783826
Фотография Сидоров Сидор Сидорович
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
@rs3tevПривет всем!Вообщем вопрос в следующем: Есть 2 таблицы приход(receipts) и расход(consumpt). Так вот из них необходимо вывести остаток по количеству(quantity).Все вроде как надо работает , но вот только появилась одна проблемка, оказалось что есть одинаковые строки в расходе, так вот как можно их просуммировать. Код приведен ниже.Спасибо за ранее.

clea all
use locf([receipts]) in 0 orde code_k
use locf([consumpt]) in 0 orde code_k

sele receipts
go top
sele consumpt
go top
scan
mkey = str(receipts.code_k,4,0)+[ ] + str(code_cl,2,0)
if seek(mkey,[receipts]) = .f.
wait window str(recno())
else
repla receipts.ostatok with receipts.quantity - consumpt.quantity
endif
endscan
Андрюха, кончай фигнёй маятся, я же тебе уже сказал как.
...
Рейтинг: 0 / 0
Вывод остатков из 2-х таблиц
    #34784260
MiklS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Не знаю кто писАл эту прогу?!!! Но сам черт в ней ногу сломит... Какие одинаковые записи в таблице расходов? Программа записывает один и тот же расход дважды? Или всётаки есть различия хотя бы по дате, по кол-ву? Понятно что code_cl , будет одинаковым для нескольких записей. Но за какой переод Вы делаете расчет? Судя по коду - Вы еще хлебанёте с ней горя...
Обычно должно быть ещё пара таблиц... Ну на худой конец справочник товаров... именно в ней можно иметь поле ostatok. Но чтобы остаток записывался в приходе... это нонсес. Ведь приходов одного наименования товара может быть сотни, в какой записи из этой сотни искать остаток?
...
Рейтинг: 0 / 0
Вывод остатков из 2-х таблиц
    #34788592
DeoniS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Все можно сделать проще:
Prihod (tovar, quantity, date), Rashod (tovar, quantity, date)

select tovar, sum(quantity), date from
(
select tovar, quantity, date from prihod where between(date,{^2007-01-01},{^2007-01-10})
union all
select tovar, -quantity, date from prihod where between(date,{^2007-01-01},{^2007-01-10})
) t
group by tovar, date
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вывод остатков из 2-х таблиц
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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