Árvore de páginas

Versões comparadas

Chave

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


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

...

NomeTipoObrigatórioDefaultObservação
lAcessoLógicoSimNilSe .T. permite a abertura da rotina, caso .F. bloqueia a abertura da rotina

...


05. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagevb
themeMidnight
firstline1
titleMT550EAIMT261ACS
linenumberstrue
#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
titleImportante

O ponto de entrada MT261ACS também é executado através de rotina automática, podendo ser chamado inclusive por outras partes do sistema.



Templatedocumentos