Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Logística
Módulo:SIGATMS - Gestão de Transportes 


02. DESCRIÇÃO

Ponto de entrada disparado na rotina TMSACESSO. 

Parâmetros:

1- cPrograma, cCodUser, nAcesso

Retorno:

lRet retorno falso não permite alteração inclusão ou exclusão.

03. EXEMPLO DE UTILIZAÇÃO

TMSACESS
Programa Fonte
TMSXFUNB

User Function TMSACESS()

Local lRet         := .F.
Local __cPrograma  := PARAMIXB[1]
Local __cCodUser   := PARAMIXB[2] 
Local __nAcesso    := PARAMIXB[3]

If __cPrograma = 'TMSA120'
    If __cCodUser = '000003'
        If __nAcesso = 3
            lRet := .F.
        Else
            lRet := .T.
        EndIf
    Else
        lRet := .T.
    EndIf
EndIf

Return lRet


04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

  • Não há.