[Home] [Help]
PACKAGE BODY: APPS.AHL_UF_HEADERS_PKG
Source
1 PACKAGE BODY AHL_UF_HEADERS_PKG as
2 /* $Header: AHLLUFHB.pls 115.3 2002/12/04 23:24:58 sikumar noship $ */
3 PROCEDURE INSERT_ROW (
4 X_UF_HEADER_ID IN OUT NOCOPY NUMBER,
5 X_OBJECT_VERSION_NUMBER IN NUMBER,
6 X_CREATED_BY IN NUMBER,
7 X_CREATION_DATE IN DATE,
8 X_LAST_UPDATED_BY IN NUMBER,
9 X_LAST_UPDATE_DATE IN DATE,
10 X_LAST_UPDATE_LOGIN IN NUMBER,
11 X_UNIT_CONFIG_HEADER_ID IN NUMBER,
12 X_PC_NODE_ID IN NUMBER,
13 X_INVENTORY_ITEM_ID IN NUMBER,
14 X_INVENTORY_ORG_ID IN NUMBER,
15 X_CSI_ITEM_INSTANCE_ID IN NUMBER,
16 X_USE_UNIT_FLAG IN VARCHAR2,
17 X_ATTRIBUTE_CATEGORY IN VARCHAR2,
18 X_ATTRIBUTE1 IN VARCHAR2,
19 X_ATTRIBUTE2 IN VARCHAR2,
20 X_ATTRIBUTE3 IN VARCHAR2,
21 X_ATTRIBUTE4 IN VARCHAR2,
22 X_ATTRIBUTE5 IN VARCHAR2,
23 X_ATTRIBUTE6 IN VARCHAR2,
24 X_ATTRIBUTE7 IN VARCHAR2,
25 X_ATTRIBUTE8 IN VARCHAR2,
26 X_ATTRIBUTE9 IN VARCHAR2,
27 X_ATTRIBUTE10 IN VARCHAR2,
28 X_ATTRIBUTE11 IN VARCHAR2,
29 X_ATTRIBUTE12 IN VARCHAR2,
30 X_ATTRIBUTE13 IN VARCHAR2,
31 X_ATTRIBUTE14 IN VARCHAR2,
32 X_ATTRIBUTE15 IN VARCHAR2
33 ) IS
34
35
36 BEGIN
37 insert into AHL_UF_HEADERS (
38 UF_HEADER_ID,
39 OBJECT_VERSION_NUMBER,
40 CREATED_BY,
41 CREATION_DATE,
42 LAST_UPDATED_BY,
43 LAST_UPDATE_DATE,
44 LAST_UPDATE_LOGIN,
45 UNIT_CONFIG_HEADER_ID,
46 PC_NODE_ID,
47 INVENTORY_ITEM_ID,
48 INVENTORY_ORG_ID,
49 CSI_ITEM_INSTANCE_ID,
50 USE_UNIT_FLAG,
51 ATTRIBUTE_CATEGORY,
52 ATTRIBUTE1,
53 ATTRIBUTE2,
54 ATTRIBUTE3,
55 ATTRIBUTE4,
56 ATTRIBUTE5,
57 ATTRIBUTE6,
58 ATTRIBUTE7,
59 ATTRIBUTE8,
60 ATTRIBUTE9,
61 ATTRIBUTE10,
62 ATTRIBUTE11,
63 ATTRIBUTE12,
64 ATTRIBUTE13,
65 ATTRIBUTE14,
66 ATTRIBUTE15
67 ) values (
68 AHL_UF_HEADERS_S.NEXTVAL,
69 X_OBJECT_VERSION_NUMBER,
70 X_CREATED_BY,
71 X_CREATION_DATE,
72 X_LAST_UPDATED_BY,
73 X_LAST_UPDATE_DATE,
74 X_LAST_UPDATE_LOGIN,
75 X_UNIT_CONFIG_HEADER_ID,
76 X_PC_NODE_ID,
77 X_INVENTORY_ITEM_ID,
78 X_INVENTORY_ORG_ID,
79 X_CSI_ITEM_INSTANCE_ID,
80 X_USE_UNIT_FLAG,
81 X_ATTRIBUTE_CATEGORY,
82 X_ATTRIBUTE1,
83 X_ATTRIBUTE2,
84 X_ATTRIBUTE3,
85 X_ATTRIBUTE4,
86 X_ATTRIBUTE5,
87 X_ATTRIBUTE6,
88 X_ATTRIBUTE7,
89 X_ATTRIBUTE8,
90 X_ATTRIBUTE9,
91 X_ATTRIBUTE10,
92 X_ATTRIBUTE11,
93 X_ATTRIBUTE12,
94 X_ATTRIBUTE13,
95 X_ATTRIBUTE14,
96 X_ATTRIBUTE15
97
98 ) RETURNING UF_HEADER_ID INTO X_UF_HEADER_ID;
99
100
101 END INSERT_ROW;
102
103
104 PROCEDURE UPDATE_ROW (
105
106 X_UF_HEADER_ID IN NUMBER,
107 X_OBJECT_VERSION_NUMBER IN NUMBER,
108 X_LAST_UPDATED_BY IN NUMBER,
109 X_LAST_UPDATE_DATE IN DATE,
110 X_LAST_UPDATE_LOGIN IN NUMBER,
111 X_UNIT_CONFIG_HEADER_ID IN NUMBER,
112 X_PC_NODE_ID IN NUMBER,
113 X_INVENTORY_ITEM_ID IN NUMBER,
114 X_INVENTORY_ORG_ID IN NUMBER,
115 X_CSI_ITEM_INSTANCE_ID IN NUMBER,
116 X_USE_UNIT_FLAG IN VARCHAR2,
117 X_ATTRIBUTE_CATEGORY IN VARCHAR2,
118 X_ATTRIBUTE1 IN VARCHAR2,
119 X_ATTRIBUTE2 IN VARCHAR2,
120 X_ATTRIBUTE3 IN VARCHAR2,
121 X_ATTRIBUTE4 IN VARCHAR2,
122 X_ATTRIBUTE5 IN VARCHAR2,
123 X_ATTRIBUTE6 IN VARCHAR2,
124 X_ATTRIBUTE7 IN VARCHAR2,
125 X_ATTRIBUTE8 IN VARCHAR2,
126 X_ATTRIBUTE9 IN VARCHAR2,
127 X_ATTRIBUTE10 IN VARCHAR2,
128 X_ATTRIBUTE11 IN VARCHAR2,
129 X_ATTRIBUTE12 IN VARCHAR2,
130 X_ATTRIBUTE13 IN VARCHAR2,
131 X_ATTRIBUTE14 IN VARCHAR2,
132 X_ATTRIBUTE15 IN VARCHAR2
133 ) IS
134
135
136 BEGIN
137 update AHL_UF_HEADERS set
138 UF_HEADER_ID = X_UF_HEADER_ID,
139 OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
140 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
141 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
142 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
143 UNIT_CONFIG_HEADER_ID = X_UNIT_CONFIG_HEADER_ID,
144 PC_NODE_ID = X_PC_NODE_ID,
145 INVENTORY_ITEM_ID = X_INVENTORY_ITEM_ID,
146 INVENTORY_ORG_ID = X_INVENTORY_ORG_ID,
147 CSI_ITEM_INSTANCE_ID = X_CSI_ITEM_INSTANCE_ID,
148 USE_UNIT_FLAG = X_USE_UNIT_FLAG,
149 ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
150 ATTRIBUTE1 = X_ATTRIBUTE1,
151 ATTRIBUTE2 = X_ATTRIBUTE2,
152 ATTRIBUTE3 = X_ATTRIBUTE3,
153 ATTRIBUTE4 = X_ATTRIBUTE4,
154 ATTRIBUTE5 = X_ATTRIBUTE5,
155 ATTRIBUTE6 = X_ATTRIBUTE6,
156 ATTRIBUTE7 = X_ATTRIBUTE7,
157 ATTRIBUTE8 = X_ATTRIBUTE8,
158 ATTRIBUTE9 = X_ATTRIBUTE9,
159 ATTRIBUTE10 = X_ATTRIBUTE10,
160 ATTRIBUTE11 = X_ATTRIBUTE11,
161 ATTRIBUTE12 = X_ATTRIBUTE12,
162 ATTRIBUTE13 = X_ATTRIBUTE13,
163 ATTRIBUTE14 = X_ATTRIBUTE14,
164 ATTRIBUTE15 = X_ATTRIBUTE15
165 where UF_HEADER_ID = X_UF_HEADER_ID
166 and OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER - 1;
167
168 IF (SQL%NOTFOUND) then
169 RAISE no_data_found;
170 END IF;
171
172 END UPDATE_ROW;
173
174 PROCEDURE DELETE_ROW (
175 X_UF_HEADER_ID in NUMBER
176 ) is
177
178 BEGIN
179
180 delete from AHL_UF_HEADERS
181 where UF_HEADER_ID = X_UF_HEADER_ID;
182
183 IF (SQL%NOTFOUND) then
184 RAISE no_data_found;
185 END IF;
186
187 END DELETE_ROW;
188
189 END AHL_UF_HEADERS_PKG;