SET EXPANDBYROW=ON TABLE FILE GGSALES SUM BUDUNITS UNITS BUDDOLLARS DOLLARS BY REGION BY ST BY CATEGORY BY PRODUCT ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * GRID=OFF,FONT=ARIAL,$ ENDThis message has been edited. Last edited by: Emily Lee,
quote:
-* FEX : SAMPLE_SALES SET EXPANDABLE=ON TABLE FILE GGSALES SUM BUDUNITS UNITS BUDDOLLARS DOLLARS BY REGION BY ST BY CATEGORY BY PRODUCT ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * GRID=OFF,FONT=ARIAL,$ TYPE=DATA, COLUMN=REGION, TARGET='_blank', FOCEXEC=sample_sales_drill(RG=REGION ST='ZZ' CAT='ZZ' PRD='ZZ'), $ TYPE=DATA, COLUMN=ST, TARGET='_blank', FOCEXEC=sample_sales_drill(RG='ZZ' ST=ST CAT='ZZ' PRD='ZZ'), $ TYPE=DATA, COLUMN=BUDUNITS, TARGET='_blank', FOCEXEC=sample_sales_drill(RG=REGION ST=ST CAT=CATEGORY PRD=PRODUCT), $ END
-* FEX : SAMPLE_SALES_DRILL -SET &RG = IF '&RG.EVAL' EQ 'ZZ' THEN FOC_NONE ELSE '''&RG.EVAL'''; -SET &ST = IF '&ST.EVAL' EQ 'ZZ' THEN FOC_NONE ELSE '''&ST.EVAL'''; -SET &CAT = IF '&CAT.EVAL' EQ 'ZZ' THEN FOC_NONE ELSE '''&CAT.EVAL'''; -SET &PRD = IF '&PRD.EVAL' EQ 'ZZ' THEN FOC_NONE ELSE '''&PRD.EVAL'''; TABLE FILE GGSALES PRINT UNITS DOLLARS BUDUNITS BUDDOLLARS BY REGION BY ST BY CATEGORY BY PRODUCT BY CITY BY DATE WHERE REGION EQ &RG; WHERE ST EQ &ST; WHERE CATEGORY EQ &CAT; WHERE PRODUCT EQ &PRD; ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * GRID=OFF,FONT=ARIAL,$ ENDThis message has been edited. Last edited by: MartinY,
In FOCUS since 1986 | WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2 | ||
WebFOCUS App Studio 8.2.06 standalone on Windows 10 |
DEFINE FILE GGSALES REG_DRILL/A350 = '<a href="/ibi_apps/WFServlet.ibfs?IBIF_webapp=/ibi_apps&|IBIC_server=EDASERVE&|IBIWF_msgviewer=OFF&|IBIAPP_app=focalpoint' ||'&|IBIF_ex=sample_sales_drill&|CLICKED_ON=&|RG='||REGION||'&|ST=ZZ&|CAT=ZZ&|PRD=ZZ" target="_blank">'||REGION||'</a>'; ST_DRILL/A350 = '<a href="/ibi_apps/WFServlet.ibfs?IBIF_webapp=/ibi_apps&|IBIC_server=EDASERVE&|IBIWF_msgviewer=OFF&|IBIAPP_app=focalpoint' ||'&|IBIF_ex=sample_sales_drill&|CLICKED_ON=&|RG=ZZ&|ST='||ST||'&|CAT=ZZ&|PRD=ZZ" target="_blank">'||ST||'</a>'; CAT_DRILL/A350 = '<a href="/ibi_apps/WFServlet.ibfs?IBIF_webapp=/ibi_apps&|IBIC_server=EDASERVE&|IBIWF_msgviewer=OFF&|IBIAPP_app=focalpoint' ||'&|IBIF_ex=sample_sales_drill&|CLICKED_ON=&|RG=ZZ&|ST=ZZ&|CAT='||CATEGORY||'&|PRD=ZZ" target="_blank">'||CATEGORY||'</a>'; PRD_DRILL/A350 = '<a href="/ibi_apps/WFServlet.ibfs?IBIF_webapp=/ibi_apps&|IBIC_server=EDASERVE&|IBIWF_msgviewer=OFF&|IBIAPP_app=focalpoint' ||'&|IBIF_ex=sample_sales_drill&|CLICKED_ON=&|RG=ZZ&|ST=ZZ&|CAT=ZZ&|PRD='||PRODUCT||'" target="_blank">'||PRODUCT||'</a>'; END TABLE FILE GGSALES SUM BUDUNITS UNITS BUDDOLLARS DOLLARS BY REG_DRILL AS REGION ROW-TOTAL BY ST_DRILL AS ST BY CAT_DRILL AS CATEGORY BY PRD_DRILL AS PRODUCT
In FOCUS since 1986 | WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2 | ||
WebFOCUS App Studio 8.2.06 standalone on Windows 10 |
DEFINE FILE GGSALES REG_DRILL/A350 = '<a href="/ibi_apps/WFServlet.ibfs?IBIF_webapp=/ibi_apps&|IBIC_server=EDASERVE&|IBIWF_msgviewer=OFF&|IBIAPP_app=focalpoint' ||'&|IBIF_ex=sample_sales_drill&|CLICKED_ON=&|RG='||REGION||'&|ST=ZZ&|CAT=ZZ&|PRD=ZZ" target="_blank">'||REGION||'</a>'; ST_DRILL/A350 = '<a href="/ibi_apps/WFServlet.ibfs?IBIF_webapp=/ibi_apps&|IBIC_server=EDASERVE&|IBIWF_msgviewer=OFF&|IBIAPP_app=focalpoint' ||'&|IBIF_ex=sample_sales_drill&|CLICKED_ON=&|RG=ZZ&|ST='||ST||'&|CAT=ZZ&|PRD=ZZ" target="_blank">'||ST||'</a>'; CAT_DRILL/A350 = '<a href="/ibi_apps/WFServlet.ibfs?IBIF_webapp=/ibi_apps&|IBIC_server=EDASERVE&|IBIWF_msgviewer=OFF&|IBIAPP_app=focalpoint' ||'&|IBIF_ex=sample_sales_drill&|CLICKED_ON=&|RG=ZZ&|ST=ZZ&|CAT='||CATEGORY||'&|PRD=ZZ" target="_blank">'||CATEGORY||'</a>'; PRD_DRILL/A350 = '<a href="/ibi_apps/WFServlet.ibfs?IBIF_webapp=/ibi_apps&|IBIC_server=EDASERVE&|IBIWF_msgviewer=OFF&|IBIAPP_app=focalpoint' ||'&|IBIF_ex=sample_sales_drill&|CLICKED_ON=&|RG=ZZ&|ST=ZZ&|CAT=ZZ&|PRD='||PRODUCT||'" target="_blank">'||PRODUCT||'</a>'; END TABLE FILE GGSALES SUM BUDUNITS UNITS BUDDOLLARS DOLLARS BY REG_DRILL AS REGION ROW-TOTAL BY ST_DRILL AS ST BY CAT_DRILL AS CATEGORY BY PRD_DRILL AS PRODUCT ON TABLE SET HTMLCSS ON ON TABLE SET EXPANDBYROW ON ON TABLE SET STYLE * GRID=OFF,FONT=ARIAL,$ END
In FOCUS since 1986 | WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2 | ||
WebFOCUS App Studio 8.2.06 standalone on Windows 10 |
DEFINE FILE GGSALES REG_DRILL/A150 = '<a href="/ibi_apps/WFServlet?IBIF_ex=el_accordion_drilldown&' | 'CLICKED_ON=' | '&' | 'RGN=' ||REGION|| '" target=_blank">' ||REGION|| '</a>'; ST_DRILL/A150 = '<a href="/ibi_apps/WFServlet?IBIF_ex=el_accordion_drilldown&' | 'CLICKED_ON=' | '&' | 'ST=' ||ST|| '" target=_blank">' ||ST|| '</a>'; END TABLE FILE GGSALES SUM GGSALES.SALES01.BUDUNITS GGSALES.SALES01.UNITS GGSALES.SALES01.BUDDOLLARS GGSALES.SALES01.DOLLARS BY LOWEST REG_DRILL BY LOWEST ST_DRILL BY LOWEST GGSALES.SALES01.CATEGORY ON TABLE SET PAGE-NUM NOLEAD ON TABLE SET EXPANDBYROW ON ON TABLE NOTOTAL ON TABLE PCHOLD FORMAT HTML ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * INCLUDE = endeflt, $ ENDSTYLE END
In FOCUS since 1986 | WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2 | ||
WebFOCUS App Studio 8.2.06 standalone on Windows 10 |
DEFINE FILE VAPTSRPT RGN/A45=VAPTSRPT.VAPTSRPT.RPTG_ROCD || '_' | J0.RPTOFC.RGN_NM || ''; ST/A25=VAPTSRPT.VAPTSRPT.RPTG_ST_CD || '_' | J0.RPTOFC.STNM || ''; RGN_DRILL/A500 = '<a href="/ibi_apps/WFServlet?IBIF_webapp=/ibi_apps&' | 'IBIC_server=EDASERVE&' | 'IBIWF_msgviewer=OFF&' | 'IBIAPP_app=vaptmi&&' | 'IBIMR_drill=X,vaptmirt/vaptmirt.htm&' | 'IBIF_ex=app/oview_gf_s&' | 'CLICKED_ON=' | '&' | 'RGN=' ||VAPTSRPT.VAPTSRPT.RPTG_ROCD|| '&' | 'FREQ=' | '&FREQ' || '&' | 'RPT_ENDT='| '&RPT_ENDT' || '&' | 'ADJ_LVL=' | '&ADJ_LVL' || '" target=_blank">' ||RGN|| '</a>'; END TABLE FILE VAPTSRPT SUM VAPTSRPT.VAPTSRPT.VAPT100_RCPT_CNT BY LOWEST RGN_DRILL BY LOWEST J0.RPTOFC.ST WHERE ( VAPTSRPT.VAPTSRPT.RPTG_PRD_ENDT EQ '&RPT_ENDT' ) AND ( VAPTSRPT.VAPTSRPT.SMRPTPRD_TYP_CD EQ '&FREQ' ); ON TABLE SET DROPBLNKLINE ON ON TABLE SET EXPANDBYROW ON ON TABLE SUMMARIZE VAPTSRPT.VAPTSRPT.VAPT100_RCPT_CNT AS 'TOTAL' ON TABLE PCHOLD FORMAT HTML ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * INCLUDE = endeflt, $
quote:target=_blank">
In FOCUS since 1986 | WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2 | ||
WebFOCUS App Studio 8.2.06 standalone on Windows 10 |
RGN_DRILL/A220 = '<a href="/ibi_apps/WFServlet?IBIF_ex=app/oview_gf_s.fex&' || 'CLICKED_ON=' || '&' | 'IBIMR_drill=X' | ',' | 'vaptmirt/vaptmirt.htm' || '&' | 'RGN=' ||RPTG_ROCD|| '&' | 'FREQ=' | '&FREQ' || '&' | 'RPT_ENDT='| '&RPT_ENDT' || '&' | 'ADJ_LVL=' | '&ADJ_LVL' || '" target="graph1">' ||RGN|| '</a>';