Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 9

changes.mady.by.user Usuário desconhecido (rogerio.bispo)

Gravado em

comparado com

Nova versão 10

changes.mady.by.user Usuário desconhecido (rogerio.bispo)

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Portuguese

Ponto-de-Entrada: MTA455E - Validação da liberação "automática" de bloqueio de estoque


Descrição:
O ponto de entrada MTA455E é acionado na rotina Liberação de Estoque (MATA455), após o usuário clicar no botão "+Automática".
Sua finalidade é permitir a validação das liberações automáticas de bloqueio por estoque.

Programa Fonte
MATA455.PRX

Sintaxe

MTA455E( nOpca ) -->  


Parâmetros:

nOpca - Tipo: Numérico - Número da opção, sendo:

1 = Permite o desbloqueio
2 = Não permite o desbloqueio


Retorno:
nOpca - Tipo: Variável numérica contendo o número da operação, sendo:

1 = Permite o desbloqueio
2 = Não permite o desbloqueio




#INCLUDE'PROTHEUS.CH'
#INCLUDE'TOTVS.CH'
#INCLUDE'PARMTYPE.CH'



UserFunctionMTA455E()

LocalnOpca:= PARAMIXB
 
Alert("Executando ponto de entrada MTA455E")

If !FwIsAdmin()
    nOpca := 2   //  1= Libera    2=Mantêm o bloqueio Return(nOpca)
EndIf
             

Return(nOpca)