Hi,

i have one problem in my report,
i have one field with by Sort and One With Across it is Crosstab.
in this report the across field columns on the top of one row compared with BY column header.
like the below example.

-------------------Across Column
BY column-----------------------(i want to put all columns in the same line)
--------------------------------

is there any way to remove the gap between these two columns.

I don't think there's any way to do that.

Kaylan:

We had a similar requirement for a set of reports.

What you can do is take your TABLE that produces the report now with ACROSS, and HOLD it. The columns will be named with an alias name. TABLE the HOLD file with PRINT (or SUM) and use: PRINT field1 AS 'Report,Name' etc. This should give you more flexibilty in column placement. To get the HOLD file ALIAS name, use:
? HOLD holdname (This will let you see the fieldnames etc.) Then do your report from the HOLD file.

Jim, that's a good idea.

Francis:

I'm an old-timer with FOCUS, and can remember when ACROSS "wouldn't HOLD it that way" in the HOLD file - it just saved it as another BY field. This little known (and under utilized) feature can help. We use CHECK FILE holdname HOLD (or: ?FF holdname during debugging) to get the FIELDNAME and FORMAT. A -READ of the format really helps when one wants to display a variable value correctly, especially in a drill down report:

:
CHECK FILE YTD_MO HOLD
TABLE FILE HOLD
SUM MAX.FLDNO FIELDNAME FORMAT
ON TABLE HOLD AS HOLD_FMT
END
-RUN
-*******************************************************************
-* READ &FORMAT FROM HOLD FILE *
-*******************************************************************
-READ HOLD_FMT &HOLD_FLDNO.I4. &HOLD_FLD.A66. &HOLD_FMT.A8.
-*-TYPE FORMAT=&HOLD_FMT
-*
-*******************************************************************
-* DEFINE NEW FLD WITH FORMAT FROM VARIABLE RETRIEVED *
-*******************************************************************
-SET &CFMT =IF &HOLD_FMT CONTAINS 'I' THEN '(D13c)' ELSE '(D13.2c)';
-*
DEFINE FILE YTD_MO
FLD1 / &FORMAT = &FLD ;
CFMT /A13 = '&CFMT.EVAL';
FLD /A13 = FTOA(FLD1,CFMT,FLD);
END
-*
TABLE FILE YTD_MO
PRINT
FLD
RPTG_OCD
BY DIV_NUM
BY RPTG_PRD_ENDT
BY RPTG_PRD_TYP
BY SUMRY_PRD_ID
ON TABLE HOLD AS ... < we JOINed from here to produce the final report
END

Thanks!
Jim