TABLE FILE INVENTORY_DAILY_SNAPSHOT
SUM CLASS
SALES AS 'Sales,Last week'
COMPUTE sales_pct/D12.2%=Sales / TOT.Sales * 100 ; AS 'Sales,% Cont'
INVENTORY AS 'OH,Inventory'
COMPUTE OH_pct/D12.2%=INVENTORY / TOT.INVENTORY * 100 ; AS 'OH,% Cont'
BY CLASS NOPRINT
ACROSS Stores  

TABLE FILE INVENTORY
BY CLASS
ACROSS Stores
Sales AS 'Sales, Last week'
COMPUTE sales_pct/D12.2%=sales / TOT.sales * 100 ; AS 'Sales,% Cont'
INVENTORY AS 'OH,Inventory'
COMPUTE OH_pct/D12.2%=INVENTORY / TOT.INVENTORY * 100 ; AS 'OH,% Cont'
COMPUTE TOTAL = C2 - C5
END

  
TABLE FILE INVENTORY
SUM 
   COMPUTE XSALE/D12.2 = SALES; NOPRINT
   COMPUTE XINVENTORY/D12.2 = INVENTORY; NOPRINT
  BY CLASS
SUM
   SALES
   INVENTORY
     COMPUTE SALES_PCT/D12.2% = SALES / XSALE * 100 ; 
     COMPUTE OH_PCT/D12.2%=INVENTORY / XINVENTORY * 100 ;
     COMPUTE XTOTAL/D12.2 = SALES - INVENTORY;
  BY CLASS
  BY STORES
 ON TABLE HOLD AS HOLD1
END
-RUN
TABLE FILE HOLD1
PRINT 
     SALES     AS 'Sales, Last week'
     SALES_PCT AS 'Sales,% Cont'
     INVENTORY AS 'OH,Inventory'
     OH_PCT    AS 'OH,% Cont'
     XTOTAL    AS 'Total'
  BY CLASS NOPRINT
    ACROSS STORES
END
-EXIT

	Store 1				Store 2					
CLASS	Sales Last week	   Sales % cont 	Sales Last week	  Sales % cont  	% cont VARIANCE
A				x				y		= x - y
B
C

TABLE FILE INVENTORY_DAILY_SNAPSHOT
BY INVENTORY_DAILY_SNAPSHOT.PRODUCTS_HIERARCHY_INFO.DWD_PRODUCTS_CLASS
ACROSS v_store_region_all AS 'Stores'
SUM v_last_week_sales AS 'Sales, Last week'
COMPUTE v_sales_pct_cont/D12.2%=v_last_week_sales / TOT.v_last_week_sales * 100 ; AS 'Sales,% Cont'
INVENTORY_DAILY_SNAPSHOT.INVENTORY_INFO.DWF_INV_OH AS 'OH,Inventory'
COMPUTE v_OH_pct_cont/D12.2%=INVENTORY_DAILY_SNAPSHOT.INVENTORY_INFO.DWF_INV_OH / TOT.INVENTORY_DAILY_SNAPSHOT.INVENTORY_INFO.DWF_INV_OH * 100 ; AS 'OH,% Cont'

 
TABLE FILE INVENTORY_DAILY_SNAPSHOT
SUM
   COMPUTE TOT_SALES/D12.2 = v_last_week_sales; NOPRINT
   COMPUTE TOT_INV/D12.2   = DWF_INV_OH; NOPRINT
  BY DWD_PRODUCTS_CLASS
SUM
   v_last_week_sales
   DWF_INV_OH
    COMPUTE v_sales_pct_cont/D12.2%=(v_last_week_sales / TOT_SALES) * 100 ; 
    COMPUTE v_OH_pct_cont/D12.2%=(INVENTORY_DAILY_SNAPSHOT.INVENTORY_INFO.DWF_INV_OH / TOT_INV) * 100 ; 
	COMPUTE X_VAR/P6.2% = v_sales_pct_cont - v_OH_pct_cont;
  BY DWD_PRODUCTS_CLASS
  BY v_store_region_all
 ON TABLE HOLD AS HOLD1
END
-RUN
TABLE FILE HOLD1
SUM
   v_last_week_sales AS 'Sales, Last week'
   v_sales_pct_cont  AS 'Sales,% Cont'
   DWF_INV_OH        AS 'OH,Inventory'
   v_OH_pct_cont     AS 'OH,% Cont' 
   X_VAR             AS '% cont VARIANCE'
  BY DWD_PRODUCTS_CLASS
        ACROSS v_store_region_all AS 'Stores'
