Saludos familia:
Tengo un reporte (TREPORT) definido con grupos, y defino totales por grupo, esto funciona muy bien
el tema es que también me pinta los totales finales, la pregunta, ¿ cómo evitar que se pinten
los totales finales?
Este es mi código
REPORT oReporte CAPTION cTitulo PREVIEW;
HEADER ALLTRIM(oApp:cRazonSocial),;
"",;
cTitulo CENTER;
TITLE "Fecha: "+Date2Txt(DATE(),,,,,,),;
"Página:"+STR(oReporte:nPage,3);
FONT oFont1,oFont2,oFont3;
PEN oPen1
COLUMN TITLE "","Folio" DATA oRsDet:Fields("DET_FOL"):Value SIZE 5 RIGHT PICTURE "@Z 9999999"
COLUMN TITLE "","Fecha" DATA Date2Txt(oRsDet:Fields("HDR_FDM"):Value) SIZE 10 RIGHT
COLUMN TITLE "Cantidad","De Entrada" DATA IIF(oRsDet:Fields("HDR_EOS"):Value == 1,;
oRsDet:Fields("DET_CTD"):Value,"") SIZE 08 RIGHT PICTURE "@Z 9,999.999" TOTAL
COLUMN TITLE "","Unitario" DATA IIF(oRsDet:Fields("HDR_EOS"):Value == 1,;
oRsDet:Fields("DET_COU"):Value,"") SIZE 07 RIGHT PICTURE "@Z 99,999.99"
COLUMN TITLE "Importe","De Entrada" DATA IIF(oRsDet:Fields("HDR_EOS"):Value == 1,;
oRsDet:Fields("DET_COS"):Value,"") SIZE 10 RIGHT PICTURE "@Z 999,999,999.99" TOTAL
COLUMN TITLE "Cantidad","De Salida" DATA IIF(oRsDet:Fields("HDR_EOS"):Value == 2,;
oRsDet:Fields("DET_CTD"):Value,"") SIZE 08 RIGHT PICTURE "@Z 9,999.999" TOTAL
COLUMN TITLE "","Unitario" DATA IIF(oRsDet:Fields("HDR_EOS"):Value == 2,;
oRsDet:Fields("DET_COU"):Value,"") SIZE 07 RIGHT PICTURE "@Z 99,999.99"
COLUMN TITLE "Importe","De Salida" DATA IIF(oRsDet:Fields("HDR_EOS"):Value == 2,;
oRsDet:Fields("DET_COS"):Value,"") SIZE 10 RIGHT PICTURE "@Z 999,999,999.99" TOTAL
COLUMN TITLE "Sucursal" DATA IIF(oRsDet:Fields("SUC_NOM"):Value <> Nil,;
AllTrim(oRsDet:Fields("SUC_NOM"):Value),"") SIZE 18 LEFT
GROUP gMaterial ON oRsDet:Fields("DET_MAT"):Value;
FOOTER Space(08) + "Totales del material:" FONT 2
gMaterial:bHeader := {|| "* Material: " + oRsDet:Fields("DET_MAT"):Value + " " + IIF(oRsMat:Fields("MAT_DES"):Value <> Nil, AllTrim(oRsMat:Fields("MAT_DES"):Value),"")}
END REPORT
Saludos
No pintar totales finales, cómo?
- Armando
- Posts: 3260
- Joined: Fri Oct 07, 2005 8:20 pm
- Location: Toluca, México
- Been thanked: 1 time
- Contact:
No pintar totales finales, cómo?
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
- FranciscoA
- Posts: 2162
- Joined: Fri Jul 18, 2008 1:24 am
- Location: Chinandega, Nicaragua, C.A.
Re: No pintar totales finales, cómo?
Armando, intenta con esto:
//No poner el gran total para determinada columna
//No poner el gran total para determinada columna
Code: Select all | Expand
oReport:bEnd:={|| oReport:aColumns[5]:nTotal := 0,oReport:aColumns[6]:nTotal := 0 }
Francisco J. Alegría P.
Chinandega, Nicaragua.
Fwxh-MySql-TMySql
Chinandega, Nicaragua.
Fwxh-MySql-TMySql
- Armando
- Posts: 3260
- Joined: Fri Oct 07, 2005 8:20 pm
- Location: Toluca, México
- Been thanked: 1 time
- Contact:
Re: No pintar totales finales, cómo?
Francisco:
Funcionó de 100, aunque pensé que existía algo parecido a oReporte:cGrandTotal := ""
Revise la clase pero no encontré.
Saludos
Funcionó de 100, aunque pensé que existía algo parecido a oReporte:cGrandTotal := ""
Revise la clase pero no encontré.
Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero