LJ7VLD

Validacao na venda balcao do SIGALOJA (LOJA701). Bloqueia venda com regras custom.

Assinatura: User Function LJ7VLD() --> .T./.F.

Retorna: .T./.F.

Modulo: SIGALOJA · Rotina: LOJA701 · Momento: Validacao venda balcao

Parametros (PARAMIXB)

Este PE nao recebe parametros via PARAMIXB. A tabela alvo ja esta posicionada quando o PE dispara — opere via (ALIAS)->CAMPO.

Retorno

.T./.F.

Pegadinhas

Loja tem flow proprio — diferente de SIGAFAT.

Quando usar

Aplicar regras de negocio antes da gravacao (validacao fiscal, comercial, contratual)
Bloquear operacao em horarios especificos
Validar campos obrigatorios condicionais (só obrigatorio se X)
Verificar permissao de usuario em operacoes sensiveis

Exemplo (template)

User Function LJ7VLD()
    Local lOk := .T.

    // Validacao customizada
    If !ValidaCondicao()
        Help(" ", 1, "LJ7VLD", , "Operacao bloqueada por regra custom", 1, 0)
        lOk := .F.
    EndIf

Return lOk

Cuidados gerais

Em ExecAuto: validacoes em PE podem disparar com comportamento diferente — testar separadamente.
Mensagem de bloqueio: ao retornar .F., use Help() pra explicar o motivo. Sem Help, usuario fica confuso sem saber o que aconteceu.
Idempotencia: PEs podem disparar mais de uma vez em retry ou reprocessamento — codigo deve ser seguro pra rodar varias vezes sem efeito colateral.
Performance critica: PE roda em fluxo do usuario. Operacoes pesadas (loop sobre milhares de registros, chamada HTTP sincrona) podem travar a tela. Use StartJob pra background.
Em JOB sem AppServer ativo: PE chamado via RPC pode ter cFilAnt/cEmpAnt vazios — sempre garanta RpcSetEnv.
Begin Sequence + Recover: erros nao tratados em PE podem deixar transacao Protheus em estado inconsistente. Sempre envolver em Begin Sequence ... End Sequence.
Logging com contexto: use FwLogger com identificacao do PE no log — facilita troubleshooting.

Tabelas afetadas

SL1 — venda balcao (geralmente posicionada quando PE dispara)
Relacionadas: SL2