Perguntas problema no PE M460MARK

boa tarde a todos,
estou criando uma rotina que antes de faturar a nota ele verifique se o cliente esta com o cadastro bloqueado ou não.
Da forma como usei o fonte abaixo ele só funciona se no doc saída pedido eu selecionar apenas 1 pedido para faturar, se eu selecionar 2 pedidos ele não dá certo.

User Function M460MARK

Local aArea := SC5->(GetArea())

If SA1->A1_MSBLQL='1'
ALERT ("Cadastro de cliente bloqueado!")
Return .f.
Endif

RestArea(aArea)
Return .t.

Alguém?