Copyright © TIBCO Software Inc. All Rights Reserved
Copyright © TIBCO Software Inc. All Rights Reserved


Appendix A Sample Report Definitions and Rules : Across Report Sample Report Screens and Rule

Across Report Sample Report Screens and Rule
DEPT_EXPENSE_SUM Report
The following illustration shows the definition for the DEPT_EXPENSE_SUM report:

 
DEFINE REPORT: DEPT_EXPENSE_SUM Unit: USR40
Command ===>
Page Length: 60 Page Width : 132 Fill Missing Data : .
REPORTTABLES: Origin Max Max Title Blank Title Heading Title Final
Name Row Col Occ Acr Only Overlap Rows Rows Cols Cols
---------------- --- --- ---- ---- - - -- -- --- ---
_ DEPT_EXPENSE_SUM 1 1 * * N 1 2 11 24
_
_
_
_
CONTROL BREAKS: Max Repeat Title Body Control
Name Acr Head Rows Reporttable Break Field
---------------- ---- - -- ---------------- ---------------
_ 0 DEPT_EXPENSE_SUM MONTH_NUMBER
_ TOTAL_EXP_BR * N 0 DEPT_EXPENSE_SUM
_ 0
PFKEYS: 3=SAVE 12=CANCEL 2=DOC 22=DELETE 6=PAINT 13=PRT 21=DISPLAY 16=LITERAL

 
DEPT_EXPENSE_SUM Rule
The following illustration shows the definition for the DEPT_EXPENSE_SUM rule:

 
RULE EDITOR ===> SCROLL: P
DEPT_EXPENSE_SUM(MEDIA);
_
_ ---------------------------------------------------------------------------
_ ------------------------------------------------------------+--------------
_ FORALL $EMPLOYEE_EXPENS : | 1
_ DEPT_EXPENSE_SUM.MONTH_NUMBER = $DATE_PIC(’MM’, |
_ $EMPLOYEE_EXPENS.MONTH); |
_ FORALL EMPLOYEE_EXPENSE($EMPLOYEE_EXPENS.MONTH) : |
_ DEPT_EXPENSE_SUM.* = EMPLOYEE_EXPENSE.*; |
_ INSERT DEPT_EXPENSE_SUM(’DEPT_EXPENSE_SUM’); |
_ END; |
_ END; |
_ CALL $SETRPTMEDIUM(’DEPT_EXPENSE_SUM’, ‘VISUAL’, ‘SCR’); | 2
_ PRINT DEPT_EXPENSE_SUM; | 3
_ ---------------------------------------------------------------------------
_
_
_
_
_
_ _

 

Copyright © TIBCO Software Inc. All Rights Reserved
Copyright © TIBCO Software Inc. All Rights Reserved