Error adding ICS code in Item general

Hi,
In particular company it's not allowing to add ICS code to an item in item general. It's giving error i have attached. But the same code is working for other comapany. I have shared the code also.
select tcibd006.*
from tcibd006
where tcibd006.type = tccitt.type.general
as set with 1 rows
selectdo
select tcibd004.*
from tcibd004 for update
where tcibd004._index1 = {:tcibd006.citt, "", :tcibd001.item}
selectdo
if not isspace(tcibd001.dscc) then
tcibd004.aitc = tcibd001.dscc
db.update(ttcibd004, db.retry)
else
db.delete(ttcibd004, db.retry)
endif
selectempty
tcibd004.citt = tcibd006.citt
tcibd004.bpid = ""
tcibd004.item = tcibd001.item
tcibd004.aitc = tcibd001.dscc

db.insert(ttcibd004, db.skip.dupl)

endselect
endselect

Can anyone please why it's not allowing to save for particular company

Attached Images

Error.png (17.1 KB)