Cross Segmentos - Backoffice Protheus - SIGAFAT - Ponto de entrada FTQTDMIN

Tempo aproximado para leitura: 00:01:30 min

Dúvida
Como usar o ponto de entrada FTQTDMIN com exemplos?

Ambiente
Cross Segmentos - Backoffice Protheus - SIGAFAT - Todas as versões

Solução
Este ponto de entrada está dentro da função FtVldQtVen() - FATXFUN, que verifica se a quantidade que se está vendendo de um produto é a do seu lote mínimo.

Esta função exibe um aviso quando a quantidade vendida difere do lote mínimo e não permite a venda do produto. Este ponto de entrada passa essa decisão ao usuário invés da decisão do produto padrão.

Exemplo simples:

#INCLUDE 'TOTVS.CH'
#INCLUDE 'PRTOPDEF.CH'

User Function FTQTDMIN()
    // .T. - Permite a venda
    // .T. - Não permite a venda
    Local lRet := .F.

    If 2 > 1       // Validação customizada (implementar a desejada)
        lRet := .T.
    ElseIf 10 > 9  // Validação customizada
        lRet := .T.
    EndIf
 
    Alert("Fim do ponto de entrada FTQTDMIN")
Return lRet

Saiba mais:

FTQTDMIN - Verifica quantidade de produto