Histórico da Página
01. DADOS GERAIS
Linha de Produto: | Microsiga Protheus® |
---|---|
Segmento: | Backoffice |
Módulo: | Estoque/Custos |
Função: | MATA261 - Transferência Múltipla |
02. DESCRIÇÃO
O ponto de entrada ..MT261ACS permite a criação de regra de validação para permitir ou não a abertura da rotina de transferências MATA261.
03. PARÂMETROS
Não se aplica.
04. RETORNO
...
Nome | Tipo | Obrigatório | Default | Observação |
---|---|---|---|---|
lAcesso | Lógico | Sim | Nil | Se .T. permite a abertura da rotina, caso .F. bloqueia a abertura da rotina |
...
05. EXEMPLO DE UTILIZAÇÃO
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#include 'Protheus.ch' /*/{Protheus.doc} User Function A280SBJMT261ACS PEValidação A280SBK - Chamado na gravação da SBK - Saldos iniciais por endereço - apóspara abrir a gravaçãorotina @type Function @author TotvsTOTVS @since 09/11/2021 /*/ User Function A280SBKMT261ACS() Local aArea lRet := GetArea().T. Local aAreaSBKdBloq := SBK->(GetArea())SuperGetMV('MV_DBLQMOV') Local aAreaSB1 := SB1->(GetArea()) Local aAreascMsg := {aAreaSBK, aAreaSB1, aArea}'' SB1->(DbSetOrder(1)) If SB1->(DbSeek(FWXFilial('SB1')+SBK->BK_COD))If dDataBase <= dBloq //Condições customizadas //..lRet := .F. cMsg := "O sistema está em fechamento If RecLock('SBK', .F.) de estoque, não é permitido utilizar " //Gravação de campo customizado da SBKcMsg += "a rotina de transferências." Help(,, "MT261ACS",, cMsg, SBK->(MsUnlock()) 1, 0) EndIf Return EndIf AEval(aAreas, {|x| RestArea(x)}) Return lRet |
Informações | ||
---|---|---|
| ||
O ponto de entrada MT261ACS também é executado através de rotina automática, podendo ser chamado inclusive por outras partes do sistema. |
Templatedocumentos |
---|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas