Perguntas Ponto de entrada front loja

Boa tarde!
Fiz a seguinte validação para não aceitar outra condição de pagamento para cliente padrão q não seja a 001 (venda a vista):

User Function LJ7001()
Local lRet := .T.
If ParamIXB[1] == 1 // se for orcamento
If M->LQ_CONDPG<>"001" .and. M->LQ_CLIENTE = '000001'
Aviso("Atenção","Escolha a condição de pagamento correta para o Cliente Padrão",{"Ok"})
lRet := .F.
EndIf
EndIf
Return (lRet)

Funcionou, porém precisava dessa validação no front, pois la pode ser alterado a condição de pagamento, mas n encontrei um ponto de entrada pra fazer isso.
Alguém poderia me ajudar?

Procurei no tdn, em fóruns e tals e não encontrei um pe que se encaixa essa validação. Será q não tem jeito?

Pelo q vi, acredito q não. Pq ainda é no venda assistida, precisava q fosse no front, depois q importa o orçamento antes de finaliza-lo e imprimir o cupom. Aqui é paf ecf, os orçamentos são importados pro front para aí sim finalizar a venda. Esse q fiz deu certo no venda assistida, porém qnd é importado para o front o usuario pode mudar e é isso q não deveria acontecer.

Fiz o teste e não deu certo no front, somente no venda assistida.