Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

MAXIMUM 95 ACROSS

Status
Not open for further replies.

breyt

IS-IT--Management
Dec 9, 2002
66
FR
HI
I have reach the limit of 95 across . Do you know a technic to bypass by a another method this limit.
I need to put more than 95 name horizontaly for converting versus excel
Thanks
breyt
 
breyt,

you can define the individual fields, then sum them up to get a single row.

So instead of, say,

TABLE FILE CAR
SUM CNT.MODEL
ACROSS COUNTRY
END

you would have

DEFINE FILE CAR
JAPAN/P9 = IF COUNTRY EQ 'JAPAN' THEN 1 ELSE 0;
GERMANY/P9 = IF COUNTRY EQ 'GERMANY' THEN 1 ELSE 0;
END

TABLE FILE CAR
SUM JAPAN
GERMANY
END

Now this might sound bad for 95 columns, but you can automate it using dialogue manager.

Create a file containing all the valid values - in this case JAPAN and GERMANY ie

TABLE FILE CAR
BY COUNTRY
ON TABLE SAVE AS COUNTRY
END


DEFINE FILE CAR

-READ COUNTRY &ctry.A20.
-REPEAT CTRY_L1 WHILE &IORETURN EQ 0;
&CTRY.EVAL/P9 = IF COUNTRY EQ '&CTRY.EVAL' THEN 1 ELSE 0;
-READ COUNTRY &ctry.A20.
-CTRY_L1

END

TABLE FILE CAR
SUM

-READ COUNTRY &CTRY.A20.
-REPEAT CTRY_L2 WHILE &IORETURN EQ 0;
&CTRY.EVAL
-READ COUNTRY &CTRY.A20.
-CTRY_L2

END


Something like this should do what you need.

regards
 
Hi
thanks a lot. I may have the risk for the print to go over the limit ?
I have 180 fields
thanks
breyt
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top