Hello,
I want to write an extension for table tcibd001 which updates a field txta for specific articles.
I want to use DAL to update this - however, I get an error message "Recursion not possible":
When I write this field directly without DAL it is working (bold).
What am I doing wrong?
Regards
Martin
I want to write an extension for table tcibd001 which updates a field txta for specific articles.
I want to use DAL to update this - however, I get an error message "Recursion not possible":
When I write this field directly without DAL it is working (bold).
What am I doing wrong?
Regards
Martin
Code:
select tcibd001.item
from tcibd001 for update
where tcibd001.item = :tcibd001.item
and (tcibd001.item like ".*99999-.-L.*"
or tcibd001.item like ".*99999-.-L.*")
selectdo
|tcibd001.txta = 13122
long error.found
error.found = 0
error.found = dal.change.object("tcibd001")
if error.found then
dal.set.error.message("@Cannot change tcibd001.")
return(DALHOOKERROR)
endif
dal.set.field("tcibd001.txta", 13122)
error.found = dal.save.object("tcibd001")
if error.found then
dal.set.error.message("@Cannot safe tcibd001.")
endif
endselect