Need logic for Group By function

Hi,
I written this query for the requirement, but when the column column 'exposure_code' included in the group by function,
it's increasing the count's of records, becuase of different combination of values. (its having value like 'DRAWN', 'UNDRAWN', 'OOBS').
Is that any possiblility to get the value of exposure_code column without including the column name in the group by clause.
  SELECT   /*+NO_MERGE(noacct)*/
                 vbcar.month_end_date, vbcar.source_system,
                 rf1.pillar3_exposure_class_code, vbcar.exposure_code
                 vbcar.exposure_class_code,
                 CASE
                    WHEN vbcar.source_system = 'ML'
                       THEN 'Margin_Lending'
                    WHEN vbcar.source_system = 'ICBS'
                       THEN    'Amicus'
                            || vbcar.ccis_product_group
                    WHEN vbcar.source_system IN ('ACBS', 'ASNEMP')
                       THEN 'Other'
                    WHEN vbcar.source_system = 'CLSORG'
                       THEN 'CBNF_Excalibur'
                    WHEN vbcar.source_system = 'TARGET'
                    AND vbcar.exposure_code = 'UNDRAW'
                    AND vbcar.acc_rk = -1
                       THEN 'CBNF_Target'
                    WHEN vbcar.source_system = 'PCL'
                    AND vbcar.exposure_class_code = 'REVOLV'
                    AND vbcar.exposure_code = 'UNDRAW'
                       THEN 'PLC_Unsecured'
                    ELSE vbcar.ccis_product_group
                 END AS line_of_business,
                 decode(vbcar.ccis_product,vbcar.ccis_product,vbcar.ccis_product),
                  vbcar.pd_value, vbcar.lgd_rate,
                 --stfc.term_period_mth_cnt,
                 -- Fix for 993 on Sep28th 2009
                 CASE
                    WHEN vbcar.exposure_class_code =
                                           'REVOLV'
                       THEN 'No Specific Maturity'
                    ELSE rf3.residual_maturity_term
                 END AS residual_maturity_term,
                 -- Fix for 993 on Sep28th 2009
                 -- Fix for MQC - 964
                 SUM (vbcar.pre_sec_ead_amt) AS ead_pre_sec_pre_crm,
                 SUM (vbcar.post_sec_ead_amt) AS ead_post_sec_pre_crm,
                 SUM
                    (CASE
                        WHEN vbcar.exposure_class_code = 'REMORT'
                        AND vbcar.exposure_code = 'DRAWN'
                        AND (   NVL (vbcar.insurer_type_cd, '') IN
                                                               ('GVN', 'PRI')
                             OR vbcar.acc_securitized_ind = 'E'
                           THEN 0
                        WHEN vbcar.ccis_product_group = 'Student_Loans'
                           THEN vbcar.post_gov_ead_amt
                        ELSE vbcar.post_sec_ead_amt
                     END
                    ) AS ead_post_sec_post_crm,
                 CASE
                    WHEN vbcar.exposure_class_code = 'REMORT'
                    AND vbcar.insurer_type_cd IN ('GVN', 'PRI')     --UAT: 948
                       THEN 'FULLY INSURED'
                    WHEN vbcar.ccis_product_group = 'Student_Loans'
                    AND vbcar.post_gov_ead_amt = 0
                       THEN 'FULLY INSURED'
                    WHEN vbcar.ccis_product_group = 'Student_Loans'
                    AND vbcar.post_gov_ead_amt > 0
                       THEN 'PARTIALLY INSURED'
                    ELSE 'NOT INSURED'
                 END AS insured_ind,
                 /*CASE
                    WHEN vbcar.acc_securitized_ind = 'E'
                       THEN 'FULLY SECURITIZED'
                    WHEN vbcar.source_system = 'TSYS'
                    AND vbcar.pre_sec_ead_amt > vbcar.post_sec_ead_amt
                       THEN 'PARTIALLY SECURITIZED'
                    ELSE 'NOT SECURITIZED'
                 END AS securitized_ind,*/
                 SUM (vbcar.notional_principal_amt) AS notional_principal_amt,
                 SUM
                    (CASE
                        WHEN vbcar.exposure_class_code = 'REMORT'
                        AND NVL (vbcar.insurer_type_cd, '') IN ('GVN', 'PRI')
                           THEN 0
                        WHEN vbcar.ccis_product_group = 'Student_Loans'
                           THEN vbcar.post_gov_rwa_amt
                        ELSE vbcar.post_sec_rwa_amt
                     END
                    ) AS rwa,
                 SUM
                    (CASE
                        WHEN vbcar.exposure_class_code = 'REMORT'
                        AND NVL (vbcar.insurer_type_cd, '') IN ('GVN', 'PRI')
                           THEN 0
                        WHEN vbcar.ccis_product_group = 'Student_Loans'
                           THEN vbcar.post_gov_el_amt
                        ELSE vbcar.post_sec_el_amt
                     END
                    ) AS el,
                   SUM
                      (CASE
                          WHEN vbcar.exposure_class_code = 'REMORT'
                          AND NVL (vbcar.insurer_type_cd, '') IN
                                                               ('GVN', 'PRI')
                             THEN 0
                          WHEN vbcar.ccis_product_group = 'Student_Loans'
                             THEN vbcar.post_gov_rwa_amt
                          ELSE vbcar.post_sec_rwa_amt
                       END
                 * .08 AS capital,
                 NVL (inv1.geo_section, 'CANADA') geo_section,
                 COUNT (noacct.count_of_accounts) count_of_accounts,
                 -- Fix for 973
                 decode(vbcar.pd_model_id,vbcar.pd_model_id,vbcar.pd_model_id),
                 SYSDATE load_date, SYSDATE update_date,
                 'PILLAR3' user_id
            FROM summary.pillar3_bcar_detail vbcar,
                 -- Fix for 973
                 (SELECT DISTINCT acc_rk count_of_accounts
                             FROM summary.pillar3_bcar_detail a
                            WHERE a.acc_rk <> -1                      --143053
                  UNION
                  SELECT DISTINCT cr_app_rk count_of_accounts
                             FROM summary.pillar3_bcar_detail a
                            WHERE a.cr_app_rk <> -1) noacct,
                 -- Fix for 973
                 rcdwstg.stg_fin_acc stfc,
                 (SELECT prty.party_src_rk party_src_rk,
                                                        -- Fix for UAT 962
                                                        src.acc_rk acc_rk,
                         prty.country_cd, rf4.geo_section
                    FROM rcdwstg.stg_party_src prty,
                         (SELECT   MAX (party_src_rk) psrk, acc_rk
                              FROM rcdwstg.stg_fin_acc_party_src
                             WHERE party_role_cd = 'BOR'
                          GROUP BY acc_rk) src,
                         REFERENCE.ref_geo_section rf4
                   WHERE src.psrk = prty.party_src_rk
                         AND rf4.country_code(+) = prty.country_cd) inv1,
                 REFERENCE.ref_p3_bcar_exposure_class_cd rf1,
                 (SELECT residual_maturity_term, value_from, value_to
                    FROM REFERENCE.ref_maturity_term) rf3
           -- Fix for MQC - 964
        WHERE    vbcar.acc_rk = stfc.acc_rk(+)
             AND vbcar.acc_rk = inv1.acc_rk(+)
             --AND vbcar.bcar_id = noacct.bcar_id(+)    -- Fix for 973                                        -- Commented out for the fix of SIT 1162 on March 29th 2010
             AND DECODE (vbcar.acc_rk, -1, vbcar.cr_app_rk, vbcar.acc_rk) =
                    noacct.count_of_accounts(+)
                      -- Added code for the fix of SIT 1162 on March 29th 2010
             AND vbcar.pd_value <> 0
             AND vbcar.exposure_class_code = rf1.bcar_exposure_class_code
             AND (   (    stfc.term_period_mth_cnt IS NULL
                      AND rf3.value_from IS NULL
                  OR (stfc.term_period_mth_cnt BETWEEN rf3.value_from
                                                   AND NVL
                                                         (rf3.value_to,
                                                          stfc.term_period_mth_cnt
                 )                                        -- Fix for MQC - 964
        GROUP BY vbcar.month_end_date,
                 vbcar.source_system,
                 rf1.pillar3_exposure_class_code,
                 vbcar.exposure_code,
                 vbcar.exposure_class_code,
                 CASE
                    WHEN vbcar.source_system = 'ML'
                       THEN 'Margin_Lending'
                    WHEN vbcar.source_system = 'ICBS'
                       THEN 'Amicus' || vbcar.ccis_product_group
                    WHEN vbcar.source_system IN ('ACBS', 'ASNEMP')
                       THEN 'Other'
                    WHEN vbcar.source_system = 'CLSORG'
                       THEN 'CBNF_Excalibur'
                    WHEN vbcar.source_system = 'TARGET'
                    AND vbcar.exposure_code = 'UNDRAW'
                    AND vbcar.acc_rk = -1
                       THEN 'CBNF_Target'
                    WHEN vbcar.source_system = 'PCL'
                    AND vbcar.exposure_class_code = 'REVOLV'
                    AND vbcar.exposure_code = 'UNDRAW'
                       THEN 'PLC_Unsecured'
                    ELSE vbcar.ccis_product_group
                 END,
                 --vbcar.ccis_product,
                 vbcar.pd_value,
                 vbcar.lgd_rate,
                 -- stfc.term_period_mth_cnt,
                 rf3.residual_maturity_term,              -- Fix for MQC - 964
                 CASE
                    WHEN vbcar.exposure_class_code = 'REMORT'
                    AND vbcar.insurer_type_cd IN ('GVN', 'PRI')     --UAT: 948
                       THEN 'FULLY INSURED'
                    WHEN vbcar.ccis_product_group = 'Student_Loans'
                    AND vbcar.post_gov_ead_amt = 0
                       THEN 'FULLY INSURED'
                    WHEN vbcar.ccis_product_group = 'Student_Loans'
                    AND vbcar.post_gov_ead_amt > 0
                       THEN 'PARTIALLY INSURED'
                    ELSE 'NOT INSURED'
                 END,                
                 NVL (inv1.geo_section, 'CANADA'),
                 vbcar.pd_model_id
                 )Thanks
Radha K

Hi,
I am getting '9263212' as total_length. I have posted the table structure and some sample data.
-- SUMMARY.PILLAR3_BCAR_DETAIL
NAME                            Null?     Type
BCAR_ID                                   NUMBER
ACC_RK                                    NUMBER
CR_APP_RK                                 NUMBER
SOURCE_SYSTEM                             VARCHAR2(25)
EXPOSURE_CLASS_CODE                       VARCHAR2(6)
EXPOSURE_CODE                             VARCHAR2(6)
CCIS_ACCOUNT                              VARCHAR2(7)
CCIS_BRANCH_OF_ACCOUNT                    VARCHAR2(5)
CCIS_CUST_GROUP                           VARCHAR2(5)
CCIS_PRODUCT                              VARCHAR2(4)
CCIS_ORG_UNIT                             VARCHAR2(5)
CCIS_PRODUCT_ORG_ID                       VARCHAR2(5)
CCIS_PRODUCT_GROUP                        VARCHAR2(20)
CCIS_CCY_CODE                             VARCHAR2(3)
ACC_SECURITIZED_IND                       VARCHAR2(1)
INSURER_TYPE_CD                           VARCHAR2(20)
SUBSIDIARY_CODE                           VARCHAR2(6)
PD_MODEL_ID                               VARCHAR2(32)
PD_BAND                                   VARCHAR2(30)
PD_VALUE                                  NUMBER(34,6)
LGD_RATE                                  NUMBER(34,6)
PRE_SEC_AUTHORIZED_CD_LIMIT               NUMBER(34,2)
PRE_SEC_OUTSTANDING_BALANCE               NUMBER(34,2)
POST_SEC_OUTSTANDING_BALANCE              NUMBER(34,2)
PRE_SEC_EAD_AMT                           NUMBER(34,2)
POST_SEC_EAD_AMT                          NUMBER(34,2)
PRE_SEC_RWA_AMT                           NUMBER(34,2)
POST_SEC_RWA_AMT                          NUMBER(34,2)
PRE_SEC_EL_AMT                            NUMBER(34,2)
POST_SEC_EL_AMT                           NUMBER(34,2)
NOTIONAL_PRINCIPAL_AMT                    NUMBER(15,2)
MONTH_END_DATE                            DATE
LOAD_TIME                                 DATE
UPDATE_TIME                               DATE
POST_GOV_OUTSTANDING_BALANCE              NUMBER(34,2)
POST_GOV_EAD_AMT                          NUMBER(34,2)
POST_GOV_RWA_AMT                          NUMBER(34,2)
POST_GOV_EL_AMT                           NUMBER(34,2)
POST_SEC_AUTHORIZED_CD_LIMIT              NUMBER(38,2)
INSURER_NAME                              VARCHAR2(50)
ADJ_CYCLE_ID                              NUMBER
TARGET_HELOC_IND                          VARCHAR2(1)
ORIG_ACC_RK                               NUMBER(*,0)
CURR_CCIS_PROD                            VARCHAR2(4)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100124900,-1,7021736,'CLSORG','REMORT','UNDRAW','3101100','19702','A0810','0590','09702','09702','Mortgages','CAD','N',NULL,'S1001','MTGPDRTA98','0.001712-0.001900',0.19,11.8183,0,NULL,NULL,0,0,0,0,0,0,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,0,NULL,0,'N',NULL,NULL)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100124901,-1,7006862,'CLSORG','REMORT','UNDRAW','3101100','19702','A0810','0590','09702','09702','Mortgages','CAD','N',NULL,'S1001','MTGPDRTA98','0.001712-0.001900',0.19,11.8183,0,NULL,NULL,0,0,0,0,0,0,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,0,NULL,0,'N',NULL,NULL)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100125019,-1,7001515,'CLSORG','REMORT','UNDRAW','3101100','19702','A0810','0590','09702','09702','Mortgages','CAD','N',NULL,'S1001','MTGPDRTA98','0.001712-0.001900',0.19,11.8183,0,NULL,NULL,0,0,0,0,0,0,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,0,NULL,0,'N',NULL,NULL)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100028602,19857874,-1,'CLASS','OTHRET','DRAWN','1301000','00806','A0810','1260','00806','92181','PL_Unsecured','CAD','N',NULL,'S1001','PLXPDRT010101','0.009062-0.012143',1.2143,82.8109,10284.2,10279.13,10279.13,10284.2,10284.2,9371.67,9371.67,103.42,103.42,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,10284.2,NULL,0,'N',NULL,NULL)
INSERT INTO &&table_name
(BCAR_ID,ACC_RK,CR_APP_RK,SOURCE_SYSTEM,EXPOSURE_CLASS_CODE,EXPOSURE_CODE,CCIS_ACCOUNT,CCIS_BRANCH_OF_ACCOUNT,CCIS_CUST_GROUP,CCIS_PRODUCT,CCIS_ORG_UNIT,CCIS_PRODUCT_ORG_ID,CCIS_PRODUCT_GROUP,CCIS_CCY_CODE,ACC_SECURITIZED_IND,INSURER_TYPE_CD,SUBSIDIARY_CODE,PD_MODEL_ID,PD_BAND,PD_VALUE,LGD_RATE,PRE_SEC_AUTHORIZED_CD_LIMIT,PRE_SEC_OUTSTANDING_BALANCE,POST_SEC_OUTSTANDING_BALANCE,PRE_SEC_EAD_AMT,POST_SEC_EAD_AMT,PRE_SEC_RWA_AMT,POST_SEC_RWA_AMT,PRE_SEC_EL_AMT,POST_SEC_EL_AMT,NOTIONAL_PRINCIPAL_AMT,MONTH_END_DATE,LOAD_TIME,UPDATE_TIME,POST_GOV_OUTSTANDING_BALANCE,POST_GOV_EAD_AMT,POST_GOV_RWA_AMT,POST_GOV_EL_AMT,POST_SEC_AUTHORIZED_CD_LIMIT,INSURER_NAME,ADJ_CYCLE_ID,TARGET_HELOC_IND,ORIG_ACC_RK,CURR_CCIS_PROD)
VALUES
(100028603,19857886,-1,'CLASS','OTHRET','DRAWN','1301300','00002','A0810','1260','00002','92181','PL_Unsecured','CAD','N',NULL,'S1001',NULL,NULL,1.2143,82.8109,0,280.36,280.36,0,0,0,0,0,0,0,'SATURDAY, FEBRUARY 28, 2009','SATURDAY, JANUARY 30, 2010','SATURDAY, JANUARY 30, 2010',0,0,0,0,0,NULL,0,'N',NULL,NULL)
---STG_FIN_ACC table
NAME                            Null?     Type
NTRL_CONCAT_K_ACC               NOT NULL  VARCHAR2(255)
ACC_RK                          NOT NULL  NUMBER(*,0)
SOURCE_SYSTEM                   NOT NULL  VARCHAR2(25)
BATCH_ID                        NOT NULL  NUMBER(*,0)
UPDATE_TIME                     NOT NULL  DATE
LOAD_TIME                       NOT NULL  DATE
VALID_FROM_DT                   NOT NULL  DATE
VALID_TO_DT                     NOT NULL  DATE
FINANCIAL_ACC_TYPE_CD           NOT NULL  VARCHAR2(20)
CR_APP_RK                                 NUMBER(*,0)
ACC_BR_TRANSFER_REASON_CD                 VARCHAR2(20)
ACC_PRE_PAYMENT_OPTION_CD                 VARCHAR2(20)
ACC_PURPOSE_CD                            VARCHAR2(20)
ACC_RT_SCHEDULE_CD                        VARCHAR2(20)
CCIS_BRANCH_OF_ACCOUNT                    CHAR(5)
ORIGINATION_ORG_UNIT_ID                   VARCHAR2(20)
PAYMENT_FREQUENCY_CD                      VARCHAR2(20)
PAYMENT_METHOD_CD                         VARCHAR2(20)
PAYMENT_TYPE_CD                           VARCHAR2(20)
ACC_INTERNAL_LENDER_NAME                  VARCHAR2(65)
SRC_SYS_ACC_NUM                 NOT NULL  VARCHAR2(40)
ACC_CAP_RT_START_DT                       DATE
ACC_CAP_RT_END_DT                         DATE
ACC_CAP_RT                                NUMBER
ACC_CAP_CHARGE_LIMIT_PCT                  NUMBER(10,4)
ACC_OPEN_DT                               DATE
ACC_CLOSE_DT                              DATE
ACC_CLOSE_REASON_CD                       VARCHAR2(20)
ACC_LAST_ASSUMPTION_DT                    DATE
ACC_LAST_RENEWAL_DT                       DATE
ACC_LAST_MATURITY_DT                      DATE
ACC_LAST_PORT_DT                          DATE
ACC_LAST_REWRITE_DT                       DATE
ACC_MATURITY_DT                           DATE
ACC_NEXT_RENEWAL_DT                       DATE
FIRST_INTEREST_ADJUSTMENT_DT              DATE
INTEREST_PAYMENT_START_DT                 DATE
LAST_EXTENT_RENEGOTIATION_DT              DATE
PAYMENT_START_DT                          DATE
PRINCIPAL_PAYMENT_END_DT                  DATE
TERM_START_DT                             DATE
TERM_MATURITY_DT                          DATE
TERM_PERIOD_MTH_CNT                       NUMBER(4,0)
TERM_ANNUAL_INTEREST_RT                   NUMBER
TERM_PER_ANNUM_INTEREST_RT                NUMBER
ACC_FRAUD_IND                             VARCHAR2(1)
GROUP_ACC_IND                             VARCHAR2(1)
ACC_LIFETIME_CAP_INT_RT                   NUMBER
ACC_TRIGGER_INTEREST_RT                   NUMBER
ACC_AMORTIZATION_PD                       NUMBER
ACC_TOT_EXTENSIONS_CNT                    NUMBER(3,0)
ACC_TOT_RENEWAL_CNT                       NUMBER(3,0)
TOT_INTEREST_COST_AMT                     NUMBER(38,2)
ACC_FINAL_REPAYMENT_AMT                   NUMBER(38,2)
ACC_LAST_RENEWAL_VAL_AMT                  NUMBER(38,2)
ACC_LIFETIME_OUTST_BAL_AMT                NUMBER(38,2)
ORIGINAL_PRINCIPAL_BAL_AMT                NUMBER(38,2)
FINANCIAL_PROD_RK                         NUMBER(*,0)
ACC_REVOLVING_FLG                         VARCHAR2(1)
CCIS_CCY_CODE                             CHAR(3)
ACC_WORST_ARREARS_DAYS_CNT                NUMBER(3,0)
OD_FYTD_DAY_CNT                           NUMBER(3,0)
OD_ORIGINATION_DT                         DATE
SRC_SYS_TRANSIT_NUM                       VARCHAR2(5)
SRC_SYS_APPLICATION_NUM                   VARCHAR2(40)
INSTRUMENT_QUALIFIER                      VARCHAR2(25)
NTRL_CONCAT_K_APP                         VARCHAR2(255)
NTRL_CONCAT_K_FIN_PROD                    VARCHAR2(255)
SRC_SYS_APP_ID                            VARCHAR2(40)
SRC_SYS_TRANSIT_NUM_APP                   VARCHAR2(25)
SRC_SYS_APPLICATION_QUALIFIER             VARCHAR2(25)
LOAN_CATEGORY_CD                          VARCHAR2(20)
SRC_SYS_PRODUCT_ID                        VARCHAR2(20)
CCIS_PRODUCT                              CHAR(4)
DIGEST_VALUE                              VARCHAR2(32)
RELATED_FINANCIAL_ACC_RK                  NUMBER(*,0)
MARKETING_SOURCE_CD                       VARCHAR2(20)
FINANCIAL_PROD_SEC_CLASS_CD               VARCHAR2(20)
DIGEST_VALUE_CC                           VARCHAR2(32)
DIGEST_VALUE_MTGE                         VARCHAR2(32)
DOMICILE_ORG_UNIT_ID                      VARCHAR2(20)
MARKETING_FEATURE_CODE                    VARCHAR2(20)
CR_APP_SEQ_NUM                            NUMBER(*,0)
OD_IND                                    VARCHAR2(1)
ACC_ORIGINAL_WROFF_AMT                    NUMBER
DIGEST_VALUE_INTEREST_RT                  VARCHAR2(32)
SOURCE_SYSTEM_FEED_CD                     VARCHAR2(25)
DIGEST_VALUE_CORE                         VARCHAR2(32)
SEGMENT_NAME                              VARCHAR2(60)
MTGE_PROCESSING_IND                       VARCHAR2(1)
HIGH_VALUE_INDICATOR                      VARCHAR2(1)
LINE_OF_BUSINESS                          VARCHAR2(2)
BUILDER_CODE                              VARCHAR2(5)
MTG_CUSTOMER_GROUP                        VARCHAR2(2)
GOVT_REPORTING_CODE                       VARCHAR2(2)
ORIG_SRC_SYS_ACC_NUM                      VARCHAR2(40)
ORIG_SRC_SYS_TRANSIT_NUM                  NUMBER(5,0)
ORIG_ACC_RK                               NUMBER(*,0)
ORIG_CCIS_PRODUCT                         CHAR(4)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PURCHMORTGEN00001',19866078,'PURCHMORT',357,'THURSDAY, MARCH 04, 2010','THURSDAY, MARCH 04, 2010','SATURDAY, OCTOBER 31, 2009','FRIDAY, DECEMBER 31, 9999','LOAN',-1,NULL,NULL,'UNK',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00000',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00000',NULL,NULL,'-1',NULL,NULL,NULL,NULL,NULL,'UNK',NULL,'95EEFFD275D4879702E53254886D534D',NULL,NULL,'UNK',NULL,NULL,NULL,NULL,NULL,NULL,0,NULL,'GENERICFEED',NULL,'GENPURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PURCHMORTGEN00002',19866079,'PURCHMORT',357,'THURSDAY, MARCH 04, 2010','THURSDAY, MARCH 04, 2010','SATURDAY, OCTOBER 31, 2009','FRIDAY, DECEMBER 31, 9999','LOAN',-1,NULL,NULL,'PURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'0000000000000000000000002',NULL,NULL,NULL,NULL,'THURSDAY, JANUARY 01, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'SATURDAY, JUNE 06, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00002',NULL,NULL,'-1',NULL,NULL,NULL,NULL,NULL,'1234567890ABCDEFGHIJ',NULL,'AC8AFAFCE5501EB3038B8F48EF10D842',NULL,NULL,'REA',NULL,NULL,NULL,NULL,NULL,NULL,100,NULL,'GENERICFEED',NULL,'GENPURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PURCHMORTGEN00003',19866080,'PURCHMORT',357,'THURSDAY, MARCH 04, 2010','THURSDAY, MARCH 04, 2010','SATURDAY, OCTOBER 31, 2009','FRIDAY, DECEMBER 31, 9999','LOAN',-1,NULL,NULL,'PURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'0000000000000000000000003',NULL,NULL,NULL,NULL,'THURSDAY, JANUARY 01, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'SATURDAY, JUNE 06, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00003',NULL,NULL,'-1',NULL,NULL,NULL,NULL,NULL,'1234567890ABCDEFGHIJ',NULL,'72717E6EFA7BD60E863D3920664FDDFE',NULL,NULL,'REA',NULL,NULL,NULL,NULL,NULL,NULL,200,NULL,'GENERICFEED',NULL,'GENPURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PURCHMORTGEN00004',19866081,'PURCHMORT',357,'THURSDAY, MARCH 04, 2010','THURSDAY, MARCH 04, 2010','SATURDAY, OCTOBER 31, 2009','FRIDAY, DECEMBER 31, 9999','LOAN',-1,NULL,NULL,'PURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'0000000000000000000000004',NULL,NULL,NULL,NULL,'THURSDAY, JANUARY 01, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,'SATURDAY, JUNE 06, 2009',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,'00004',NULL,NULL,'-1',NULL,NULL,NULL,NULL,NULL,'1234567890ABCDEFGHIJ',NULL,'27746EBD70E09C911260A36E89361275',NULL,NULL,'REA',NULL,NULL,NULL,NULL,NULL,NULL,300,NULL,'GENERICFEED',NULL,'GENPURCHMORT',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
INSERT INTO &&table_name
(NTRL_CONCAT_K_ACC,ACC_RK,SOURCE_SYSTEM,BATCH_ID,UPDATE_TIME,LOAD_TIME,VALID_FROM_DT,VALID_TO_DT,FINANCIAL_ACC_TYPE_CD,CR_APP_RK,ACC_BR_TRANSFER_REASON_CD,ACC_PRE_PAYMENT_OPTION_CD,ACC_PURPOSE_CD,ACC_RT_SCHEDULE_CD,CCIS_BRANCH_OF_ACCOUNT,ORIGINATION_ORG_UNIT_ID,PAYMENT_FREQUENCY_CD,PAYMENT_METHOD_CD,PAYMENT_TYPE_CD,ACC_INTERNAL_LENDER_NAME,SRC_SYS_ACC_NUM,ACC_CAP_RT_START_DT,ACC_CAP_RT_END_DT,ACC_CAP_RT,ACC_CAP_CHARGE_LIMIT_PCT,ACC_OPEN_DT,ACC_CLOSE_DT,ACC_CLOSE_REASON_CD,ACC_LAST_ASSUMPTION_DT,ACC_LAST_RENEWAL_DT,ACC_LAST_MATURITY_DT,ACC_LAST_PORT_DT,ACC_LAST_REWRITE_DT,ACC_MATURITY_DT,ACC_NEXT_RENEWAL_DT,FIRST_INTEREST_ADJUSTMENT_DT,INTEREST_PAYMENT_START_DT,LAST_EXTENT_RENEGOTIATION_DT,PAYMENT_START_DT,PRINCIPAL_PAYMENT_END_DT,TERM_START_DT,TERM_MATURITY_DT,TERM_PERIOD_MTH_CNT,TERM_ANNUAL_INTEREST_RT,TERM_PER_ANNUM_INTEREST_RT,ACC_FRAUD_IND,GROUP_ACC_IND,ACC_LIFETIME_CAP_INT_RT,ACC_TRIGGER_INTEREST_RT,ACC_AMORTIZATION_PD,ACC_TOT_EXTENSIONS_CNT,ACC_TOT_RENEWAL_CNT,TOT_INTEREST_COST_AMT,ACC_FINAL_REPAYMENT_AMT,ACC_LAST_RENEWAL_VAL_AMT,ACC_LIFETIME_OUTST_BAL_AMT,ORIGINAL_PRINCIPAL_BAL_AMT,FINANCIAL_PROD_RK,ACC_REVOLVING_FLG,CCIS_CCY_CODE,ACC_WORST_ARREARS_DAYS_CNT,OD_FYTD_DAY_CNT,OD_ORIGINATION_DT,SRC_SYS_TRANSIT_NUM,SRC_SYS_APPLICATION_NUM,INSTRUMENT_QUALIFIER,NTRL_CONCAT_K_APP,NTRL_CONCAT_K_FIN_PROD,SRC_SYS_APP_ID,SRC_SYS_TRANSIT_NUM_APP,SRC_SYS_APPLICATION_QUALIFIER,LOAN_CATEGORY_CD,SRC_SYS_PRODUCT_ID,CCIS_PRODUCT,DIGEST_VALUE,RELATED_FINANCIAL_ACC_RK,MARKETING_SOURCE_CD,FINANCIAL_PROD_SEC_CLASS_CD,DIGEST_VALUE_CC,DIGEST_VALUE_MTGE,DOMICILE_ORG_UNIT_ID,MARKETING_FEATURE_CODE,CR_APP_SEQ_NUM,OD_IND,ACC_ORIGINAL_WROFF_AMT,DIGEST_VALUE_INTEREST_RT,SOURCE_SYSTEM_FEED_CD,DIGEST_VALUE_CORE,SEGMENT_NAME,MTGE_PROCESSING_IND,HIGH_VALUE_INDICATOR,LINE_OF_BUSINESS,BUILDER_CODE,MTG_CUSTOMER_GROUP,GOVT_REPORTING_CODE,ORIG_SRC_SYS_ACC_NUM,ORIG_SRC_SYS_TRANSIT_NUM,ORIG_ACC_RK,ORIG_CCIS_PRODUCT)
VALUES
('PCL8018166323',19864976,'PCL',472,'MONDAY, JANUARY 25, 2010','MONDAY, JANUARY 25, 2010','SATURDAY, FEBRUARY 28, 2009','FRIDAY, DECEMBER 31, 9999','PLC',NULL,NULL,NULL,'99',NULL,'01084',NULL,'MONTH','MANUAL','OTHER','CIBC','8018166323',NULL,NULL,NULL,NULL,'WEDNESDAY, JULY 14, 2004',NULL,'UNK',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,5.25,NULL,NULL,NULL,NULL,NULL,0,NULL,NULL,NULL,NULL,NULL,NULL,537,'Y','CAD',NULL,NULL,NULL,'1084',NULL,NULL,'PCL8018166323','PCLPLCVARUNS','8018166323',NULL,NULL,NULL,'3','1226','0CF50CD64776937BC3926EA169C7F4A2',NULL,'P4SA','UNS',NULL,NULL,'1084',NULL,NULL,NULL,NULL,NULL,'PCL',NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL)
/Thanks
Radha K

