×
Linguagem de Programação ADVPL
Perguntas Setar Filtro
- fejuchem
- Autor do Tópico
- Desconectado
- Membro Iniciado
-
Menos
Mais
- Postagens: 14
- Obrigados Recebidos: 0
11 anos 3 dias atrás #18786
por fejuchem
Setar Filtro foi criado por fejuchem
Boa Tarde Caros!
Analisem o seguinte cenário:
Estou no pedido de venda...
preencho os dados do cabecalho do pedido até chegar no campo tabela
neste campo (C5_TABELA) fiz um gatilho que chama a seguinte função:
User Function dal_tab()
cPos00 := M->C5_TABELA
If ((__CUSERID = "000019") .AND. (cPos00 == '010'))
DbSelectarea("SB1")
SET FILTER TO SB1->B1_TAB = 'S'
EndIf
return
Se o usuario for 000019 e a tabela escolhida for 010
Então ele deve (ou deveria!) me mostrar somente os produtos que tem como o campo B1_TAB = S, ao incluir os itens.
Porém ao clicar na consulta do campo produto (C6_PRODUTO), está aparecendo todos os itens.
Alguma sugestão de como aparecer somente determinados itens?
Abraço,
Felipe
Analisem o seguinte cenário:
Estou no pedido de venda...
preencho os dados do cabecalho do pedido até chegar no campo tabela
neste campo (C5_TABELA) fiz um gatilho que chama a seguinte função:
User Function dal_tab()
cPos00 := M->C5_TABELA
If ((__CUSERID = "000019") .AND. (cPos00 == '010'))
DbSelectarea("SB1")
SET FILTER TO SB1->B1_TAB = 'S'
EndIf
return
Se o usuario for 000019 e a tabela escolhida for 010
Então ele deve (ou deveria!) me mostrar somente os produtos que tem como o campo B1_TAB = S, ao incluir os itens.
Porém ao clicar na consulta do campo produto (C6_PRODUTO), está aparecendo todos os itens.
Alguma sugestão de como aparecer somente determinados itens?
Abraço,
Felipe
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
11 anos 3 dias atrás #18793
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Setar Filtro
Felipe bom dia, o ideal será vc criar duas coisas:
1a.
Uma nova Consulta Padrão Tipo SB1F e nela colocar um filtro
tipo assim: IIf(__CUSERID $ "000019" .And. M->C5_TABELA == '010',SB1->B1_TAB=='S',.t.)
2a.
No Campo C6_PRODUTO F3 Selecione a Nova Consulta Padrao SB1F e no campo Validação Usuario coloque
IIf(__CUSERID $ "000019" .And. M->C5_TABELA == '010',SB1->B1_TAB=='S',.t.)
nao testei mas acho que funfa;
1a.
Uma nova Consulta Padrão Tipo SB1F e nela colocar um filtro
tipo assim: IIf(__CUSERID $ "000019" .And. M->C5_TABELA == '010',SB1->B1_TAB=='S',.t.)
2a.
No Campo C6_PRODUTO F3 Selecione a Nova Consulta Padrao SB1F e no campo Validação Usuario coloque
IIf(__CUSERID $ "000019" .And. M->C5_TABELA == '010',SB1->B1_TAB=='S',.t.)
nao testei mas acho que funfa;
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- fejuchem
- Autor do Tópico
- Desconectado
- Membro Iniciado
-
Menos
Mais
- Postagens: 14
- Obrigados Recebidos: 0
Tempo para a criação da página:0.100 segundos