MTA010OK

Modulo: SIGAFAT  ·  Rotina: MATA010  ·  Momento: TudoOK — antes de gravar SB1

Parametros (PARAMIXB)

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

Retorno esperado

.T. = permite gravar; .F. = bloqueia

Exemplo

User Function MTA010OK()
    Local lRet := .T.

    // Codigo de produto deve seguir padrao XX-NNNNNN
    If !(SubStr(M->B1_COD,3,1) == "-")
        Help(" ", 1, "B1_COD", , "Codigo fora do padrao XX-NNNNNN", 1, 0)
        lRet := .F.
    EndIf
Return lRet

Pegadinhas

• Use Help() com retorno .F. pra mensagem padronizada.
• Em alteracao, M-> tem valores novos, SB1-> tem valores antigos.

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

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

• SB1 — produto (geralmente posicionada quando PE dispara)
• Relacionadas: SBM

Veja tambem

• MTA030PCRM
• MTA070OK