1: PACKAGE BODY ASO_DEPENDENCY_MAPPINGS_PKG as
2: /* $Header: asotdepb.pls 120.2 2005/12/06 09:48:56 hagrawal noship $ */
3: -- Start of Comments
4: -- Package name : ASO_DEPENDENCY_MAPPINGS_PKG
5: -- Purpose :
1: PACKAGE BODY ASO_DEPENDENCY_MAPPINGS_PKG as
2: /* $Header: asotdepb.pls 120.2 2005/12/06 09:48:56 hagrawal noship $ */
3: -- Start of Comments
4: -- Package name : ASO_DEPENDENCY_MAPPINGS_PKG
5: -- Purpose :
6: -- History :
7: -- 01-28-2005 hyang - created
8: -- NOTE :
8: -- NOTE :
9: -- End of Comments
10:
11:
12: G_PKG_NAME CONSTANT VARCHAR2(30):= 'ASO_DEPENDENCY_MAPPINGS_PKG';
13: G_FILE_NAME CONSTANT VARCHAR2(12) := 'asotdepb.pls';
14:
15: PROCEDURE Insert_Row(
16: PX_DEPENDENCY_ID IN OUT NOCOPY /* file.sql.39 change */ NUMBER
30: , P_PROGRAM_ID IN NUMBER
31: , P_PROGRAM_UPDATE_DATE IN DATE
32: )
33: IS
34: CURSOR C IS SELECT ASO_DEPENDENCY_MAPPINGS_S.nextval FROM sys.dual;
35: BEGIN
36: If (PX_DEPENDENCY_ID IS NULL) OR (PX_DEPENDENCY_ID = FND_API.G_MISS_NUM) then
37: OPEN C;
38: FETCH C INTO PX_DEPENDENCY_ID;
37: OPEN C;
38: FETCH C INTO PX_DEPENDENCY_ID;
39: CLOSE C;
40: End If;
41: INSERT INTO ASO_DEPENDENCY_MAPPINGS(
42: DEPENDENCY_ID,
43: TRIGGER_ATTRIBUTE_ID,
44: DEPENDENT_ATTRIBUTE_ID,
45: ENABLED_FLAG,
95: , P_PROGRAM_UPDATE_DATE IN DATE
96: )
97: IS
98: BEGIN
99: Update ASO_DEPENDENCY_MAPPINGS
100: SET
101: TRIGGER_ATTRIBUTE_ID = decode( P_TRIGGER_ATTRIBUTE_ID, FND_API.G_MISS_NUM, TRIGGER_ATTRIBUTE_ID, P_TRIGGER_ATTRIBUTE_ID),
102: DEPENDENT_ATTRIBUTE_ID = decode( P_DEPENDENT_ATTRIBUTE_ID, FND_API.G_MISS_NUM, DEPENDENT_ATTRIBUTE_ID, P_DEPENDENT_ATTRIBUTE_ID),
103: ENABLED_FLAG = decode( P_ENABLED_FLAG, FND_API.G_MISS_CHAR, ENABLED_FLAG, P_ENABLED_FLAG),
124: PROCEDURE Delete_Row(
125: P_DEPENDENCY_ID NUMBER)
126: IS
127: BEGIN
128: DELETE FROM ASO_DEPENDENCY_MAPPINGS
129: WHERE DEPENDENCY_ID = P_DEPENDENCY_ID;
130: If (SQL%NOTFOUND) then
131: RAISE NO_DATA_FOUND;
132: End If;
153: )
154: IS
155: CURSOR C IS
156: SELECT *
157: FROM ASO_DEPENDENCY_MAPPINGS
158: WHERE DEPENDENCY_ID = P_DEPENDENCY_ID
159: FOR UPDATE of DEPENDENCY_ID NOWAIT;
160: Recinfo C%ROWTYPE;
161:
194: l_user_id NUMBER := 0;
195: l_dependency_id NUMBER;
196:
197: CURSOR C IS
198: SELECT DEPENDENCY_ID FROM ASO_DEPENDENCY_MAPPINGS
199: WHERE DEPENDENCY_ID = X_DEPENDENCY_ID;
200:
201: BEGIN
202:
251:
252: END LOAD_ROW;
253:
254:
255: End ASO_DEPENDENCY_MAPPINGS_PKG;
256: