From this: Value1 Value2 Value3 Column1 XXX 123 199 399 YYY 990 488 875 To this: Column1 Value1 Value2 Value3 XXX 123 199 399 YYY 990 488 875
TABLE FILE CAR SUM SEATS/I5S AS '' BY BODYTYPE ACROSS COUNTRY ON TABLE SET ASNAMES ON ON TABLE HOLD AS HOLD1 END -* TABLE FILE HOLD1 PRINT * END
DEFINE FILE CAR DUMMY/A1 = ' '; END -* TABLE FILE CAR SUM SEATS AS '' BY DUMMY NOPRINT BY BODYTYPE AS '' ACROSS COUNTRY NOPRINT ON DUMMY SUBHEAD "BODYTYPE<+0>ENGLAND<+0>FRANCE<+0>ITALY<+0>JAPAN<+0>W GERMANY" ON TABLE SET NODATA ' ' ON TABLE SET STYLE * TYPE=SUBHEAD, HEADALIGN=BODY, $ ENDSTYLE END
TABLE FILE CAR SUM COMPUTE RHEAD/A25='<+0>'||COUNTRY; ACROSS COUNTRY NOPRINT ON TABLE SET HOLDLIST PRINTONLY ON TABLE SAVE END -RUN DEFINE FILE CAR DUMMY/A1 = ' '; END -* TABLE FILE CAR SUM SEATS AS '' BY DUMMY NOPRINT BY BODYTYPE AS '' ACROSS COUNTRY NOPRINT ON DUMMY SUBHEAD "BODYTYPE -INCLUDE SAVE " ON TABLE SET NODATA ' ' ON TABLE SET STYLE * TYPE=SUBHEAD, HEADALIGN=BODY, $ ENDSTYLE END
. . -MRNOEDIT -INCLUDE SAVE <-1 " . .This message has been edited. Last edited by: Dan Satchell,
quote:<-1
quote:Originally posted by Dan Satchell:
Here is a technique that removes the unwanted blank line. Depending on the complexity of your report, it may or not provide a workable solution.TABLE FILE CAR SUM SEATS/I5S AS '' BY BODYTYPE ACROSS COUNTRY ON TABLE SET ASNAMES ON ON TABLE HOLD AS HOLD1 END -* TABLE FILE HOLD1 PRINT * END
And here is another option. It replaces all column titles with a SUBHEAD for a dummy field. (This could also be done with HEADING and without the dummy field, but that approach might interfere with other report headings.) The drawback to this approach is that it requires that your output always have the same number of columns in the same order.DEFINE FILE CAR DUMMY/A1 = ' '; END -* TABLE FILE CAR SUM SEATS AS '' BY DUMMY NOPRINT BY BODYTYPE AS '' ACROSS COUNTRY NOPRINT ON DUMMY SUBHEAD "BODYTYPE<+0>ENGLAND<+0>FRANCE<+0>ITALY<+0>JAPAN<+0>W GERMANY" ON TABLE SET NODATA ' ' ON TABLE SET STYLE * TYPE=SUBHEAD, HEADALIGN=BODY, $ ENDSTYLE END