ReSQL.ru
     
powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Запись даты при старте таблицы(все таже 2.6 лиса)
37 сообщений из 37, показаны все 2 страниц
  все  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999568
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Суть в том что нжно добавить дату так чтобы одноименное поле заполнилось во всех записях без добавления чистой...
...
Рейтинг: 0 / 0
21.05.2009, 15:58
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999601
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
P1rat3Суть в том что нжно добавить дату так чтобы одноименное поле заполнилось во всех записях без добавления чистой...Ничего не понял. Добавить поле с датой? И заполнить его? Чем? Одноименное с чем?
...
Рейтинг: 0 / 0
21.05.2009, 16:04
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999638
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
проходящий.P1rat3Суть в том что нжно добавить дату так чтобы одноименное поле заполнилось во всех записях без добавления чистой...Ничего не понял. Добавить поле с датой? И заполнить его? Чем? Одноименное с чем?

Ну вот вызываю заполненную таблицу, в которой есть поле d_v[какая-то да](ранее заполненное) моя задача: При вызове таблицы ввести это так чтобы во всех записях d_v которые присутсвовали в таблице заменились на ту что я ввел ранее!
...
Рейтинг: 0 / 0
21.05.2009, 16:11
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999656
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Есть поцедура

Procedure omr
parameter dob
push key clear
do zagl
select rj
if dob=1
tit='¤®Ў ў«Ґ­ЁҐ'
scatter memvar blank
set order to npp
go bottom
k=npp+1
m.npp=k
else
tit='Ё§¬Ґ­Ґ­ЁҐ'
scatter memvar
endif
define window tmp from 5,5 to 17,69 double float title tit+'. Ћв¬Ґ­ - esc';
color scheme 10 shadow
activate window tmp
@ $,$+1 say '„ в ­ :' get m.d_v
read
if lastkey ()=27
deactivate window tmp
pop key
return
endif
if DOB=1
append blank
endif
gather memvar
deactivate window tmp
pop key

я не знаю как её можно изменить под мои условия...
...
Рейтинг: 0 / 0
21.05.2009, 16:14
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999665
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
P1rat3проходящий.P1rat3Суть в том что нжно добавить дату так чтобы одноименное поле заполнилось во всех записях без добавления чистой...Ничего не понял. Добавить поле с датой? И заполнить его? Чем? Одноименное с чем?

Ну вот вызываю заполненную таблицу, в которой есть поле d_v[какая-то да](ранее заполненное) моя задача: При вызове таблицы ввести это так чтобы во всех записях d_v которые присутсвовали в таблице заменились на ту что я ввел ранее!Что такое вызов таблицы? "Ввести это" - это про что? Что "это"? Куда ввести? Откуда ввести? Вы не могли изъяснятся общепринятыми терминами, а не самопридуманными? Ваши же термины никто, кроме Вас не знает, и нзнает смысла, который Вы в них вкладываете.
Попробую потелепатировать: Вам надо заполнить поле таблицы датой, которую Вы вводите в текстбокс?
...
Рейтинг: 0 / 0
21.05.2009, 16:16
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999677
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
P1rat3Есть поцедура
....
я не знаю как её можно изменить под мои условия...Хм, Ваша процедура добавляет запись. А при чем тут замена поля во всх записях?
...
Рейтинг: 0 / 0
21.05.2009, 16:19
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999679
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
я работаю в досовском фоксе, все что нужно это заменить дату которую я введу во всех записях таблицы до начала её просмотра!
...
Рейтинг: 0 / 0
21.05.2009, 16:19
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999685
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
проходящий.P1rat3Есть поцедура
....
я не знаю как её можно изменить под мои условия...Хм, Ваша процедура добавляет запись. А при чем тут замена поля во всх записях?

вот я и незнаю как мне эту процедуру преобразовать так, чтобы не добавлялось поле, а введенная дата заменяла это поле в старых записях
...
Рейтинг: 0 / 0
21.05.2009, 16:21
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999733
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Вот разумное объяснение наверно
...
Рейтинг: 0 / 0
21.05.2009, 16:29
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999747
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
P1rat3я работаю в досовском фоксе, все что нужно это заменить дату которую я введу во всех записях таблицы до начала её просмотра!Предложить пока можно такое: вместо строк
Код: plaintext
1.
2.
3.
if DOB= 1 
append blank
endif
gather memvar
написать
Код: plaintext
replace d_v with m,d_v all
...
Рейтинг: 0 / 0
21.05.2009, 16:32
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999802
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Благодарю!! но проблемка другая теперь... он заменяет одну запись а не все...
...
Рейтинг: 0 / 0
21.05.2009, 16:43
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999830
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
P1rat3Благодарю!! но проблемка другая теперь... он заменяет одну запись а не все...
а так? :)
Код: plaintext
replace d_v with m.d_v all
...
Рейтинг: 0 / 0
21.05.2009, 16:48
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999865
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
проходящий.P1rat3Благодарю!! но проблемка другая теперь... он заменяет одну запись а не все...
а так? :)
Код: plaintext
replace d_v with m.d_v all


