quote:I think the key is I have 2 different style sheets for each letter....
quote:"cc: WHERE
In FOCUS Since 1983 ~ from FOCUS to WebFOCUS. Current: WebFOCUS Administrator at FIS Worldpay | 8204, 8206 |
-SET &ECHO=ALL; APP FI HLDCNTRY DISK hldcntry.ftm -RUN -SET &CTR = 1; DEFINE FILE CAR GOTO_IND/A10 = IF COUNTRY EQ 'ENGLAND' THEN 'ENGLAND' ELSE IF COUNTRY EQ 'JAPAN' THEN 'JAPAN' ELSE IF COUNTRY EQ 'ITALY' THEN 'ITALY' ELSE 'W GERMANY'; END TABLE FILE CAR PRINT GOTO_IND BY COUNTRY NOPRINT ON TABLE SAVE AS HLDCNTRY FORMAT ALPHA END -RUN -DO_READ -SET &CMPND = IF &CTR EQ 1 THEN 'OPEN' ELSE - IF &CTR EQ 4 THEN 'CLOSE' ELSE ''; -RUN -READ HLDCNTRY NOCLOSE &IND.10. TABLE FILE CAR PRINT CAR MODEL BODYTYPE SEATS BY COUNTRY WHERE COUNTRY EQ '&IND.EVAL' -IF &IND EQ 'ENGLAND' GOTO ENG_LTR ELSE - IF &IND EQ 'JAPAN' GOTO JAPAN_LTR ELSE - IF &IND EQ 'ITALY' GOTO ITALY_LTR ELSE - GOTO GERMAN_LTR; -* -ENG_LTR -*BODY OF LETTER HERE -GOTO WHICH_STYLE; -JAPAN_LTR -*BODY OF LETTER HERE -GOTO WHICH_STYLE; -ITALY_LTR -*BODY OF LETTER HERE -GOTO WHICH_STYLE; -GERMAN_LTR -*BODY OF LETTER HERE -GOTO WHICH_STYLE; -* -WHICH_STYLE ON TABLE PCHOLD FORMAT HTML &CMPND ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * -IF &IND EQ 'ENGLAND' GOTO ENG_STYLE ELSE - IF &IND EQ 'JAPAN' GOTO JAPAN_STYLE ELSE - IF &IND EQ 'ITALY' GOTO ITALY_STYLE ELSE - GOTO GERMAN_STYLE; -ENG_STYLE -* -GOTO END_STYLE; -JAPAN_STYLE -* -GOTO END_STYLE; ITALY_STYLE -* -GERMAN_STYLE -GOTO END_STYLE; -END_STYLE ENDSTYLE END -SET &CTR = &CTR + 1; -IF &CTR LT &LINES GOTO DO_READ; -EXIT