DBA Data[Home] [Help]

PACKAGE BODY: APPS.FEM_PARTY_PROFITABILITY_PKG

Source


1 PACKAGE BODY FEM_PARTY_PROFITABILITY_PKG as
2 -- $Header: femprfTB.pls 120.0 2005/06/06 19:52:36 appldev noship $
3 
4 
5 
6 PROCEDURE Insert_Row(
7                   x_Rowid               IN OUT NOCOPY    VARCHAR2,
8                   x_PARTY_ID                      NUMBER,
9  	          x_LAST_UPDATE_DATE              DATE,
10 	          x_LAST_UPDATED_BY               NUMBER,
11 	          x_CREATION_DATE                 DATE,
12 	          x_CREATED_BY                    NUMBER,
13                   x_LAST_UPDATE_LOGIN             NUMBER,
14                   x_PROFIT                        NUMBER,
15                   x_PROFIT_PCT                    NUMBER,
16                   x_RELATIONSHIP_EXPENSE          NUMBER,
17                   x_TOTAL_EQUITY                  NUMBER,
18                   x_TOTAL_GROSS_CONTRIB           NUMBER,
19                   x_TOTAL_ROE                     NUMBER,
20                   x_CONTRIB_AFTER_CPTL_CHG        NUMBER,
21                   x_PARTNER_VALUE_INDEX           NUMBER,
22                   x_ISO_CURRENCY_CD               VARCHAR2,
23                   x_REVENUE1                      NUMBER,
24                   x_REVENUE2                      NUMBER,
25                   x_REVENUE3                      NUMBER,
26                   x_REVENUE4                      NUMBER,
27                   x_REVENUE5                      NUMBER,
28                   x_REVENUE_TOTAL                 NUMBER,
29                   x_EXPENSE1                      NUMBER,
30                   x_EXPENSE2                      NUMBER,
31                   x_EXPENSE3                      NUMBER,
32                   x_EXPENSE4                      NUMBER,
33                   x_EXPENSE5                      NUMBER,
34                   x_EXPENSE_TOTAL                 NUMBER,
35                   x_PROFIT1                       NUMBER,
36                   x_PROFIT2                       NUMBER,
37                   x_PROFIT3                       NUMBER,
38                   x_PROFIT4                       NUMBER,
39                   x_PROFIT5                       NUMBER,
40                   x_PROFIT_TOTAL                  NUMBER,
41                   x_CACC1                         NUMBER,
42                   x_CACC2                         NUMBER,
43                   x_CACC3                         NUMBER,
44                   x_CACC4                         NUMBER,
45                   x_CACC5                         NUMBER,
46                   x_CACC_TOTAL                    NUMBER,
47                   x_BALANCE1                      NUMBER,
48                   x_BALANCE2                      NUMBER,
49                   x_BALANCE3                      NUMBER,
50                   x_BALANCE4                      NUMBER,
51                   x_BALANCE5                      NUMBER,
52                   x_ACCOUNTS1                     NUMBER,
53                   x_ACCOUNTS2                     NUMBER,
54                   x_ACCOUNTS3                     NUMBER,
55                   x_ACCOUNTS4                     NUMBER,
56                   x_ACCOUNTS5                     NUMBER,
57                   x_TRANSACTION1                  NUMBER,
58                   x_TRANSACTION2                  NUMBER,
59                   x_TRANSACTION3                  NUMBER,
60                   x_TRANSACTION4                  NUMBER,
61                   x_TRANSACTION5                  NUMBER,
62                   x_RATIO1                        NUMBER,
63                   x_RATIO2                        NUMBER,
64                   x_RATIO3                        NUMBER,
65                   x_RATIO4                        NUMBER,
66                   x_RATIO5                        NUMBER,
67                   x_VALUE1                        NUMBER,
68                   x_VALUE2                        NUMBER,
69                   x_VALUE3                        NUMBER,
70                   x_VALUE4                        NUMBER,
71                   x_VALUE5                        NUMBER,
72                   x_YTD1                          NUMBER,
73                   x_YTD2                          NUMBER,
74                   x_YTD3                          NUMBER,
75                   x_YTD4                          NUMBER,
76                   x_YTD5                          NUMBER,
77                   x_LTD1                          NUMBER,
78                   x_LTD2                          NUMBER,
79                   x_LTD3                          NUMBER,
80                   x_LTD4                          NUMBER,
81                   x_LTD5                          NUMBER
82  ) IS
83    CURSOR C IS SELECT rowid FROM FEM_PARTY_PROFITABILITY
84             WHERE PARTY_ID = x_PARTY_ID;
85 
86 
87 BEGIN
88 
89 
90    INSERT INTO FEM_PARTY_PROFITABILITY(
91            PARTY_ID,
92            LAST_UPDATE_DATE,
93 	   LAST_UPDATED_BY,
94 	   CREATION_DATE,
95 	   CREATED_BY,
96            LAST_UPDATE_LOGIN,
97            PROFIT,
98            PROFIT_PCT,
99            RELATIONSHIP_EXPENSE,
100            TOTAL_EQUITY,
101            TOTAL_GROSS_CONTRIB,
102            TOTAL_ROE,
103            CONTRIB_AFTER_CPTL_CHG,
104            PARTNER_VALUE_INDEX,
105            ISO_CURRENCY_CD,
106            REVENUE1,
107            REVENUE2,
108            REVENUE3,
109            REVENUE4,
110            REVENUE5,
111            REVENUE_TOTAL,
112            EXPENSE1,
113            EXPENSE2,
114            EXPENSE3,
115            EXPENSE4,
116            EXPENSE5,
117            EXPENSE_TOTAL,
118            PROFIT1,
119            PROFIT2,
120            PROFIT3,
121            PROFIT4,
122            PROFIT5,
123            PROFIT_TOTAL,
124            CACC1,
125            CACC2,
126            CACC3,
127            CACC4,
128            CACC5,
129            CACC_TOTAL,
130            BALANCE1,
131            BALANCE2,
132            BALANCE3,
133            BALANCE4,
134            BALANCE5,
135            ACCOUNTS1,
136            ACCOUNTS2,
137            ACCOUNTS3,
138            ACCOUNTS4,
139            ACCOUNTS5,
140            TRANSACTION1,
141            TRANSACTION2,
142            TRANSACTION3,
143            TRANSACTION4,
144            TRANSACTION5,
145            RATIO1,
146            RATIO2,
147            RATIO3,
148            RATIO4,
149            RATIO5,
150            VALUE1,
151            VALUE2,
152            VALUE3,
153            VALUE4,
154            VALUE5,
155            YTD1,
156            YTD2,
157            YTD3,
158            YTD4,
159            YTD5,
160            LTD1,
161            LTD2,
162            LTD3,
163            LTD4,
164            LTD5
165           ) VALUES (
166            x_PARTY_ID,
167            decode( x_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_LAST_UPDATE_DATE),
168 	   decode( x_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,x_LAST_UPDATED_BY),
169 	   decode( x_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_CREATION_DATE),
170 	   decode( x_CREATED_BY, FND_API.G_MISS_NUM, NULL,x_CREATED_BY),
171            decode( x_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,x_LAST_UPDATE_LOGIN),
172            decode( x_PROFIT, FND_API.G_MISS_NUM, NULL,x_PROFIT),
173            decode( x_PROFIT_PCT, FND_API.G_MISS_NUM, NULL,x_PROFIT_PCT),
174            decode( x_RELATIONSHIP_EXPENSE, FND_API.G_MISS_NUM, NULL,x_RELATIONSHIP_EXPENSE),
175            decode( x_TOTAL_EQUITY, FND_API.G_MISS_NUM, NULL,x_TOTAL_EQUITY),
176            decode( x_TOTAL_GROSS_CONTRIB, FND_API.G_MISS_NUM, NULL,x_TOTAL_GROSS_CONTRIB),
177            decode( x_TOTAL_ROE, FND_API.G_MISS_NUM, NULL,x_TOTAL_ROE),
178            decode( x_CONTRIB_AFTER_CPTL_CHG, FND_API.G_MISS_NUM, NULL,x_CONTRIB_AFTER_CPTL_CHG),
179            decode( x_PARTNER_VALUE_INDEX, FND_API.G_MISS_NUM, NULL,x_PARTNER_VALUE_INDEX),
180            decode( x_ISO_CURRENCY_CD, FND_API.G_MISS_CHAR, NULL, x_ISO_CURRENCY_CD),
181            decode( x_REVENUE1, FND_API.G_MISS_NUM, NULL, x_REVENUE1),
182            decode( x_REVENUE2, FND_API.G_MISS_NUM, NULL, x_REVENUE2),
183            decode( x_REVENUE3, FND_API.G_MISS_NUM, NULL, x_REVENUE3),
184            decode( x_REVENUE4, FND_API.G_MISS_NUM, NULL, x_REVENUE4),
185            decode( x_REVENUE5, FND_API.G_MISS_NUM, NULL, x_REVENUE5),
186            decode( x_REVENUE_TOTAL, FND_API.G_MISS_NUM, NULL, x_REVENUE_TOTAL),
187            decode( x_EXPENSE1, FND_API.G_MISS_NUM, NULL, x_EXPENSE1),
188            decode( x_EXPENSE2, FND_API.G_MISS_NUM, NULL, x_EXPENSE2),
189            decode( x_EXPENSE3, FND_API.G_MISS_NUM, NULL, x_EXPENSE3),
190            decode( x_EXPENSE4, FND_API.G_MISS_NUM, NULL, x_EXPENSE4),
191            decode( x_EXPENSE5, FND_API.G_MISS_NUM, NULL, x_EXPENSE5),
192            decode( x_EXPENSE_TOTAL, FND_API.G_MISS_NUM, NULL, x_EXPENSE_TOTAL),
193            decode( x_PROFIT1, FND_API.G_MISS_NUM, NULL, x_PROFIT1),
194            decode( x_PROFIT2, FND_API.G_MISS_NUM, NULL, x_PROFIT2),
195            decode( x_PROFIT3, FND_API.G_MISS_NUM, NULL, x_PROFIT3),
196            decode( x_PROFIT4, FND_API.G_MISS_NUM, NULL, x_PROFIT4),
197            decode( x_PROFIT5, FND_API.G_MISS_NUM, NULL, x_PROFIT5),
198            decode( x_PROFIT_TOTAL, FND_API.G_MISS_NUM, NULL, x_PROFIT_TOTAL),
199            decode( x_CACC1, FND_API.G_MISS_NUM, NULL, x_CACC1),
200            decode( x_CACC2, FND_API.G_MISS_NUM, NULL, x_CACC2),
201            decode( x_CACC3, FND_API.G_MISS_NUM, NULL, x_CACC3),
202            decode( x_CACC4, FND_API.G_MISS_NUM, NULL, x_CACC4),
203            decode( x_CACC5, FND_API.G_MISS_NUM, NULL, x_CACC5),
204            decode( x_CACC_TOTAL, FND_API.G_MISS_NUM, NULL, x_CACC_TOTAL),
205            decode( x_BALANCE1, FND_API.G_MISS_NUM, NULL, x_BALANCE1),
206            decode( x_BALANCE2, FND_API.G_MISS_NUM, NULL, x_BALANCE2),
207            decode( x_BALANCE3, FND_API.G_MISS_NUM, NULL, x_BALANCE3),
208            decode( x_BALANCE4, FND_API.G_MISS_NUM, NULL, x_BALANCE4),
209            decode( x_BALANCE5, FND_API.G_MISS_NUM, NULL, x_BALANCE5),
210            decode( x_ACCOUNTS1, FND_API.G_MISS_NUM, NULL, x_ACCOUNTS1),
211            decode( x_ACCOUNTS2, FND_API.G_MISS_NUM, NULL, x_ACCOUNTS2),
212            decode( x_ACCOUNTS3, FND_API.G_MISS_NUM, NULL, x_ACCOUNTS3),
213            decode( x_ACCOUNTS4, FND_API.G_MISS_NUM, NULL, x_ACCOUNTS4),
214            decode( x_ACCOUNTS5, FND_API.G_MISS_NUM, NULL, x_ACCOUNTS5),
215            decode( x_TRANSACTION1, FND_API.G_MISS_NUM, NULL, x_TRANSACTION1),
216            decode( x_TRANSACTION2, FND_API.G_MISS_NUM, NULL, x_TRANSACTION2),
217            decode( x_TRANSACTION3, FND_API.G_MISS_NUM, NULL, x_TRANSACTION3),
218            decode( x_TRANSACTION4, FND_API.G_MISS_NUM, NULL, x_TRANSACTION4),
219            decode( x_TRANSACTION5, FND_API.G_MISS_NUM, NULL, x_TRANSACTION5),
220            decode( x_RATIO1, FND_API.G_MISS_NUM, NULL, x_RATIO1),
221            decode( x_RATIO2, FND_API.G_MISS_NUM, NULL, x_RATIO2),
222            decode( x_RATIO3, FND_API.G_MISS_NUM, NULL, x_RATIO3),
223            decode( x_RATIO4, FND_API.G_MISS_NUM, NULL, x_RATIO4),
224            decode( x_RATIO5, FND_API.G_MISS_NUM, NULL, x_RATIO5),
225            decode( x_VALUE1, FND_API.G_MISS_NUM, NULL, x_VALUE1),
226            decode( x_VALUE2, FND_API.G_MISS_NUM, NULL, x_VALUE2),
227            decode( x_VALUE3, FND_API.G_MISS_NUM, NULL, x_VALUE3),
228            decode( x_VALUE4, FND_API.G_MISS_NUM, NULL, x_VALUE4),
229            decode( x_VALUE5, FND_API.G_MISS_NUM, NULL, x_VALUE5),
230            decode( x_YTD1, FND_API.G_MISS_NUM, NULL, x_YTD1),
231            decode( x_YTD2, FND_API.G_MISS_NUM, NULL, x_YTD2),
232            decode( x_YTD3, FND_API.G_MISS_NUM, NULL, x_YTD3),
233            decode( x_YTD4, FND_API.G_MISS_NUM, NULL, x_YTD4),
234            decode( x_YTD5, FND_API.G_MISS_NUM, NULL, x_YTD5),
235            decode( x_LTD1, FND_API.G_MISS_NUM, NULL, x_LTD1),
236            decode( x_LTD2, FND_API.G_MISS_NUM, NULL, x_LTD2),
237            decode( x_LTD3, FND_API.G_MISS_NUM, NULL, x_LTD3),
238            decode( x_LTD4, FND_API.G_MISS_NUM, NULL, x_LTD4),
239            decode( x_LTD5, FND_API.G_MISS_NUM, NULL, x_LTD5));
240 
241    OPEN C;
242    FETCH C INTO x_Rowid;
243    If (C%NOTFOUND) then
244        CLOSE C;
245        RAISE NO_DATA_FOUND;
246    End If;
247 
248 End Insert_Row;
249 
250 
251 
252 PROCEDURE Delete_Row(
253                   x_PARTY_ID                   NUMBER
254  ) IS
255  BEGIN
256    DELETE FROM FEM_PARTY_PROFITABILITY
257     WHERE PARTY_ID = x_PARTY_ID;
258    If (SQL%NOTFOUND) then
259        RAISE NO_DATA_FOUND;
260    End If;
261  END Delete_Row;
262 
263 
264 
265 PROCEDURE Update_Row(
266                   x_Rowid                         VARCHAR2,
267                   x_PARTY_ID                      NUMBER,
268 		  x_LAST_UPDATE_DATE              DATE,
269 		  x_LAST_UPDATED_BY               NUMBER,
270 		  x_CREATION_DATE                 DATE,
271 		  x_CREATED_BY                    NUMBER,
272                   x_LAST_UPDATE_LOGIN             NUMBER,
273                   x_PROFIT                        NUMBER,
274                   x_PROFIT_PCT                    NUMBER,
275                   x_RELATIONSHIP_EXPENSE          NUMBER,
276                   x_TOTAL_EQUITY                  NUMBER,
277                   x_TOTAL_GROSS_CONTRIB           NUMBER,
278                   x_TOTAL_ROE                     NUMBER,
279                   x_CONTRIB_AFTER_CPTL_CHG        NUMBER,
280                   x_PARTNER_VALUE_INDEX           NUMBER,
281                   x_ISO_CURRENCY_CD               VARCHAR2,
282                   x_REVENUE1                      NUMBER,
283                   x_REVENUE2                      NUMBER,
284                   x_REVENUE3                      NUMBER,
285                   x_REVENUE4                      NUMBER,
286                   x_REVENUE5                      NUMBER,
287                   x_REVENUE_TOTAL                 NUMBER,
288                   x_EXPENSE1                      NUMBER,
289                   x_EXPENSE2                      NUMBER,
290                   x_EXPENSE3                      NUMBER,
291                   x_EXPENSE4                      NUMBER,
292                   x_EXPENSE5                      NUMBER,
293                   x_EXPENSE_TOTAL                 NUMBER,
294                   x_PROFIT1                       NUMBER,
295                   x_PROFIT2                       NUMBER,
296                   x_PROFIT3                       NUMBER,
297                   x_PROFIT4                       NUMBER,
298                   x_PROFIT5                       NUMBER,
299                   x_PROFIT_TOTAL                  NUMBER,
300                   x_CACC1                         NUMBER,
301                   x_CACC2                         NUMBER,
302                   x_CACC3                         NUMBER,
303                   x_CACC4                         NUMBER,
304                   x_CACC5                         NUMBER,
305                   x_CACC_TOTAL                    NUMBER,
306                   x_BALANCE1                      NUMBER,
307                   x_BALANCE2                      NUMBER,
308                   x_BALANCE3                      NUMBER,
309                   x_BALANCE4                      NUMBER,
310                   x_BALANCE5                      NUMBER,
311                   x_ACCOUNTS1                     NUMBER,
312                   x_ACCOUNTS2                     NUMBER,
313                   x_ACCOUNTS3                     NUMBER,
314                   x_ACCOUNTS4                     NUMBER,
315                   x_ACCOUNTS5                     NUMBER,
316                   x_TRANSACTION1                  NUMBER,
317                   x_TRANSACTION2                  NUMBER,
318                   x_TRANSACTION3                  NUMBER,
319                   x_TRANSACTION4                  NUMBER,
320                   x_TRANSACTION5                  NUMBER,
321                   x_RATIO1                        NUMBER,
322                   x_RATIO2                        NUMBER,
323                   x_RATIO3                        NUMBER,
324                   x_RATIO4                        NUMBER,
325                   x_RATIO5                        NUMBER,
326                   x_VALUE1                        NUMBER,
327                   x_VALUE2                        NUMBER,
328                   x_VALUE3                        NUMBER,
329                   x_VALUE4                        NUMBER,
330                   x_VALUE5                        NUMBER,
331                   x_YTD1                          NUMBER,
335                   x_YTD5                          NUMBER,
332                   x_YTD2                          NUMBER,
333                   x_YTD3                          NUMBER,
334                   x_YTD4                          NUMBER,
336                   x_LTD1                          NUMBER,
337                   x_LTD2                          NUMBER,
338                   x_LTD3                          NUMBER,
339                   x_LTD4                          NUMBER,
340                   x_LTD5                          NUMBER
341  ) IS
342  BEGIN
343 
344     Update FEM_PARTY_PROFITABILITY
345     SET
346              LAST_UPDATE_DATE = decode( x_LAST_UPDATE_DATE, FND_API.G_MISS_DATE,LAST_UPDATE_DATE,x_LAST_UPDATE_DATE),
347              LAST_UPDATED_BY = decode( x_LAST_UPDATED_BY, FND_API.G_MISS_NUM,LAST_UPDATED_BY,x_LAST_UPDATED_BY),
348              CREATION_DATE = decode( x_CREATION_DATE, FND_API.G_MISS_DATE,CREATION_DATE,x_CREATION_DATE),
349              CREATED_BY = decode( x_CREATED_BY, FND_API.G_MISS_NUM,CREATED_BY,x_CREATED_BY),
350              LAST_UPDATE_LOGIN = decode( x_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM,LAST_UPDATE_LOGIN,x_LAST_UPDATE_LOGIN),
351              PROFIT = decode( x_PROFIT, FND_API.G_MISS_NUM, PROFIT,x_PROFIT),
352              PROFIT_PCT = decode( x_PROFIT_PCT, FND_API.G_MISS_NUM, PROFIT_PCT,x_PROFIT_PCT),
353              RELATIONSHIP_EXPENSE = decode( x_RELATIONSHIP_EXPENSE, FND_API.G_MISS_NUM, RELATIONSHIP_EXPENSE,x_RELATIONSHIP_EXPENSE),
354              TOTAL_EQUITY = decode( x_TOTAL_EQUITY, FND_API.G_MISS_NUM, TOTAL_EQUITY,x_TOTAL_EQUITY),
355              TOTAL_GROSS_CONTRIB = decode( x_TOTAL_GROSS_CONTRIB, FND_API.G_MISS_NUM, TOTAL_GROSS_CONTRIB,x_TOTAL_GROSS_CONTRIB),
356              TOTAL_ROE = decode( x_TOTAL_ROE, FND_API.G_MISS_NUM, TOTAL_ROE,x_TOTAL_ROE),
357              CONTRIB_AFTER_CPTL_CHG = decode( x_CONTRIB_AFTER_CPTL_CHG, FND_API.G_MISS_NUM, CONTRIB_AFTER_CPTL_CHG,x_CONTRIB_AFTER_CPTL_CHG),
358              PARTNER_VALUE_INDEX = decode( x_PARTNER_VALUE_INDEX, FND_API.G_MISS_NUM, PARTNER_VALUE_INDEX,x_PARTNER_VALUE_INDEX),
359              ISO_CURRENCY_CD = decode( x_ISO_CURRENCY_CD, FND_API.G_MISS_CHAR, ISO_CURRENCY_CD, x_ISO_CURRENCY_CD),
360              REVENUE1 = decode( x_REVENUE1, FND_API.G_MISS_NUM, REVENUE1, x_REVENUE1),
361              REVENUE2 = decode( x_REVENUE2, FND_API.G_MISS_NUM, REVENUE2, x_REVENUE2),
362              REVENUE3 = decode( x_REVENUE3, FND_API.G_MISS_NUM, REVENUE3, x_REVENUE3),
363              REVENUE4 = decode( x_REVENUE4, FND_API.G_MISS_NUM, REVENUE4, x_REVENUE4),
364              REVENUE5 = decode( x_REVENUE5, FND_API.G_MISS_NUM, REVENUE5, x_REVENUE5),
365              REVENUE_TOTAL = decode( x_REVENUE_TOTAL, FND_API.G_MISS_NUM, REVENUE_TOTAL, x_REVENUE_TOTAL),
366              EXPENSE1 = decode( x_EXPENSE1, FND_API.G_MISS_NUM, EXPENSE1, x_EXPENSE1),
367              EXPENSE2 = decode( x_EXPENSE2, FND_API.G_MISS_NUM, EXPENSE2, x_EXPENSE2),
368              EXPENSE3 = decode( x_EXPENSE3, FND_API.G_MISS_NUM, EXPENSE3, x_EXPENSE3),
369              EXPENSE4 = decode( x_EXPENSE4, FND_API.G_MISS_NUM, EXPENSE4, x_EXPENSE4),
370              EXPENSE5 = decode( x_EXPENSE5, FND_API.G_MISS_NUM, EXPENSE5, x_EXPENSE5),
371              EXPENSE_TOTAL = decode( x_EXPENSE_TOTAL, FND_API.G_MISS_NUM, EXPENSE_TOTAL, x_EXPENSE_TOTAL),
372              PROFIT1 = decode( x_PROFIT1, FND_API.G_MISS_NUM, PROFIT1, x_PROFIT1),
373              PROFIT2 = decode( x_PROFIT2, FND_API.G_MISS_NUM, PROFIT2, x_PROFIT2),
374              PROFIT3 = decode( x_PROFIT3, FND_API.G_MISS_NUM, PROFIT3, x_PROFIT3),
375              PROFIT4 = decode( x_PROFIT4, FND_API.G_MISS_NUM, PROFIT4, x_PROFIT4),
376              PROFIT5 = decode( x_PROFIT5, FND_API.G_MISS_NUM, PROFIT5, x_PROFIT5),
377              PROFIT_TOTAL = decode( x_PROFIT_TOTAL, FND_API.G_MISS_NUM, PROFIT_TOTAL, x_PROFIT_TOTAL),
378              CACC1 = decode( x_CACC1, FND_API.G_MISS_NUM, CACC1, x_CACC1),
379              CACC2 = decode( x_CACC2, FND_API.G_MISS_NUM, CACC2, x_CACC2),
380              CACC3 = decode( x_CACC3, FND_API.G_MISS_NUM, CACC3, x_CACC3),
381              CACC4 = decode( x_CACC4, FND_API.G_MISS_NUM, CACC4, x_CACC4),
382              CACC5 = decode( x_CACC5, FND_API.G_MISS_NUM, CACC5, x_CACC5),
383              CACC_TOTAL = decode( x_CACC_TOTAL, FND_API.G_MISS_NUM, CACC_TOTAL, x_CACC_TOTAL),
384              BALANCE1 = decode( x_BALANCE1, FND_API.G_MISS_NUM, BALANCE1, x_BALANCE1),
385              BALANCE2 = decode( x_BALANCE2, FND_API.G_MISS_NUM, BALANCE2, x_BALANCE2),
386              BALANCE3 = decode( x_BALANCE3, FND_API.G_MISS_NUM, BALANCE3, x_BALANCE3),
387              BALANCE4 = decode( x_BALANCE4, FND_API.G_MISS_NUM, BALANCE4, x_BALANCE4),
388              BALANCE5 = decode( x_BALANCE5, FND_API.G_MISS_NUM, BALANCE5, x_BALANCE5),
389              ACCOUNTS1 = decode( x_ACCOUNTS1, FND_API.G_MISS_NUM, ACCOUNTS1, x_ACCOUNTS1),
390              ACCOUNTS2 = decode( x_ACCOUNTS2, FND_API.G_MISS_NUM, ACCOUNTS2, x_ACCOUNTS2),
391              ACCOUNTS3 = decode( x_ACCOUNTS3, FND_API.G_MISS_NUM, ACCOUNTS3, x_ACCOUNTS3),
392              ACCOUNTS4 = decode( x_ACCOUNTS4, FND_API.G_MISS_NUM, ACCOUNTS4, x_ACCOUNTS4),
393              ACCOUNTS5 = decode( x_ACCOUNTS5, FND_API.G_MISS_NUM, ACCOUNTS5, x_ACCOUNTS5),
394              TRANSACTION1 = decode( x_TRANSACTION1, FND_API.G_MISS_NUM, TRANSACTION1, x_TRANSACTION1),
395              TRANSACTION2 = decode( x_TRANSACTION2, FND_API.G_MISS_NUM, TRANSACTION2, x_TRANSACTION2),
396              TRANSACTION3 = decode( x_TRANSACTION3, FND_API.G_MISS_NUM, TRANSACTION3, x_TRANSACTION3),
397              TRANSACTION4 = decode( x_TRANSACTION4, FND_API.G_MISS_NUM, TRANSACTION4, x_TRANSACTION4),
398              TRANSACTION5 = decode( x_TRANSACTION5, FND_API.G_MISS_NUM, TRANSACTION5, x_TRANSACTION5),
399              RATIO1 = decode( x_RATIO1, FND_API.G_MISS_NUM, RATIO1, x_RATIO1),
400              RATIO2 = decode( x_RATIO2, FND_API.G_MISS_NUM, RATIO2, x_RATIO2),
401              RATIO3 = decode( x_RATIO3, FND_API.G_MISS_NUM, RATIO3, x_RATIO3),
405              VALUE2 = decode( x_VALUE2, FND_API.G_MISS_NUM, VALUE2, x_VALUE2),
402              RATIO4 = decode( x_RATIO4, FND_API.G_MISS_NUM, RATIO4, x_RATIO4),
403              RATIO5 = decode( x_RATIO5, FND_API.G_MISS_NUM, RATIO5, x_RATIO5),
404              VALUE1 = decode( x_VALUE1, FND_API.G_MISS_NUM, VALUE1, x_VALUE1),
406              VALUE3 = decode( x_VALUE3, FND_API.G_MISS_NUM, VALUE3, x_VALUE3),
407              VALUE4 = decode( x_VALUE4, FND_API.G_MISS_NUM, VALUE4, x_VALUE4),
408              VALUE5 = decode( x_VALUE5, FND_API.G_MISS_NUM, VALUE5, x_VALUE5),
409              YTD1 = decode( x_YTD1, FND_API.G_MISS_NUM, YTD1, x_YTD1),
410              YTD2 = decode( x_YTD2, FND_API.G_MISS_NUM, YTD2, x_YTD2),
411              YTD3 = decode( x_YTD3, FND_API.G_MISS_NUM, YTD3, x_YTD3),
412              YTD4 = decode( x_YTD4, FND_API.G_MISS_NUM, YTD4, x_YTD4),
413              YTD5 = decode( x_YTD5, FND_API.G_MISS_NUM, YTD5, x_YTD5),
414              LTD1 = decode( x_LTD1, FND_API.G_MISS_NUM, LTD1, x_LTD1),
415              LTD2 = decode( x_LTD2, FND_API.G_MISS_NUM, LTD2, x_LTD2),
416              LTD3 = decode( x_LTD3, FND_API.G_MISS_NUM, LTD3, x_LTD3),
417              LTD4 = decode( x_LTD4, FND_API.G_MISS_NUM, LTD4, x_LTD4),
418              LTD5 = decode( x_LTD5, FND_API.G_MISS_NUM, LTD5, x_LTD5)
419      where rowid = X_RowId;
420 
421     If (SQL%NOTFOUND) then
422         RAISE NO_DATA_FOUND;
423     End If;
424 
425  END Update_Row;
426 
427 
428 
429 PROCEDURE Lock_Row(
430                   x_Rowid                         VARCHAR2,
431                   x_PARTY_ID                      NUMBER,
432                   x_LAST_UPDATE_DATE              DATE,
433 		  x_LAST_UPDATED_BY               NUMBER,
434 		  x_CREATION_DATE                 DATE,
435 		  x_CREATED_BY                    NUMBER,
436                   x_LAST_UPDATE_LOGIN             NUMBER,
437                   x_PROFIT                        NUMBER,
438                   x_PROFIT_PCT                    NUMBER,
439                   x_RELATIONSHIP_EXPENSE          NUMBER,
440                   x_TOTAL_EQUITY                  NUMBER,
441                   x_TOTAL_GROSS_CONTRIB           NUMBER,
442                   x_TOTAL_ROE                     NUMBER,
443                   x_CONTRIB_AFTER_CPTL_CHG        NUMBER,
444                   x_PARTNER_VALUE_INDEX           NUMBER,
445                   x_ISO_CURRENCY_CD               VARCHAR2,
446                   x_REVENUE1                      NUMBER,
447                   x_REVENUE2                      NUMBER,
448                   x_REVENUE3                      NUMBER,
449                   x_REVENUE4                      NUMBER,
450                   x_REVENUE5                      NUMBER,
451                   x_REVENUE_TOTAL                 NUMBER,
452                   x_EXPENSE1                      NUMBER,
453                   x_EXPENSE2                      NUMBER,
454                   x_EXPENSE3                      NUMBER,
455                   x_EXPENSE4                      NUMBER,
456                   x_EXPENSE5                      NUMBER,
457                   x_EXPENSE_TOTAL                 NUMBER,
458                   x_PROFIT1                       NUMBER,
459                   x_PROFIT2                       NUMBER,
460                   x_PROFIT3                       NUMBER,
461                   x_PROFIT4                       NUMBER,
462                   x_PROFIT5                       NUMBER,
463                   x_PROFIT_TOTAL                  NUMBER,
464                   x_CACC1                         NUMBER,
465                   x_CACC2                         NUMBER,
466                   x_CACC3                         NUMBER,
467                   x_CACC4                         NUMBER,
468                   x_CACC5                         NUMBER,
469                   x_CACC_TOTAL                    NUMBER,
470                   x_BALANCE1                      NUMBER,
471                   x_BALANCE2                      NUMBER,
472                   x_BALANCE3                      NUMBER,
473                   x_BALANCE4                      NUMBER,
474                   x_BALANCE5                      NUMBER,
475                   x_ACCOUNTS1                     NUMBER,
476                   x_ACCOUNTS2                     NUMBER,
477                   x_ACCOUNTS3                     NUMBER,
478                   x_ACCOUNTS4                     NUMBER,
479                   x_ACCOUNTS5                     NUMBER,
480                   x_TRANSACTION1                  NUMBER,
481                   x_TRANSACTION2                  NUMBER,
482                   x_TRANSACTION3                  NUMBER,
483                   x_TRANSACTION4                  NUMBER,
484                   x_TRANSACTION5                  NUMBER,
485                   x_RATIO1                        NUMBER,
486                   x_RATIO2                        NUMBER,
487                   x_RATIO3                        NUMBER,
488                   x_RATIO4                        NUMBER,
489                   x_RATIO5                        NUMBER,
490                   x_VALUE1                        NUMBER,
491                   x_VALUE2                        NUMBER,
492                   x_VALUE3                        NUMBER,
493                   x_VALUE4                        NUMBER,
494                   x_VALUE5                        NUMBER,
495                   x_YTD1                          NUMBER,
496                   x_YTD2                          NUMBER,
497                   x_YTD3                          NUMBER,
498                   x_YTD4                          NUMBER,
502                   x_LTD3                          NUMBER,
499                   x_YTD5                          NUMBER,
500                   x_LTD1                          NUMBER,
501                   x_LTD2                          NUMBER,
503                   x_LTD4                          NUMBER,
504                   x_LTD5                          NUMBER
505  ) IS
506    CURSOR C IS
507         SELECT *
508           FROM FEM_PARTY_PROFITABILITY
509          WHERE rowid = x_Rowid
510          FOR UPDATE of PARTY_ID NOWAIT;
511    Recinfo C%ROWTYPE;
512  BEGIN
513     OPEN C;
514     FETCH C INTO Recinfo;
515     If (C%NOTFOUND) then
516         CLOSE C;
517         FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
518         APP_EXCEPTION.RAISE_EXCEPTION;
519     End If;
520     CLOSE C;
521     if (
522            (    ( Recinfo.PARTY_ID = x_PARTY_ID)
523             OR (    ( Recinfo.PARTY_ID = NULL )
524                 AND (  x_PARTY_ID = NULL )))
525        AND (    ( Recinfo.LAST_UPDATE_DATE = x_LAST_UPDATE_DATE)
526             OR (    ( Recinfo.LAST_UPDATE_DATE = NULL )
527                 AND (  x_LAST_UPDATE_DATE = NULL )))
528        AND (    ( Recinfo.LAST_UPDATED_BY = x_LAST_UPDATED_BY)
529             OR (    ( Recinfo.LAST_UPDATED_BY = NULL )
530                 AND (  x_LAST_UPDATED_BY = NULL )))
531        AND (    ( Recinfo.CREATION_DATE = x_CREATION_DATE)
532             OR (    ( Recinfo.CREATION_DATE = NULL )
533                 AND (  x_CREATION_DATE = NULL )))
534        AND (    ( Recinfo.CREATED_BY = x_CREATED_BY)
535             OR (    ( Recinfo.CREATED_BY = NULL )
536                 AND (  x_CREATED_BY = NULL )))
537        AND (    ( Recinfo.LAST_UPDATE_LOGIN = x_LAST_UPDATE_LOGIN)
538             OR (    ( Recinfo.LAST_UPDATE_LOGIN = NULL )
539                 AND (  x_LAST_UPDATE_LOGIN = NULL )))
540        AND (    ( Recinfo.PROFIT = x_PROFIT)
541             OR (    ( Recinfo.PROFIT = NULL )
542                 AND (  x_PROFIT = NULL )))
543        AND (    ( Recinfo.PROFIT_PCT = x_PROFIT_PCT)
544             OR (    ( Recinfo.PROFIT_PCT = NULL )
545                 AND (  x_PROFIT_PCT = NULL )))
546        AND (    ( Recinfo.RELATIONSHIP_EXPENSE = x_RELATIONSHIP_EXPENSE)
547             OR (    ( Recinfo.RELATIONSHIP_EXPENSE = NULL )
548                 AND (  x_RELATIONSHIP_EXPENSE = NULL )))
549        AND (    ( Recinfo.TOTAL_EQUITY = x_TOTAL_EQUITY)
550             OR (    ( Recinfo.TOTAL_EQUITY = NULL )
551                 AND (  x_TOTAL_EQUITY = NULL )))
552        AND (    ( Recinfo.TOTAL_GROSS_CONTRIB = x_TOTAL_GROSS_CONTRIB)
553             OR (    ( Recinfo.TOTAL_GROSS_CONTRIB = NULL )
554                 AND (  x_TOTAL_GROSS_CONTRIB = NULL )))
555        AND (    ( Recinfo.TOTAL_ROE = x_TOTAL_ROE)
556             OR (    ( Recinfo.TOTAL_ROE = NULL )
557                 AND (  x_TOTAL_ROE = NULL )))
558        AND (    ( Recinfo.CONTRIB_AFTER_CPTL_CHG = x_CONTRIB_AFTER_CPTL_CHG)
559             OR (    ( Recinfo.CONTRIB_AFTER_CPTL_CHG = NULL )
560                 AND (  x_CONTRIB_AFTER_CPTL_CHG = NULL )))
561        AND (    ( Recinfo.PARTNER_VALUE_INDEX = x_PARTNER_VALUE_INDEX)
562             OR (    ( Recinfo.PARTNER_VALUE_INDEX = NULL )
563                 AND (  x_PARTNER_VALUE_INDEX = NULL )))
564        AND (   (  Recinfo.ISO_CURRENCY_CD = x_ISO_CURRENCY_CD)
565             OR (    ( Recinfo.ISO_CURRENCY_CD = NULL )
566                 AND (  x_ISO_CURRENCY_CD = NULL )))
567        AND (    ( Recinfo.REVENUE1 = x_REVENUE1)
568             OR (    ( Recinfo.REVENUE1 = NULL )
569                 AND (  x_REVENUE1 = NULL )))
570        AND (    ( Recinfo.REVENUE2 = x_REVENUE2)
571             OR (    ( Recinfo.REVENUE2 = NULL )
572                 AND (  x_REVENUE2 = NULL )))
573        AND (    ( Recinfo.REVENUE3 = x_REVENUE3)
574             OR (    ( Recinfo.REVENUE3 = NULL )
575                 AND (  x_REVENUE3 = NULL )))
576        AND (    ( Recinfo.REVENUE4 = x_REVENUE4)
577             OR (    ( Recinfo.REVENUE4 = NULL )
578                 AND (  x_REVENUE4 = NULL )))
579        AND (    ( Recinfo.REVENUE5 = x_REVENUE5)
580             OR (    ( Recinfo.REVENUE5 = NULL )
581                 AND (  x_REVENUE5 = NULL )))
582        AND (    ( Recinfo.REVENUE_TOTAL = x_REVENUE_TOTAL)
583             OR (    ( Recinfo.REVENUE_TOTAL = NULL )
584                 AND (  x_REVENUE_TOTAL = NULL )))
585        AND (    ( Recinfo.EXPENSE1 = x_EXPENSE1)
586             OR (    ( Recinfo.EXPENSE1 = NULL )
587                 AND (  x_EXPENSE1 = NULL )))
588        AND (    ( Recinfo.EXPENSE2 = x_EXPENSE2)
589             OR (    ( Recinfo.EXPENSE2 = NULL )
590                 AND (  x_EXPENSE2 = NULL )))
591        AND (    ( Recinfo.EXPENSE3 = x_EXPENSE3)
592             OR (    ( Recinfo.EXPENSE3 = NULL )
593                 AND (  x_EXPENSE3 = NULL )))
594        AND (    ( Recinfo.EXPENSE4 = x_EXPENSE4)
595             OR (    ( Recinfo.EXPENSE4 = NULL )
596                 AND (  x_EXPENSE4 = NULL )))
597        AND (    ( Recinfo.EXPENSE5 = x_EXPENSE5)
598             OR (    ( Recinfo.EXPENSE5 = NULL )
599                 AND (  x_EXPENSE5 = NULL )))
600        AND (    ( Recinfo.EXPENSE_TOTAL = x_EXPENSE_TOTAL)
601             OR (    ( Recinfo.EXPENSE_TOTAL = NULL )
602                 AND (  x_EXPENSE_TOTAL = NULL )))
603        AND (    ( Recinfo.PROFIT1 = x_PROFIT1)
604             OR (    ( Recinfo.PROFIT1 = NULL )
605                 AND (  x_PROFIT1 = NULL )))
606        AND (    ( Recinfo.PROFIT2 = x_PROFIT2)
607             OR (    ( Recinfo.PROFIT2 = NULL )
611                 AND (  x_PROFIT3 = NULL )))
608                 AND (  x_PROFIT2 = NULL )))
609        AND (    ( Recinfo.PROFIT3 = x_PROFIT3)
610             OR (    ( Recinfo.PROFIT3 = NULL )
612        AND (    ( Recinfo.PROFIT4 = x_PROFIT4)
613             OR (    ( Recinfo.PROFIT4 = NULL )
614                 AND (  x_PROFIT4 = NULL )))
615        AND (    ( Recinfo.PROFIT5 = x_PROFIT5)
616             OR (    ( Recinfo.PROFIT5 = NULL )
617                 AND (  x_PROFIT5 = NULL )))
618        AND (    ( Recinfo.PROFIT_TOTAL = x_PROFIT_TOTAL)
619             OR (    ( Recinfo.PROFIT_TOTAL = NULL )
620                 AND (  x_PROFIT_TOTAL = NULL )))
621        AND (    ( Recinfo.CACC1 = x_CACC1)
622             OR (    ( Recinfo.CACC1 = NULL )
623                 AND (  x_CACC1 = NULL )))
624        AND (    ( Recinfo.CACC2 = x_CACC2)
625             OR (    ( Recinfo.CACC2 = NULL )
626                 AND (  x_CACC2 = NULL )))
627        AND (    ( Recinfo.CACC3 = x_CACC3)
628             OR (    ( Recinfo.CACC3 = NULL )
629                 AND (  x_CACC3 = NULL )))
630        AND (    ( Recinfo.CACC4 = x_CACC4)
631             OR (    ( Recinfo.CACC4 = NULL )
632                 AND (  x_CACC4 = NULL )))
633        AND (    ( Recinfo.CACC5 = x_CACC5)
634             OR (    ( Recinfo.CACC5 = NULL )
635                 AND (  x_CACC5 = NULL )))
636        AND (    ( Recinfo.CACC_TOTAL = x_CACC_TOTAL)
637             OR (    ( Recinfo.CACC_TOTAL = NULL )
638                 AND (  x_CACC_TOTAL = NULL )))
639        AND (    ( Recinfo.BALANCE1 = x_BALANCE1)
640             OR (    ( Recinfo.BALANCE1 = NULL )
641                 AND (  x_BALANCE1 = NULL )))
642        AND (    ( Recinfo.BALANCE2 = x_BALANCE2)
643             OR (    ( Recinfo.BALANCE2 = NULL )
644                 AND (  x_BALANCE2 = NULL )))
645        AND (    ( Recinfo.BALANCE3 = x_BALANCE3)
646             OR (    ( Recinfo.BALANCE3 = NULL )
647                 AND (  x_BALANCE3 = NULL )))
648        AND (    ( Recinfo.BALANCE4 = x_BALANCE4)
649             OR (    ( Recinfo.BALANCE4 = NULL )
650                 AND (  x_BALANCE4 = NULL )))
651        AND (    ( Recinfo.BALANCE5 = x_BALANCE5)
652             OR (    ( Recinfo.BALANCE5 = NULL )
653                 AND (  x_BALANCE5 = NULL )))
654        AND (    ( Recinfo.ACCOUNTS1 = x_ACCOUNTS1)
655             OR (    ( Recinfo.ACCOUNTS1 = NULL )
656                 AND (  x_ACCOUNTS1 = NULL )))
657        AND (    ( Recinfo.ACCOUNTS2 = x_ACCOUNTS2)
658             OR (    ( Recinfo.ACCOUNTS2 = NULL )
659                 AND (  x_ACCOUNTS2 = NULL )))
660        AND (    ( Recinfo.ACCOUNTS3 = x_ACCOUNTS3)
661             OR (    ( Recinfo.ACCOUNTS3 = NULL )
662                 AND (  x_ACCOUNTS3 = NULL )))
663        AND (    ( Recinfo.ACCOUNTS4 = x_ACCOUNTS4)
664             OR (    ( Recinfo.ACCOUNTS4 = NULL )
665                 AND (  x_ACCOUNTS4 = NULL )))
666        AND (    ( Recinfo.ACCOUNTS5 = x_ACCOUNTS5)
667             OR (    ( Recinfo.ACCOUNTS5 = NULL )
668                 AND (  x_ACCOUNTS5 = NULL )))
669        AND (    ( Recinfo.TRANSACTION1 = x_TRANSACTION1)
670             OR (    ( Recinfo.TRANSACTION1 = NULL )
671                 AND (  x_TRANSACTION1 = NULL )))
672        AND (    ( Recinfo.TRANSACTION2 = x_TRANSACTION2)
673             OR (    ( Recinfo.TRANSACTION2 = NULL )
674                 AND (  x_TRANSACTION2 = NULL )))
675        AND (    ( Recinfo.TRANSACTION3 = x_TRANSACTION3)
676             OR (    ( Recinfo.TRANSACTION3 = NULL )
677                 AND (  x_TRANSACTION3 = NULL )))
678        AND (    ( Recinfo.TRANSACTION4 = x_TRANSACTION4)
679             OR (    ( Recinfo.TRANSACTION4 = NULL )
680                 AND (  x_TRANSACTION4 = NULL )))
681        AND (    ( Recinfo.TRANSACTION5 = x_TRANSACTION5)
682             OR (    ( Recinfo.TRANSACTION5 = NULL )
683                 AND (  x_TRANSACTION5 = NULL )))
684        AND (    ( Recinfo.RATIO1 = x_RATIO1)
685             OR (    ( Recinfo.RATIO1 = NULL )
686                 AND (  x_RATIO1 = NULL )))
687        AND (    ( Recinfo.RATIO2 = x_RATIO2)
688             OR (    ( Recinfo.RATIO2 = NULL )
689                 AND (  x_RATIO2 = NULL )))
690        AND (    ( Recinfo.RATIO3 = x_RATIO3)
691             OR (    ( Recinfo.RATIO3 = NULL )
692                 AND (  x_RATIO3 = NULL )))
693        AND (    ( Recinfo.RATIO4 = x_RATIO4)
694             OR (    ( Recinfo.RATIO4 = NULL )
695                 AND (  x_RATIO4 = NULL )))
696        AND (    ( Recinfo.RATIO5 = x_RATIO5)
697             OR (    ( Recinfo.RATIO5 = NULL )
698                 AND (  x_RATIO5 = NULL )))
699        AND (    ( Recinfo.VALUE1 = x_VALUE1)
700             OR (    ( Recinfo.VALUE1 = NULL )
701                 AND (  x_VALUE1 = NULL )))
702        AND (    ( Recinfo.VALUE2 = x_VALUE2)
703             OR (    ( Recinfo.VALUE2 = NULL )
704                 AND (  x_VALUE2 = NULL )))
705        AND (    ( Recinfo.VALUE3 = x_VALUE3)
706             OR (    ( Recinfo.VALUE3 = NULL )
707                 AND (  x_VALUE3 = NULL )))
708        AND (    ( Recinfo.VALUE4 = x_VALUE4)
709             OR (    ( Recinfo.VALUE4 = NULL )
710                 AND (  x_VALUE4 = NULL )))
711        AND (    ( Recinfo.VALUE5 = x_VALUE5)
712             OR (    ( Recinfo.VALUE5 = NULL )
713                 AND (  x_VALUE5 = NULL )))
714        AND (    ( Recinfo.YTD1 = x_YTD1)
715             OR (    ( Recinfo.YTD1 = NULL )
716                 AND (  x_YTD1 = NULL )))
717        AND (    ( Recinfo.YTD2 = x_YTD2)
721             OR (    ( Recinfo.YTD3 = NULL )
718             OR (    ( Recinfo.YTD2 = NULL )
719                 AND (  x_YTD2 = NULL )))
720        AND (    ( Recinfo.YTD3 = x_YTD3)
722                 AND (  x_YTD3 = NULL )))
723        AND (    ( Recinfo.YTD4 = x_YTD4)
724             OR (    ( Recinfo.YTD4 = NULL )
725                 AND (  x_YTD4 = NULL )))
726        AND (    ( Recinfo.YTD5 = x_YTD5)
727             OR (    ( Recinfo.YTD5 = NULL )
728                 AND (  x_YTD5 = NULL )))
729        AND (    ( Recinfo.LTD1 = x_LTD1)
730             OR (    ( Recinfo.LTD1 = NULL )
731                 AND (  x_LTD1 = NULL )))
732        AND (    ( Recinfo.LTD2 = x_LTD2)
733             OR (    ( Recinfo.LTD2 = NULL )
734                 AND (  x_LTD2 = NULL )))
735        AND (    ( Recinfo.LTD3 = x_LTD3)
736             OR (    ( Recinfo.LTD3 = NULL )
737                 AND (  x_LTD3 = NULL )))
738        AND (    ( Recinfo.LTD4 = x_LTD4)
739             OR (    ( Recinfo.LTD4 = NULL )
740                 AND (  x_LTD4 = NULL )))
741        AND (    ( Recinfo.LTD5 = x_LTD5)
742             OR (    ( Recinfo.LTD5 = NULL )
743                 AND (  x_LTD5 = NULL )))
744        ) then
745        return;
746    else
747        FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
748        APP_EXCEPTION.RAISE_EXCEPTION;
749    End If;
750 END Lock_Row;
751 
752 END FEM_PARTY_PROFITABILITY_PKG;