Я и писал с точкой) но одну запись изменяет а другие нет... или оформить цикл?
...
Рейтинг: 0 / 0
21.05.2009, 16:54
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999946
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
P1rat3проходящий.P1rat3Благодарю!! но проблемка другая теперь... он заменяет одну запись а не все...
а так? :)
Код: plaintext
replace d_v with m.d_v all


Я и писал с точкой) но одну запись изменяет а другие нет... или оформить цикл?Какой цикл? А all для чего? Или что-то не видишь/не договориваешь/не понимаешь?
...
Рейтинг: 0 / 0
21.05.2009, 17:07
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999969
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
все я договариваю он заменяет лишь первое поле и не более, эфект один что при прописи ALL что без него...
...
Рейтинг: 0 / 0
21.05.2009, 17:11
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #35999986
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
P1rat3все я договариваю он заменяет лишь первое поле и не более, эфект один что при прописи ALL что без него...Такого не может быть! Точка. Читайте хелп. Точка. И ищите причину. Например, Вы в нужной рабочей области запускаете команду? Есть еще открытые таблицы? Они связаны? Если да, то как?
...
Рейтинг: 0 / 0
21.05.2009, 17:13
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36000411
alextashk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alextashk
Участник
Может быть, так

Код: plaintext
1.
2.
3.
SELECT table
SET FILTER TO
replace d_v with m.d_v all
...
Рейтинг: 0 / 0
21.05.2009, 20:10
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003404
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
d=0 * переменная

*-------тело процедуры------------select rj
tit='Введите дату'
scatter memvar
define window tmp from 7,40 to 11,64 double float title tit color scheme 10 shadow
activate window tmp
@ $,$+1 say 'Дата:' get m.d
read
if lastkey ()=27
deactivate window tmp
pop key
return
endif
do while not eof()
replace d_v with ctod(m.d)
enddo
gather memvar
deactivate window tmp
*----------------------

