[Home] [Help]
1170: CURSOR c_get_retro_date_earned(c_element_entry_id in number) IS
1171: SELECT substr(fnd_date.date_to_canonical(
1172: trunc(pay_paywsmee_pkg.get_original_date_earned(c_element_entry_id))
1173: ),1,10)
1174: FROM dual;
1175:
1176: TYPE r_rec_retro_ptp IS RECORD
1177: (start_date Date
1178: ,end_date Date
1283: Fnd_Message.set_name('PQP','PQP_230869_END_BEFORE_START');
1284: Fnd_Message.raise_error;
1285: END IF;
1286:
1287: SELECT Userenv('SESSIONID') INTO l_session_id FROM dual;
1288:
1289: -- Delete values from the temporary table
1290: DELETE FROM pay_us_rpt_totals
1291: WHERE organization_name = 'NL ABP Pension Extracts';
1590: END IF;
1591: -- nocopy changes
1592: l_dtl_rec_nc := p_dtl_rec;
1593: -- Get the next sequence NUMBER to insert a record into the table
1594: SELECT ben_ext_rslt_dtl_s.NEXTVAL INTO p_dtl_rec.ext_rslt_dtl_id FROM dual;
1595:
1596: INSERT INTO ben_ext_rslt_dtl
1597: (EXT_RSLT_DTL_ID
1598: ,EXT_RSLT_ID
7383: CLOSE cur_get_postal_code;
7384: IF l_postal_code IS NOT NULL THEN
7385: FOR i in 1..length(l_postal_code)
7386: LOOP
7387: SELECT substr(l_postal_code,i,1) INTO temp_str from dual;
7388: IF temp_str <> ' ' THEN
7389: l_postal_code1 := l_postal_code1||temp_str;
7390: END IF;
7391: END LOOP;
7837: AND asg.assignment_id = c_assign_id;
7838:
7839: CURSOR cur_get_yr(c_effective_dt IN Date) IS
7840: SELECT fnd_date.canonical_to_date(TO_CHAR(c_effective_dt,'YYYY')||'/01/01')
7841: FROM dual ;
7842: --
7843: -- Cursor to check if there are any changes in the pension salary
7844: --
7845: CURSOR c_get_override_start_date IS
8888: -- Cursor to fetch the month for the effective date
8889: --
8890: CURSOR c_get_month IS
8891: SELECT TO_CHAR(p_effective_date,'MM')
8892: FROM dual;
8893: --
8894: -- Cursor to check if Rec 08 was sent to ABP in the current year.
8895: -- fot this assignment . If not sent then trigger a send
8896: --
10372: --
10373: -- Logic behind the code
10374: --
10375: /*
10376: Individual Schemes Code
10377: ============================= ======
10378: No Participation G
10379: FPU Standard (End 31-DEC-03) S
10380: FPU Extra C
12999: ,p_effective_date
13000: ,p_error_message
13001: ,l_seq_num);
13002:
13003: SELECT ben_ext_rslt_dtl_s.NEXTVAL INTO l_ext_rslt_dtl_id FROM dual;
13004:
13005: INSERT INTO ben_ext_rslt_dtl
13006: ( EXT_RSLT_DTL_ID
13007: ,EXT_RSLT_ID
13102: ,c_ext_dtl_rcd_id => l_rcd_id);
13103: FETCH csr_rslt_dtl INTO l_main_rec;
13104: CLOSE csr_rslt_dtl;
13105:
13106: SELECT ben_ext_rslt_dtl_s.NEXTVAL INTO l_ext_rslt_dtl_id FROM dual;
13107:
13108: INSERT INTO ben_ext_rslt_dtl
13109: ( EXT_RSLT_DTL_ID
13110: ,EXT_RSLT_ID
14239:
14240: --cursor to fetch the month from the effective date
14241: CURSOR c_get_amt_month IS
14242: SELECT To_Char(p_effective_date,'MM')
14243: FROM dual;
14244:
14245: BEGIN
14246: Hr_Utility.set_location('Entering:-------- '||l_proc_name, 5);
14247: OPEN c_get_amt_month;
14278: --Cursor to fetch the year from the effective date
14279: --
14280: CURSOR c_get_amt_year IS
14281: SELECT TO_CHAR(p_effective_date,'YYYY')
14282: FROM dual;
14283:
14284: BEGIN
14285:
14286: hr_utility.set_location('Entering :------- '||l_proc_name,5);
16232: ,p_date_earned
16233: ,p_error_message
16234: ,p_data_element_value);
16235:
16236: ELSIF (p_data_element_cd = 'OPNP_INDIVIDUAL_CD') THEN
16237:
16238: l_ret_val := Get_rec05_Participation
16239: (p_assignment_id
16240: ,p_business_group_id
16577: ) RETURN Varchar2 IS
16578:
16579: CURSOR csr_get_sign(c_amount IN Number) IS
16580: SELECT Sign(c_amount)
16581: FROM dual;
16582:
16583: l_proc_name Varchar2(150) := g_proc_name ||'.Get_Trailer_Amount_Sign';
16584: l_sing_number Number := 0;
16585: l_temp Number;
17045: (c_ext_rslt_id => Ben_Ext_Thread.g_ext_rslt_id )
17046: --9278285
17047: LOOP
17048: --Hr_Utility.set_location('val'||val.EXT_RSLT_DTL_ID ,26);
17049: -- Get the individual row using sortid key
17050: -- So we will get only one record related data per person
17051: FOR ind_dtl IN csr_rslt_dtl_sort
17052: (c_val_26 => val.val_26
17053: ,c_ext_rslt_id => Ben_Ext_Thread.g_ext_rslt_id
17199: END IF;
17200: END IF;
17201: END IF;
17202: --End of 99 Processing
17203: END LOOP ; --individual close
17204: END LOOP;--End of val result loop
17205:
17206:
17207: /*9278285*/ --Loops commented above are opend here so that totals will not affect.