APPS.CSP_PRODUCT_POPULATIONS_PKG dependencies on CSP_PRODUCT_POPULATIONS

Line 1: PACKAGE BODY CSP_PRODUCT_POPULATIONS_PKG as

1: PACKAGE BODY CSP_PRODUCT_POPULATIONS_PKG as
2: /* $Header: csptprpb.pls 115.3 2002/11/26 07:36:10 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_PRODUCT_POPULATIONS_PKG
5: -- Purpose :

Line 4: -- Package name : CSP_PRODUCT_POPULATIONS_PKG

1: PACKAGE BODY CSP_PRODUCT_POPULATIONS_PKG as
2: /* $Header: csptprpb.pls 115.3 2002/11/26 07:36:10 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_PRODUCT_POPULATIONS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

Line 10: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_PRODUCT_POPULATIONS_PKG';

6: -- History :
7: -- NOTE :
8: -- End of Comments
9:
10: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_PRODUCT_POPULATIONS_PKG';
11: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csptprpb.pls';
12: PROCEDURE Insert_Row(
13: px_PRODUCT_POPULATION_ID IN OUT NOCOPY NUMBER
14: ,p_PLANNING_PARAMETERS_ID NUMBER

Line 25: CURSOR C2 IS SELECT CSP_PRODUCT_POPULATIONS_S1.nextval FROM sys.dual;

21: ,p_CREATED_BY NUMBER
22: ,p_LAST_UPDATE_LOGIN NUMBER
23: )
24: IS
25: CURSOR C2 IS SELECT CSP_PRODUCT_POPULATIONS_S1.nextval FROM sys.dual;
26: BEGIN
27: If (px_PRODUCT_POPULATION_ID IS NULL) OR (px_PRODUCT_POPULATION_ID = FND_API.G_MISS_NUM) then
28: OPEN C2;
29: FETCH C2 INTO px_PRODUCT_POPULATION_ID;

Line 32: INSERT INTO CSP_PRODUCT_POPULATIONS(

28: OPEN C2;
29: FETCH C2 INTO px_PRODUCT_POPULATION_ID;
30: CLOSE C2;
31: End If;
32: INSERT INTO CSP_PRODUCT_POPULATIONS(
33: PRODUCT_POPULATION_ID
34: ,PLANNING_PARAMETERS_ID
35: ,PRODUCT_ID
36: ,CURRENT_POPULATION

Line 70: Update CSP_PRODUCT_POPULATIONS

66: ,p_LAST_UPDATE_LOGIN NUMBER
67: )
68: IS
69: BEGIN
70: Update CSP_PRODUCT_POPULATIONS
71: SET
72: PLANNING_PARAMETERS_ID = decode( p_PLANNING_PARAMETERS_ID, FND_API.G_MISS_NUM, PLANNING_PARAMETERS_ID, p_PLANNING_PARAMETERS_ID)
73: ,PRODUCT_ID = decode( p_PRODUCT_ID, FND_API.G_MISS_NUM, PRODUCT_ID, p_PRODUCT_ID)
74: ,CURRENT_POPULATION = decode( p_CURRENT_POPULATION, FND_API.G_MISS_NUM, CURRENT_POPULATION, p_CURRENT_POPULATION)

Line 90: DELETE FROM CSP_PRODUCT_POPULATIONS

86: PROCEDURE Delete_Row(
87: p_PRODUCT_POPULATION_ID NUMBER)
88: IS
89: BEGIN
90: DELETE FROM CSP_PRODUCT_POPULATIONS
91: WHERE PRODUCT_POPULATION_ID = p_PRODUCT_POPULATION_ID;
92: If (SQL%NOTFOUND) then
93: RAISE NO_DATA_FOUND;
94: End If;

Line 111: FROM CSP_PRODUCT_POPULATIONS

107: )
108: IS
109: CURSOR C IS
110: SELECT *
111: FROM CSP_PRODUCT_POPULATIONS
112: WHERE PRODUCT_POPULATION_ID = p_PRODUCT_POPULATION_ID
113: FOR UPDATE of PRODUCT_POPULATION_ID NOWAIT;
114: Recinfo C%ROWTYPE;
115: BEGIN

Line 160: End CSP_PRODUCT_POPULATIONS_PKG;

156: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
157: APP_EXCEPTION.RAISE_EXCEPTION;
158: End If;
159: END Lock_Row;
160: End CSP_PRODUCT_POPULATIONS_PKG;