Добрый день.
БЭСТ5 3.3 SP 37
вот такой фрагмент кода работал:
......
if mkart->(ordnumber("US_1"))==0
mkart->(ORDCONDSET(".NOT.DELETED().AND..NOT.EMPTY(NNUM).AND..NOT.EMPTY(PARTIA)",,NIL,,,1,RECNO(),,,.T.,,.F.,,.T., .F., .F., .T., .F., .F.))
mkart->(ordcreate("mkart","US_1","UPPER(SCLAD+GRUP+NNUM+DTOS(DATEPART))+PARTIA"))
mkart->(ordsetfocus("US_1"))
mkart->(dbgotop())
endif
......
Сейчас в БЭСТ5 3.3 sp 40
этот же фрагмент кода не работает.
Похоже не отрабатывает либо ordcondset(), либо ordcreate().
Как быть?
Волгоград.Инфософт пишет:
Добрый день.
БЭСТ5 3.3 SP 37
вот такой фрагмент кода работал:
......
if mkart->(ordnumber("US_1"))==0
mkart->(ORDCONDSET(".NOT.DELETED().AND..NOT.EMPTY(NNUM).AND..NOT.EMPTY(PARTIA)",,NIL,,,1,RECNO(),,,.T.,,.F.,,.T., .F., .F., .T., .F., .F.))
mkart->(ordcreate("mkart","US_1","UPPER(SCLAD+GRUP+NNUM+DTOS(DATEPART))+PARTIA"))
mkart->(ordsetfocus("US_1"))
mkart->(dbgotop())
endif
......
Сейчас в БЭСТ5 3.3 sp 40
этот же фрагмент кода не работает.
Похоже не отрабатывает либо ordcondset(), либо ordcreate().
Как быть?
Индекс не появляется.
Аналогичный код работает в функции запускаемой в прайс-листе торгового зала. Там все работает.
При попытке запуска этого кода из номенклатурного справочника Товоров.Готовая продукция индекс не создается.
Волгоград.Инфософт пишет:
Индекс не появляется.
Аналогичный код работает в функции запускаемой в прайс-листе торгового зала. Там все работает.
При попытке запуска этого кода из номенклатурного справочника Товоров.Готовая продукция индекс не создается.
Как идет запуск, на какое событие?
Выполнил я этот код по требованию (по Ctrl-F5) в номенклатурном справочнике: индекс создался.
Поподробнее пожалуйста: что надо сделать, чтобы выйти на эту ошибку?
Вот маленькая тестовая программа.
Запускается по Ctrl+F5 из номенклатурного справочника Товары.Готовая продукция
Должна по идее создавать индекс,но не создает.
Private aSet
aSet:={}
aSet:=SaveSet()
mkart->(dbgotop())
if mkart->(ordnumber("US_99"))==0
mkart->(ORDCONDSET(".NOT.DELETED().AND..NOT.EMPTY(NNUM)",,NIL,,,1,RECNO(),,,.T.,,.F.,,.T., .F., .F., .T., .F., .F.))
mkart->(ordcreate("mkart","US_99","UPPER(SCLAD+GRUP+NNUM+DTOS(DATEPART)+PARTIA"))
mkart->(ordsetfocus("US_99"))
mkart->(dbgotop())
endif
RestSet(aSet)
Волгоград.Инфософт пишет:
Вот маленькая тестовая программа.
Запускается по Ctrl+F5 из номенклатурного справочника Товары.Готовая продукция
Должна по идее создавать индекс,но не создает.
Private aSet
aSet:={}
aSet:=SaveSet()
mkart->(dbgotop())
if mkart->(ordnumber("US_99"))==0
mkart->(ORDCONDSET(".NOT.DELETED().AND..NOT.EMPTY(NNUM)",,NIL,,,1,RECNO(),,,.T.,,.F.,,.T., .F., .F., .T., .F., .F.))
А если без ошибок написать предложение
mkart->(ordcreate("mkart","US_99","UPPER(SCLAD+GRUP+NNUM+DTOS(DATEPART)+PARTIA"))
???
Хотя бы так:
mkart->(ordcreate("mkart","US_99","UPPER(SCLAD+GRUP+NNUM+DTOS(DATEPART)+PARTIA)"))