END
-EXIT

your code
   "
   "
  BY DWD_PRODUCTS_CLASS
        ACROSS v_store_region_all AS 'Stores'
WHERE INVENTORY_DAILY_SNAPSHOT.STORES_INFO.DWD_STORES_DIVISION_CODE EQ 'G';
WHERE INVENTORY_DAILY_SNAPSHOT.PRODUCTS_INFO.DWD_PRODUCTS_SEASON_CODE EQ &DWD_PRODUCTS_SEASON_CODE.(OR(<60>,<61>,<62>,<63>,<64>,<65>,<66>,<67>,<68>,<69>,<70>,<71>,<72>,<73>,<74>)).Product Season.;
WHERE INVENTORY_DAILY_SNAPSHOT.PRODUCTS_HIERARCHY_INFO.DWD_PRODUCTS_DEPT_CODE EQ '04' OR '05' OR '06' OR '07' OR '08' OR '10' OR '11' OR '12' OR '13' OR '14' OR '15' OR '16' OR '20' OR '22';
ON TABLE PCHOLD FORMAT EXL2K
ON TABLE NOTOTAL
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE SET SQUEEZE ON
ON TABLE SET HTMLCSS ON
ON TABLE SET HTMLENCODE ON
ON TABLE SET EMPTYREPORT ON
ON TABLE SET STYLE *
INCLUDE=IBFS:/CFG/FILE/IBI_HTML_DIR/javaassist/intl/EN/combine_templates/ENgray_theme.sty,$
ENDSTYLE
END
-EXIT

-RUN

	Store 1				Store 2					
CLASS	Sales Last week	   Sales % cont 	Sales Last week	  Sales % cont  	% cont VARIANCE
A				x				y		= x - y
B
C

	Store 1									Store 2					
CLASS	Sales Last week	   Sales % cont	 OH inventory	OH % cont   % Cont Variance	Sales Last week	  Sales % cont  OH inventory	OH % cont   % Cont Variance
A				x			   y            = x - y		   	             n                      m           = n - m
B
C

  
TABLE FILE INVENTORY_DAILY_SNAPSHOT
SUM
   COMPUTE TOT_SALES/D12.2 = v_last_week_sales; NOPRINT
   COMPUTE TOT_INV/D12.2   = DWF_INV_OH; NOPRINT
  BY DWD_PRODUCTS_CLASS
SUM
   v_last_week_sales
   DWF_INV_OH
    COMPUTE v_sales_pct_cont/D12.2%=(v_last_week_sales / TOT_SALES) * 100 ; 
    COMPUTE v_OH_pct_cont/D12.2%=(INVENTORY_DAILY_SNAPSHOT.INVENTORY_INFO.DWF_INV_OH / TOT_INV) * 100 ; 
  BY DWD_PRODUCTS_CLASS
  BY v_store_region_all
 ON TABLE HOLD AS HOLD1
END
-RUN
TABLE FILE HOLD1
SUM
   v_last_week_sales AS 'Sales, Last week'
   v_sales_pct_cont  AS 'Sales,% Cont'
   DWF_INV_OH        AS 'OH,Inventory'
   v_OH_pct_cont     AS 'OH,% Cont' 
  BY DWD_PRODUCTS_CLASS
        ACROSS v_store_region_all AS 'Stores'
	COMPUTE X_VAR/P6.2% = v_sales_pct_cont - v_OH_pct_cont; AS '% cont VARIANCE'

END
-EXIT

  
-* File henry01.fex
DEFINE FILE CAR
RCOST/D7=RCOST  + 1024;
DCOST/D7=DCOST  - 2096;
END
SET CENT-ZERO=ON
TABLE FILE CAR
SUM TOT.RCOST NOPRINT TOT.DCOST NOPRINT
SUM RCOST COMPUTE R_PCT/P7.2%=RCOST / TOT.RCOST * 100;
    DCOST COMPUTE D_PCT/P7.2%=DCOST / TOT.DCOST * 100;
BY COUNTRY
ACROSS SEATS
COMPUTE 
RVAR/P7.2% = C4 - C8;
DVAR/P7.2% = C6 - C10;
IF SEATS EQ 4 OR 5
END

