Integra
-
Total de itens
18 -
Registro em
-
Última visita
Posts postados por Integra
-
-
Boa tarde se alguém puder me ajudar ficarei muito agradecido pois não conhece muito de sql server tenho basicamente 3 tabelas
tb_produtos
codprod produto
1 A
2 B
tb_entrada
id data codprod qtde
1 10/09/2006 1 5
2 11/09/2006 1 8
3 11/09/2006 1 3
4 12/09/2006 2 4
tb_saida
id data codprod qtde
1 10/09/2006 1 2
2 11/09/2006 1 3
3 11/09/2006 1 2
como faco para totalizar o saldo diario de um determinado produto, e me retorne via procedure
se eu digitar passar via parametro por exemplo codprod 1 que e o produto "A" data 10/09/2006 a 12/09/2006 ele mostrara o saldo totalizado ate o dia anterior que é 09/09/2006 = 0 e mostrara a ultima data com movimento valido 11/09/2006 = 9. somente do produto A
data entrada saida saldodia saldoatual
09/09/2006 0 0 0 0
10/09/2006 5 2 3 3
11/09/2006 11 5 6 9
muito obrigado
-
Cara dá erro no primeiro Select depois do from diz que a palavra "Select" Invalid token.
-
tenho 3 tabelas uma com items TB_ITEM (COD_ITEM, VALOR)
outra com TB_FRU (CODIGO, DESCRICAO)
001, FRU 1
003, FRU 3
outra com TB_DOT (CODIGO, DESCRICAO)
002, DOT 2
004, DOT 4
DIGAMOS QUE TB_ITEM TENHA OS SEGUINTES REGISTROS:
CODIGO, VALOR
001, 45
002, 36
003, 27
004, 78
O RESULTADO FINAL TERIA QUE SER O SEGUINTE;
001, FRU 1, 45
002, DOT 2, 36
003, FRU 3, 27
004, DOT 4, 78
não sei se preciso de um union ou if para fazer
-
Muito obrigado, funcionou...
-
bom dia amigos, estou tendo dificuldades em formular o resultado de um sql:
bom tenho duas tabelas tbmaterial e tbformula
a tabela tbmaterial tem os campos: codigo, material
a tabela tbformula tem os campos: id, codigo1, codigo2, codigo3, valor
eu quero montar um sql que contenha : id , material1, material2, material3, valor ou seja que tenha todos os campos codigo, com sua referencia de nome de materiais, não sei se é possivel.
-
bom dia amigos, estou tendo dificuldades em formular o resultado de um sql:
bom tenho duas tabelas tbmaterial e tbformula
a tabela tbmaterial tem os campos: codigo, material
a tabela tbformula tem os campos: id, codigo1, codigo2, codigo3, valor
eu quero montar um sql que contenha : id , material1, material2, material3, valor ou seja que tenha todos os campos codigo, com sua referencia de nome de materiais, não sei se é possivel.
-
Cara você pode até me chamar de chato, mas para uma melhor explicacao qual a versao de crystal você usa...se for 10 muitas pessoas vao te ensinar do jeito que elas fazem do 9 para baixo e estará errado..então qual versao você usa...?
-
esse componente vem junto com o vb, você precisa instala-lo va no explorer e procure uma pasta que te lembre o nome do crystal... acho que é crp..mais alguma coisa...que versao de vb você usa ?
-
Cara se você utilizar o crystal 10... você poder fazer uso do seguinte, você monta o sql dentro do vb e passa o resultado, repito o resultado do sql, e bem melhor...eu mostro como se faz no link abaixo eu respondi a duvida de um membro
http://scriptbrasil.com.br/forum/index.php...=crystal+report
-
-
Kara o Crystal 10 não trabalha com OCX, isso foi descontinuado...você utilizara uma outro componente... você tem que fazer seu relatório do jeito que era antes... so que para imprimir crie um form para visualizar o relatorio neste form coloque o componente crviewer,
olha como fica seu formvisualizador:
Option Explicit
Public oAP As CRAXDRT.Application
Public oRP As CRAXDRT.Report
Private Sub Form_Load()
Set oAP = New CRAXDRT.Application
Set oRP = New CRAXDRT.Report
Screen.MousePointer = vbHourglass
Set oRP = oAP.OpenReport("" & App.Path & "\" & NomeReport)
' nomereport receber valor no botao imprimir de grupos por exemplo nomereport = "rptgrupos.rpt"
oRP.SetUserPaperSize 2159, 2794
oRP.DiscardSavedData
oRP.Database.SetDataSource rsImpressora
'Recordset RST vai receber o conteudo do recordset em uso por ex.
crviewer1.ReportSource = oRP
crviewer1.ViewReport
crviewer1.Zoom 94
Do While crviewer1.IsBusy
DoEvents
Loop
Set rsImpressora = Nothing
Screen.MousePointer = vbDefault
End Sub
Private Sub Form_Resize()
If Me.WindowState <> 1 Then Me.WindowState = 2
crviewer1.Top = 0
crviewer1.Left = 0
crviewer1.Height = ScaleHeight
crviewer1.Width = ScaleWidth
End Sub
repare que você pode passar um recordset em tempo real... ou seja antes quando você passa por exemplo um intervalo de datas numa formula, sabe o que ele fazia... ele carregava o banco inteiro depois ia registro por registro validando o registro para imprimir ou não...se você fosse imprimir 1 registro apenas ele lia vamos supor todos os 3.000 que tinham na tabela... agora não você monta a sql no vb... e passa o resultado da sql a em um modulo do sistema por exemplo você tem que criar o rsImpressora
abaixo você chama o form assim é bem simples...
Private Sub cmdImprimehist_Click()
'nome do report a ser impresso
NomeReport = "rptLembretes.rpt"
'base de dados a ser impressa
Set rsImpressora = rsTemporario1
'chamando form vizualizador
FormVisualizador.Show 1
End Sub
duvidas é só me mandar um email
-
Tenho VB 6.0 (Visual Studio 6.0 Enterprise Edition) fiz um relatorio no Crystal v10
quando vou executar o relatorio ele não abre o report e da o seguinte erro
"run time error 20525"
"unable load report"
-
Eu posso instalar o Firebird e o banco no meu micro como server , e rodar o delphi nesta mesma maquina para desenvolver a aplicação ???? tenho o 1.5????
tenho que fazer configurações...??????
-
Cara o codigo de cada uma eu já mostrei mais acima, a pergunta é a seguinte eu jogo o conteudo de cada uma em um recordset, e ai... como montar uma terceira query e passar isso tudo para o crystal report...??? você entendeu???
-
fiz mas e se eu quiser passar parametros como intervalo de datas para orcamentos e pedidos, a pesquisa já esta no access eu fiz uma para orcamento outra para pedidos e outra juntando tudo, mas eu perco a filtragem por data. Tem que ser via codigo do VB
-
Eu já tinha pensado nisso mas eu só consigo obter isso separadamente ou seja, consigo o resultado assim
SELECT Representantes.representante, Count(Pedidos.CODPEDIDO) AS NEGOCIOS
FROM Representantes LEFT JOIN Pedidos ON Representantes.codrepresentante = Pedidos.CODREPRESENTANTE
GROUP BY Representantes.representante;
SELECT Representantes.representante, Count(Orcamentos.CODORCAMENTO) AS PROPOSTAS
FROM Representantes LEFT JOIN Orcamentos ON Representantes.codrepresentante=Orcamentos.CODREPRESENTANTE
GROUP BY Representantes.representante
-
Tenho 3 tabelas no access
Representantes =>> codrepresentante, representante
1,representante A
2,representante B
orcamentos=>> codorc, codrepresentante = 6 registros
1, 1
2, 1
3, 1
4, 1
5, 2
6, 2
pedidos=>> codped, codrepresentante = 4 registros
1, 1
2, 1
3, 2
4, 2
cujo resultado pretendido e a contagem por representante de quantos orcamentos e pedidos cada representante tem, ficando assim o resultado da consulta.
REPRESENTANTE, ORCAMENTOS, PEDIDOS
representante A, 4, 2
representante B, 2, 2
como montar esse sql para o vb acessar.
Problema Com Backup
em Delphi, Kylix
Postado
não importa se tento fazer o backup na minha aplicacao ou no proprio menu do ibexpert, aparece a seguinte mensagem.
message length error ( encountered 232, expected 228)
não tenho a minima ideia do que seja; alias mudei meu usuario de sysdba para outro nome e revoguei os direitos do sysdba, tenho dominio, visao, stored procedure, tabelas e funcao no banco
domains 3
tables 95
views 1
procedures 8
generators 38
udfs 1
roles 1
indices 89
obrigado...