Как избавиться от ошибки
я попробовал то что знаю но не помогает(
...
Рейтинг: 0 / 0
23.05.2009, 15:48
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003426
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dag
Участник
А может проверить в какой области идет работа? Хотя бы так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
d= 0  * переменная

*-------тело процедуры------------select rj
tit='Введите дату'
scatter memvar
define window tmp from  7 , 40  to  11 , 64  double float title tit color scheme  10  shadow
activate window tmp
@ $,$+ 1  say 'Дата:' get m.d
read
if lastkey ()= 27 
deactivate window tmp
pop key
return
endif

* проверка области 
wait wind alias()

do while not eof()
replace d_v with ctod(m.d)
enddo
gather memvar
deactivate window tmp
*----------------------
...
Рейтинг: 0 / 0
23.05.2009, 16:20
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003429
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
...
Рейтинг: 0 / 0
23.05.2009, 16:26
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003439
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dag
Участник
А как называется таблица в которой Вы хотите изменить значения ? RJ ?
...
Рейтинг: 0 / 0
23.05.2009, 16:36
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003447
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Dag,

Да RJ!
Как я думаю выше написаной уже прочитано вами, следовательно я добился вот такого изменения, но я всеже не могу заменить все поля при вводе в то окошко которое на рисунке
сделав цикл и создав переменную я вот с такой проблемой столкнулся... павильно не правильно сделал, я незнаю но по циклу записи должны меняться... был бы очень признателен если бы вы помогли справиться с этой ошибкой!
...
Рейтинг: 0 / 0
23.05.2009, 16:51
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003476
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dag
Участник
А почему в цикле Вы стартуете с текущей записи-может начинать с начала таблицы?

Код: plaintext
1.
2.
3.
4.
go top
do while not eof()
replace d_v with ctod(m.d)
enddo

Хотя, replace должен отработать не хуже.

Код: plaintext
1.
replace all d_v with ctod(m.d) in RJ
...
Рейтинг: 0 / 0
23.05.2009, 17:24
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003484
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Dag
Хотя, replace должен отработать не хуже.


Через replace пробовал но он заменяет лишь первую запись... а нужно заменить все поля d_v полем d в таблице...
...
Рейтинг: 0 / 0
23.05.2009, 17:33
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003488
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Dag
Код: plaintext
1.
replace all d_v with ctod(m.d) in RJ


Реплейс не отра батывает...
1. если прописывать in RJ то выводит ошибку о неправильной команде
2. если без него таже самая ошибка что и при исп цикла
...
Рейтинг: 0 / 0
23.05.2009, 17:39
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003498
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dag
Участник
Кстати, SKIP то забыли - без него вообще бесконечный цикл должен получаться
Код: plaintext
1.
2.
3.
4.
5.
go top
do while not eof()
replace d_v with ctod(m.d)
SKIP
enddo
...
Рейтинг: 0 / 0
23.05.2009, 17:58
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003501
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
P1rat3Dag
Код: plaintext
1.
replace all d_v with ctod(m.d) in RJ


Реплейс не отра батывает...Не надо рассказывать сказки. Если он не срабатывает у Вас, то только у Вас, по причинам, чс которыми и надо разбираться.
Далее. Последовательность цифр, которую Вы тут привели на скриншоте датой не может быть ни при каком раскладе. В дате должны быть разделители, например, точки. Вот так: 12.05.2009
...
Рейтинг: 0 / 0
23.05.2009, 18:05
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003636
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
проходящий.
Реплейс не отра батывает...Не надо рассказывать сказки. Если он не срабатывает у Вас, то только у Вас, по причинам, чс которыми и надо разбираться.
Далее. Последовательность цифр, которую Вы тут привели на скриншоте датой не может быть ни при каком раскладе. В дате должны быть разделители, например, точки. Вот так: 12.05.2009[/quot]

На счет этого дата спокойно форматируется под ту что установлена в начале программы!
...
Рейтинг: 0 / 0
23.05.2009, 22:19
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36003638
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
И ещё если не верите мне попытайтесь использовать мою процедуру в своем примере!
...
Рейтинг: 0 / 0
23.05.2009, 22:23
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36004085
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
P1rat3И ещё если не верите мне попытайтесь использовать мою процедуру в своем примере!
Вы вообще-то опцию ALL в команде replace заметили? А использовали?

Сделайте тестовый пример. Не по вашей программе, а тестовый сам по себе

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
* Создаем тестовый курсор
create cursor test (f1 N)

* Создаем в нем  2  пустые строки
append blank
append blank

* заменяем значение f1 во ВСЕХ строках
replace all f1 with  10 

* смотрим, что получилось
go top
BROWSE

Этот тест можно прогнать в командном окне.
...
Рейтинг: 0 / 0
24.05.2009, 17:22
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36010050
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Не могу избавиться от ошибки всеравно даже используя replace всеравно вылетает ругаясь на ctod(m.d)
...
Рейтинг: 0 / 0
27.05.2009, 11:39
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36010313
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dag
Участник
Заряди где-нибудь перед replace
wait wind ctod(m.d)

Дату точно видишь?
...
Рейтинг: 0 / 0
27.05.2009, 12:52
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36011562
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
Dag,

Тепер он ругается на эту строчку... пишет туже ошибку что и при выполнении реплейс проблема как и раньше в ctod(m.d) только вот в чем причина неизвестно, я переменную d обьявил так d=0, при учете того что фильтрация нормально отрабатывает при этом... тоже используя ctod, но по другой системе...
...
Рейтинг: 0 / 0
27.05.2009, 17:58
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36011607
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Ну, все, что о вас думают, вам и так скажут... Поэтому опускаю вступительную часть

Если вы пользуетесь какой-то функцией, то, для начала, надо почитать описание этой функции. Функция CTOD() ожидает в качестве входного параметра переменную символьного типа. Почему-то мне кажется, что

d=0

Означает, что переменная имеет числовой тип данных. Чтобы она имела символьный тип данных надо писать так

d = ""

Кроме того, при возникновении ошибки появляется диалоговое окно, в котором есть кнопочка Help (не помню, было это уже в FPD?). Если ее нажать, то открывается статья с описанием ошибки, возможными причинами ее возникновения и примерными способами решения проблемы.

Также вам вряд ли кто поможет, если вопрос формулируется так: "программа не работает" или "ругается". Укажите дословно текст ошибки. Какими словами ругается?
...
Рейтинг: 0 / 0
27.05.2009, 18:12
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36012235
GermanGM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GermanGM
Участник
P1rat3,
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
m.d={} * переменная

*-------тело процедуры------------select rj
define window tmp from  7 , 40  to  11 , 64  double float title 'Введите дату' color scheme  10  shadow
activate window tmp
@ $,$+ 1  say 'Дата: ' get m.d picture '@D'
read modal
deactivate window tmp
release window tmp
if lastkey ()= 27 
pop key
return
endif
if alias()<>'RJ'
 select RJ
endif
replace ALL d_v with m.d
...
Рейтинг: 0 / 0
28.05.2009, 06:37
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36012240
GermanGM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GermanGM
Участник
(блин, не всю шелуху убрал...)

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
m.d={}
define window tmp from  7 , 40  to  11 , 62  double float title 'Введите дату' color scheme  10  shadow
activate window tmp
@  1 , 2  say 'Дата: ' get m.d picture '@D'
read modal
deactivate window tmp
release window tmp
if lastkey ()= 27 
pop key
return
endif
if alias()<>'RJ'
 select RJ
endif
replace ALL d_v with m.d
...
Рейтинг: 0 / 0
28.05.2009, 06:45
| Ответить | Цитировать | Написать  
Запись даты при старте таблицы(все таже 2.6 лиса)
    #36013934
P1rat3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P1rat3
Гость
GermanGM,

Большое спасибо
...
Рейтинг: 0 / 0
28.05.2009, 17:01
| Ответить | Цитировать | Написать  
37 сообщений из 37, показаны все 2 страниц
  все  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Запись даты при старте таблицы(все таже 2.6 лиса)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?all=1&fid=41&tid=1586394]:
 0ms
get settings:
 12ms
get forum list:
 16ms
check forum access:
 5ms
check topic access:
 5ms
track hit:
 50ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 65ms
get tp. blocked users:
 1ms
others: 12ms
total:  178ms
созд. / загр.: 178ms
x
x
Закрыть


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