TABLE FILE INVENTORY_DAILY_SNAPSHOT
SUM v_last_week_sales AS 'Sales, Last week'
COMPUTE v_sales_pct_cont/D12.2%=v_last_week_sales / TOT.v_last_week_sales * 100 ; AS 'Sales,% Cont'
INVENTORY_DAILY_SNAPSHOT.INVENTORY_INFO.DWF_INV_OH AS 'OH,Inventory'
COMPUTE v_OH_pct_cont/D12.2%=INVENTORY_DAILY_SNAPSHOT.INVENTORY_INFO.DWF_INV_OH / TOT.INVENTORY_DAILY_SNAPSHOT.INVENTORY_INFO.DWF_INV_OH * 100 ; AS 'OH,% Cont'
BY INVENTORY_DAILY_SNAPSHOT.PRODUCTS_HIERARCHY_INFO.DWD_PRODUCTS_CLASS
ACROSS v_store_region_all AS 'Stores'
   COMPUTE X_VAR/D12.2% = C3 - C9; AS 'Sales % cont VARIANCE'
   COMPUTE Y_VAR/D12.2% = C6 - C12; AS 'OH % cont VARIANCE'

DEFINE FILE CAR
CLASS/A1=IF COUNTRY EQ 'ENGLAND' OR 'FRANCE' THEN 'A'
ELSE IF COUNTRY EQ 'ITALY' OR 'JAPAN' THEN 'B'
ELSE '';
STORE_NAME/A63=IF COUNTRY EQ 'ENGLAND' OR 'ITALY' THEN 'Store1'
ELSE IF COUNTRY EQ 'FRANCE' OR 'JAPAN' THEN 'Store2'
ELSE '';

RCOST_STORE_1/D7=IF STORE_NAME EQ 'Store1' THEN RCOST ELSE 0;
RCOST_STORE_2/D7=IF STORE_NAME EQ 'Store2' THEN RCOST ELSE 0;
RCOST_TOT/D7=RCOST;
END

TABLE FILE CAR
SUM
RCOST_STORE_1 NOPRINT
RCOST_STORE_2 NOPRINT
RCOST_TOT NOPRINT
BY CLASS

SUM
RCOST
COMPUTE RCOST_PERCENT/D8.2%=(RCOST/RCOST_TOT)*100;
BY CLASS
ACROSS STORE_NAME
COMPUTE RCOST_DIF/D7=RCOST_STORE_1-RCOST_STORE_2;
COMPUTE RCOST_DIF_PER/D8.2%=((RCOST_STORE_1/RCOST_TOT)*100)-((RCOST_STORE_2/RCOST_TOT)*100);
WHERE CLASS NE '';
END

  
-* The DEFINE is to create RCOST and DCOST values sufficiently different
DEFINE FILE CAR
RCOST/D7=RCOST  + 1024;
DCOST/D7=DCOST  - 2096;
END
SET CENT-ZERO=ON
-* The "C" notation is the internal numbering that FOCUS provides for verb objects. 
-* BY fields are not given an internal number because they are supposed to be single within a TABLE request
-*
TABLE FILE CAR
-* The first SUM verb has no BY fields 
SUM 
-* TOT.RCOST is field C1
    TOT.RCOST NOPRINT 
-* TOT.DCOST is field C2
    TOT.DCOST NOPRINT
-* The second SUM has a BY and an ACROSS
-* The Across has 2 values (SEATS=4, 5), hence all the verb objects of the SUM are multiplied by 2
-*
SUM
-* RCOST is field C3 for SEATS=4, then C7 for SEATS=5
    RCOST 
-* R_PCT is field C4 for SEATS=4, then C8 for SEATS=5
    COMPUTE R_PCT/P7.2%=RCOST / TOT.RCOST * 100;
-* DCOST is field C5 for SEATS=4, then C9 for SEATS=5
    DCOST 
-* D_PCT is field C6 for SEATS=4, then C10 for SEATS=5
    COMPUTE D_PCT/P7.2%=DCOST / TOT.DCOST * 100;
BY COUNTRY
ACROSS SEATS
-* The last COMPUTE, after the ACROSS is calculated once and 2 columns are added to the report 
COMPUTE 
RVAR/P7.2% = C4 - C8;
DVAR/P7.2% = C6 - C10;
IF SEATS EQ 4 OR 5
END

RCOST/D7=RCOST  + 1024;
DCOST/D7=DCOST  - 2096