Criação De Filtro No Perfil Por Usuário Logado (RESOLVIDO)

[cruzeiro]

Olá, bom dia a todos!

Estou elaborando um filtro por perfil para um movimento específico, de "requisições".

O que eu gostaria de fazer é o seguinte: O usuário logado só poderá visualizar lançamentos que ele mesmo criou neste movimento.

Fazer a consulta pra isso é relativamente fácil, selecionar o IDMOV da TMOV onde o USUARIOCRIACAO seja igual ao usuário logado no sistema.

O problema está sendo para localizar o usuário logado no sistema. Na GUSUARIO não tem essas informações, a GLOGIN parece que está relacionada com o problema, mas travei na hora da lógica.

Alguém poderia dar uma luz?

Desde já agradeço!

Att,

[João Rodrigo]

Segue ai

SELECT USERNAME FROM GLOGIN WHERE COMPUTERNAME=(select host_name())

[cruzeiro]

Segue ai

SELECT USERNAME FROM GLOGIN WHERE COMPUTERNAME=(select host_name())

Como sempre o João Rodrigo arrebentando! Exatamente isso que eu queria amigo... muito obrigado mesmo!

E para quem necessitar no futuro, segue a consulta pronta (foram utilizados dois movimentos no filtro):

select idmov

from TMOV a (NOLOCK)

where

(a.codtmv = '1.1.00' or a.codtmv = '1.1.04') and

a.USUARIOCRIACAO = (SELECT USERNAME FROM GLOGIN WHERE COMPUTERNAME=(select host_name()))

union all

SELECT IDMOV

FROM TMOV (NOLOCK)

where (codtmv <>'1.1.00' and codtmv <> '1.1.04')

Att,

[ricardosavir]

boa dica

[Rodrigo Borsato]

Como sempre o João Rodrigo arrebentando! Exatamente isso que eu queria amigo... muito obrigado mesmo!

E para quem necessitar no futuro, segue a consulta pronta (foram utilizados dois movimentos no filtro):

select idmov

from TMOV a (NOLOCK)

where

(a.codtmv = '1.1.00' or a.codtmv = '1.1.04') and

a.USUARIOCRIACAO = (SELECT USERNAME FROM GLOGIN WHERE COMPUTERNAME=(select host_name()))

union all

SELECT IDMOV

FROM TMOV (NOLOCK)

where (codtmv <>'1.1.00' and codtmv <> '1.1.04')

Att,

EXCELENTE!!!!

[Tuerê Pinto]

Amigos tenho um código que puxa usuário e codmov. Mas estou querem a descrição do movimento.

Alguém pode me ajudar. Só preciso da tabela que tem a descrição de cada movimento.

código

select distinct GPERMIS.CODCOLIGADA,

GSISTEMA.DESCRICAO,

GPERMIS.CODUSUARIO,

--GPERFIL.CODPERFIL,

TTMVPERFILPROCESSO.CODTMV

from GPERFIL (nolock)

left outer join GAUTZMENU(nolock)

on (GAUTZMENU.CODSISTEMA = GPERFIL.CODSISTEMA

and GAUTZMENU.CODPERFIL = GPERFIL.CODPERFIL)

left outer join GSISTEMA (nolock)

on (GSISTEMA.CODSISTEMA = GPERFIL.CODSISTEMA)

left outer join GPERMIS(nolock)

on (GPERMIS.CODSISTEMA = GPERFIL.CODSISTEMA)

left outer join TTMVPERFILPROCESSO (nolock)

on (TTMVPERFILPROCESSO.CODSISTEMA = GPERFIL.CODSISTEMA

AND TTMVPERFILPROCESSO.CODPERFIL = GPERFIL.CODPERFIL)

where GSISTEMA.DESCRICAO = 'TOTVS Gestão de Estoque, Compras e Faturamento'

AND TTMVPERFILPROCESSO.CODTMV is not null

--AND GPERMIS.CODCOLIGADA = :PLN_Parametros$B$3_S

order by 1, 3

[Jair - Fórmula]

Tuerê...

bom dia.

Por favor, faz um tópico a parte com a sua dúvida, pois, não tem nada a ver com este tópico aqui.

Creio que posso ajudá-lo. Se precisa ter os nomes dos tipos de movimentos na sua sentença, é tranquilo. Mas precisa revisar esta, pois, está com algo errado. Estou dando uma olhada aqui de qualquer forma.

Assim que criar novo tópico, repondo lá pra vc, ok?

Abraço

[Tuerê Pinto]

Jair, Muito obrigado, sou novo nesse forum, irei fazer sim, mas já achei a solução e já refiz os códigos.

conforme mostrador abaixo

-- Usuário vinculado a Perfil

select GCOLIGADA.NOME,

GUSRPERFIL.CODCOLIGADA,

GUSRPERFIL.CODUSUARIO,

GPERFIL.CODPERFIL,

GPERFIL.NOME as TIPOPERFIL,

GSISTEMA.DESCRICAO

from GUSRPERFIL (nolock)

inner join GPERFIL (nolock)

ON(GUSRPERFIL.CODSISTEMA = GPERFIL.CODSISTEMA

and GUSRPERFIL.CODPERFIL = GPERFIL.CODPERFIL)

inner join GSISTEMA (nolock)

ON(GPERFIL.CODSISTEMA = GSISTEMA.CODSISTEMA)

inner join GCOLIGADA (nolock)

ON(GUSRPERFIL.CODCOLIGADA = GCOLIGADA.CODCOLIGADA)

inner join GUSUARIO (nolock)

ON(GUSUARIO.CODUSUARIO = GUSRPERFIL.CODUSUARIO)

WHERE GUSUARIO.STATUS <> '0'

AND GUSRPERFIL.CODCOLIGADA = :PLN_Parametros$B$1_S

AND GPERFIL.NOME = :PLN_Parametros$B$1_S

order by 3, 5, 2

-- Usuário por Movimento'

select GCOLIGADA.CODCOLIGADA,

GCOLIGADA.NOME,

TUSRTMV.CODUSUARIO,

TUSRTMV.CODTMV,

TTMV.NOME

from TUSRTMV (nolock)

inner join TTMV (nolock)

ON(TUSRTMV.CODCOLIGADA = TTMV.CODCOLIGADA

and TUSRTMV.CODTMV = TTMV.CODTMV)

inner join GCOLIGADA (nolock)

ON(TUSRTMV.CODCOLIGADA = GCOLIGADA.CODCOLIGADA)

inner join GUSUARIO (nolock)

on(GUSUARIO.CODUSUARIO = TUSRTMV .CODUSUARIO)

WHERE GUSUARIO.STATUS <> '0'

order by 3, 1, 4

-- Usuario por Projeto

select GCOLIGADA.CODCOLIGADA,

GCOLIGADA.NOME,

MPRJUSR.CODUSUARIO,

MPRJ.DESCRICAO,

GUSUARIO.STATUS

from MPRJUSR (nolock)

inner join MPRJ (nolock)

ON(MPRJUSR.CODCOLIGADA = MPRJ.CODCOLIGADA

and MPRJUSR.IDPRJ = MPRJ.IDPRJ)

inner join GCOLIGADA (nolock)

ON(MPRJUSR.CODCOLIGADA = GCOLIGADA.CODCOLIGADA)

inner join GUSUARIO (nolock)

ON (GUSUARIO.CODUSUARIO = MPRJUSR.CODUSUARIO)

WHERE GUSUARIO.STATUS <> '0'

order by 3, 2, 4

[Jair - Fórmula]

É isso aí rapaz. Mandou bem.