Focal Point
[SOLVED] In WF8, is there a way to display columns ACROSS without using SUM?

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/4457088886

January 04, 2018, 11:24 AM
Ifra
[SOLVED] In WF8, is there a way to display columns ACROSS without using SUM?
Is there any way to display the REGION values, but hide DOLLARS? Basically, all I want is REGION values and no other data. I'm using WF8.

SET ACRSVRBTITL=OFF
TABLE FILE GGSALES
SUM DOLLARS AS Sales
ACROSS REGION AS ''
ON TABLE SET PAGE NOPAGE
ON TABLE SET STYLE *
GRID=OFF,$
ENDSTYLE
END
  

This message has been edited. Last edited by: FP Mod Chuck,


WebFOCUS 8
WebFOCUS 7705
Windows, All Outputs
January 04, 2018, 11:42 AM
rogerwilkouk
Is this something like you are looking for?

SET ACRSVRBTITL=OFF
DEFINE FILE GGSALES
Dlrs/A1 = '';
END
TABLE FILE GGSALES
SUM Dlrs AS Sales
ACROSS REGION AS ''
ON TABLE SET PAGE NOPAGE
ON TABLE SET STYLE *
GRID=OFF,$
ENDSTYLE
END


WF 81.5, Windows7
AS/400 Database.
All Outputs

January 04, 2018, 11:52 AM
Ifra
Very simple solution that I'll complicate a little. Smiler

Eventually my goal is to print something out similar to below, but the problem the suggested solution creates is the empty line of Row 2.

 
SET ACRSVRBTITL=OFF
DEFINE FILE GGSALES
Dlrs/A1 = '';
END
TABLE FILE GGSALES
SUM Dlrs AS Sales
ACROSS REGION AS ''
ON TABLE PCHOLD FORMAT EXL07 OPEN NOBREAK 
ON TABLE SET PAGE NOPAGE
ON TABLE SET STYLE *
GRID=OFF,$
ENDSTYLE
END

TABLE FILE CAR
PRINT 
COUNTRY	AS ''
CAR	AS ''
MODEL	AS ''
BODYTYPE AS ''
ON TABLE PCHOLD FORMAT EXL07 CLOSE NOBREAK 
ON TABLE SET PAGE NOPAGE
ON TABLE SET STYLE *
GRID=OFF,$
ENDSTYLE
END
 



WebFOCUS 8
WebFOCUS 7705
Windows, All Outputs
January 04, 2018, 12:14 PM
rogerwilkouk
This should remove the Empty Row and give you what I think you are looking for.

 SET ACRSVRBTITL=OFF
SET EMPTYREPORT=ON
DEFINE FILE GGSALES
Dlrs/A1 = '';
END
TABLE FILE GGSALES
SUM Dlrs AS ''
ACROSS REGION AS ''
WHERE TOTAL Dlrs NE ''
ON TABLE PCHOLD FORMAT EXL07 OPEN NOBREAK 
ON TABLE SET PAGE NOPAGE
ON TABLE SET STYLE *
GRID=OFF,$
ENDSTYLE
END

TABLE FILE CAR
PRINT 
COUNTRY	AS ''
CAR	AS ''
MODEL	AS ''
BODYTYPE AS ''
ON TABLE PCHOLD FORMAT EXL07 CLOSE NOBREAK 
ON TABLE SET PAGE NOPAGE
ON TABLE SET STYLE *
GRID=OFF,$
ENDSTYLE
END
 



WF 81.5, Windows7
AS/400 Database.
All Outputs