Hi Everyone - This is my first exposure to WebFocus and I am having an issue that I am not understanding. When i run my results I am grouping using "by" on 3 fields, the first is fund, second index and third program. When the results are run the column headers are being placed into the results. Ideally i would like for it to be on the top of each page(for printing purposes). Can anyone point me in the right direction? Thanks in advance!
< ![CDATA[DEFINE FILE OPERATING_LEDGER_MV ADD CC_BALANCE_FWD/P19.2=IF ACCOUNT LIKE '19%' AND ACCOUNT NE '1903' THEN SUM_YEAR_TO_DATE_ACTIVITY ELSE 0; C_CURR_YEAR_REVENUE/P19.2=IF ACCOUNT_TYPE_LEVEL_2 EQ '51' OR ACCOUNT_TYPE_LEVEL_2 EQ '52' THEN SUM_YEAR_TO_DATE_ACTIVITY ELSE 0; CC_ALLOCATIONS_TRANSFERS/P19.2=IF ACCOUNT EQ '1903' THEN SUM_YEAR_TO_DATE_ACTIVITY ELSE 0; CC_CURR_YEAR_EXPENSES/P19.2=IF ACCOUNT_TYPE_LEVEL_1 EQ '60' OR ACCOUNT_TYPE_LEVEL_1 EQ '70' THEN SUM_YEAR_TO_DATE_ACTIVITY ELSE 0; CC_CURR_YEAR_REVENUE/P19.2=IF ACCOUNT_TYPE_LEVEL_2 EQ '51' OR ACCOUNT_TYPE_LEVEL_2 EQ '52' THEN SUM_YEAR_TO_DATE_ACTIVITY ELSE 0; CC_ENDING_BALANCE/P19.2=CC_BALANCE_FWD +CC_CURR_YEAR_REVENUE +CC_ALLOCATIONS_TRANSFERS-CC_CURR_YEAR_EXPENSES; PROG/A42=OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.PROGRAM_CODE | ' ' | OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.PROGRAM_DESC; MONTH/A3= IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 07 THEN 'JAN' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 08 THEN 'FEB' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 09 THEN 'MAR' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 10 THEN 'APR' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 11 THEN 'MAY' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 12 THEN 'JUN' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 01 THEN 'JUL' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 02 THEN 'AUG' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 03 THEN 'SEP' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 04 THEN 'OCT' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 05 THEN 'NOV' ELSE IF EDIT(OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD) EQ 06 THEN 'DEC'; END TABLE FILE OPERATING_LEDGER_MV SUM CC_BALANCE_FWD/P19.2CB AS 'BALANCE,FORWARD' CC_CURR_YEAR_REVENUE/P19.2CB AS 'CURRENT YEAR,REVENUE' CC_ALLOCATIONS_TRANSFERS/P19.2CB AS 'ALLOCATIONS/,TRANSFERS' CC_CURR_YEAR_EXPENSES/P19.2CB AS 'CURRENT YEAR,EXPENSES' CC_ENDING_BALANCE/P19.2CB AS 'ENDING,BALANCE' COMPUTE CURRENT_TIME/HMDYYIA = HGETC(8, 'HMDYYIA'); NOPRINT BY LOWEST FUND NOPRINT BY LOWEST INDEX_DESC AS 'INDEX' NOPRINT BY PROG AS 'PROGRAM'
ON FUND SUBHEAD "Fund: ON FUND SUBTOTAL MULTILINES AS '*TOTAL for FUND:'
ON PROG SUBTOTAL MULTILINES AS '*SUBTOTAL for PROGRAM:' ON TABLE SUBHEAD "Non Endowed Spending Funds" "As of:ON TABLE SUBFOOT " Page WHERE ( OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_YEAR EQ &FISCAL_YEAR.(OR(FIND OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_YEAR,OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_YEAR IN operating_ledger_mv)).Fiscal Year:. ) AND ( OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FISCAL_PERIOD EQ &CALENDAR_MONTH.(OR(,,,,,,,,,,)).Calendar Month:. ) AND ( OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.FUND EQ &FUND.(OR(<2U0007,2U0007>,<3U0001,3U0001>,<3U0002,3U0002>,<3U0301,3U0301>,<4U0005,4U0005>,<5U0004,5U0004>,<6U0005,6U0005>,<7U0004,7U0004>)).Fund:. ) AND ( OPERATING_LEDGER_MV.OPERATING_LEDGER_MV.CHART_OF_ACCOUNTS EQ 'U' ); ON TABLE SET EXPENDABLE ON ON TABLE SET PAGE-NUM NOLEAD ON TABLE NOTOTAL ON TABLE PCHOLD FORMAT &WFFMT.(,,,,,,,).Select type of display output. ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * INCLUDE = endeflt, $ LEFTMARGIN=0.250000, RIGHTMARGIN=0.250000, TOPMARGIN=0.250000, BOTTOMMARGIN=0.250000, SUMMARY='FORHOO02 - Non Endowed Spending Funds Report', TITLETEXT='FORHOO02 - Non Endowed Spending Funds Report', $ TYPE=TABHEADING, LINE=1, OBJECT=TEXT, ITEM=1, SIZE=10, STYLE=BOLD, $ TYPE=TABHEADING, LINE=2, OBJECT=TEXT, ITEM=1, SIZE=10, STYLE=BOLD, $ TYPE=TABHEADING, LINE=2, OBJECT=TEXT, ITEM=2, SIZE=10, STYLE=BOLD, $ TYPE=TABHEADING, LINE=2, OBJECT=TEXT, ITEM=3, SIZE=10, STYLE=BOLD, $ TYPE=TABHEADING, LINE=2, OBJECT=FIELD, ITEM=1, SIZE=10, STYLE=BOLD, $ TYPE=TABHEADING, LINE=2, OBJECT=FIELD, ITEM=2, SIZE=10, STYLE=BOLD, $ TYPE=TABFOOTING, LINE=1, OBJECT=TEXT, ITEM=1, SIZE=9, STYLE=NORMAL, $ TYPE=TABFOOTING, LINE=1, OBJECT=TEXT, ITEM=2, SIZE=9, STYLE=NORMAL, $ TYPE=TABFOOTING, LINE=1, OBJECT=TEXT, ITEM=3, SIZE=9, STYLE=NORMAL, $ TYPE=TABFOOTING, LINE=1, OBJECT=TEXT, ITEM=4, SIZE=9, STYLE=NORMAL, $ TYPE=TABFOOTING, LINE=1, OBJECT=TEXT, ITEM=5, SIZE=9, STYLE=NORMAL, $ TYPE=TABFOOTING, LINE=1, OBJECT=FIELD, ITEM=1, SIZE=9, STYLE=NORMAL, $ TYPE=TABFOOTING, LINE=1, OBJECT=FIELD, ITEM=2, SIZE=9, STYLE=NORMAL, $ TYPE=TABFOOTING, LINE=1, OBJECT=FIELD, ITEM=3, SIZE=9, STYLE=NORMAL, $ ENDSTYLE END]]>This message has been edited. Last edited by: Kerry,
WebFocus 8.01 Windows 7 Enterprise
November 15, 2012, 11:33 PM
Ram Prasad E
If your problem is how to get "Fund: As of:" to topic of each page then use HEADING instead of ON FUND SUBHEAD. Below is a sample code with CAR file.
TABLE FILE CAR
SUM
SALES
DEALER_COST
BY COUNTRY NOPRINT
BY CAR NOPRINT
BY MODEL
HEADING
"Fund: As of:"
END
You have not mentioned about output format. Also if you want this report for printing purpose, better go for PDF format.
Hi George you are correct about that portion being a mess. I was handed this code and have to maintain it! Thanks for the constructive feedback, FIYR should help. I definitely need to refactor those subheaders as well.