UPC NO PD4050

Boa tarde gente!
Fiz uma UPC de validação pra não cadastrar um mesmo código de cliente
Coloquei esse código eu preciso que quando der tab pule esse campo nr-pedrep
Obrigado.



/***********************************************************************
** Programa...: upc-pd4050a.p
** Descrição..: Upc para menssagem de erro no pd4050a
** Data.......: Junho/2012
************************************************************************/
define new global shared variable wgh-nome-abrev as widget-handle no-undo.
define new global shared variable wgh-nr-pedcli as widget-handle no-undo.
define new global shared variable wgh-nr-pedrep as widget-handle no-undo.

def input parameter evento as char no-undo.

case evento:
when "LEAVE" then do:
if valid-handle(wgh-nr-pedrep) then do:
if trim(wgh-nr-pedrep:screen-value) = "" then do:
for last ped-venda no-lock
where trim(ped-venda.nr-pedrep) = trim(wgh-nr-pedrep:screen-value):
end.
end.
else do:
for last ped-venda no-lock
where trim(ped-venda.nr-pedrep) = trim(wgh-nr-pedrep:screen-value):

run message.p (input "Pedido Repres. " + trim(wgh-nr-pedrep:screen-value) + " Já Cadastrado",
input "Pedido Repres. " + trim(wgh-nr-pedrep:screen-value) + " Já foi Cadastrado em outro pedido. " +
"Cliente: " + ped-venda.nome-abrev + " Pedido Cliente: " + ped-venda.nr-pedcli).
return no-apply.
end.
end.
end.
end.
end.