Главная
Новый форум
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

опять InitList()
Goto page Previous  1, 2, 3  Next
 
Post new topic   Reply to topic   printer-friendly view     Forum Index -> Программирование в БЭСТ-4
View previous topic :: View next topic  
Author Message
nordk



Joined: 27 Jun 2005
Posts: 1000
Location: Горбунов Константин
Occupation: БЭСТ-Партнер
Interests: СПб

PostPosted: 26 Apr 2007 17:07    Post subject: Reply with quote

Notwar wrote:

Code:
{'- наименованиям внутри групп',{'код группы: ','наименование'},{'grup','name'},'UPPER(" "+aIn[2]+aIn[4])',,,{"grupss"},"MLAB_ST"}


Где ошибка??? Говорит - переполнение массива=( я даже понимаю почему (чёт не так с 'name')


ВЫ ПУТАЕТЕ.
У Вас диалоговое окно состоит из 2-х элементов
GRUP и NAME
Значит aIn[1] - то что при поиске вводите в GRUP
aIn[2] - то что при поиске вводите в NAME
А теперь посмотрите на Вашу строку поиска
Code:
'UPPER(" "+aIn[2]+aIn[4])'

??????
Вы путаете с aHeads
Чтобы было понятно - в поиске свой aHeads
в виде массива {'grup','name'} и по нему инициализируется свой aIn
После поиска aIn[] больше нет - он не живет так долго....
Back to top
View user's profile Send private message Send e-mail
Notwar



Joined: 21 Sep 2005
Posts: 101
Location: Notwar Dan
Occupation: mlst(it)
Interests: Moscow

PostPosted: 26 Apr 2007 17:48    Post subject: Reply with quote

nordk wrote:
После поиска aIn[] больше нет - он не живет так долго....
хвот оно что... понятно, Спасибо. Есть=)
Back to top
View user's profile Send private message
Notwar



Joined: 21 Sep 2005
Posts: 101
Location: Notwar Dan
Occupation: mlst(it)
Interests: Moscow

PostPosted: 27 Apr 2007 13:25    Post subject: Reply with quote

