ayuda con una consulta

[[oscarac]]

jejeje
muy buena aclaracion

sabemos que el SQL es el lenguaje mas no la base de datos ... pero algunos de nosotros "abreviamos" el termino.. pero vale tu comentario y no lo considero intolerante.. mas bien es importante que las personas que recien entran a delphi y/o no tienen conocimientos de programacion puedan hacer esa diferenciacion

volviendo al tema en cuestion...
revisa bien las propiedades del reporte y si puedes las posteas

[leofuentes21]

si esta buena la aclaracion y les agradesco,

con lo del reporte ya revise bien las propiedades tengo horas en eso y no le encuentro.
1) inserte bande de title para el titulo y una detalle para los labels que es ahi donde va apareser la informacion.
tambien cambie el dataset y llame de aaqui al formulario donde esta la query
y lo mismo con la banda detalle.

la verda no se si tenga algo malo hacermelo saber.

[*Caro*]

Hola leofuentes21, supongo que tu Quickreport esta asociado a tu DataSet donde ejecutas la consulta, pero al utilizar solo qrLabels asignandole lo que tienes en tus DateTimePicker, te va ha repetir solo eso, la cantidad de veces del resultado de tu consulta, ya que esta dentro de una banda Detalle, para mostrar los datos de tu consulta puedes utilizar el QrDbText y sus propiedades DataSet y DataField.

Saluditos

[[Delphius]]

Empezado por oscarac

jejeje
muy buena aclaracion

sabemos que el SQL es el lenguaje mas no la base de datos ... pero algunos de nosotros "abreviamos" el termino..

OK, entonces también abreviaré a MySQL, PostgreSQL, y FirebirdSQL con SQL así evitamos cualquier confusión. ¡Listo, todos los motores a partir de hoy se llamarán SQL!

¡Si hay que ser... para hacer semejante cosa!

No hay vueltas... no es que seamos intolerantes, es que hay que hacer un esfuerzo por hablar bien, y eso hace también al tema de ser un buen profesional.
El caso que expone rgstuamigo es más común de lo que se piensa. Hacen ya demasiado mal, y denigran la profesión ¡Hay tanto que asegura que SQL es un motor de base de datos!

Las cosas como son, por favor... nada de inventar abreviaciones; ¡quedás peor!

Saludos,

[[oscarac]]

ok
Aclarado 1, Aclarado 2....

ahora tratemos de ayudar a leofuentes21

[leofuentes21]

todavia no me funciona. ya le cambie los labels por los qrdbtext y la propieda dataset tiene qry1 y datafield los campo.
2)El qreport tengo la propiedad dataset qry1.

ok. lo que yo quiero es inyectarle a la qry1 la consulta(el codigo que esta en los comentarios anteriores) desde otro form que es lo que he estado intentando y no me muestra la informacion en el reporte.

ya prove hacer consulta a la qry en el reporte y lo ace bien pero del otro form que es donde tengo la consulta en un button no lo hace,no me funciona.no me muestra datos,no se si hice algo malo o si no me doy a explicar bien.

[[oscarac]]

en el reporte (supongo qr......pas) has colocado el
use frm......pas ? donde "usas" el formulario donde esta el query?

yo normalmente "armo" una cadena mas o menos de esta manera

Código Delphi [-]
   strSql := 'select Left(M.cuenta, ' + edtDigito.Text + ') As Cuenta,' +
               ' SUM (Case when DH = ' + QuotedStr('D') + ' then u_IMP else 0.00 End) AS DEBE, ' +
               ' SUM (Case when DH = ' + QuotedStr('H') +  ' then u_IMP else 0.00 End) AS HABER ' +
               ' from TblMovimientoContable M ' +
               ' where M.Empresa = ' + QuotedStr(dmGlobal.g_CodigoEmpresa) + ' and M.Periodo = ' + QuotedStr(dmGlobal.g_Periodo) +
               ' group by Left(M.CUENTA, ' + edtDigito.Text + ') Order by Left(M.CUENTA, ' + edtDigito.Text + ')';
     if qrBalanceComprobacionMensual = Nil then
        qrBalanceComprobacionMensual := TqrBalanceComprobacionMensual.Create(Nil);
      with qrBalanceComprobacionMensual do
      begin
        qrLabelCompany.Caption := dmGlobal.g_NombreEmpresa;
        qrlRuc.Caption := dmGlobal.g_RUCEmpresa;
        rSubTitulo.Caption := 'Mensual del mes de ' + NombreMes (StrtoInT (dmGlobal.g_Mes)) + ' - ' + Copy (dmGlobal.g_Periodo,1,4);
        begin
            qryBalanceComprobacionMensual.Sql.Clear;
            qryBalanceComprobacionMensual.SQL.Add(strSql);
            qryBalanceComprobacionMensual.Open;
            if qryBalanceComprobacionMensual.IsEmpty then
              MessageDlg('No existen Movimientos en el mes',mtWarning,[mbRetry],0)
            else
              preview;
            qryBalanceComprobacionMensual.Close;
          end
      end;
      FreeAndNil(qrBalanceComprobacionMensual);

algo asi....
quiza debas poner lineas del codigo tanto del form como del reporte para entender mejor