18 10001 500AKL009 CASHGORA/WOOL PEA JACKET 21 $34,868.00 $8,241.660 0 19 10001 211DKI004 DFSTRWC FLAT FRNT BOOT PNT BLACK 41 $34,494.20 $15,498.000 0 20 10001 601AKL900 SUPER CASH. L/S TURTLENCK 40 $32,387.25 $7,430.400 5 *TOTAL REGION_NO 100 603 $857,423.39 $273,047.140 14 Outlet Stores 0 10001H 30F41ATS2L 30F41ATS2L LG SATCHEL ATL LG SATCHEL ATL ********** $28,088.57 $7,079.540 0 Outle 10018H K82103X K82103X SHORT DOWN JKT W/FUR SHORT DOWN JKT W/FUR ********** $27,099.02 $11,160.000 18 Outle 10001H 30F41ATS2L 30F41ATS2L LG SATCHEL ATL LG SATCHEL ATL ********** $22,068.86 $5,624.840 6 Outle
In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID |
-*set up defaults -SET &ECHO= 'ALL' APP MAP FOCHOLD C:\Inetpub\wwwroot\Output_Hold\ APP HOLD FOCHOLD -DEFAULT &OUTPUT = 'HTML'; -DEFAULT &TIMELINE = 'LTD'; -DEFAULT &report_date = '$*'; -DEFAULT &report_date_month = '$*'; -DEFAULT &report_date_year = '$*'; -DEFAULT &report_date_day = '$*'; -* -* -********************************************************************************** -*SET REPORT OUTPUT -SET &HLD = '-*'; -IF &OUTPUT EQ 'REPORT' GOTO SKIPHOLD; -SET &HLD = IF &OUTPUT EQ 'PDF' THEN 'ON TABLE PCHOLD FORMAT PDF' - ELSE IF &OUTPUT EQ 'EXL2K' THEN 'ON TABLE PCHOLD FORMAT EXL2K' - ELSE &HLD ; -SKIPHOLD -*GET CALENDAR DATA -IF &report_date = '$*' GOTO SKIP_DT; -IF &report_date = ' ' GOTO SKIP_DT; DEFINE FILE CALMST REPORT_DATE/I6 = &report_date - 20000000; END SQL SELECT MIN((CALFYR*1000000)+(CALFMT*10000)+(CALFWK*100)+CALFDY) ,MAX((CALFYR*1000000)+(CALFMT*10000)+(CALFWK*100)+CALFDY) FROM CALMST -IF &TIMELINE NE 'LTD' GOTO SKIP_LTD; ; -GOTO SKIPP; -SKIP_LTD -IF &TIMELINE NE 'YTD' GOTO SKIP_YTD; WHERE CALYER = (&report_date_year - 2000); -GOTO SKIPP; -SKIP_YTD -IF &TIMELINE NE 'MTD' GOTO SKIP_MTD; WHERE CALYER = (&report_date_year - 2000) AND CALMTH = (&report_date_month + 1); -GOTO SKIPP; -SKIP_MTD -IF &TIMELINE NE 'WTD' GOTO SKIP_WTD; WHERE CALYER = (&report_date_year - 2000) AND CALMTH = (&report_date_month + 1) AND CALDAY = &report_date_day; -GOTO SKIPP; -SKIP_WTD -SKIPP TABLE ON TABLE HOLD AS CDATE FORMAT ALPHA END -RUN -READ CDATE &report_date_from.A13. &report_date_to.A13. -TYPE &report_date_from and &report_date_to DEFINE FILE SLSSKU KEY/A20 = EDIT(SLSSTR) || EDIT(SLSSKU); FSC_DATE/I8 = (SLSFYR*1000000)+(SLSFPD*10000)+(SLSFWK*100)+SLSFDY; REP_MONTH/MTR = (&report_date_month + 1); REP_DAY/D = &report_date_day; REP_YEAR/YYYY = &report_date_year; END SQL SELECT SLSREG AS REGION_NO, SLSRGN AS REGION, SLSVND AS VENDOR, SLSSTR AS STORE, MAX(SLSSTN) AS STOREN, SLSSTY AS STYLE, SLSDSC AS STYLED, SLSSKU AS SKU, SLSCLR AS COLOR, KEY, REP_MONTH, REP_DAY, REP_YEAR, SUM(SLSQTY) AS QUANTITY, SUM(SLSRET) AS RETAIL, SUM(SLSCST) AS COST FROM SLSSKU -IF &TIMELINE EQ 'LTD' GOTO SKIP_LTD1; WHERE FSC_DATE BETWEEN &report_date_from and &report_date_to -SKIP_LTD1 -*AND SLSSTY = '630AKI956' -*AND SLSVND = '10001' -*AND SLSCLR = ' ' GROUP BY SLSREG, SLSRGN, SLSVND, SLSSTR, SLSSTY, SLSDSC, SLSSKU, SLSCLR, KEY, REP_MONTH, REP_DAY, REP_YEAR ORDER BY SLSREG, SLSRGN, SLSVND, SLSSTR, SLSSTY, SLSDSC, SLSSKU, SLSCLR, KEY, REP_MONTH, REP_DAY, REP_YEAR ; TABLE ON TABLE HOLD AS SLSTOP20 FORMAT FOCUS INDEX KEY END -RUN DEFINE FILE LOCINV KEY/A20 = EDIT(LOCNUM) || EDIT(LOCSKU); END SQL SELECT LOCNUM AS STORE, LOCSKU AS SKU, KEY, SUM(LO****) AS ONHAND FROM LOCINV WHERE LOCNUM GROUP BY LOCNUM, LOCSKU, KEY; TABLE ON TABLE HOLD AS LOCATION FORMAT FOCUS INDEX KEY END -RUN JOIN KEY IN SLSTOP20 TO KEY IN LOCATION AS J1 END TABLE FILE SLSTOP20 SUM VENDOR AS 'VENDOR' STYLE AS 'STYLE NUMBER' STYLED AS 'STYLE, DESCRIPTION' COLOR AS 'COLOR' QUANTITY AS 'QUANTITY' RETAIL/P17.2BM AS 'EXTENDED RETAIL' COST/P17.3BM AS 'EXTENDED COST' ONHAND/P7B AS 'ON HAND UNITS' BY REGION_NO NOPRINT AS ' ' RANKED AS 'RANK' BY TOTAL HIGHEST RETAIL NOPRINT BY VENDOR NOPRINT AS 'VENDOR' BY STYLE NOPRINT AS 'STYLE ' BY COLOR NOPRINT AS 'COLOR' ON REGION_NO SUBHEAD "<REGION " ON REGION_NO SUBTOTAL -IF &TIMELINE NE 'LTD' GOTO SKIP_LTD2; HEADING "Top 20 Best Sellers Report" -GOTO SKIPP2; -SKIP_LTD2 -IF &TIMELINE NE 'YTD' GOTO SKIP_YTD2; HEADING "Top 20 Best Sellers Report" "Year to Date: <REP_YEAR" -GOTO SKIPP2; -SKIP_YTD2 -IF &TIMELINE NE 'MTD' GOTO SKIP_MTD2; HEADING "Top 20 Best Sellers Report" "Month to Date: <REP_MONTH <REP_YEAR" -GOTO SKIPP2; -SKIP_MTD2 -IF &TIMELINE NE 'WTD' GOTO SKIP_WTD2; HEADING "Top 20 Best Sellers Report" "Week to Date: <REP_MONTH <REP_DAY <REP_YEAR" -GOTO SKIPP2 -SKIP_WTD2 -SKIPP2 -*ON REGION SKIP-LINE ON TABLE SET PAGE-NUM OFF -*ON TABLE NOTOTAL ON TABLE SET ONLINE-FMT HTML ON TABLE SET HTMLCSS ON &HLD.EVAL END -HTMLFORM BEGIN <html> <head> </HEAD> <title> </title> <style> </style> <script language="JavaScript"> </script> </head> <body background=/images/bkg_RPT.gif > </body> </html> -HTMLFORM END
quote:
I tested in WebFOCUS 528 and reproduced incorrect results.
The problem is addressed in the 53x and 71x track, not in the 52x track.
Do you have inhouse any of the 53x or 71x environments?