/**************************   Rule Code Report *****************************
**
**  This is an example of how to create a report of the Finance Rule Classes. 
**
**  This is example code.  You may use this technique to create reports.
**
***************************************************************************
**
**		Not for production processing.  Run in test and verify for your 
**   		environment.
**
*************************************************************************
** 		©  2001, 2006 Sungard Higher Education. All Rights Reserved.
** 				Not for web publication. 
**
***************************************************************************
** Audit Trail
** Modified 8-Sep-06 by Jim Beyer
** Added header, edited code to reference pack standard.
**
***************************************************************************/

Set Linesize 140 
Set Pagesize 60 
Set Newpage 0 Ttitle 'Sungard HE Rule Class List'

Break On RULE Nodup Skip 2 On Title Nodup Spool Ruleall.Lst

Select 
       FTVRUCL_RUCL_CODE RULE,
       FTVRUCL_CLASS_TITLE Title,
       FTVRUCL_BALANCE_METHOD B,
       Nvl(FTVRULP_PROC_CODE, 'None') PROC,
       Nvl(FTVSDAT_TITLE, 'Unknown') PROCESS_TITLE,
       FTVRULP_POSTING_ACTION A,
       FTVRULP_AMT_IND "$",
       FTVRULP_POST_ZERO_IND Z,
       FTVRULP_COAS_CODE_OVERRIDE C,
       FTVRULP_ACCI_CODE_OVERRIDE Acci,
       FTVRULP_FUND_CODE_OVERRIDE Fund,
       FTVRULP_ORGN_CODE_OVERRIDE Orgn,
       FTVRULP_ACCT_CODE_OVERRIDE Acct,
       FTVRULP_PROG_CODE_OVERRIDE Prog,
       FTVRULP_ACTV_CODE_OVERRIDE ACTV,
       FTVRULP_LOCN_CODE_OVERRIDE Locn
From
	 fimsmgr.ftvrucl,
       fimsmgr.ftvrulp,
       fimsmgr.ftvsdat
Where 
       FTVRUCL_RUCL_CODE = FTVRULP_RUCL_CODE (+) and
      FTVRUCL_EFF_DATE = FTVRULP_EFF_DATE (+) and
      FTVRUCL_NCHG_DATE is NULL and
      FTVSDAT_SDAT_CODE_OPT_1 (+) = Nvl(FTVRULP_PROC_CODE, 'None') and
      FTVSDAT_NCHG_DATE (+) Is NULL 
       And FTVSDAT_SDAT_CODE_ENTITY (+) = 'FTVRULP' 
       And FTVSDAT_SDAT_CODE_ATTR (+) = 'FTVRULP_PROC_CODE' 
       And FTVSDAT_COAS_CODE (+) is NULL

Order By 
       FTVRUCL_RUCL_CODE,
         FTVRULP_RULP_CODE
;

Spool Off