1 PACKAGE BODY EAM_PERMIT_DEFAULT_PVT AS
2 /* $Header: EAMVWPDB.pls 120.2 2011/03/04 21:23:38 mashah noship $ */
3
4 /******************************************************************
5 * Procedure : Populate_Null_Columns
6 * Purpose : This procedure will look at the columns that the user
7 has not filled in and will assign those columns a
8 value from the old record.This procedure is not called for CREATE
9 ********************************************************************/
10
11
12 PROCEDURE Populate_Null_Columns
13 ( p_eam_wp_rec IN EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type
14 , p_old_eam_wp_rec IN EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type
15 , x_eam_wp_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type
16 ) IS
17
18 BEGIN
19
20 x_eam_wp_rec:= p_eam_wp_rec;
21
22 IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Processing null columns prior to update'); END IF;
23 IF p_eam_wp_rec.PERMIT_NAME IS NULL OR
24 p_eam_wp_rec.PERMIT_NAME = FND_API.G_MISS_CHAR
25 THEN
26 x_eam_wp_rec.PERMIT_NAME := p_old_eam_wp_rec.PERMIT_NAME;
27 END IF;
28
29 IF p_eam_wp_rec.PERMIT_TYPE IS NULL OR
30 p_eam_wp_rec.PERMIT_TYPE = FND_API.G_MISS_NUM
31 THEN
32 x_eam_wp_rec.PERMIT_TYPE := p_old_eam_wp_rec.PERMIT_TYPE;
33 END IF;
34
35 IF p_eam_wp_rec.DESCRIPTION IS NULL OR
36 p_eam_wp_rec.DESCRIPTION = FND_API.G_MISS_CHAR
37 THEN
38 x_eam_wp_rec.DESCRIPTION := p_old_eam_wp_rec.DESCRIPTION;
39 END IF;
40
41 IF p_eam_wp_rec.ORGANIZATION_ID IS NULL OR
42 p_eam_wp_rec.ORGANIZATION_ID = FND_API.G_MISS_NUM
43 THEN
44 x_eam_wp_rec.ORGANIZATION_ID := p_old_eam_wp_rec.ORGANIZATION_ID;
45 END IF;
46
47 IF p_eam_wp_rec.STATUS_TYPE IS NULL OR
48 p_eam_wp_rec.STATUS_TYPE = FND_API.G_MISS_NUM
49 THEN
50 x_eam_wp_rec.STATUS_TYPE := p_old_eam_wp_rec.STATUS_TYPE;
51 END IF;
52
53 IF p_eam_wp_rec.VALID_FROM IS NULL OR
54 p_eam_wp_rec.VALID_FROM = FND_API.G_MISS_DATE
55 THEN
56 x_eam_wp_rec.VALID_FROM := p_old_eam_wp_rec.VALID_FROM;
57 END IF;
58
59 IF p_eam_wp_rec.VALID_TO IS NULL OR
60 p_eam_wp_rec.VALID_TO = FND_API.G_MISS_DATE
61 THEN
62 x_eam_wp_rec.VALID_TO := p_old_eam_wp_rec.VALID_TO;
63 END IF;
64
65 IF p_eam_wp_rec.COMPLETION_DATE IS NULL OR
66 p_eam_wp_rec.COMPLETION_DATE = FND_API.G_MISS_DATE
67 THEN
68 x_eam_wp_rec.COMPLETION_DATE := p_old_eam_wp_rec.COMPLETION_DATE;
69 END IF;
70
71 IF p_eam_wp_rec.ATTRIBUTE_CATEGORY IS NULL OR
72 p_eam_wp_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR
73 THEN
74 x_eam_wp_rec.ATTRIBUTE_CATEGORY := p_old_eam_wp_rec.ATTRIBUTE_CATEGORY;
75 END IF;
76
77 IF p_eam_wp_rec.ATTRIBUTE1 IS NULL OR
78 p_eam_wp_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR
79 THEN
80 x_eam_wp_rec.ATTRIBUTE1 := p_old_eam_wp_rec.ATTRIBUTE1;
81 END IF;
82 IF p_eam_wp_rec.ATTRIBUTE2 IS NULL OR
83 p_eam_wp_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR
84 THEN
85 x_eam_wp_rec.ATTRIBUTE2 := p_old_eam_wp_rec.ATTRIBUTE2;
86 END IF;
87
88 IF p_eam_wp_rec.ATTRIBUTE3 IS NULL OR
89 p_eam_wp_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR
90 THEN
91 x_eam_wp_rec.ATTRIBUTE3 := p_old_eam_wp_rec.ATTRIBUTE3;
92 END IF;
93
94 IF p_eam_wp_rec.ATTRIBUTE4 IS NULL OR
95 p_eam_wp_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR
96 THEN
97 x_eam_wp_rec.ATTRIBUTE4 := p_old_eam_wp_rec.ATTRIBUTE4;
98 END IF;
99
100 IF p_eam_wp_rec.ATTRIBUTE5 IS NULL OR
101 p_eam_wp_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR
102 THEN
103 x_eam_wp_rec.ATTRIBUTE5 := p_old_eam_wp_rec.ATTRIBUTE5;
104 END IF;
105
106 IF p_eam_wp_rec.ATTRIBUTE6 IS NULL OR
107 p_eam_wp_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR
108 THEN
109 x_eam_wp_rec.ATTRIBUTE6 := p_old_eam_wp_rec.ATTRIBUTE6;
110 END IF;
111
112 IF p_eam_wp_rec.ATTRIBUTE7 IS NULL OR
113 p_eam_wp_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR
114 THEN
115 x_eam_wp_rec.ATTRIBUTE7 := p_old_eam_wp_rec.ATTRIBUTE7;
116 END IF;
117
118 IF p_eam_wp_rec.ATTRIBUTE8 IS NULL OR
119 p_eam_wp_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR
120 THEN
121 x_eam_wp_rec.ATTRIBUTE8 := p_old_eam_wp_rec.ATTRIBUTE8;
122 END IF;
123
124 IF p_eam_wp_rec.ATTRIBUTE9 IS NULL OR
125 p_eam_wp_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR
126 THEN
127 x_eam_wp_rec.ATTRIBUTE9 := p_old_eam_wp_rec.ATTRIBUTE9;
128 END IF;
129
130 IF p_eam_wp_rec.ATTRIBUTE10 IS NULL OR
131 p_eam_wp_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR
132 THEN
133 x_eam_wp_rec.ATTRIBUTE10 := p_old_eam_wp_rec.ATTRIBUTE10;
134 END IF;
135
136 IF p_eam_wp_rec.ATTRIBUTE11 IS NULL OR
137 p_eam_wp_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR
138 THEN
139 x_eam_wp_rec.ATTRIBUTE11 := p_old_eam_wp_rec.ATTRIBUTE11;
140 END IF;
141
142 IF p_eam_wp_rec.ATTRIBUTE12 IS NULL OR
143 p_eam_wp_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR
144 THEN
145 x_eam_wp_rec.ATTRIBUTE12 := p_old_eam_wp_rec.ATTRIBUTE12;
146 END IF;
147
148 IF p_eam_wp_rec.ATTRIBUTE13 IS NULL OR
149 p_eam_wp_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR
150 THEN
151 x_eam_wp_rec.ATTRIBUTE13 := p_old_eam_wp_rec.ATTRIBUTE13;
152 END IF;
153
154 IF p_eam_wp_rec.ATTRIBUTE14 IS NULL OR
155 p_eam_wp_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR
156 THEN
157 x_eam_wp_rec.ATTRIBUTE14 := p_old_eam_wp_rec.ATTRIBUTE14;
158 END IF;
159
160 IF p_eam_wp_rec.ATTRIBUTE15 IS NULL OR
161 p_eam_wp_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR
162 THEN
163 x_eam_wp_rec.ATTRIBUTE15 := p_old_eam_wp_rec.ATTRIBUTE15;
164 END IF;
165
166 IF p_eam_wp_rec.ATTRIBUTE16 IS NULL OR
167 p_eam_wp_rec.ATTRIBUTE16 = FND_API.G_MISS_CHAR
168 THEN
169 x_eam_wp_rec.ATTRIBUTE16 := p_old_eam_wp_rec.ATTRIBUTE16;
170 END IF;
171
172 IF p_eam_wp_rec.ATTRIBUTE17 IS NULL OR
173 p_eam_wp_rec.ATTRIBUTE16 = FND_API.G_MISS_CHAR
174 THEN
175 x_eam_wp_rec.ATTRIBUTE16 := p_old_eam_wp_rec.ATTRIBUTE16;
176 END IF;
177
178 IF p_eam_wp_rec.ATTRIBUTE18 IS NULL OR
179 p_eam_wp_rec.ATTRIBUTE18 = FND_API.G_MISS_CHAR
180 THEN
181 x_eam_wp_rec.ATTRIBUTE18 := p_old_eam_wp_rec.ATTRIBUTE18;
182 END IF;
183
184 IF p_eam_wp_rec.ATTRIBUTE19 IS NULL OR
185 p_eam_wp_rec.ATTRIBUTE19 = FND_API.G_MISS_CHAR
186 THEN
187 x_eam_wp_rec.ATTRIBUTE19 := p_old_eam_wp_rec.ATTRIBUTE19;
188 END IF;
189
190 IF p_eam_wp_rec.ATTRIBUTE20 IS NULL OR
191 p_eam_wp_rec.ATTRIBUTE20 = FND_API.G_MISS_CHAR
192 THEN
193 x_eam_wp_rec.ATTRIBUTE20 := p_old_eam_wp_rec.ATTRIBUTE20;
194 END IF;
195
196 IF p_eam_wp_rec.ATTRIBUTE21 IS NULL OR
197 p_eam_wp_rec.ATTRIBUTE21 = FND_API.G_MISS_CHAR
198 THEN
199 x_eam_wp_rec.ATTRIBUTE21 := p_old_eam_wp_rec.ATTRIBUTE21;
200 END IF;
201
202 IF p_eam_wp_rec.ATTRIBUTE22 IS NULL OR
203 p_eam_wp_rec.ATTRIBUTE22 = FND_API.G_MISS_CHAR
204 THEN
205 x_eam_wp_rec.ATTRIBUTE22 := p_old_eam_wp_rec.ATTRIBUTE22;
206 END IF;
207
208 IF p_eam_wp_rec.ATTRIBUTE23 IS NULL OR
209 p_eam_wp_rec.ATTRIBUTE23 = FND_API.G_MISS_CHAR
210 THEN
211 x_eam_wp_rec.ATTRIBUTE23 := p_old_eam_wp_rec.ATTRIBUTE23;
212 END IF;
213
214 IF p_eam_wp_rec.ATTRIBUTE24 IS NULL OR
215 p_eam_wp_rec.ATTRIBUTE24 = FND_API.G_MISS_CHAR
216 THEN
217 x_eam_wp_rec.ATTRIBUTE24 := p_old_eam_wp_rec.ATTRIBUTE24;
218 END IF;
219
220 IF p_eam_wp_rec.ATTRIBUTE25 IS NULL OR
221 p_eam_wp_rec.ATTRIBUTE25 = FND_API.G_MISS_CHAR
222 THEN
223 x_eam_wp_rec.ATTRIBUTE25 := p_old_eam_wp_rec.ATTRIBUTE25;
224 END IF;
225
226 IF p_eam_wp_rec.ATTRIBUTE26 IS NULL OR
227 p_eam_wp_rec.ATTRIBUTE26 = FND_API.G_MISS_NUM
228 THEN
229 x_eam_wp_rec.ATTRIBUTE26 := p_old_eam_wp_rec.ATTRIBUTE26;
230 END IF;
231
232 IF p_eam_wp_rec.ATTRIBUTE27 IS NULL OR
233 p_eam_wp_rec.ATTRIBUTE27 = FND_API.G_MISS_CHAR
234 THEN
235 x_eam_wp_rec.ATTRIBUTE27 := p_old_eam_wp_rec.ATTRIBUTE27;
236 END IF;
237
238 IF p_eam_wp_rec.ATTRIBUTE28 IS NULL OR
239 p_eam_wp_rec.ATTRIBUTE28 = FND_API.G_MISS_CHAR
240 THEN
241 x_eam_wp_rec.ATTRIBUTE28 := p_old_eam_wp_rec.ATTRIBUTE28;
242 END IF;
243
244 IF p_eam_wp_rec.ATTRIBUTE29 IS NULL OR
245 p_eam_wp_rec.ATTRIBUTE29 = FND_API.G_MISS_CHAR
246 THEN
247 x_eam_wp_rec.ATTRIBUTE29 := p_old_eam_wp_rec.ATTRIBUTE29;
248 END IF;
249
250 IF p_eam_wp_rec.ATTRIBUTE30 IS NULL OR
251 p_eam_wp_rec.ATTRIBUTE30 = FND_API.G_MISS_CHAR
252 THEN
253 x_eam_wp_rec.ATTRIBUTE30 := p_old_eam_wp_rec.ATTRIBUTE30;
254 END IF;
255
256 IF p_eam_wp_rec.APPROVED_BY IS NULL OR
257 p_eam_wp_rec.APPROVED_BY = FND_API.G_MISS_NUM
258 THEN
259 x_eam_wp_rec.APPROVED_BY := p_old_eam_wp_rec.APPROVED_BY;
260 END IF;
261
262 IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Done processing null columns prior update'); END IF;
263
264
265 END Populate_Null_Columns;
266
267
268 END EAM_PERMIT_DEFAULT_PVT ;