Home

Linha Microsiga Protheus

Páginas filhas
  • GACGRVUSER - Gravação do usuario -- 13174

Ponto-de-Entrada: GACGRVUSER - Gravação do usuario
Idiomas: Espanhol , Inglês
Descrição:

Ponto de entrada disponível após a gravação do usuário do Gestão de Acervos. Executado na inclusão do usuário para tratamento específico.

Programa Fonte
GACA040.PRW
Sintaxe

GACGRVUSER - Gravação do usuario ( [ cCodCli ], [ cLojCli ] ) --> Ret

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cCodCli Caracter Código do cliente
cLojCli Caracter Código da Loja
Retorno
    Ret(nulo)
Observações

Os paramêtros permitirão que a tabela JMO seja posicionada no registro específico criado, através do índice 1

Exemplos
User Function GACGRVUSER()Local lRet     := .F .           Local aArea := GetArea()Local cCodCl i := ParamIXB[1]Local cLojCli := ParamIXB[2] DbSelectArea("JMO")JMO->(DBSetOrder(1))JMO->(DbSeek(xFilial("JMO")+cCodCli+cLojCli)) cUsu := "Exemplo de P.E. - Usuário:" + JMO->JMO_CODU SUMSgAlert(cUsu)JMO->(Dbclosearea())   RestArea(aArea)      Return lRet