Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Usuário desconhecido (felipe.valcanaia)

Gravado em

comparado com

Nova versão 3

changes.mady.by.user Usuário desconhecido (felipe.valcanaia)

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
MT410ACE - Verificar acessos dos usuários
MT410ACE - Verificar acessos dos usuários

Ponto-de-Entrada: MT410ACE - Verificar acessos dos usuários
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Idiomas: Espanhol , Inglês
Descrição: 
Ponto de entrada 'MT410ACE' criado para verificar o acesso dos usuários nas rotinas: Excluir, Visualizar, Resíduo, Copiar e Alterar.
Programa Fonte 
.PRW
Sintaxe

MT410ACE - Verificar acessos dos usuários ( < nOpc> ) --> lContinua

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
nOpcNumérico1 - Excluir / 2 - Visualizar / Residuo / 3 - Copiar / 4 - AlterarX
Retorno
    lContinua(logico)
  • .T. - Continuar a rotina
    .F. - Cancelar a rotina
Exemplos 
#include 'rwmake.ch'User Function Mt410Ace()Local lContinua := .T.  Local nOpc  := PARAMIXB [1] IF nOpc == 1 // excluir    IF cUsuario <> 'XXXXXX'        lContinua := .F.    EndIf ElseIf nOpc == 4 // Alterar        IF cUsuario <> 'XXXXXX'        lContinua := .F.    EndIfElseIf nOpc == 2// visualizar ou residuo       IF cUsuario <> 'XXXXXX'        lContinua := .F.    EndIf  Endif Return(lContinua)