Histórico da Página
M461SLD - Valida o Saldo de Produtos de Lote/Endereço
Características do Requisito
Linha de Produto: | Microsiga Protheus® | ||||
Segmento: | Serviços | ||||
Módulo: | Faturamento - SIGAFAT | ||||
Rotina: |
| ||||
País(es): | Brasil - BRA | ||||
Banco(s) de Dados: | Todos | ||||
Sistema(s) Operacional(is): | Todos | ||||
Versão: | Protheus 12 |
Ponto de Entrada
Descrição: | A finalidade do ponto de entrada M461SLD é validar o saldo dos produtos que controlam lote/endereço no momento da preparação do documento de saída para permitir ou não que seja faturado um item com saldo indisponível em estoque. | ||||||||
Localização: | Atualizações/Faturamento/Documento de Saída | ||||||||
Eventos: | M461SLD( Nil ) --> lRet | ||||||||
Programa Fonte: | Preparação de Documento de Saída - MATA461.PRX | ||||||||
Parâmetros: | Nil - Nenhum | ||||||||
Retorno: |
|
Informações |
---|
A validação do saldo dos produtos que controlam lote/endereço só serão executados O ponto de entrada só será executado se o parâmetro MV_ESTNEG = N e o retorno do ponto de entrada for falso (.F.estiver configurado com o conteúdo igual a "N" (sem as aspas). |
Exemplo:
Bloco de código | ||||
---|---|---|---|---|
| ||||
#Include 'Protheus.ch' User Function MA040VLDM461SLD() Local _nOpc_lRet := PARAMIXB .F. //3-Sempre Inclusão,executa 4-a Alteraçãovalidação e 5- Exclusão Local _lRet := .T. Local _cUsuario := RetCodUsr()do saldo If SC9->C9_nOpcPRODUTO == 4"LOTE .And. _cUsuario == "000001" Alert("Usuário não pode efetuar alterações.") _lRet := .F. ElseIf _nOpc == 5 " .And. SC9->C9_cUsuarioLOTECTL == "000002" Alert("Usuário não pode efetuar exclusão.") LOTE X " __lRet := .F.T. //Não executa a validação do saldo EndIf Return __lRet |