[Home] [Help]
1: PACKAGE BODY pn_recovery_extract_pkg AS
2: /* $Header: PNRCEXTB.pls 120.5 2007/10/09 06:07:40 bnoorbha ship $ */
3:
4:
5:
82: l_area NUMBER := p_area;
83: l_index NUMBER;
84: l_flag BOOLEAN := FALSE;
85: l_info VARCHAR2(100);
86: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_vacancy';
87:
88: BEGIN
89:
90: pnp_debug_pkg.log(l_desc ||' (+)');
263: p_keep_override VARCHAR2
264: )
265: IS
266: l_info VARCHAR2(300);
267: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.find_area_ovr_values' ;
268: BEGIN
269:
270: pnp_debug_pkg.log(l_desc ||' (+)');
271:
357: p_exc_area_flag OUT NOCOPY pn_rec_arcl_dtlln.exclude_area_flag%TYPE,
358: p_include_flag OUT NOCOPY pn_rec_arcl_dtlln.include_flag%TYPE)
359: IS
360: l_info VARCHAR2(300);
361: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.get_area_cls_dtl_calc' ;
362: BEGIN
363:
364: pnp_debug_pkg.log(l_desc ||' (+)');
365:
448: p_num_tbl number_table_type
449: ) RETURN BOOLEAN
450: IS
451: l_result BOOLEAN := FALSE;
452: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.is_totally_vacant' ;
453: l_info VARCHAR2(300);
454: BEGIN
455:
456: pnp_debug_pkg.log(l_desc ||' (+)');
535: l_excl_prorata_ovr_flag VARCHAR2(1);
536: l_excl_area_ovr_flag VARCHAR2(1);
537: l_dummy NUMBER;
538: l_info VARCHAR2(300);
539: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.insert_vacancy_data' ;
540:
541: BEGIN
542:
543: pnp_debug_pkg.log(l_desc ||' (+)');
728: delete_table number_table_type;
729: l_area_cls_dtl_line_id NUMBER;
730: l_is_in BOOLEAN;
731: l_info VARCHAR2(300);
732: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_area_tables';
733:
734: BEGIN
735:
736: pnp_debug_pkg.log(l_desc ||' (+)');
1084: l_arcl_propid pn_rec_arcl.property_id%TYPE;
1085: l_arcl_exc_table area_cls_exc_tbl;
1086: l_uom_code pn_locations_all.uom_code%TYPE;
1087: l_info VARCHAR2(100);
1088: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.extract_area' ;
1089:
1090:
1091: BEGIN
1092:
1889: p_attribute13 pn_rec_exp_itf.attribute13%TYPE,
1890: p_attribute14 pn_rec_exp_itf.attribute14%TYPE,
1891: p_attribute15 pn_rec_exp_itf.attribute15%TYPE)
1892: IS
1893: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.validate_and_process_lines' ;
1894: l_info VARCHAR2(300);
1895: l_is_valid BOOLEAN;
1896:
1897: BEGIN
2074: WHERE hdr.expense_extract_code = p_extract_code
2075: AND p_extract_code IS NOT NULL
2076: AND rownum < 2;
2077:
2078: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.extract_expense_lines' ;
2079: l_info VARCHAR2(300);
2080: l_is_header_set BOOLEAN;
2081: l_reextract BOOLEAN;
2082: l_expense_line_dtl_id pn_rec_exp_line_dtl.expense_line_dtl_id%TYPE;
2252: p_use_prior_ovr BOOLEAN
2253: )
2254: IS
2255: l_info VARCHAR2(300);
2256: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_exp_cls_dtl_mst_data' ;
2257: temp_rec pn_rec_expcl_dtlln%ROWTYPE;
2258:
2259: BEGIN
2260:
2358: IS
2359:
2360: l_info VARCHAR2(300);
2361: l_id NUMBER;
2362: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_exp_cls_dtl_dtl_data' ;
2363:
2364: BEGIN
2365:
2366: pnp_debug_pkg.log(l_desc ||' (+)');
2423: l_is_in BOOLEAN;
2424: l_use_share_pct_flag VARCHAR2(1);
2425: l_use_fee_pct_flag VARCHAR2(1);
2426: l_info VARCHAR2(300);
2427: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.process_exp_class_line_data';
2428:
2429: BEGIN
2430:
2431: pnp_debug_pkg.log(l_desc ||' (+)');
2684: share_use_tbl num_tbl;
2685: l_update BOOLEAN;
2686: l_count NUMBER;
2687: l_info VARCHAR2(300);
2688: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.dismantle_exp_line_from_dtl' ;
2689:
2690: BEGIN
2691:
2692: pnp_debug_pkg.log(l_desc ||' (+)');
2824:
2825: l_propid pn_rec_exp_line.property_id%TYPE;
2826: l_dummy VARCHAR2(300);
2827: l_info VARCHAR2(100);
2828: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.populate_expense_class_details' ;
2829: l_total NUMBER := 0;
2830: l_failed NUMBER := 0;
2831:
2832: BEGIN
2968: START WITH location_id = p_location_id
2969: CONNECT BY location_id = PRIOR parent_location_id;
2970:
2971: l_propid pn_rec_exp_line.property_id%TYPE;
2972: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.populate_area_class_details' ;
2973: l_info VARCHAR2(100);
2974: l_dummy VARCHAR2(300);
2975: l_total NUMBER := 0;
2976: l_failed NUMBER := 0;
3092: p_found IN OUT NOCOPY BOOLEAN,
3093: p_keep_override VARCHAR2
3094: )
3095: IS
3096: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.find_expense_ovr_values' ;
3097: l_info VARCHAR2(300);
3098: BEGIN
3099:
3100: pnp_debug_pkg.log(l_desc ||' (+)');
3339:
3340: l_regenerate VARCHAR2(1);
3341: l_info VARCHAR2(300);
3342: l_dummy VARCHAR2(300);
3343: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.extract_expense' ;
3344: l_token VARCHAR2(100);
3345:
3346: l_master_data_id NUMBER;
3347: l_count NUMBER;
3775: l_from_date DATE;
3776: l_to_date DATE;
3777: l_currency pn_rec_exp_line.currency_code%TYPE;
3778: l_info VARCHAR2(300);
3779: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.extract_line_expense_area' ;
3780: l_err VARCHAR2(100);
3781: l_location_id pn_locations.location_id%TYPE;
3782: l_property_id pn_locations.property_id%TYPE;
3783: l_extract_code pn_rec_exp_line.expense_extract_code%TYPE;
3954: l_prop_id pn_locations.property_id%TYPE;
3955: l_sqlhead VARCHAR2(300);
3956: l_sqltail VARCHAR2(900) := null;
3957: l_info VARCHAR2(300);
3958: l_desc VARCHAR2(100) := 'pn_recovery_extract_pkg.purge_expense_lines_itf_data' ;
3959: l_extract_code pn_rec_exp_line.expense_extract_code%TYPE;
3960: l_transfer_flag pn_rec_exp_itf.transfer_flag%TYPE;
3961: l_from_date DATE;
3962: l_to_date DATE;
4094: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
4095: raise;
4096: END;
4097:
4098: END pn_recovery_extract_pkg;