ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Как объявить переменные через запятую, а затем сразу все инициализировать?
22 сообщений из 22, страница 1 из 1
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339356
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
Привет. Слышал про LOCAL и STORE, но с ними не работает - компилируется нормально, но переменные "не видятся". Например, такая конструкция не работает:
Код: plaintext
1.
LOCAL a,a1,a2,a3,a4
STORE  0  TO a,1a1,a2,a3,a4
...
Рейтинг: 0 / 0
30.11.2009, 16:14
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339361
gotko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gotko
Гость
донМахито,

а где переменная 1a1 ?
это очепятка?

или смотри область видимости переменных...
...
Рейтинг: 0 / 0
30.11.2009, 16:17
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339366
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
донМахитоПривет. Слышал про LOCAL и STORE, но с ними не работает - компилируется нормально, но переменные "не видятся". Например, такая конструкция не работает:
Код: plaintext
1.
LOCAL a,a1,a2,a3,a4
STORE  0  TO a,1a1,a2,a3,a4
Себя, как обычно, считаем безгрешным? Откуда взялась переменная с именем, начинающемся на цифру? Или ругань на синтаксическую ошибку дают только лохам ибо настоящие джедаи ее не читают?
...
Рейтинг: 0 / 0
30.11.2009, 16:20
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339374
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
проходящий.Себя, как обычно, считаем безгрешным?
Неа, gotko прав - опечатка.
...
Рейтинг: 0 / 0
30.11.2009, 16:23
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339391
Станислав C.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Станислав C.
Участник
донМахитоПривет. Слышал про LOCAL и STORE, но с ними не работает - компилируется нормально, но переменные "не видятся". Например, такая конструкция не работает:
Код: plaintext
1.
LOCAL a,a1,a2,a3,a4
STORE  0  TO a,1a1,a2,a3,a4

А как это проверялось?
Мой код:
Код: plaintext
1.
2.
3.
4.
5.
LOCAL a,a1,a2,a3,a4
? a,a1,a2,a3,a4
STORE  0  TO a,1a1,a2,a3,a4
? a,a1,a2,a3,a4
return
показывает именно то, что ожидалось: пять .F. в первом случае и пять 0 во втором...
...
Рейтинг: 0 / 0
30.11.2009, 16:30
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339396
Станислав C.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Станислав C.
Участник
Станислав C.,

Эх, черт побери, этот копи-паст... :-) Ту же ошибку перекопировал в свой код... :-)
правильный код:
Код: plaintext
1.
2.
3.
4.
5.
LOCAL a,a1,a2,a3,a4
? a,a1,a2,a3,a4
STORE  0  TO a,a1,a2,a3,a4
? a,a1,a2,a3,a4
return
...
Рейтинг: 0 / 0
30.11.2009, 16:32
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339420
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GoshaS
Участник
Т.е. вот так у вас не работает?
Код: plaintext
1.
2.
3.
LOCAL a1,a2,a3,a4
STORE  0  TO a1,a2,a3,a4
? a1+a2+a3+a4
Может проблема с областю видимиости?
http://www.sql.ru/forum/actualthread.aspx?tid=474634
...
Рейтинг: 0 / 0
30.11.2009, 16:40
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339434
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
Станислав C.
А как это проверялось?

Для отчета: вывод количества сотрудников по разным условиям; все условия в функции; возвращает количество. Условий много - соответственно и количеств. Пример:
Код: plaintext
1.
2.
3.
4.
5.
DocAll= 0  &&Количество врачей
DocM= 0 

SCAN
DocAll=DocAll+BaseCount("В"," ", 0 , 0 )&&все врачи: муж. и жен. любого возраста
ENDSCAN
Как видно из аргументов, количеств много (5 возрастных групп). Если все в столбик перечислять - не удобно. В таком варианте переменная работает и выводит что нужно (вывод в эксел). При следующем варианте не выводится ничего:
Код: plaintext
1.
2.
3.
4.
5.
LOCAL DocAll, DocM
STORE  0  TO DocAll, DocM
SCAN
DocAll=DocAll+BaseCount("В"," ", 0 , 0 )&&все врачи: муж. и жен. любого возраста
DocM=DocM+BaseCount("В","М", 0 , 0 )
ENDSCAN
...
Рейтинг: 0 / 0
30.11.2009, 16:45
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339440
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GoshaS
Участник
BaseCount() ?
...
Рейтинг: 0 / 0
30.11.2009, 16:48
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339452
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
GoshaS,
что?
...
Рейтинг: 0 / 0
30.11.2009, 16:52
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339454
gotko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gotko
Гость
донМахито,

а если так :

LOCAL DocAll, DocM
STORE 0 TO DocAll, DocM
SCAN
m. DocAll= m. DocAll+BaseCount("В"," ",0,0)&&все врачи: муж. и жен. любого возраста
m. DocM= m. DocM+BaseCount("В","М",0,0)
ENDSCAN
...
Рейтинг: 0 / 0
30.11.2009, 16:54
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339469
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GoshaS
Участник
У меня есть только три предположения:
1. Область видимости переменных памяти
2. Есть поля, с такими-же именами, что и у переменных
3. Неправильно отрабатывает самописная функция BaseCount().
...
Рейтинг: 0 / 0
30.11.2009, 16:59
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339472
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
gotko, неа, так не работает. Вот без local-store и с m - работает. Что это за буква?
...
Рейтинг: 0 / 0
30.11.2009, 17:00
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339478
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
GoshaS
3. Неправильно отрабатывает самописная функция BaseCount().
Алгоритм верный, возврат есть - гонял одну ее с разными аргументами.
2. Полей таких больше нет, может только служебные:)
1. Про область видимости ничего не знаю (ссылку читал, но ничего не понял)
...
Рейтинг: 0 / 0
30.11.2009, 17:05
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339504
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
донМахитоgotko, неа, так не работает. Вот без local-store и с m - работает. Что это за буква?Так у Вас, наверняка, еще есть и поля таблиц/курсоров с такими именами? И преффикс m. как раз и говорит фоксу не обращать внимание на поля и искать имя среди переменных. И local с Store тут совершенно не при чем.
...
Рейтинг: 0 / 0
30.11.2009, 17:19
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339522
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
проходящий.,
Вытягиваемые поля после Select? вытягиваю немного полей, и ни одно не начинается с Doc*. Для проверки заменил DocAll на Doctor - "не видит".
...
Рейтинг: 0 / 0
30.11.2009, 17:29
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339546
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
донМахито,

Код: plaintext
1.
LOCAL a,a1,a2,a3,a4
STORE  0  TO a,a1,a2,a3,a4
у всех работают. Если у Вас ПОСЛЕ этого где-то что-то не работает, то эти две команды не при чем.
...
Рейтинг: 0 / 0
30.11.2009, 17:38
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339567
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
Оказалось: среди комментариев нашел повторное определение DocAll. Просто в loca было несколько переменных, а не увиделись все. Может фокс увидел первой DocAll или отрубил все следующие.. Затем, удалил дублирующее определение, оставил только в local - опять не увидилось. Заменил local на public - стал видеть.
...
Рейтинг: 0 / 0
30.11.2009, 17:51
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339640
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GoshaS
Участник
Не лучшее решение проблемы - объявлять глобальные переменные.
...
Рейтинг: 0 / 0
30.11.2009, 18:29
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36339647
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
донМахитоЗаменил local на public - стал видеть.Что доказывает наличие непоняток с областью действия переменных. Убрали последствия не найдя причины. Вылезет боком еще где-нибудь, но искать будет еще сложнее.
...
Рейтинг: 0 / 0
30.11.2009, 18:37
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36340314
донМахито
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
донМахито
Гость
проходящий.,
где тогда искать ошибку? В коде, где функция вызывается, в функции или у фокса настройки какие-нибудь есть?
...
Рейтинг: 0 / 0
01.12.2009, 09:51
| Ответить | Цитировать | Написать  
Как объявить переменные через запятую, а затем сразу все инициализировать?
    #36340327
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
донМахитопроходящий.,
где тогда искать ошибку? В коде, где функция вызывается, в функции или у фокса настройки какие-нибудь есть?В коде после инициализации. Искать строку, при выполнении которой переменные теряются.
...
Рейтинг: 0 / 0
01.12.2009, 09:57
| Ответить | Цитировать | Написать  
22 сообщений из 22, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Как объявить переменные через запятую, а затем сразу все инициализировать?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=36339504&tid=1585823]:
 0ms
get settings:
 12ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 41ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 1ms
others: 339ms
total:  483ms
созд. / загр.: 483ms
x
x
Закрыть


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