',
select v3010
case 'PREENCIMENTO_OBRIGATORIO':'Preencimento obrigatório',
case 'INVALIDTAG':'Tag: ',v32102,' Inválido.',
case 'WRTRECOK':'Registro gravado com sucesso.',
case 'EDCANCEL':'Edição cancelada.',
case 'NOCHANGE':'Edição cancelada. Nenhuma alteração registrada.',
case 'LOCK=0':'Registro gravado com sucesso.',
case 'LOCK=1':'Registro Bloqueado. (LOCK=1)',
case 'LOCK=2':'Registro Bloqueado. (LOCK=2)',
case 'LOCK=3':'Registro Bloqueado. (LOCK=3)',
case 'LOCK=4':'Registro Não Bloqueado. (LOCK=4)',
case 'LOCK=5':'Registro Bloqueado.',
case 'LOCK=6':'Registro Bloqueado. (LOCK=6)',
case 'LOCK=7':'Registro Bloqueado. (LOCK=7)',
case 'CONFDELFNT':'O documento ',left(v7000[1],45),'... será eliminado.',
case 'DELOK':'Documento eliminado.',
elsecase v3010,
endsel,
' |
')
[/pft]