ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Трудная задача
10 сообщений из 10, страница 1 из 1
Трудная задача
    #33410148
Trader
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Trader
Гость
Есть таблица со следующей структурой
id- код
dat - дата
id_share - код контракта
curs - цена контракта

Вопрос: каким образом можно выбрать последние цены по контрактам и вставить эти цены в Grid по соответствующим контрактам.
...
Рейтинг: 0 / 0
01.12.2005, 09:01
| Ответить | Цитировать | Написать  
Трудная задача
    #33410200
AlikWishin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlikWishin
Гость
Попробуй так:
Код: plaintext
1.
2.
3.
4.
5.
6.
Select <таблица_контрактов.Поле(я)_контрактов>, <таблица_цен>.Curs, Max(Dat) ;
From <таблица_контрактов>, <таблица_цен> ;
Order By ... ;
Group By ..., <таблица_цен>.Curs ;
Where <таблица_контрактов>.ID_Share == <таблица_цен>.ID_Share ;
Into Cursor <имя>

А в
Код: plaintext
Grid.RowSourse = <имя>
P.S. Как задан вопрос так написан Пример.
...
Рейтинг: 0 / 0
01.12.2005, 09:29
| Ответить | Цитировать | Написать  
Трудная задача
    #33410882
Trader
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Trader
Гость
Понятно, но как эту выборку вставить в Grid, в котором уже есть другая выборка.
Вид Grida
-------------------------------------------------------------------
Код контракта Вх.ост. куплено продано Исх.ост. Тек.Цены
1 0 1 1 0 ?
2 1 0 0 1 ?
------------------------------------------------------------------
Чтобы цены соответсвовали своим контрактам
...
Рейтинг: 0 / 0
01.12.2005, 13:11
| Ответить | Цитировать | Написать  
Трудная задача
    #33410889
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
вторую выборку копирнуть в первую и обновить грид
...
Рейтинг: 0 / 0
01.12.2005, 13:13
| Ответить | Цитировать | Написать  
Трудная задача
    #33411032
Trader
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Trader
Гость
А не подскажете код
как скопировать чтобы контракты не перепутались и соответвовали своим ценам
...
Рейтинг: 0 / 0
01.12.2005, 13:44
| Ответить | Цитировать | Написать  
Трудная задача
    #33411196
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
черз
for nn = 1 to reccount()
select ...
append blank
replace
endfor
...
Рейтинг: 0 / 0
01.12.2005, 14:18
| Ответить | Цитировать | Написать  
Трудная задача
    #33412286
Фотография FoxLamer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FoxLamer
Участник
А через промежуточный курсор не пойдет?

select * from gridcursor into cursor tmp

thisform.grid.recordsource=''
select gridcursor
use

select ..... from tmp;
union;
select ..... from xxx ; &&необходимая выборка
into cursor gridcursor

thisform.grid.recordsource='gridcursor'
...
Рейтинг: 0 / 0
01.12.2005, 19:14
| Ответить | Цитировать | Написать  
Трудная задача
    #33412879
Trader
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Trader
Гость
сделал два курсора
p_cursor - нужные цены
t_cursor - куда нужно вставить эти цены

select p_cursor
go top
for n = 1 to reccount()
select t_cursor
locat for id=p_cursor.id2
replace t_cursor .curs with iif(found(),p_cursor.curs,0)
endfor

но выдает ошибку "не могу обновить курсор"
...
Рейтинг: 0 / 0
02.12.2005, 10:06
| Ответить | Цитировать | Написать  
Трудная задача
    #33413439
Trader
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Trader
Гость
Все спасибо, особенно Недоходящему.
Решение найдено через цик For
...
Рейтинг: 0 / 0
02.12.2005, 12:39
| Ответить | Цитировать | Написать  
Трудная задача
    #33415379
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Igor Korolyov
Участник
Hi Trader!

http://forum.foxclub.ru/read.php?f=32&i=60&t=11

И не надо никаких циклов и прочей ерунды.
P.S. Задача совсем не трудная. А надоевшая уже хуже горькой редьки - т.к.
регулярно всплывает - наверное раз в месяц :( Причём в куче FAQ-ов
описанная.

Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
03.12.2005, 16:16
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Трудная задача
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=33413439&tid=1592872]:
 0ms
get settings:
 7ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 181ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 34ms
get tp. blocked users:
 1ms
others: 203ms
total:  448ms
созд. / загр.: 448ms
x
x
Закрыть


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