APPS.PA_PROJ_RETN_RULES_PKG dependencies on PA_PROJ_RETN_RULES

Line 1: PACKAGE BODY PA_PROJ_RETN_RULES_PKG as

1: PACKAGE BODY PA_PROJ_RETN_RULES_PKG as
2: /* $Header: PAPJRETB.pls 120.2 2005/08/19 16:41:17 mwasowic noship $ */
3:
4:
5: -----------------------------------------------------------------

Line 87: SELECT PA_PROJ_RETN_RULES_S.NextVal

83: RETURN;
84: ELSE
85: -- Fix for Bug 2671135
86: BEGIN
87: SELECT PA_PROJ_RETN_RULES_S.NextVal
88: INTO l_Retention_Rule_ID
89: FROM dual ;
90: END;
91: END IF;

Line 93: INSERT INTO PA_PROJ_RETN_RULES (

89: FROM dual ;
90: END;
91: END IF;
92:
93: INSERT INTO PA_PROJ_RETN_RULES (
94: Project_ID,
95: Task_ID,
96: Customer_ID,
97: Retention_Rule_ID,

Line 118: l_Retention_Rule_ID, -- PA_PROJ_RETN_RULES_S.NextVal, -- Fix for Bug 2671135

114: VALUES (
115: P_Project_ID,
116: l_Task_ID,
117: P_Customer_ID,
118: l_Retention_Rule_ID, -- PA_PROJ_RETN_RULES_S.NextVal, -- Fix for Bug 2671135
119: P_Retention_Level_Code,
120: P_Effective_Start_Date,
121: P_Effective_End_Date,
122: l_Retention_Percentage,

Line 149: PA_PROJ_RETN_RULES

145: RowIDtoChar(ROWID)
146: INTO
147: X_RowID
148: FROM
149: PA_PROJ_RETN_RULES
150: WHERE
151: Project_ID = P_Project_ID
152: AND Customer_ID = P_Customer_ID
153: AND Effective_Start_Date = P_Effective_Start_Date

Line 235: PA_PROJ_RETN_RULES

231: l_Retention_Level_Code,
232: l_Task_ID,
233: l_Retained_Amount
234: FROM
235: PA_PROJ_RETN_RULES
236: WHERE
237: RowIDToChar(RowID) = P_RowID;
238: END;
239:

Line 287: PA_PROJ_RETN_RULES

283:
284: --- End of validations
285:
286: UPDATE
287: PA_PROJ_RETN_RULES
288: SET
289: Retention_Level_Code = l_Retention_Level_Code,
290: Expenditure_Category = P_Expenditure_Category,
291: Expenditure_Type = P_Expenditure_Type,

Line 337: DELETE FROM PA_PROJ_RETN_RULES

333: BEGIN
334:
335: X_Return_Status_Code := FND_API.G_RET_STS_SUCCESS;
336:
337: DELETE FROM PA_PROJ_RETN_RULES
338: WHERE ROWID = P_RowID;
339: EXCEPTION
340: WHEN OTHERS THEN
341: X_Return_Status_Code := FND_API.G_RET_STS_ERROR;

Line 346: END PA_PROJ_RETN_RULES_PKG;

342: X_Error_Message_Code := 'PA_DATA_ERROR';
343:
344: END Delete_Row; -- Delete Row
345:
346: END PA_PROJ_RETN_RULES_PKG;