Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Backoffice
Módulo:Financeiro
Função:

FINA677 - Prestação de Contas

Requisito/Story/Issue (informe o requisito relacionado) :DFINTES-18914


02. DESCRIÇÃO

Validação adicional se o usuário pode ou não efetuar ajuste na prestação de contas selecionada.

03. PARÂMETROS

       Nenhum parâmetro recebido.

04. RETORNO

Nome

Tipo

Descrição

lRet

Lógico

Se verdadeiro usuário poderá ajustar a prestação de contas, caso contrário bloqueia

05. EXEMPLO DE UTILIZAÇÃO

F376GRV
#include 'Protheus.ch'
 
User Function FA677UPR()
    Local lRet := .T.

    If RD0->RD0_USER == "000784" //Verifica se usuário pode alterar a prestação de contas
        lRet := .F.
        MsgInfo("Usuário "+USRRETNAME(RD0->RD0_USER)+" sem acesso")
    EndIf

Return lRet