
Permitir a alteração de itens com níveis diferentes do nivel de abertura indicado.
SET LEVELERR ON | off
Se um item tem nível de gravação superior ao informado na abertura do banco, seu valor é ignorado e os demais são alterados não dando o erro 219 (PALAVRA DE NIVEL NAO PERMITE GRAVACAO DO ITEM) nos comandos INSERT, CHANGE ou MODIFY.
Seja o banco PU assim definido:
BANCO PU 1
NIVEIS: 01 PROG
05 GERE
15 SUPER
NOME: COISA R
COD(0) N03
NOM U10
VALO N8,2 (05,15)
Neste programa exemplo não dá erro 219 e VALO não é atualizado:
PROG
DATABASE PU 1 PROG 2 && aberto com nível PROG
USE COISA
LOCATE
NOM="ANA"
VALO=100.00
SET LEVELERR OFF
REPLACE NOM, VALO
MODIFY
IF DBERR()#0 && não dá erro 219 e não atualiza VALO
@ 20,10 SAY DBMENS()
ENDIF
DATABASE, INSERT, CHANGE, MODIFY e DBMENS( ).
