</>

-SET &ORDER_BY = IF &CAR EQ _FOC_NULL THEN CAR ELSE COUNTRY;

TABLE FILE CAR
SUM  DEALER_COST
     RETAIL_COST
BY &ORDER_BY
WHERE ( COUNTRY EQ &COUNTRY.(FIND COUNTRY IN CAR|FORMAT=A10).Country:.QUOTEDSTRING );
WHERE ( CAR     EQ &CAR.(FIND CAR IN CAR|FORMAT=A16).Car:.QUOTEDSTRING );
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE SET ASNAMES ON
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLEMBEDIMG ON
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     INCLUDE = IBFS:/EDA/EDASERVE/_EDAHOME/ETC/warm.sty,
$
ENDSTYLE
END

 -SET &ORDER_BY = IF (&CAR NE _FOC_NULL AND &COUNTRY NE _FOC_NULL) OR((&CAR EQ _FOC_NULL AND &COUNTRY EQ _FOC_NULL)) THEN  'COUNTRY BY CAR' ELSE IF (&CAR EQ _FOC_NULL   AND &COUNTRY NE _FOC_NULL ) THEN COUNTRY  ELSE CAR;


TABLE FILE CAR

SUM
     CAR.BODY.DEALER_COST
     CAR.BODY.RETAIL_COST
BY  &ORDER_BY
WHERE ( CAR.ORIGIN.COUNTRY EQ &COUNTRY.(OR(FIND COUNTRY IN CAR|FORMAT=A10)).Country:. )
AND ( CAR.COMP.CAR EQ &CAR.(OR(FIND CAR IN CAR|FORMAT=A16)).Car:. );
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE SET ASNAMES ON
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLEMBEDIMG ON
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
$
ENDSTYLE
END