Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Juliana Rodrigues Kozima Santana

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user William Pianheri Batista Silva

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Ponto-de-Entrada: MTA455E - Validação da

liberação

Liberação "automática" de Bloqueio de Estoque


Descrição:
O ponto de entrada MTA455E pertence a rotina Liberação de Estoque (MATA455) e é acionado pelo botão "+Automática".
Sua finalidade é permitir a inclusão de validações para as liberações executadas pelo opção "+Automática"
bloqueio de estoque
Portuguese

Pagetitle
MTA455E - Validação da liberação "automática" de bloqueio de estoqueMTA455E - Validação da liberação "automática" de bloqueio de estoque
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Versões: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: ADS/ADSServer
Idiomas: Português (Brasil)
Descrição: 
Ponto de Entrada que valida a liberação "automática" de bloqueio de estoque.

Programa Fonte
MATA455.PRX

Sintaxe

MTA455E - Validação da liberação "automática" de bloqueio de estoque ( [ ] ( {nOpca} ) --> nOpca


Parâmetros:


NomeTipoDescriçãoDefaultObrigatórioReferência
Numérico
Retorno
    nOpca(numerico)
  • 1 = Confirma;
    2 = Cancela
PARAMIXBArray of Record

Número da opção acionada, sendo:

1 - Ok

2 - Cancela





Retorno:


NomeTipoDescriçãoDefaultObrigatórioReferência
nOpcaNumérico

Número da opção acionada, sendo:

1 - Prossegue com a liberação

2 - Aborta a liberação


X


Exemplo:
Não
os pedidos!")
    Else
        MsgInfo("Processo de liberação iniciado com sucesso!")        
    EndIf
Else
    MsgAlert("Operação cancelada")  
EndIf            

RestArea(aArea) //Restaura o ambiente ativo no início da chamada

Return(nOpca) //Retorna a variável numérica nOpca contendo a opção 1 ou 2
Bloco de código
languagejs
linenumberstrue
#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'TOTVS.CH'

User Function MTA455E()

Local aArea := GetArea() //Armazena o ambiente ativo para restaurar ao fim do processo
Local nOpca := PARAMIXB[1] //Variável nOpca recebe valor = 1 na confirmação e valor = 2 no cancelamento 

If nOpca == 1
    Pergunte('LIBAT2',.F.) //Carrega o pergunte da liberação automática
    
    If MV_PAR01 == "000000" .And. MV_PAR02 == "zzzzzz"   //Verifica se no range de pedido foram incluidos todos os pedidos.
Exemplos User Function MTA455E() Alert("Executando ponto de entrada MTA455E") 
        nOpca := 2   //Ajusta o retorno para 2 indicando que a liberação não irá ser precessada
        Alert("Não é permitido o processamento de todos
// 1= Libera 2=Mantêm o bloqueio Return(nOpca) Variáveis 		NomeTipoEscopoPode AlterardescriçãoArray of RecordGlobal