LJ7095 - Trava/Destrava bloqueio de processamento GravaBatch quando registro do cliente da venda com Lock

LJ7095 - Trava/Destrava bloqueio de processamento GravaBatch quando registro do cliente da venda com Lock

- Validação é realizada no GravaBatch para evitar erro de Lock, na atualização do cliente pela rotina MatxAtu(A040DupRec), para tratamento deve ser utilizado também o Ponto de Entrada F040TRVSA1.

- Quando o Ponto de Entrada F040TRVSA1 retorna .F., os campos (A1_PRICOM, A1_ULTCOM, A1_NROCOM, A1_VACUM) não serão atualizados.

- Nesse Ponto o registro do SA1 está posicionado no cliente da Venda
- O ponto de entrada será acionado antes de gravar a venda como ER, respeitando assim configurações do Job LJGRVBATCH para reprocessar venda quando lock

User Function LJ7095()
Local lRet := .T.
//SA1 posicionada no cliente da venda com Lock, permite validar dados da SA1 para continar, se retorno .T. continua a gravação da venda
Return lRet

- Ponto de Entrada F040TRVSA1 - MatxAtu(A040DupRec)
- Configuração Job LJGRVBATCH para permitir reprocessamento da venda quando cliente "lock"

Português(Brasil)

Microsiga_Protheus11

Todos

Todas

Lógico (Se .T., permite continuar a gravação com registro Lock)

lLibLock:= ExecBlock("LJ7095",.F.,.F.)

LOJXFUNC