cristiano.evangelista
-
Total de itens
31 -
Registro em
-
Última visita
Posts postados por cristiano.evangelista
-
-
ola pessoal, estou precisando fazer uma consulta utilizando tabelas de dois banco access diferentes..
select a.codigo as Codigo, e.desc_es as Descricao, a.quant as Quant, t.descri as Fabricante, e.divisao_es as Divisao, e.grupo_es as Grupo, e.codfabri_e as Cod_Fabri, e.codbarra_e as Cod_Barras, codorig_es as Cod_Original, codrefe_es as Cod_Referencia from c:\sigerest\dados.mdb.estoque e, c:\sigerest\dados_acerto.mdb.acerto a
o banco dados.mdb possui senha, portanto me retorna o erro senha inválida.. gostaria de saber como colocar a senha nessa consulta, se não tiver jeito, qual a maneira de resolver o problema..
fico no aguardo de uma ajuda.
-
no botão de chamar o relatorio, verifique se as propriedades do relatorio Datasource e Datamenber estão configuradas..
-
você pode filtrar depois..
dataenvironment.rsCommand1.Filter = "campo='" & Trim(text1.Text) & " '"
-
olá pessoal,
estou com o seguinte problema.. quando entro no sistema ele pergunta em qual banco vai se conectar (matrix ou filial) é o mesmo banco, mas com dados diferentes. O problema é que estou usando data environmet para os relatórios, e neles tenho que configurar o caminho do banco. Quando escolher o banco que não está configurado, como programar a conexao do data enviroment? estou usando acess.
fico no aguardo de uma ajuda
-
valeu kuroi, era so isso mesmo..
abraço
-
Pessoal, quando executo este sql recebo o seguinte erro:
A clausula LEVEL inclui uma palavra reservada ou um argumento que esta incorreto ou faltando, ou a pontuação está incorreta
campo = "data_not" filtro_nf ("select n.data_not as Data, sum(n.vrt_not) as Total from notafis n, estoque e where n.prod_not = cdbl(e.cod_es) and " & campo & " BetWeen #" & VBA.Format(dinicial.Text, "YYYY/MM/DD") & "# And #" & VBA.Format(dfinal.Text, "YYYY/MM/DD") & "#; group by n.data_not order by data_not ")
fico no aguardo de uma ajuda..
-
pessoal, estou recebendo essa mensagem de erro uso inválido de null,
quando executo este sql
select n.data_not as Data, n.numero_not as Documento, sum (n.vrt_not - n.desconto_not) as Valor, sum(e.cpiscof_es) as pis_cof, sum(e.codst_es) as Subs_Trib, sum(e.vricms_es) as ICMS, sum(cdbl(Iif(e.codtrib1_es = Null, 0, e.codtrib1_es))) as ICMS_Reduz from notafis n, estoque e where n.prod_not = cdbl(e.cod_es) group by n.numero_not, n.data_not
já testei essa instrução e funciona beleza no visdata, sinceramente não sei o porque deste erro, se alguém tiver uma ideia eu agradeço,
abraço
-
da erro por causa do group by.. fala que a expressão month(data_not) não faz parte do agrupamento..
o grande problema é esse..
-
ta retornando assim:
1/2001
1/2002
1/2003
1/2004
preciso que retorne assim:
1/2001
2/2001
3/2001
4/2001
so pode trazer o mes e o ano, pois o relatório é o somatório do mes..
-
ola pessoal,
tenho essa instrução sql, que soma as vendas por mês.. preciso ordenar por mes, desse jeito não ordena..
select (MONTH(data_not) & '/' & YEAR(data_not)) as mes, sum(n.vrt_not) as Total from notafis n, estoque e where n.prod_not = cdbl(e.cod_es) group by (MONTH(data_not) & '/' & YEAR(data_not)) order by (MONTH(data_not) & '/' & YEAR(data_not))
fico no aguardo de uma ajuda
-
o cara, no visdata este sql funciona normal, quando passo pro vb da o mesmo erro..
uso invalido de nulo..
sabe porque?
-
certinho cara, so tive trocar esta virgula por o sinal de igual
sum(cdbl(Iif(e.codtrib1_es, Null, 0, e.codtrib1_es))) as ICMS_Reduz
vlw..
-
ola pessoal, to com um problema nessa instrução sql..
select n.numero_not as Documento, sum (n.vrt_not - n.desconto_not) as Valor, sum(e.cpiscof_es) as pis_cof, sum(e.codst_es) as Subs_Trib, sum(e.vricms_es) as ICMS, sum(cdbl(e.codtrib1_es)) as ICMS_Reduz from notafis n, estoque e where n.prod_not = cdbl(e.cod_es) group by n.numero_not
o campo codtrib1_es é do tipo texto, tem varios registros em branco.. quando executo este sql da o seguinte erro
"Uso inválido de null"
alguém sabe o porque disso?
abraço
-
certinho cara..
fico te devendo mais essa,
abraço!
-
Kuroi, com esse select obtenho o resultado da imagem..(obs: vou mandar a imagem no seu email)
select e.cod_es as Código, e.desc_es as Descrição, IIf(t.numero = 3, t.descri, '') as Und, IIf(t.numero = 9, t.descri, '') as Fabricante, e.codbarra_e as Cod_Barras, e.embal_es as Emb, e.qant_es as Estoque from estoque e, tipos t where (t.numero = 3 or t.numero = 9) and (cint(e.und_es) = t.codigo and t.numero = 3) or (cint(e.fabric_es) = t.codigo and t.numero = 9 )
observe que os registros ficam repetindo de dois em dois, por causa dos campos unidades e fabricantes, preciso juntar essas duas linhas que repetem em um unico registro.. conto com sua ajuda, t+Kuroi, com esse select obtenho o resultado da imagem..(obs: vou mandar a imagem no seu email)select e.cod_es as Código, e.desc_es as Descrição, IIf(t.numero = 3, t.descri, '') as Und, IIf(t.numero = 9, t.descri, '') as Fabricante, e.codbarra_e as Cod_Barras, e.embal_es as Emb, e.qant_es as Estoque from estoque e, tipos t where (t.numero = 3 or t.numero = 9) and (cint(e.und_es) = t.codigo and t.numero = 3) or (cint(e.fabric_es) = t.codigo and t.numero = 9 )
observe que os registros ficam repetindo de dois em dois, por causa dos campos unidades e fabricantes, preciso juntar essas duas linhas que repetem em um unico registro..
conto com sua ajuda, t+
não achei seu email, me adiciona ai
MSN: cristiano.evangelista88@hotmail.com
skype: cristiano.evangelista88
-
deu certo não cara..
tem outra ideia?
-
Kuroi, é o seguinte amigo.. to usando acess mesmo,
tenho essa tabela TIPOS, ela traz várias informações (grupos, unidades, fabricante.. etc), o que diferencia os registros é o campo numero, (ex: os fabricantes tem o numero = 9, todos os registros que tem o numero = 9 então são fabricantes).
Agora to fazendo um relatorio da tabela ESTOQUE onde tenho que buscar a descrição de unidades e fabricantes, que está na mesma tabela (TIPOS), e é o mesmo campo (descri) o que diferencia é campo numero..
tentei com IIf, não da certo de jeito nenhum!
olha só
select e.cod_es as Código, e.desc_es as Descrição, IIf(t.numero = 3, t.descri, 0) as Und, IIf(t.numero = 9, t.descri, 0) as Fabricante, e.codbarra_e as Cod_Barras, e.embal_es as Emb, e.qant_es as Estoque from estoque e, tipos t where cint(e.fabric_es) = t.codigo and cint(e.und_es) = t.codigo
-
Pessoal, preciso montar um select que tem buscar a descrição de dois campos da mesma tabela,
tenho uma tabela TIPOS com a seguinte estrutura:
NUMERO CODIGO DESCRI
1 1 GRUPOS
1 2 UNIDADES
1 3 FABRICANTES
2 1 UNT
2 2 PCT
3 1 TILIBRA
3 2 CASSIO
preciso buscar a descrição de unidades e fabricantes no mesmo select, será que tem jeito de fazer isso?
fico no aguardo de uma ajuda..
t+
-
Pessoal, to precisando gerar um relatório agrupado com data report.. não uso data ev.
qual o segredo pra fazer isso? tentei colocando o campo na seçao group reader e não funcionou,
o que mais tenho que fazer?
será que a melhor opção é mudar para o crystal report??
preciso agrupar os dados de uma mesma tabela da seguinte forma:
CLIENTE CONTROLE VALOR
001 1234 12,00
002 2222 1,00
001 2345 2,00
002 5667 3,00
os dados devem aparecer agrupados por cliente:
CLIENTE 001
CONTROLE VALOR
1234 12,00
2345 2,00
CLIENTE 002
CONTROLE VALOR
2222 1,00
5667 3,00
fico no aguardo de uma ajuda..
-
Pessoal, to precisando gerar um relatório agrupado com data report.. não uso data ev.
qual o segredo pra fazer isso? tentei colocando o campo na seçao group reader e não funcionou,
o que mais tenho que fazer?
será que a melhor opção é mudar para o crystal report??
-
não, testei a instrução no visdata
não, testei a instrução no visdata -
o sql ta correto sim, o estranho é que se colocar um filtro um filtro ele funciona olha so:
assim funciona
filtro ("select e.cod_es as Código, e.desc_es as Descrição, t.descri as Fabricante, e.codbarra_e as Cod_Barras, e.embal_es as Emb, e.qant_es as Estoque from estoque e, tipos t where cint(e.fabric_es) = t.codigo and t.numero = 9 and grupo_es= " & txtgrupo.Text & " ")
e assim para mostrar todos dá o errofiltro ("select e.cod_es as Código, e.desc_es as Descrição, t.descri as Fabricante, e.codbarra_e as Cod_Barras, e.embal_es as Emb, e.qant_es as Estoque from estoque e, tipos t where cint(e.fabric_es) = t.codigo and t.numero = 9 ")
num sei porque não viu :wacko:
falou..
-
pode ser que sua consulta está vazia, coloca uma verificação se ele é nulo antes
if not tfiltro.eof = true then sua rotina else msgBox = "Não há registros para essa consulta" end if
deu certo não cara, o tfiltro.eof ta retornando false e acusando o mesmo erro,
o que será que pode ser?
-
Pessoal, tenho essa rotina na minha aplicação
Private Sub filtro(sql1 As String) Set tfiltro = New Recordset tfiltro.CursorLocation = adUseClient tfiltro.Open sql1, conexao, adOpenForwardOnly, adLockReadOnly 'preenchendo o grid Set griddados.DataSource = tfiltro lblmsg.Caption = "(" & tfiltro.RecordCount & ")" & " Item (s) " & " encontrados!" End Sub
quando mando a expressão sql dá o seguinte erro..
uso inválido de 'nulo', e aponta a linha onde está o recordcount, a instrução sql está correta..
fico no aguardo de uma dica.. t+
select com dois bancos acess
em Visual Basic
Postado
Ola pessoal, estou precisando saber a sintaxe de um select que usa tabelas de dois bancos em acess..
se alguém souber posta ai..
t+