Проблемы с памятью в VFP / FoxPro, Visual FoxPro

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Проблемы с памятью в VFP

3 сообщений из 28, страница 2 из 2

все

Проблемы с памятью в VFP

#35740610

ВладимирМ

Участник

Откуда: г. Москва

Сообщения: 7 937

Рейтинг: 0 / 0

Приведите код вашей функции FirstSup()

...

Рейтинг:

0 / 0

29.12.2008, 20:38

| Ответить | Цитировать | Написать

Проблемы с памятью в VFP

#35740927

_Tania_

Гость

PROC FirstSup
PARAMETERS n
PRIVATE a
SELECT MIN(fd70) FROM regi_fd WHERE fd02=n INTO ARRAY a
RETURN a[1]
ENDPROC

Функция здесь ни при чем. Запускала запрос без нее.

...

Рейтинг:

0 / 0

30.12.2008, 09:49

| Ответить | Цитировать | Написать

Проблемы с памятью в VFP

#35741565

ВладимирМ

Участник

Откуда: г. Москва

Сообщения: 7 937

Рейтинг: 0 / 0

Последовательно выполнять запрос не пробовали? Не один большой, а несколько маленьких.

Если в результирующей выборке должно быть всего несколько сот записей, то можно сначала получить эту маленькую выборку, а потом уточнять. Ну, примерно так

Код: 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.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.

* Определение минимального значения
LOCAL min70 
SELECT MIN(fd70) FROM regi_fd WHERE fd02= 47298  INTO ARRAY min70

* или через вызов функции
* min70 = FirstSup( 47298 )

* Запрос по таблице-посреднику regi_fb
select
	regi_fb.fb02,
	regi_fb.fb12,
	refi_fb.fb71
from 
	regi_fb
where 	
	regi_fb.fb02 =  47298 
into cursor res_fb

* Запрос по таблице regi_fd
select
	fd08,
	fd08,
	fd12,
	fd12,
	fd13,
	fd13,
	fd13,
	fd14,
	fd18,
	fd18,
	fd19,
	fd20,
	fd23,
	fd24,
	fd24,
	fd70
from 
	regi_fd
where 	
	regi_fd.fd02 =  47298 
into cursor res_fd


* Итоговый запрос
select
	aa01,
	fd08,
	fd08,
	fd12,
	fd12,
	fd13,
	fd13,
	fd13,
	fd14,
	fd18,
	fd18,
	fd19,
	fd20,
	fd23,
	fd24,
	fd24,
	fd70
from 
	regi_aa, 
	res_fd, 
	res_fb
where 	
	regi_aa.aa70 = res_fb.fd71
	and 
	(
		inlist(res_fb.fb12, 5 , 6 , 7 ) and res_fd.fd70 = min70[ 1 ]
		or 
		inlist(res_fb.fb12, 1 , 9 )
	)
into cursor sqlresult

Здесь проблема в том, что связь между таблицами regi_fb и regi_fd не однозначная. Т.е. не один-к-одному. И даже не много-ко-многим. А нечто среднее между много-ко-многим и декартовым произведением.

===========================================================

Возможно, может помочь менее радикальное решение, если вместо связки по полю f02 явно указать значение этого поля для обеих таблиц.

Код: 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.

* Определение минимального значения
LOCAL min70 
SELECT MIN(fd70) FROM regi_fd WHERE fd02= 47298  INTO ARRAY min70

* или через вызов функции
* min70 = FirstSup( 47298 )

select
	aa01,
	fd08,
	fd08,
	fd12,
	fd12,
	fd13,
	fd13,
	fd13,
	fd14,
	fd18,
	fd18,
	fd19,
	fd20,
	fd23,
	fd24,
	fd24,
	fd70
from 
	regi_aa, 
	regi_fd, 
	regi_fb
where 	
	regi_aa.aa70 = refi_fb.fb71

	and regi_fd.fd02 =  47298 
	and regi_fb.fb02 =  47298 

	and 
	(
		inlist(regi_fb.fb12, 5 , 6 , 7 ) and regi_fd.fd70 = min70  
		or 
		inlist(regi_fb.fb12, 1 , 9 )
	)
into cursor sqlresult

Т.е. не связь regi_fd.fd02 = regi_fb.fb02 с дополнительным фильтром по одной таблице, а прямой фильтр на обе таблицы

...

Рейтинг:

0 / 0

30.12.2008, 14:29

| Ответить | Цитировать | Написать

3 сообщений из 28, страница 2 из 2

все

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Проблемы с памятью в VFP

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=41&msg=35740610&tid=1586908]:	0ms
get settings:	9ms
get forum list:	13ms
check forum access:	3ms
check topic access:	3ms
track hit:	51ms
get topic data:	10ms
get forum data:	2ms
get page messages:	41ms
get tp. blocked users:	1ms
others:	341ms

total:	474ms