Similar Messages

  • Sort order for group by functions

    I have table TAB1(notenum number, linenum number, linetext varchar2(100)).
    Each note can have multiple lines of text. Eg data
    NOTENUM     LINENUM     LINETEXT
    1     1     THIS IS LINE1.
    1     2     THIS IS LINE2.
    2     1     THIS IS LINE1 OF NOTE2.
    2     2     THIS IS LINE2 OF NOTE2.
    I need the text of lines of the most recent note (max notenum)
    <Note>THIS IS LINE1 OF NOTE2. THIS IS LINE2 OF NOTE2</Note>.
    I have a query like this
    SELECT XMLAGG(XMLPARSE(CONTENT LINETEXT WELLFORMED))
    FROM TAB1
    GROUP BY NOTENUM
    ORDER BY NOTENUM DESC
    Above query would return the text of all lines concatenated for each note and the first row would be the one with highest notenum value.
    My problem is that concatenation of the LINETEXT should happen in ascending order of LINENUM. Since LINENUM is not in GROUP BY clause I cannot specify it in ORDER BY.
    How can I specify to XMLAGG (for that matter any group by function) to concatenate text in a specific order.
    I hope I was able to explain my problem clear enough for somebody to help.
    thanks for all the help
    Message was edited by:
    user448703
    Message was edited by:
    user448703

    Never mind. I just found out that XMLAGG function has the option to specify ORDER BY. I think that will work.

  • Need logic for invoice due date and discount due date uncear

    Hi Experts.. am new to ABAP
    i had an issue please need some logics for these..
    Formatting of the Invoice due dates and Discount due date is unclear e.g 20101109,
    Invoice due date and Discount due dates are in correct on 10 and 20 days  reminders on missing credit notes for blocked invoices.
    <removed by moderator>
    Thanks & Regards
    Edited by: Thomas Zloch on May 18, 2011 1:55 PM

    Can you provide more info?
    are you talking about BSID open accounts?
    if yes, use function module DETERMINE_DUE_DATE.
    <removed by moderator>
    Edited by: Thomas Zloch on May 18, 2011 2:10 PM - please do not ask for "award"

  • Need logic for calculate the balance quantity in open sales order

    hi all
    i need logic to calcuclate the balance quantity in open sales order ,
    where i am using VBAK header and VBAP item , and VBFA for document flow tables
    i need to have the balance quantity , for the open sales order
    especially taking with respect to  VBFA-VBTYP_N = M for invoice creation and N for canellation
    any one please help me

    thank you but i am clear abt it
    will you please anyother way to calucaluate the logic ,
    and i need to populate in bukets also for the terms of 5 years
    Edited by: sridhar loganathan on Nov 25, 2008 6:43 AM

  • Need help for IDOC inbound function module !

    Hi guys please help me to create a IDOC inbound function module.
    What are the parameters and tables.
    How to write the code.
    What it does.
    Please send me one inbound func module code if possuble
                                                                                  Thanks

    Hi,
    You need to create an inbound function module. Then define the process code in transaction we42 and attach the function module to this process code.
    In the function module you create you need to define tables of types EDIDC (Control record (IDoc)), EDIDD (Data record (IDoc)) and BDIDOCSTAT (ALE IDoc status (subset of all IDoc status fields)).
    Regards,
    Soumya.

  • Need logic for  af:inputNumberSlider

    Hello,
    Does anyone have any code samples that codes logic for <af:inputNumberSlider> component?
    If yes, would you mind pasting on this forum thread?
    Thanks a million for the help.
    Regards,
    Ruchir

    Checkout the following blog post:
    http://www.jroller.com/mwessendorf/entry/ajax_client_side_convertion_with
    --Ric                                                                                                                                                                                                                                               

  • Logic for user defined function in java language.

    Hi Guys,
    I want to use a "&" function in below code & include vafrdate.substring(130,132).equals("01").
    if ( delperiod.substring(4,6).equals("01") )
    Need your help to include & function in java code.
    In layman language , i need,
    if ( delperiod.substring(4,6).equals("01")  & (vafrdate.substring(130,132).equals("01"))
    pls help me to do it in java language.

    Santosh,
    Use this -
    if ( delperiod.substring(4,6).equals("01")  && vafrdate.substring(130,132).equals("01"))
    Regards,
    Neetesh

  • Need logic for po item

    Hi iam trying to get the po line item latest changedby name to display in my report
    can you give me the logic to get the changed by name for theline item.
    i have written the code but if i change the line item 20 then in the out put the changedby name is being displayed for line itema 10 ,20, 30 i e for all line items .but i want the changeby name to be displayed only for the particular line item which was changed.
    *& Report  ZMR_PO_AUDIT_RPT                                            *
    *&  Purpose - Report on PO release details for auditing.               *
    Program ID  :  ZMR_PO_AUDIT_RPT                                     *
    Title       :  Purchase Release Audit Report                        *
    Create Date :  19.03.2007                                           *
    Author      :  Marina Gosman (JH IT services)                       *
    Tech. Spec  :                                                       *
    Change Req #:                                                       *
    Changed by  |  Description of change                    |  Date     *
    MarinaG     | Change the report Heading to Purchase     |           *
                 | Order Action Audit Report R3DK912376      |23.03.07   *
    MarinaG     | Fix a select bug. R3DK912384              |23.03.07   *
    MarinaG     | Change report heading by removing fields  |27.03.07   *
                 | R3DK912404                                |           *
    MarinaG     | Add exception checkbox which will only    |3.04.07    *
                 | show the same GR, Released and Created    |           *
                 | username R3DK912444.                      |           *
    MarinaG     | Add GR Value and Vendor Name FP#1919      |28.08.07   *
                 | R3DK912809                                |           *
    MarinaG     | Add line item no., display line items for |11.10.07   *
                 | GR period and GR date FP#1919 R3DK912960  |           *
    REPORT ZSAMPLE3 NO STANDARD PAGE HEADING LINE-SIZE 200
    MESSAGE-ID zv.
    Database Tables
    TABLES: ekko,t16fd,cdhdr,cdpos,t000,lfa1,t024,ekbe,mkpf.
    TYPE-POOLS slis.
    Type Declaration
    *TYPE-POOLS: kkblo.
    Structures
    DATA:BEGIN OF st_output,
         ebeln  LIKE ekko-ebeln,
         batxt  LIKE t161t-batxt,
         banfn  LIKE eban-banfn,
         bukrs  LIKE ekko-bukrs,
         frggr  LIKE ekko-frggr,
         frgsx  LIKE ekko-frgsx,
         frgct  LIKE t16fd-frgct,
         udate  LIKE cdhdr-udate,
         utime  like cdhdr-utime,
         username LIKE cdhdr-username,
         lifnr  LIKE ekko-lifnr,        " vendor
         name1  LIKE lfa1-name1,        " vendor name
         ebelp  LIKE ekpo-ebelp,        " line no.
         afnam  LIKE ekpo-afnam,        " requisitioner
         netwr  LIKE ekpo-netwr,
         ekgrp  LIKE ekko-ekgrp,
         eknam  LIKE t024-eknam,
         ernam  LIKE ekko-ernam,
         grnam  LIKE ekbe-ernam,
         bedat  LIKE ekko-bedat,
         budat  LIKE ekbe-budat,
         belnr  LIKE ekbe-belnr,                                "R3DK912960
         dmbtr  LIKE ekbe-dmbtr,                                "R3DK912960
    Indira
         cdate  LIKE cdhdr-username,
    Indira
    END OF st_output.
    Indra
    DATA: l_ponum LIKE ekko-ebeln,
          l_poline LIKE ekpo-ebelp.
    DATA: BEGIN OF t_EKbe OCCURS 0,
          ebeln LIKE EKbe-ebeln,
          belnr LIKE EKbe-Belnr,
          budat LIKE EKbe-Budat,
          cputm LIKE EKbe-cputm,
          END OF T_EKbe.
    DATA: BEGIN OF T_mkpf OCCURS 0,
           mblnr LIKE mkpf-mblnr,
           usnam LIKE mkpf-usnam,
           END OF T_mkpf.
    Internal Tables
    DATA: t_cdhdr LIKE cdhdr OCCURS 0 WITH HEADER LINE,
          t_cdhdr1 LIKE cdhdr OCCURS 0 WITH HEADER LINE,
          po_ekko LIKE ekko OCCURS 0 WITH HEADER LINE.
    Indra
    DATA: t_cdpos LIKE cdpos OCCURS 0 WITH HEADER LINE.
    indra
    DATA: BEGIN OF tbl_output OCCURS 0.
            INCLUDE STRUCTURE st_output.
    DATA: END OF tbl_output.
    DATA: BEGIN OF tbl_ekpo OCCURS 0.
            INCLUDE STRUCTURE ekpo.
    DATA: END OF tbl_ekpo.
    DATA: BEGIN OF tbl_ekbe OCCURS 0.
            INCLUDE STRUCTURE ekbe.
    DATA: END OF tbl_ekbe.
    DATA:  BEGIN OF t_ekko OCCURS 0,
              ebeln TYPE ebeln,
              ebelp TYPE ebelp,                                 "R3DK912960
              belnr TYPE MBLNR,                                 "R3DK912960
              bukrs TYPE bukrs,
              bsart TYPE bsart,
              bedat TYPE bedat,
              budat TYPE budat,
              ernam TYPE ernam,
              grnam TYPE ernam,
              dmbtr TYPE dmbtr,                                 "R3DK912960
           END OF t_ekko.
    DATA: c_tcode(25) TYPE c.
    DATA: st_fieldcat    TYPE slis_fieldcat_alv.
    DATA: tbl_fieldcat   TYPE slis_t_fieldcat_alv.
    DATA: st_event       TYPE slis_alv_event.
    DATA: tbl_events     TYPE slis_t_event.
    DATA: fieldname(30)  TYPE c.
    DATA: st_layout      TYPE slis_layout_alv.
    DATA: g_status       TYPE slis_formname VALUE 'STANDARD01'.
    DATA: g_user_command TYPE slis_formname VALUE 'USER_COMMAND'.
    DATA: st_status      TYPE slis_status.
    DATA: tbl_status     TYPE slis_status OCCURS 0 WITH HEADER LINE.
    DATA: f_ebeln        LIKE ekko-ebeln.
    DATA: cursorfield    LIKE ekko-ebeln.
    DATA: ws_ebeln       LIKE ekko-ebeln,
          ws_netwr       LIKE ekpo-netwr,
          ws_ernam       LIKE ekbe-ernam,
          rs_selfield    TYPE slis_selfield,
          ws_dmbtr       LIKE ekbe-dmbtr.                       "R3DK912809
    RANGES: r_kunnr FOR vbak-kunnr OCCURS 0.
    Selection Screen
    SELECTION-SCREEN BEGIN OF BLOCK title WITH FRAME TITLE text-001.
    SELECT-OPTIONS: s_bukrs  FOR ekko-bukrs OBLIGATORY,
                    s_ekorg  FOR ekko-ekorg OBLIGATORY,
                    s_ebeln  FOR ekko-ebeln,
                    s_groups FOR ekko-ekgrp,
                    s_lifnr  FOR ekko-lifnr,
                    s_bedat  FOR ekko-bedat,
                    s_budat  FOR ekbe-budat,
                    s_bsart  FOR ekko-bsart.
    SELECTION-SCREEN END OF BLOCK title .
    SELECTION-SCREEN BEGIN OF BLOCK title2 WITH FRAME TITLE text-001.
    PARAMETERS: p_gr AS CHECKBOX DEFAULT 'X',
                p_excep AS CHECKBOX.
    SELECTION-SCREEN END OF BLOCK title2 .
    *& AT SELECTION SCREEN
    AT SELECTION-SCREEN.
      IF NOT p_gr IS INITIAL.
        IF s_budat IS INITIAL.
          MESSAGE s000 WITH 'Please enter Goods Receipt Date.'.
          STOP.
        ENDIF.
      ELSE.
        IF s_bedat IS INITIAL.
          MESSAGE s000 WITH 'Please enter Purch Doc Date.'.
          STOP.
        ENDIF.
      ENDIF.
                       START-OF-SELECTION.
    START-OF-SELECTION.
      PERFORM select_data.         " Select data
      PERFORM sort_table.
      PERFORM get_events.          " Include header in display
      PERFORM get_eventstatus.     " Set the GUI status
      PERFORM get_layout.          " Define ALV Layout
      PERFORM get_fieldcat.        " Fill report fields
      PERFORM create_report.       " Write ALV format
    AT LINE-SELECTION.
      PERFORM user_command USING sy-ucomm
                                 rs_selfield.
          FORM user_command                                             *
    -->  R_UCOMM                                                       *
    -->  RS_SELFIELD                                                   *
    FORM user_command USING r_ucomm LIKE sy-ucomm
                      rs_selfield TYPE slis_selfield.
      DATA: l_ta TYPE sy-tcode VALUE 'SLIS_DUMMY'.
      CLEAR: f_ebeln.
      CASE r_ucomm.
        WHEN 'CF1'.
          READ TABLE tbl_output INDEX rs_selfield-tabindex.
          IF sy-subrc = 0.
            f_ebeln = tbl_output-ebeln.
          ENDIF.
          SET PARAMETER ID 'BES' FIELD f_ebeln.
          CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
    Begin of R3DK912404
        WHEN 'EXIT' OR 'CANC'.
          LEAVE PROGRAM.
    End of R3DK912404
        WHEN 'OTHERS'.
      ENDCASE.
    ENDFORM.                    "user_command
          FORM STANDARD_02                                              *
    -->  EXTAB                                                         *
    FORM standard_01 USING  extab TYPE slis_t_extab.
      SET PF-STATUS 'STANDARD01' EXCLUDING extab .
    ENDFORM.                    "standard_01
    *&      Form  get_events
          setup report headings
    -->  p1        text
    <--  p2        text
    FORM get_events.
      CLEAR st_event.
      st_event-name = 'TOP_OF_PAGE'.
      st_event-form = 'PROCESS_TOP_OF_PAGE'.
      APPEND st_event TO tbl_events.
    ENDFORM.                    " get_events
          FORM get_eventstatus                                          *
    FORM get_eventstatus.
      CLEAR st_status.
      st_status-callback_pf_status_set = 'STANDARD_01'.
      APPEND st_status TO tbl_status.
    ENDFORM.                    " get_eventstatus
    *&      Form  get_layout
          text
    -->  p1        text
    <--  p2        text
    FORM get_layout.
      CLEAR st_layout.
      st_layout-zebra = 'X'.
    ENDFORM.                    " get_layout
    *&      Form  get_fieldcat
          text
    -->  p1        text
    <--  p2        text
    FORM get_fieldcat.
      PERFORM write_fieldcat USING 'EBELN' 'TBL_OUTPUT' 'EKKO' 'X' 1 ' '.
      PERFORM write_fieldcat USING 'BUKRS' 'TBL_OUTPUT' 'EKKO' 'X' 2 ' '.
    Begin of R3DK912960
      PERFORM write_fieldcat USING 'EBELP' 'TBL_OUTPUT' 'EKPO' 'X' 3 ' '.
    End of R3DK912960
      PERFORM write_fieldcat USING 'UDATE' 'TBL_OUTPUT' ' ' ' ' 4
      'Doc. Date'.
      PERFORM write_fieldcat USING 'UTIME' 'TBL_OUTPUT' ' ' ' ' 13
      'Doc. Time'.
    Begin of R3DK912960
      PERFORM write_fieldcat USING 'BUDAT' 'TBL_OUTPUT' ' ' ' ' 5
      'GR Date'.
    End of R3DK912960
      PERFORM write_fieldcat USING 'ERNAM' 'TBL_OUTPUT' ' ' ' ' 6
    'Created By'.
      PERFORM write_fieldcat USING 'USERNAME' 'TBL_OUTPUT' ' ' ' ' 7
    'Released By'.
      PERFORM write_fieldcat USING 'GRNAM' 'TBL_OUTPUT' ' ' ' ' 8
    'Goods Receipted By'.
      PERFORM write_fieldcat USING 'CDATE' 'TBL_OUTPUT' ' ' ' ' 9
      'Changed By'.
      PERFORM write_fieldcat USING 'NETWR' 'TBL_OUTPUT' ' ' ' ' 10
    'Total Value'.
      PERFORM write_fieldcat USING 'EKGRP' 'TBL_OUTPUT' 'EKKO' ' ' 11 ' '.
    Begin of R3DK912809
      PERFORM write_fieldcat USING 'DMBTR' 'TBL_OUTPUT' ' ' ' ' 12
    'GR Value '.
      PERFORM write_fieldcat USING 'NAME1' 'TBL_OUTPUT' ' ' ' ' 13
    'Vendor Name'.
    End of R3DK912809
    ENDFORM.                    " get_fieldcat
          FORM process_top_of_page                                      *
    FORM process_top_of_page.
      SKIP.
      ULINE.
      FORMAT COLOR COL_HEADING INTENSIFIED OFF .
    Begin of R3DK912376
    WRITE:/ 'Report Name     :  PO Release Audit Report',
      WRITE:/ 'Report Name     :  Purchase Order Actions Report',
    End of R3DK912376
           / 'Run Date        : ', sy-datum,
           / 'Run Time        : ', sy-uzeit,
    Begin of R3DK912404
         / 'Document Type   : ', c_tcode,
    End of R3DK912404
           / 'Company code    : ', s_bukrs-low.
      IF NOT s_bukrs-high IS INITIAL.
        WRITE: 'To', s_bukrs-high.
      ENDIF.
      WRITE:/ 'Purch Org       : ', s_ekorg-low.
      IF NOT s_ekorg-high IS INITIAL.
        WRITE: 'To', s_ekorg-high.
      ENDIF.
    Begin of R3DK912404
    WRITE:/ 'Purchase Order  : ', s_ebeln-low.
    IF NOT s_ebeln-high IS INITIAL.
       WRITE: 'To', s_ebeln-high.
    ENDIF.
    WRITE:/ 'Purchasing Grp  : ', s_groups-low.
    IF NOT s_groups-high IS INITIAL.
       WRITE: 'To', s_groups-high.
    ENDIF.
    WRITE:/ 'Vendor          : ', s_lifnr-low.
    IF NOT s_lifnr-high IS INITIAL.
       WRITE: 'To', s_lifnr-high.
    ENDIF.
      WRITE:/ 'Goods Receipt Date:', s_budat-low.
      IF NOT s_budat-high IS INITIAL.
        WRITE: 'To', s_budat-high.
      ENDIF.
    End of R3DK912404
      WRITE:/ 'Purch Doc Date  : ', s_bedat-low.
      IF NOT s_bedat-high IS INITIAL.
        WRITE: 'To', s_bedat-high.
      ENDIF.
    Begin of R3DK912404
    WRITE:/ 'Purch Doc Type  : ', s_bsart-low.
    IF NOT s_bsart-high IS INITIAL.
       WRITE: 'To', s_bsart-high.
    ENDIF.
    End of R3DK912404
      ULINE.
      FORMAT COLOR COL_HEADING INTENSIFIED OFF.
    ENDFORM.                    " process_top_of_page
    *&      Form  create_report
          text
    -->  p1        text
    <--  p2        text
    FORM create_report.
      SORT tbl_output BY ebeln ebelp.
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
        EXPORTING
          it_events                = tbl_events
          i_interface_check        = ' '
          i_callback_program       = 'ZSAMPLE3'
          i_callback_pf_status_set = g_status
          i_callback_user_command  = g_user_command
          is_layout                = st_layout
          it_fieldcat              = tbl_fieldcat
          i_default                = 'X'
          i_save                   = 'X'
        TABLES
          t_outtab                 = tbl_output
        EXCEPTIONS
          program_error            = 1
          OTHERS                   = 2.
      IF sy-subrc <> 0.
        MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.
    ENDFORM.                    " create_report
    *&      Form  select_data
          select records for specified selections
    -->  p1        text
    <--  p2        text
    FORM select_data.
      CLEAR: c_tcode, t_cdhdr, t_ekko, tbl_output.
      REFRESH: t_cdhdr, t_ekko, tbl_output, tbl_fieldcat.
      IF NOT p_gr IS INITIAL.
        SELECT DISTINCT a~ebeln "R3DK912960
        SELECT a~ebeln                                          "R3DK912960
               b~ebelp                                          "R3DK912960
               b~belnr
               a~bukrs
               a~bsart
               a~bedat
               b~budat
               a~ernam
               b~ernam
    INTO TABLE t_ekko
    FROM ekko AS a
    INNER JOIN ekbe AS b
    ON aebeln = bebeln
    Begin of R3DK912384
    AND b~bewtp = 'E'
    AND b~bwart = '101'
    End of R3DK912384
    WHERE a~bukrs IN s_bukrs AND
        a~ebeln IN s_ebeln AND
        a~ekgrp IN s_groups AND
        a~lifnr IN s_lifnr AND
        a~bsart IN s_bsart AND
        a~ekorg IN s_ekorg and
        a~bedat IN s_bedat AND
        b~budat IN s_budat AND
        a~frgke = 'R'
        ORDER BY aebeln bbudat DESCENDING.
    Begin of  R3DK912809 R3DK912960
        DELETE ADJACENT DUPLICATES FROM T_EKKO COMPARING EBELN.
    End of  R3DK912809 R3DK912960
      ELSE.
      SELECT DISTINCT a~ebeln       "R3DK912960
        SELECT a~ebeln                                          "R3DK912960
               b~ebelp                                          "R3DK912960
               b~belnr
               a~bukrs
               a~bsart
               a~bedat
               b~budat
               a~ernam
               b~ernam
            INTO TABLE t_ekko
            FROM ekko AS a
            LEFT JOIN ekbe AS b
            ON aebeln = bebeln
    Begin of R3DK912384
            AND b~bewtp = 'E'
            AND b~bwart = '101'
    End of R3DK912384
            WHERE a~bukrs IN s_bukrs AND
                  a~ebeln IN s_ebeln AND
                  a~ekgrp IN s_groups AND
                  a~lifnr IN s_lifnr AND
                  a~bsart IN s_bsart AND
                  a~ekorg IN s_ekorg AND
                  a~bedat IN s_bedat AND
                  a~frgke = 'R'
                  ORDER BY aebeln bbudat DESCENDING.
    Begin of  R3DK912809 R3DK912960
        DELETE ADJACENT DUPLICATES FROM T_EKKO COMPARING EBELN.
    End of  R3DK912809 R3DK912960
      ENDIF.
      sort t_ekko by ebeln ebelp budat descending.
    sivanew
      delete adjacent  duplicates from t_ekko comparing ebeln ebelp .
    sivanew
    IF sy-subrc EQ 0.            "R3DK912809
      IF NOT t_ekko[] IS INITIAL.                               "R3DK912809
        PERFORM process_data.
    Begin of R3DK912444
        IF NOT p_excep IS INITIAL.
          PERFORM get_exceptions.
        ENDIF.
    End of R3DK912444
      ENDIF.
    ENDFORM.                    " select_data
    *&      Form  write_fieldcat
          text
         -->P_0190   field name, if the SAP name used desc will be
                     automatically get from SAP table
         -->P_0191   Internale structure or table name
         -->P_0192   SAP table for field description
         -->P_0193   format
         -->P_1      Position
         -->P_0195   Custom Description
    FORM write_fieldcat USING name tab st key pos desc.
      st_fieldcat-fieldname = name.
      st_fieldcat-tabname = tab.
      st_fieldcat-ref_tabname = st.
      st_fieldcat-key = key.
      st_fieldcat-col_pos = pos.
      st_fieldcat-seltext_m = desc.
      IF pos = 12.
        st_fieldcat-outputlen = 40.
      ENDIF.
      APPEND st_fieldcat TO tbl_fieldcat.
      CLEAR st_fieldcat.
    ENDFORM.                    " write_fieldcat
    *&      Form  process_record
          text
    -->  p1        text
    <--  p2        text
    FORM process_record.
      DATA:l_ebeln LIKE ekko-ebeln.
      LOOP AT t_cdhdr.
        CLEAR: l_ebeln, ws_ebeln, ws_netwr, ws_ernam.
        MOVE t_cdhdr-objectid TO l_ebeln.
        CALL FUNCTION 'ME_EKKO_SINGLE_READ'
          EXPORTING
            pi_ebeln = l_ebeln
          IMPORTING
            po_ekko  = po_ekko.
    Begin of R3DK912809 R3DK912960
       SELECT SUM( dmbtr ) INTO ws_dmbtr
         FROM ekbe WHERE ebeln = l_ebeln
                     AND vgabe = '1'
                     AND bewtp = 'E'
                     GROUP BY ebeln.
       ENDSELECT.
    End of R3DK912809
        SELECT SINGLE dmbtr INTO t_ekko-dmbtr
           FROM ekbe WHERE ebeln = t_ekko-ebeln
                       AND ebelp = t_ekko-ebelp
                       AND belnr = t_ekko-belnr
                       AND vgabe = '1'
                       AND bewtp = 'E'.
        MODIFY T_EKKO.
    End of R3DK912960
        SELECT SINGLE ernam INTO t_ekko-grnam
             FROM ekbe WHERE ebeln = t_ekko-ebeln
                         AND ebelp = t_ekko-ebelp
                         AND ELIKZ = 'X'.
        MODIFY T_EKKO.
        SELECT ebeln SUM( netwr ) INTO (ws_ebeln, ws_netwr)
         FROM ekpo WHERE ebeln = l_ebeln       R3DK912960
           FROM ekpo WHERE ebeln = t_ekko-ebeln                 "R3DK912960
           GROUP by ebeln.
        ENDSELECT.
        IF sy-subrc EQ 0.
          IF s_groups IS INITIAL.
            PERFORM build_output.
          ELSE.
            IF po_ekko-ekgrp IN s_groups.
              PERFORM build_output.
            ENDIF.
          ENDIF.
        ENDIF.
      ENDLOOP.
    ENDFORM.                    " process_record
    *&      Form  get_customer
          Get Customers if sales office specified
    -->  p1        text
    <--  p2        text
    *&      Form  build_output
          text
    -->  p1        text
    <--  p2        text
    FORM build_output.
      DATA: l_line   LIKE ekpo-ebelp.
      DATA: l_requisitioner LIKE ekpo-afnam.
      IF po_ekko-frgke = 'R'.
        CLEAR: tbl_output.
        tbl_output-udate = t_cdhdr-udate.
        tbl_output-utime = t_cdhdr-utime.
        tbl_output-username = t_cdhdr-username.
        tbl_output-ebeln = po_ekko-ebeln.
        tbl_output-bukrs = po_ekko-bukrs.
        tbl_output-lifnr = po_ekko-lifnr.
        tbl_output-name1 = ' '.
        tbl_output-lifnr = po_ekko-lifnr.
        tbl_output-ekgrp = po_ekko-ekgrp.
       tbl_output-ernam = po_ekko-ernam.
        tbl_output-ernam = t_ekko-ernam.
        tbl_output-budat = t_ekko-budat.
       tbl_output-grnam = t_ekko-grnam.
        tbl_output-bedat = t_ekko-bedat.
        tbl_output-dmbtr = t_ekko-dmbtr.                        "R3DK912809
        tbl_output-ebelp = t_ekko-ebelp.
        SORT T_CDHDR1.
       sivanew
       read table t_cdhdr1 with key
                      objectid = t_cdhdr-objectid binary search.
       if sy-subrc = 0.
         tbl_output-cdate = t_cdhdr1-username.
       endif.
        read table t_cdhdr1 with key
                       tcode = 'ME22N' binary search.
        if sy-subrc = 0.
          SELECT * FROM cdpos INTO TABLE t_cdpos
                 WHERE objectid = t_cdhdr1-objectid AND
                       objectclas = 'EINKBELEG' AND
                 changenr = t_cdhdr1-changenr.
          IF sy-subrc = 0.
            l_ponum = t_cdpos-tabkey+3(10).
            l_poline = t_cdpos-tabkey+13(6).
          ENDIF.
        ENDIF.
        IF tbl_output-ebeln = l_ponum AND tbl_output-ebelp = l_poline.
          READ TABLE t_cdhdr1 WITH KEY changenr = t_cdpos-changenr
                                      tcode = 'ME22N' BINARY SEARCH.
          IF sy-subrc = 0.
            tbl_output-cdate = t_cdhdr1-username.
          ENDIF.
        ENDIF.
    ENDIF.
      select ebeln belnr budat cputm   from ekbe into table t_ekbe
                        where vgabe = '1' and
                              ebeln = t_cdhdr-objectid.
      sort t_ekbe by   budat descending cputm descending.
      delete adjacent duplicates from t_ekbe comparing ebeln.
      loop at t_ekbe.
        select mblnr usnam from mkpf into table t_mkpf
                                 where mblnr = t_ekbe-belnr.
        if sy-subrc = 0.
          read table t_mkpf with key
                           mblnr = t_ekbe-belnr binary search.
          move t_mkpf-usnam to   tbl_output-grnam.
        endif.
      endloop.
        Indra
    Get the user changed the record
       IF t_cdhdr-tcode = 'ME22N'.
         SELECT * FROM cdpos INTO TABLE t_cdpos
                WHERE objectid = t_cdhdr-objectid AND
                      objectclas = 'EINKBELEG' AND
                changenr = t_cdhdr-changenr.
         IF sy-subrc = 0.
           l_ponum = t_cdpos-tabkey+3(10).
           l_poline = t_cdpos-tabkey+13(6).
         ENDIF.
       ENDIF.
    indra
    Display creator or changer
       IF tbl_output-ebeln = l_ponum AND tbl_output-ebelp = l_poline.
         READ TABLE t_cdhdr WITH KEY changenr = t_cdpos-changenr
                                     tcode = 'ME22N' BINARY SEARCH.
         IF sy-subrc = 0.
           tbl_output-cdate = t_cdhdr-username.
         ENDIF.
       ENDIF.
    Indra
      SELECT SINGLE * FROM t024
             WHERE ekgrp = po_ekko-ekgrp.
      IF sy-subrc EQ 0.
        tbl_output-eknam = t024-eknam.
      ENDIF.
      tbl_output-netwr = ws_netwr.
      SELECT SINGLE name1 FROM lfa1
        INTO tbl_output-name1
        WHERE lifnr = po_ekko-lifnr.
    Get Document descriptions
      SELECT SINGLE batxt FROM t161t
             INTO tbl_output-batxt
             WHERE spras = 'E' AND
                   bsart = po_ekko-bsart AND
                   bstyp = po_ekko-bstyp.
    Get Release code descriptions
      SELECT SINGLE frgct FROM t16fd
                   INTO tbl_output-frgct
                   WHERE spras = 'E' AND
                         frggr = po_ekko-frggr AND
                         frgco = po_ekko-frgsx.
      APPEND tbl_output.
    ENDIF.
    ENDFORM.                    " build_output
    *&      Form  SORT_TABLE
          text
    -->  p1        text
    <--  p2        text
    FORM sort_table.
    SORT tbl_output BY ebeln ebelp ascending  udate  utime DESCENDING.
    SORT tbl_output BY ebeln  ascending  udate  utime DESCENDING.
    delete adjacent  duplicates from tbl_output comparing ebeln ebelp .
    ENDFORM.                    " SORT_TABLE
    *&      Form  PROCESS_DATA
          text
    -->  p1        text
    <--  p2        text
    FORM process_data.
      LOOP AT t_ekko.
        c_tcode = 'Purchase Orders'.
       SELECT * FROM cdhdr UP TO 1 ROWS INTO TABLE t_cdhdr "R3DK912960
        SELECT * FROM cdhdr   into table t_cdhdr
                WHERE objectclas = 'EINKBELEG' AND
                     objectid = t_ekko-ebeln AND
                        tcode = 'ME28'.
        SORT T_CDHDR BY UDATE DESCENDING  UTIME DESCENDING.
        delete adjacent duplicates from t_cdhdr  comparing objectid.
         siva
           SELECT * FROM cdhdr UP TO 1 ROWS INTO TABLE t_cdhdr1
    *"R3DK912960
        SELECT * FROM cdhdr  INTO TABLE t_cdhdr1
                WHERE objectclas = 'EINKBELEG' AND
                     objectid = t_ekko-ebeln AND
                        tcode = 'ME22N'.
        SORT T_CDHDR1 BY UDATE descending UTIME DESCENDING.
        delete adjacent duplicates from t_cdhdr1 comparing objectid.
       sivanew
       if c_tcode = 'ME22N'.
         SELECT * FROM cdpos INTO TABLE t_cdpos
                      WHERE objectid = t_cdhdr1-objectid AND
                            objectclas = 'EINKBELEG' AND
                      changenr = t_cdhdr1-changenr.
         IF sy-subrc = 0.
           l_ponum = t_cdpos-tabkey+3(10).
           l_poline = t_cdpos-tabkey+13(6).
         ENDIF.
       ENDIF.
    *sivanew
       IF sy-subrc = 0.
         delete adjacent  duplicates from t_cdhdr comparing objectid.
        PERFORM process_record.   " process each document
       ENDIF.
      ENDLOOP.
    ENDFORM.                    " PROCESS_DATA
    *&      Form  get_exceptions
          text
    -->  p1        text
    <--  p2        text
    form get_exceptions.
    Display a report which shows the same released, goods receipted and
    created by user
      LOOP AT tbl_output.
        IF tbl_output-username <> tbl_output-ernam OR
           tbl_output-ernam <> tbl_output-grnam.
          DELETE tbl_output.
        ENDIF.
      ENDLOOP.
    endform.                    " get_exceptions

    Hi,
    first of all you should read the following thread ABAP Development It is really hard to read code without proper formatting.
    It looks like you use change documents to get user name for last change. For each document you use last change document and hence you have same name for every item. I am not sure if it is possible (it should be) but for each item you need to look for last change document corresponding to this item. 
    Cheers

  • Prob in using rank in pl/sql ,need logic same of rank function in any way

    I have a query as of the following <br>
    <br>
    SELECT sr_no,cod_acct_no,dat_arrears_due,amt_arrear_due<br>
    FROM ( select cod_acct_no,dat_arrears_due,sum(amt_arrears_due) <br>amt_arrear_due,rank() over (partition by cod_acct_no order by <br>dat_arrears_due asc) sr_no<br>
              from arrears_table <br>
              where amt_arrears_due > 0<br>
    and dat_arrears_due <= to_date('31/10/2006','dd/mm/yyyy')<br>
    and COD_ARREAR_TYPE = 'C'<br>
         group by cod_acct_no,dat_arrears_due<br>
         ) Z <br>
    WHERE z.sr_no <=5 <br>
    <br>
    I have to use this in a cursor in pl/sql but because i have rank analytic function <br>
    I am facing a compilation error ORA-06550: error <br>
    <br>
    Can you give me a logic which gives same output as of above <br>
    <br>
    Regards<br>
    vamsi krishna<br>
    <br>
    <br>

    [1]: (Error): ORA-06550: line 5, column 28: PLS-00103: Encountered the <br>symbol "(" when expecting one of the following: , from <br>
    <br>
    My oracle version is <br>
    Oracle8i Enterprise Edition Release 8.1.6.0.0 - Production<br>
    PL/SQL Release 8.1.6.0.0 - Production<br>
    CORE 8.1.6.0.0 Production<br>
    TNS for 32-bit Windows: Version 8.1.6.0.0 - Production<br>
    NLSRTL Version 3.4.1.0.0 - Production<br>
    <br>I think it is comming for rank function it self <br>
    <br> will this version support analytic (rank) function's in pl/sql cursors<br>
    Regards<br>
    vamsi krishna<br>

  • Need logic for this output  itab  format

    hi guys
    i need the output itab in following format
    i have data in my present  itab
    itab-f1     itab-f2    itab-f3
    AAA         10    (means null,' ')
    AAA         20            
    BBB         10          
    BBB         20    A1
    BBB         30         
    and i want output in following way output itab
    itab-f1     itab-f2    itab-f3
    AAA     30          
    BBB         60      A1
    can anyone suggest me code for this

    You want the sum of f2 for a group of f1's?
    Is f3 going to be the same for that group?
    Try this
    sum = 0
    sort itab by f1.
    itab2 like itab.
    loop itab.
    sum = itab-f2 + sum.
    f3var = tab-f3.
    at end of f1.
    move itab-f1 to itab2-f1.
    move sum to itab2-f2.
    move f3var to itab2-f3.
    append itab2.
    sum = 0.
    endat.
    endloop.
    Edited by: Ramiro Escamilla on Feb 7, 2008 11:29 PM

  • Need logic for WHERE-clause

    Hi,
    I have a selet statement where i need to write below logic .
    SELECT bldat xblnr kunnr rstgr xref1 xref2
               bukrs belnr blart wrbtr waers shkzg
               buzei zfbdt dmbe2 sgtxt augbl augdt
               zbd1t zbd2t
          FROM  bsid
          INTO CORRESPONDING FIELDS OF TABLE int_output
          WHERE bldat IN so_bldat AND
                   shkzg IN so_shkzg AND
                    wrbtr IN so_wrbtr.      
    Range needs to be  entered where from value (for wrbtr field) is -ve negative and to value is +ve positive e.g., -1000 to +200 -:in this case go to BSID with value from 0 to 1000 with debit/credit indicator H and again 0 to 200 with debit/credit indicator S..
    can somebody tell me how to set range for the above requirement.
    Really need help.
    Edited by: Thomas Zloch on May 25, 2011 3:27 PM

    change:
    AND
    shkzg IN so_shkzg AND
    wrbtr IN so_wrbtr.
    to
    and  ( (SHKZG eq 'H' and wrbtr le 1000 ) or
              (SHKZG eq 'S' and wrbtr le 200 ) ).  ??

  • Re need advise for groups

    Hi guys.
    Doing a reinstall of Arch 32 bit and had some problems with gnome before where it was not rendering themes properly for my user and looked ugly lol.
    Anyways I would like some advise on what groups I need and should add for my user account. This is a one user machine.

    the groups you add for your user is very dependent on what you're running on your system.  It's hard to say exactly which ones you'll want without knowing what you want to do on your system. The wiki page has some good info on various groups and what they do, it should help you better figure out what you want. http://wiki.archlinux.org/index.php/Groups

  • Need Logic for Inserting data into table from another table

    Hi,
    Could you please give me some logic on below:
    TABLE_A has columns A,B,C,D
    What i did
    ==========
    Created new table
    TABLE_1_A with columns A1,A2,B1,B2,B3
    Requirement
    ===========
    I should populate columns A1,A2 (table TABLE_1_A) with the data from column A (table TABLE_A)
    & simillarly populate columns B1,B2 with the data from B.
    the data is huge in the table_a.
    Database: 10g
    Thanks.

    Hi,
    Here's one way:
    INSERT INTO  table_1_a
            (a1, a2, b1, b2)
    SELECT      a,  a,  b,  b
    FROM      table_a
    I hope this answers your question.
    If not, post a little sample data (CREATE TABLE and INSERT statements, relevant columns only) for all tables involved, and also post the results you want from that data.
    If you're asking about a DML statement, such as INSERT, the sample data will be the contents of the table before the DML, and the results will be state of the changed table(s) when everything is finished.
    Explain, using specific examples, how you get those results from that data.
    See the forum FAQ {message:id=9360002}

  • Need Documents for BI HR functionality.

    Hi All,
            I need some documents to understand BI-HR like data sources , cubes , start routines , bex query customization...etc.
    Thanks in Advance
    Regards,
    D.Joshi

    Hi,
    This question is discussed several Times in SDN.So plz check SDN before Posting.
    HR :
    In HR you will have sevaral Modules like PA,Payroll etc..........
    http://help.sap.com/saphelp_nw70/helpdata/en/2a/77eb3cad744026e10000000a11405a/frameset.htm
    Connect to above link the click on Pa (pERSONAL aDMINISTRATION) Then you will get allthe details like Cube,DSO,IOBJ's , Query etc...............
    Follow the same for all other areas.
    Regards
    Ram.

  • I need logic for selection screen

    i have slection screen with block and inserted radio button with all and firmla with 4 digits
    example:  . all   firmla 1202
              . all   firmla  1203
              . all   firmla  1210

    HI,
    SELECTION-SCREEN BEGIN OF BLOCK rype WITH FRAME TITLE text-t04.(write text for Block)
    SELECTION-SCREEN BEGIN OF LINE.
    PARAMETERS R1 RADIOBUTTON GROUP one.
    SELECTION-SCREEN COMMENT 4(35) text-c05 FOR FIELD R1.
    (write text for Radio button1)
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN BEGIN OF LINE.
    PARAMETERS R2 RADIOBUTTON GROUP one.
    SELECTION-SCREEN COMMENT 4(35) text-c06 FOR FIELD R2.
    (write text for Radio button2)
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN BEGIN OF LINE.
    PARAMETERS R3 RADIOBUTTON GROUP one.
    SELECTION-SCREEN COMMENT 4(35) text-c06 FOR FIELD R3.
    (write text for Radio button3)
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN END OF BLOCK rype.
    Hope you get the answer
    Thanks
    Sudheer

Maybe you are looking for

  • How to connect my apple TV to an analogue ampli / hifi system

      Hello, i have been looking for an answer to this question for quite some time. I would like to stream my music on my hifi system using apple TV as an airport express. I found out that this was possible by connecting the apple TV through the optical

  • How to buy license? for AIP-SSM-10 ?

    Hi all how to buy license? for AIP-SSM-10 ? 1. CON-SU1-AS1A1PK9 this is Cisco SMARTnet Support for AIP-SSM-10 2. do I need smartnet for ASA ? 3. what is part number of license ? ASA5510test# session 1 Opening command session with slot 1. Connected to

  • Install Disks

    Hello I have Install Disk 1 and Disk 2 labeled 2Z691-6126-A 2Z691-6113-A They don't seem to work on my PowerBook G4, Are these the right discs?

  • Server going to Single User mode

    Hi guys, I am having a database which we refresh every night with same back up where it is used for testing purposes. we will refresh the database thorough job. every time it refreshes it goes to single user mode, I should manually go and change the

  • Hai guys ..doubt in script...

    hai .. I Customized the Medruck. Now  i want print the PO.. Is ther any standard Program for that .. How Can I print the back of the page using Script pro ? wat is the use of protect ... end protect. tanx and regards.. R@j@