MTA070OK

Validacao TudoOK do cadastro de TES (Tipo de Entrada/Saida). Garante CFOP, ICMS, PIS/COFINS consistentes.

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

Retorna: .T./.F.

Modulo: SIGAFIS · Rotina: MATA070 · Momento: TudoOK TES

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

TES afeta regras fiscais — validacao critica antes da gravacao.

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 MTA070OK()
    Local lOk := .T.

    // Validacao customizada
    If !ValidaCondicao()
        Help(" ", 1, "MTA070OK", , "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

SF4 — TES (geralmente posicionada quando PE dispara)