DBA Data[Home] [Help]

APPS.CSP_REQUIREMENT_HEADERS_PKG dependencies on FND_MESSAGE

Line 118: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');

114: x_msg_data => l_msg_data
115: ) ;
116: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
117: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
118: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
119: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
120: FND_MSG_PUB.Add;
121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122: END IF;

Line 119: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

115: ) ;
116: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
117: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
118: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
119: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
120: FND_MSG_PUB.Add;
121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122: END IF;
123: END IF;

Line 140: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');

136: ) ;
137:
138: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
139: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
140: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
141: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
142: FND_MSG_PUB.Add;
143: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
144: END IF;

Line 141: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

137:
138: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
139: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
140: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
141: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
142: FND_MSG_PUB.Add;
143: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
144: END IF;
145: END IF;

Line 152: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');

148: ( x_return_status => l_return_status
149: ) ;
150: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
151: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
152: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
153: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
154: FND_MSG_PUB.Add;
155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
156: END IF;

Line 153: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

149: ) ;
150: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
151: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
152: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
153: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
154: FND_MSG_PUB.Add;
155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
156: END IF;
157: If (l_requirement_header.REQUIREMENT_HEADER_ID IS NULL) OR (l_requirement_header.REQUIREMENT_HEADER_ID = FND_API.G_MISS_NUM) then

Line 261: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');

257:
258:
259: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
260: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Post Customer User Hook');
261: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
262: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
263: FND_MSG_PUB.Add;
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;

Line 262: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

258:
259: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
260: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Post Customer User Hook');
261: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
262: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
263: FND_MSG_PUB.Add;
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;
266: END IF;

Line 283: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');

279: x_msg_data => l_msg_data
280: ) ;
281: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
282: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Post Vertical User Hook');
283: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
284: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
285: FND_MSG_PUB.Add;
286: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
287: END IF;

Line 284: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

280: ) ;
281: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
282: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Post Vertical User Hook');
283: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
284: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
285: FND_MSG_PUB.Add;
286: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
287: END IF;
288: END IF;

Line 294: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');

290: ( x_return_status => l_return_status
291: ) ;
292: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
293: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
294: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
295: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
296: FND_MSG_PUB.Add;
297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
298: END IF;

Line 295: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

291: ) ;
292: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
293: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
294: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
295: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
296: FND_MSG_PUB.Add;
297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
298: END IF;
299: END IF;

Line 405: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');

401: x_msg_data => l_msg_data
402: ) ;
403: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
404: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
405: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
406: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
407: FND_MSG_PUB.Add;
408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
409: END IF;

Line 406: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

402: ) ;
403: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
404: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
405: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
406: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
407: FND_MSG_PUB.Add;
408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
409: END IF;
410: END IF;

Line 427: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');

423: ) ;
424:
425: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
426: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
427: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
428: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
429: FND_MSG_PUB.Add;
430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;

Line 428: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

424:
425: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
426: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
427: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
428: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
429: FND_MSG_PUB.Add;
430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
432: END IF;

Line 439: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');

435: ( x_return_status => l_return_status
436: ) ;
437: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
438: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
439: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
440: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
441: FND_MSG_PUB.Add;
442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
443: END IF;

Line 440: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

436: ) ;
437: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
438: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
439: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
440: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
441: FND_MSG_PUB.Add;
442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
443: END IF;
444: END IF;

Line 505: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');

501: x_msg_data => l_msg_data
502: ) ;
503: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
504: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
505: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
506: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
507: FND_MSG_PUB.Add;
508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
509: END IF;

Line 506: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

502: ) ;
503: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
504: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
505: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
506: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
507: FND_MSG_PUB.Add;
508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
509: END IF;
510: END IF;

Line 527: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');

523: ) ;
524:
525: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
526: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
527: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
528: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
529: FND_MSG_PUB.Add;
530: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531: END IF;

Line 528: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

524:
525: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
526: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
527: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
528: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
529: FND_MSG_PUB.Add;
530: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531: END IF;
532: END IF;

Line 538: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');

534: ( x_return_status => l_return_status
535: ) ;
536: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
537: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
538: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
539: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
540: FND_MSG_PUB.Add;
541: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
542: END IF;

Line 539: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

535: ) ;
536: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
537: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
538: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
539: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
540: FND_MSG_PUB.Add;
541: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
542: END IF;
543: END IF;

Line 574: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');

570: x_msg_data => l_msg_data
571: ) ;
572: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
573: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
574: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
575: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
576: FND_MSG_PUB.Add;
577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
578: END IF;

Line 575: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

571: ) ;
572: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
573: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
574: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_CUST_USR_HK');
575: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
576: FND_MSG_PUB.Add;
577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
578: END IF;
579: END IF;

Line 597: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');

593: ) ;
594:
595: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
596: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
597: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
598: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
599: FND_MSG_PUB.Add;
600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
601: END IF;

Line 598: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

594:
595: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
596: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
597: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_VERT_USR_HK');
598: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
599: FND_MSG_PUB.Add;
600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
601: END IF;
602: END IF;

Line 609: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');

605: ( x_return_status => l_return_status
606: ) ;
607: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
608: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
609: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
610: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
611: FND_MSG_PUB.Add;
612: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
613: END IF;

Line 610: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

606: ) ;
607: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
608: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
609: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_PRE_INT_USR_HK');
610: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
611: FND_MSG_PUB.Add;
612: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
613: END IF;
614: END IF;

Line 638: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');

634: x_msg_data => l_msg_data
635: ) ;
636: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
637: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
638: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
639: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
640: FND_MSG_PUB.Add;
641: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
642: END IF;

Line 639: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

635: ) ;
636: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
637: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Customer User Hook');
638: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_CUST_USR_HK');
639: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
640: FND_MSG_PUB.Add;
641: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
642: END IF;
643: END IF;

Line 661: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');

657: ) ;
658:
659: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
660: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
661: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
662: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
663: FND_MSG_PUB.Add;
664: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
665: END IF;

Line 662: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

658:
659: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
660: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
661: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_VERT_USR_HK');
662: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
663: FND_MSG_PUB.Add;
664: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
665: END IF;
666: END IF;

Line 672: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');

668: ( x_return_status => l_return_status
669: ) ;
670: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
671: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
672: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
673: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
674: FND_MSG_PUB.Add;
675: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
676: END IF;

Line 673: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);

669: ) ;
670: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
671: --DBMS_OUTPUT.PUT_LINE('Returned Error Status from the Pre Vertical User Hook');
672: FND_MESSAGE.Set_Name('CSP', 'CSP_ERR_POST_INT_USR_HK');
673: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
674: FND_MSG_PUB.Add;
675: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
676: END IF;
677: END IF;

Line 731: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');

727: OPEN C;
728: FETCH C INTO Recinfo;
729: If (C%NOTFOUND) then
730: CLOSE C;
731: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
732: APP_EXCEPTION.RAISE_EXCEPTION;
733: End If;
734: CLOSE C;
735: if (

Line 848: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');

844: AND ( p_SHIP_TO_CONTACT_ID IS NULL )))
845: ) then
846: return;
847: else
848: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
849: APP_EXCEPTION.RAISE_EXCEPTION;
850: End If;
851: END Lock_Row;
852: