CARREGAR PERFIL DE ACORDO COM A CONFIG DO ADM

USUARIO.EXCLUIDOS 01/12/2006 20:34:01
#187528
Olá pessoal vou tentar explicar meu problema, estou fazendo um software onde o administrador irá fazer uma pesquisa de registros, a partir daí ele irá separar os dados por perfil, ficaria mais ou menos assim:

operador 1 - ficaria responsável do registro 1 ao registro 100
operador 2 - ficaria do registro 101 ao 200
operador 3 - ficaria do registro 201 ao 300

Após está etapa,quando o operador 1 loga-se no sistema, apareceria somente os registros 1 ao 100 na tela e somente eles poderiam ser modificados, o mesmo aconteceria com os outros operadores.

A seleção dos números de registro eu já consigo fazer, só não sei como fazer carregar no perfil dos usuários o parà¢metro estabelecido.

Alguém tem alguma idéia????

[S61]
USUARIO.EXCLUIDOS 01/12/2006 20:54:34
#187531
Bom também

Seria assim no perfil do usuário o administrador definiria os registro que o usuário poderia ver.
Exemplo
Usuário 1- Registro Inicial: 1 Registro final: 100
Usuário 2- Registro Inicial: 101 Registro final: 200
Usuário 3- Registro Inicial: 201 Registro final: 300

Quando o usuário loga você vai saber os registro que ele pode ver então mostraria para ele.
Exemplo
Usuário 1
Select * From tabela Where codigo >= 1 and codigo <= 101

Seria assim ou estou enganado.
USUARIO.EXCLUIDOS 01/12/2006 21:03:35
#187533
Então, mas estes números dependem da pesquisa, tipo hoje o administrador faz uma pesquisa e acha 300 registros e ai divide por operador, numa próxima pesquisa ele pode achar 1000 registros e ai ele tem q dividir novamente para os operadores, numa outra pode achar 5000 registros e assim por diante....
USUARIO.EXCLUIDOS 01/12/2006 21:10:06
#187535
Tudo bem,
Mais o adminstrado que vai dividir o registro, como vc falou tem 3000 registro ai ele dividi por 3 ai cada usuário vai poder ver so 1000 registro, porque tem 3 usuario, mais ele vai poder mudar agora o usuário 1 so pode ver do 1001 a 2001 e usuário 2 pode ver do 1 a 1001 ou não vai dividir e o usuário 1 vai ver os primeiros registro e assim sucessivamente
USUARIO.EXCLUIDOS 01/12/2006 21:15:49
#187536
A sua primeira opção, o administrador vai dividir os registros ai o operador 2 pode ver do 1 a 1000, o número 1 ver o número 1001 ao 2000...e assim por diante, ele escolhe quem vai ver o que...
USUARIO.EXCLUIDOS 01/12/2006 21:22:37
#187538
No meu ponto de vista esta idéia não vai tar muito certo porque o banco muda o tempo tudo como você mesmo falou agora tem 1000 taque um minuto pode ter 5000, se o administrador dividir 1000 registro para os usuários, quando tiver novos registro e o administrado não dividir os usuários não vão consiguir ver so quando ele dividir novamente ou estou errado.
USUARIO.EXCLUIDOS 01/12/2006 21:27:30
#187540
Bom não sei se entendi direito, mas antes da pesquisa o adm selecionaria o banco que ele vai trabalhar, estou fazendo um CRM num sei se vc conhece,os dados são selecionados por parà¢metros para as campanhas de marketing.

O adm escolheria a base, ai faria a pesquisa em cima dela, e só ai dividiria para os operador.

Nossa ta ficando mais complicado do que eu imaginei...pq nem esta etapa de seleção das bases eu ainda fiz...já tenho alguma idéia mas num coloquei em prática.

Obrigada!!![S80]
USUARIO.EXCLUIDOS 01/12/2006 21:37:12
#187541
Bom também
Espero não ter complicado mais,
Falou qualquer coisa estamos ai.
USUARIO.EXCLUIDOS 02/12/2006 11:18:48
#187577
alguém pode me ajudar??????????
ROMERO.KCOAL 02/12/2006 14:55:48
#187595
bem eu uso acesso via codigo dos meus campos... ou seja.. posso midar a cor do campo dependendo da condição do se status

[txt-color=#3333ff]ex[/txt-color]

Citação:

[txt-color=#3333ff]Private Sub[/txt-color] AtualizaMarca([txt-color=#3333ff]Optional[/txt-color] Indice As [txt-color=#3333ff]Integer[/txt-color])
[txt-color=#3333ff]Dim[/txt-color] i [txt-color=#3333ff]As Integer[/txt-color]
[txt-color=#3333ff]For[/txt-color] i = 0 [txt-color=#3333ff]To[/txt-color] 8
Txt(i) = ""
Txt(i).Tag = ""
Txt(i).BackColor = &HFFFFFF
[txt-color=#3333ff]Next[/txt-color] i
[txt-color=#3333ff]If[/txt-color] RectMarca.RecordCount > 0 [txt-color=#3333ff]Then[/txt-color]
Barra.Max = RectMarca.RecordCount - 1
RectMarca.MoveLast
RectMarca.MoveFirst
RectMarca.Move Indice
i = 0
[txt-color=#3333ff]Do[/txt-color]
[txt-color=#3333ff]If[/txt-color] i + Indice >= RectMarca.RecordCount [txt-color=#3333ff]Or[/txt-color] i > 8 [txt-color=#3333ff]Then Exit Do[/txt-color]
Txt(i) = RectMarca.Fields(1)
Txt(i).Tag = RectMarca.AbsolutePosition

RectMarca.MoveNext
i = i + 1
[txt-color=#3333ff]Loop[/txt-color]
Txt(0).BackColor = &HC0FFC0
Onde = Txt(0).Tag
LblCp.Caption = "Registro " & Onde & " de " & RectMarca.RecordCount

[txt-color=#3333ff]Else[/txt-color]
LblCp.Caption = "Nenhum Registro"

[txt-color=#3333ff]End If[/txt-color]
[txt-color=#3333ff]End Sub[/txt-color]



Espero ter ajudado
USUARIO.EXCLUIDOS 02/12/2006 14:59:12
#187596
Olá romero não entendi como vc usa sua rotina, pode me explicar melhor???
obrigada
Tópico encerrado , respostas não são mais permitidas
Voltar