Ошибка Rlock()/SKIP

Форум » LetoDB, HbNetio. » Ошибка Rlock()/SKIP » Ответить

Ошибка Rlock()/SKIP

nbatocanin: Пожалуйста, попробуйте следующую программу: [pre2]REQUEST LETO PROC Main LOCAL TB, Ch LOCAL cPath cPath := "//192.168.99.10:2807/xApp" Leto_Connect (cPath) RddSetDefault ("LETO") USE (cPath + "/Artikli") SHARED NEW CLS TB := TBrowseDB (0,0,24,79) TB:addColumn (TBColumnNew ("CODE", {|| a_sif })) WHILE .T. TB:ForceStable() Ch := Inkey(0) IF Ch == 27 EXIT ELSEIF Ch == 13 IF RLock() Artikli->a_sif := "003" SKIP // <---- ERROR! SKIP -1 DBUnlock() TB:refreshAll() END IF END IF END DO CLOSE ALL RETURN [/pre2] Если нажать Enter в *два раза*, получим: Error LETO/1020 Data type error Called from DBSKIP(0) Called from MAIN(29) При использовании драйвера DBF, все работает без ошибок. Я не знаю, какова роль TBrowse, но без него все работает. Ненад

Ответов - 0

полная версия страницы