Help with TABLE...

Hello folks,

I changed a TABLE to add a couple of OVERs and now it is printing one record on each page - carriage control. Is there something I can do to get it back to printing multiple records per page and not wasting reams of paper?

Thank you!

Mike

The two OVER fields are A50 - TRIP_PUR and A65 - EXPLAIN_1 and EXPLAIN_2, fwiw.
DEFINE FILE HOLDHIST
DUMMY/A1=' ';
DATE2/MDYY=STR_DT;
FULL_NAME/A52=L_NAME || (', ' | F_NAME );
NAME/A33=EDIT(FULL_NAME,'999999999999999999999999999999999');
TODAY_DATE/MDYY DFC 19 YRT 80 = &MDY;
WK_AGO/MDYY = TODAY_DATE - 7;
END
TABLE FILE HOLDHIST
HEADING
"RUN &DATE / &THE_TIME <72 TRAVEL EXPENSE SYSTEM [TES)
<153 PAGE <+0 "HIST11(TRAVHIST) <72 HISTORICAL SPOUSE EXP RPT LISTING"
"<68 HISTORY LOAD DATES " "
SUM
MIN.DATE2 NOPRINT
MAX.DATE2 NOPRINT
SUM
CMPYNUM AS 'Comp, #'
MAX.DISB_CODE AS 'Disb ,Code'
COMPUTE PCT_OF/D9.2=MAX.TRV_AMT * .35 ; AS 'Supplement,Pay Amount'
MAX.TRV_AMT AS 'Expense,Amount'
COMPUTE TOT_SP/D11.2 = MAX.TRV_AMT+ PCT_OF; AS ' Total ' IN +0
DATE2 AS 'Trip Start,Date' IN +4
-* BY DUMMY NOPRINT REPAGE
BY CMPYNUM NOPRINT
BY NAME AS 'Employee Name '
BY EMP_NO AS 'Employee #'
BY STR_DT NOPRINT
BY TM_DATE NOPRINT
BY TOT_EXP_AMT NOPRINT
PRINT
TRIP_PUR AS 'Purpose:'
OVER
EXPLAIN_1 AS 'Expl:'
OVER
EXPLAIN_2 AS ''
-* BY DUMMY NOPRINT REPAGE
BY CMPYNUM NOPRINT
BY NAME
BY EMP_NO
BY STR_DT NOPRINT
BY TM_DATE NOPRINT
BY TOT_EXP_AMT NOPRINT
BY PURP_LINE NOPRINT
WHERE A.EMP_NO EQ B.EMP_NO
WHERE A.STR_DT EQ B.STR_DT
WHERE A.TM_DATE EQ B.TM_DATE
ON STR_DT NOSPLIT UNDER-LINE
ON TABLE SET SPACES 2
ON TABLE SET LINES 57
ON TABLE SET WIDTH 200
ON TABLE SET PANEL 200
-* ON TABLE PAGE-BREAK AND SUBHEAD
ON TABLE SUBHEAD
"&WHAT_ORIENT"
"&WHAT_FONT"
"&WHAT_LINES"
"COVER PAGE"
ON TABLE SUBFOOT
"&RESET_IT"
" "
ON TABLE SAVE AS SPOUSRPT FORMAT WP
END

Mike Anderson

Posts: 14 | Location: Columbus, Ohio | Registered: May 20, 2003

k8iw

Member

posted

Hide Post

I also posed this question to the venerable Noreen Redden, who solved the problem rather quickly.

Mike, I think it is the NOSPLIT --- ON STR_DT NOSPLIT UNDER-LINE

Basically, that is saying that on STR_DT, if you can't fit all of the
lines for the next STR_DT on THIS page, do a PAGE-BREAK. Also, try
setting not only LINES, but PAPER, to make sure that there is plenty of
room. I would do it before you start the TABLE rather than ON TABLE SET
just to be on the safe side: SET LINES=57,PAPER=59 before the TABLE

Noreen

Mike Anderson

Posts: 14 | Location: Columbus, Ohio | Registered: May 20, 2003

Please Wait. Your request is being processed...

Read-Only Topic

Focal Point

Focal Point Forums

WebFOCUS/FOCUS Forum on Focal Point

Help with TABLE...

Focal Point | Privacy Statement | Terms of Service