DBPush('Mlabel',,,{'Upper(" "+Grup+NNum)','mkart->(Upper(price+Grup+NNum))'})
а здесть что не так???
initlist рисует пустое окошко =(
Back to top
View user's profile Send private message
dmitry



Joined: 03 Jan 2002
Posts: 33
Location: Орлов Д.В.
Occupation: Элипс-Опт
Interests: Москва

PostPosted: 27 Apr 2007 13:49    Post subject: Reply with quote

Notwar wrote:
DBPush('Mlabel',,,{'Upper(" "+Grup+NNum)','mkart->(Upper(price+Grup+NNum))'})
а здесть что не так???
initlist рисует пустое окошко =(

Scope в Dbpush официально не поддерживается.
Пишите Dbpush
потом setscope()
P.S. Написано кстати неправильно
'Upper(" "+Grup+NNum)'
это выражение должно соответсвовать ключу индекса
например:
'Upper(Status+Grup+NNum)'
и предварительно надо еще тэг правильный выставить


Last edited by dmitry on 27 Apr 2007 13:58; edited 1 time in total
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Notwar



Joined: 21 Sep 2005
Posts: 101
Location: Notwar Dan
Occupation: mlst(it)
Interests: Moscow

PostPosted: 27 Apr 2007 13:54    Post subject: Reply with quote

Всё равно не хочет=( По моему здесь дело не в этом...
Back to top
View user's profile Send private message
nordk



Joined: 27 Jun 2005
Posts: 1000
Location: Горбунов Константин
Occupation: БЭСТ-Партнер
Interests: СПб

PostPosted: 27 Apr 2007 13:57    Post subject: Reply with quote

А Вы отладчиком пользуетесь ?
Посмотрите в отладчике на состояние таблицы после выполнения функций и не забывайте что после скоба надо ещ курсором пошевелить DBGOTOP(), DBSEEK() или тому подобн
Back to top
View user's profile Send private message Send e-mail
Behemoth



Joined: 15 Mar 2002
Posts: 155
Location: Новиков Алексей Юрьевич
Occupation: ПБОЮЛ
Interests: Пермь

PostPosted: 27 Apr 2007 14:21    Post subject: Reply with quote

Добрый день.
Notwar wrote:
DBPush('Mlabel',,,{'Upper(" "+Grup+NNum)','mkart->(Upper(price+Grup+NNum))'})
а здесть что не так???
initlist рисует пустое окошко =(


Уберите кавычки с выражения 'mkart->(Upper(price+Grup+NNum))'.
Иначе Вы пытаетесь установить скоп не по значению выражения, а именно по этой строке.
_________________
С уважением, Новиков Алексей.
Back to top
View user's profile Send private message Send e-mail
nordk



Joined: 27 Jun 2005
Posts: 1000
Location: Горбунов Константин
Occupation: БЭСТ-Партнер
Interests: СПб

PostPosted: 27 Apr 2007 16:20    Post subject: Reply with quote

Честно говоря мне непонятен ход Вашей мысли
Сначала вы делаете
Code:
NetUse("Mkart",loadpath()+"\sclad\mkart.dbf",,.F.)
Mkart->(DBCreateIndex("C:\temp\price","upper(price+grup+nnum)"))

Дальше в Вашем тексте я не нашел ничео про mkart
и в конце вы делаете

Code:
Mlabel->(SetScope('Upper(Grup+NNum)',mkart->(Upper(Grup+NNum))))
Mlabel->(dbgotop())

Т.е. устанавливаете скоб по mkart - а на какой строке в этот момент стоит курсор в mkart ????
И чему у него в этот момент равны значения GRUP и NNUM
Взгляните в отладчике плз
Вы им пользуетесь ?
Back to top
View user's profile Send private message Send e-mail
Notwar



Joined: 21 Sep 2005
Posts: 101
Location: Notwar Dan
Occupation: mlst(it)
Interests: Moscow

PostPosted: 27 Apr 2007 16:28    Post subject: Reply with quote

пользуюсь, только как-то не очень понял, куда мне смотреть (то что F6 - понятно, а дальше... и почему-то у меня там mgrup красным горит)...

Я хочу, что бы в моём прайсе были те же позиции, что и во встроенном в БЭСТ... Просто... я пытался сначала сделать такой скоб
Quote:
Mlabel->(SetScope('Upper(" "+Grup+NNum)',mkart->(Upper(Price+Grup+NNum))))


он не заработал - я убрал "price" , так он и просто по группе+номенклатуре скоб делать не хоче
Back to top
View user's profile Send private message
nordk



Joined: 27 Jun 2005
Posts: 1000
Location: Горбунов Константин
Occupation: БЭСТ-Партнер
Interests: СПб

PostPosted: 27 Apr 2007 17:14    Post subject: Reply with quote

Красным отмечает текущий активный алиас.
КОгда жмете F6 переместитесь курсором на mkart/
Дальше через TAB переместитесь на нижнюю часть экрана
и курсором вниз и посмотрите чему значения равны
Back to top
View user's profile Send private message Send e-mail
Notwar



Joined: 21 Sep 2005
Posts: 101
Location: Notwar Dan
Occupation: mlst(it)
Interests: Moscow

PostPosted: 28 Apr 2007 14:34    Post subject: Reply with quote

а как в dbcreateindex указать параметры??? я пишу
Quote:
Mlabel->(DBCreateIndex("C:\temp\MLbl","(Upper(Grup+NNum))","(!DELETE().AND.(!EMPTY(Ocena1)))"))
он делает индексный файл с ключём по Груп+ННум, а параметры игнорирует=(
Back to top
View user's profile Send private message
Notwar



Joined: 21 Sep 2005
Posts: 101
Location: Notwar Dan
Occupation: mlst(it)
Interests: Moscow

PostPosted: 03 May 2007 15:23    Post subject: Reply with quote

Здравствуйте, уважаеме!
Хочу вернуться к этой теме...
У меня такой вопрос. Как мне в инитлист выводить только те позиции mlabel, аналоги которых в mkart->price=" " ???
Я понимаю, что мне надо делать скоб, только не понимаю как... очень хотел бы чтобы мне подсказали...
Back to top
View user's profile Send private message
Behemoth



Joined: 15 Mar 2002
Posts: 155
Location: Новиков Алексей Юрьевич
Occupation: ПБОЮЛ
Interests: Пермь

PostPosted: 03 May 2007 15:31    Post subject: Reply with quote

Добрый день.

Если Вам требуется вывести в Initlist только те записи из MLABEL, для которых существует карточка на складе, то Вам следует установить связь SET RELATION между MLABEL и MKART (возможно, по конкретному складу) и перед Initlist установить фильтр командой SET FILTER TO !MKART->(EOF())
_________________
С уважением, Новиков Алексей.
Back to top
View user's profile Send private message Send e-mail
nordk



Joined: 27 Jun 2005
Posts: 1000
Location: Горбунов Константин
Occupation: БЭСТ-Партнер
Interests: СПб

PostPosted: 04 May 2007 15:08    Post subject: Reply with quote

Ну да можно F_SETRALATION()
скоб тут ни при чем.
Но я в харборе предпочитаю использовать просто DBSEEK
Back to top
View user's profile Send private message Send e-mail
Notwar



Joined: 21 Sep 2005
Posts: 101
Location: Notwar Dan
Occupation: mlst(it)
Interests: Moscow

PostPosted: 07 May 2007 13:56    Post subject: Reply with quote

А примерчик мона???
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view     Forum Index -> Программирование в БЭСТ-4 All times are GMT + 4 Hours
Goto page Previous  1, 2, 3  Next
Page 2 of 3

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © phpBB Group

Rambler
Rambler's Top100 Рейтинг@Mail.ru