DBA Data[Home] [Help]

APPS.PAY_NL_DIM_PKG dependencies on DUAL

Line 741: FROM dual;

737: ,DECODE(trunc((to_number(to_char(p_user_effective_date,'IW'))-1)/12)
738: ,4,3
739: ,trunc((to_number(to_char(p_user_effective_date,'IW'))-1)/12))
740: INTO l_owner_quarter, l_user_quarter
741: FROM dual;
742: --
743: IF (l_owner_quarter = l_user_quarter) THEN
744: p_expiry_information := 0; -- Not Expired
745: ELSE

Line 770: FROM DUAL;

766: BEGIN
767: --determine week end of last week of the last year and week end of current week
768: select trunc(trunc(trunc(p_owner_effective_date,'IW')+6,'Y'),'IW')-1, trunc(p_owner_effective_date,'IW')+6
769: into l_lastyr_wkend ,l_curr_wkend
770: FROM DUAL;
771: IF (l_lastyr_wkend+53*7) < trunc(add_months(p_owner_effective_date,12),'Y') THEN -- 53 Week year
772: l_max_period := 53;
773: ELSE
774: l_max_period := 52;

Line 777: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;

773: ELSE
774: l_max_period := 52;
775: END IF;
776: --determine week number for p_owner_effective_date
777: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;
778: select (decode(trunc((l_week_no-1)/12+1)*12 ,48,l_max_period,60,l_max_period ,trunc((l_week_no-1)/12+1)*12))*7 into l_no_days from dual;
779: p_expiry_information := l_lastyr_wkend + l_no_days;
780: END;
781: /*------------------------------ PER_PAY_SITP_PTD ----------------------------*/

Line 778: select (decode(trunc((l_week_no-1)/12+1)*12 ,48,l_max_period,60,l_max_period ,trunc((l_week_no-1)/12+1)*12))*7 into l_no_days from dual;

774: l_max_period := 52;
775: END IF;
776: --determine week number for p_owner_effective_date
777: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;
778: select (decode(trunc((l_week_no-1)/12+1)*12 ,48,l_max_period,60,l_max_period ,trunc((l_week_no-1)/12+1)*12))*7 into l_no_days from dual;
779: p_expiry_information := l_lastyr_wkend + l_no_days;
780: END;
781: /*------------------------------ PER_PAY_SITP_PTD ----------------------------*/
782: /*

Line 915: FROM dual;

911: ,DECODE(trunc((to_number(to_char(p_user_effective_date,'IW'))-1)/4)
912: ,13,12
913: ,trunc((to_number(to_char(p_user_effective_date,'IW'))-1)/4))
914: INTO l_owner_month, l_user_month
915: FROM dual;
916: --
917: IF (l_owner_month = l_user_month) THEN
918: p_expiry_information := 0; -- Not Expired
919: ELSE

Line 962: FROM DUAL;

958: ELSE
959: --determine week end of last week of the last year and week end of current week
960: select trunc(trunc(trunc(p_owner_effective_date,'IW')+6,'Y'),'IW')-1, trunc(p_owner_effective_date,'IW')+6
961: into l_lastyr_wkend ,l_curr_wkend
962: FROM DUAL;
963: IF (l_lastyr_wkend+53*7) < trunc(add_months(p_owner_effective_date,12),'Y') THEN -- 53 Week year
964: l_max_period := 53;
965: ELSE
966: l_max_period := 52;

Line 969: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;

965: ELSE
966: l_max_period := 52;
967: END IF;
968: --determine week number for p_owner_effective_date
969: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;
970: select (decode(trunc((l_week_no-1)/4+1)*4 ,52,l_max_period,56,l_max_period ,trunc((l_week_no-1)/4+1)*4))*7 into l_no_days from dual;
971: p_expiry_information := l_lastyr_wkend + l_no_days;
972: END IF;
973: END;

Line 970: select (decode(trunc((l_week_no-1)/4+1)*4 ,52,l_max_period,56,l_max_period ,trunc((l_week_no-1)/4+1)*4))*7 into l_no_days from dual;

966: l_max_period := 52;
967: END IF;
968: --determine week number for p_owner_effective_date
969: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;
970: select (decode(trunc((l_week_no-1)/4+1)*4 ,52,l_max_period,56,l_max_period ,trunc((l_week_no-1)/4+1)*4))*7 into l_no_days from dual;
971: p_expiry_information := l_lastyr_wkend + l_no_days;
972: END IF;
973: END;
974: ------------------------------------------------------------------------------

Line 1009: FROM dual;

1005: ,DECODE(trunc((to_number(to_char(p_user_effective_date,'IW'))-1)/4)
1006: ,13,12
1007: ,trunc((to_number(to_char(p_user_effective_date,'IW'))-1)/4))
1008: INTO l_owner_month, l_user_month
1009: FROM dual;
1010: --
1011: IF (l_owner_month = l_user_month) THEN
1012: p_expiry_information := 0; -- Not Expired
1013: ELSE

Line 1056: FROM DUAL;

1052: ELSE
1053: --determine week end of last week of the last year and week end of current week
1054: select trunc(trunc(trunc(p_owner_effective_date,'IW')+6,'Y'),'IW')-1, trunc(p_owner_effective_date,'IW')+6
1055: into l_lastyr_wkend ,l_curr_wkend
1056: FROM DUAL;
1057: IF (l_lastyr_wkend+53*7) < trunc(add_months(p_owner_effective_date,12),'Y') THEN -- 53 Week year
1058: l_max_period := 53;
1059: ELSE
1060: l_max_period := 52;

Line 1063: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;

1059: ELSE
1060: l_max_period := 52;
1061: END IF;
1062: --determine week number for p_owner_effective_date
1063: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;
1064: select (decode(trunc((l_week_no-1)/4+1)*4 ,52,l_max_period,56,l_max_period ,trunc((l_week_no-1)/4+1)*4))*7 into l_no_days from dual;
1065: p_expiry_information := l_lastyr_wkend + l_no_days;
1066: END IF;
1067: END;

Line 1064: select (decode(trunc((l_week_no-1)/4+1)*4 ,52,l_max_period,56,l_max_period ,trunc((l_week_no-1)/4+1)*4))*7 into l_no_days from dual;

1060: l_max_period := 52;
1061: END IF;
1062: --determine week number for p_owner_effective_date
1063: select (l_curr_wkend-l_lastyr_wkend)/7 into l_week_no from dual;
1064: select (decode(trunc((l_week_no-1)/4+1)*4 ,52,l_max_period,56,l_max_period ,trunc((l_week_no-1)/4+1)*4))*7 into l_no_days from dual;
1065: p_expiry_information := l_lastyr_wkend + l_no_days;
1066: END IF;
1067: END;
1068: /*------------------------------ PER_PAY_YTD_EC ----------------------------*/