DBA Data[Home] [Help]

APPS.PSB_BUDGET_PERIOD_PVT dependencies on FND_MSG_PUB

Line 110: FND_MSG_PUB.initialize;

106: --
107: SAVEPOINT Insert_Row ;
108: --
109: if FND_API.to_Boolean (p_init_msg_list) then
110: FND_MSG_PUB.initialize;
111: end if;
112: --
113: p_return_status := FND_API.G_RET_STS_SUCCESS ;
114: --

Line 140: FND_MSG_PUB.Add ;

136: P_LAST_UPDATE_LOGIN := -1;
137: end if;
138: else
139: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
140: FND_MSG_PUB.Add ;
141: raise FND_API.G_EXC_ERROR;
142: end if;
143: --
144: Check_Consecutive_Year_Types (

Line 274: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

270: if FND_API.to_Boolean (p_commit) then
271: commit work;
272: end if;
273: -- Standard call to get message count and if count is 1, get message info.
274: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
275: p_data => p_msg_data);
276: --
277: EXCEPTION
278: --

Line 283: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

279: when FND_API.G_EXC_ERROR then
280: --
281: rollback to INSERT_ROW ;
282: p_return_status := FND_API.G_RET_STS_ERROR;
283: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
284: p_data => p_msg_data);
285: --
286: when FND_API.G_EXC_UNEXPECTED_ERROR then
287: --

Line 290: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

286: when FND_API.G_EXC_UNEXPECTED_ERROR then
287: --
288: rollback to INSERT_ROW ;
289: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
290: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
291: p_data => p_msg_data);
292: --
293: when OTHERS then
294: --

Line 297: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then

293: when OTHERS then
294: --
295: rollback to INSERT_ROW ;
296: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
297: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
298: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
299: l_api_name);
300: END if;
301: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

Line 298: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

294: --
295: rollback to INSERT_ROW ;
296: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
297: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
298: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
299: l_api_name);
300: END if;
301: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
302: p_data => p_msg_data);

Line 301: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

297: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
298: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
299: l_api_name);
300: END if;
301: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
302: p_data => p_msg_data);
303: --
304: END INSERT_ROW;
305: --

Line 375: FND_MSG_PUB.initialize;

371: --
372: SAVEPOINT Lock_Row ;
373: --
374: if FND_API.to_Boolean (p_init_msg_list) then
375: FND_MSG_PUB.initialize;
376: end if;
377: --
378: p_return_status := FND_API.G_RET_STS_SUCCESS ;
379: p_row_locked := FND_API.G_TRUE ;

Line 385: fnd_msg_pub.add ;

381: open c1;
382: fetch c1 into tlinfo;
383: if (c1%notfound) then
384: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
385: fnd_msg_pub.add ;
386: close c1;
387: raise fnd_api.g_exc_error ;
388: end if;
389: close c1;

Line 448: fnd_msg_pub.add ;

444: ) then
445: null;
446: else
447: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
448: fnd_msg_pub.add ;
449: raise fnd_api.g_exc_error ;
450: end if;
451:
452: EXCEPTION

Line 458: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

454: --
455: rollback to LOCK_ROW ;
456: p_row_locked := FND_API.G_FALSE ;
457: p_return_status := FND_API.G_RET_STS_ERROR;
458: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
459: p_data => p_msg_data);
460: --
461: when FND_API.G_EXC_ERROR then
462: --

Line 465: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

461: when FND_API.G_EXC_ERROR then
462: --
463: rollback to LOCK_ROW ;
464: p_return_status := FND_API.G_RET_STS_ERROR;
465: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
466: p_data => p_msg_data);
467: --
468: when FND_API.G_EXC_UNEXPECTED_ERROR then
469: --

Line 472: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

468: when FND_API.G_EXC_UNEXPECTED_ERROR then
469: --
470: rollback to LOCK_ROW ;
471: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
472: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
473: p_data => p_msg_data);
474: --
475: when OTHERS then
476: --

Line 479: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then

475: when OTHERS then
476: --
477: rollback to LOCK_ROW ;
478: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
479: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
480: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
481: l_api_name);
482: END if;
483: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

Line 480: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

476: --
477: rollback to LOCK_ROW ;
478: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
479: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
480: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
481: l_api_name);
482: END if;
483: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
484: p_data => p_msg_data);

Line 483: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

479: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
480: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
481: l_api_name);
482: END if;
483: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
484: p_data => p_msg_data);
485: --
486: END LOCK_ROW;
487: --

Line 538: FND_MSG_PUB.initialize;

534: --
535: SAVEPOINT Update_Row ;
536: --
537: if FND_API.to_Boolean (p_init_msg_list) then
538: FND_MSG_PUB.initialize;
539: end if;
540:
541: -- Initialize API return status to success
542:

Line 572: FND_MSG_PUB.Add ;

568: P_LAST_UPDATE_LOGIN := -1;
569: end if;
570: else
571: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
572: FND_MSG_PUB.Add ;
573: raise FND_API.G_EXC_ERROR ;
574: end if;
575:
576: --

Line 666: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

662: end if;
663:
664: -- Standard call to get message count and if count is 1, get message info.
665:
666: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
667: p_data => p_msg_data);
668: --
669: EXCEPTION
670:

Line 675: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

671: when FND_API.G_EXC_ERROR then
672: --
673: rollback to Update_Row ;
674: p_return_status := FND_API.G_RET_STS_ERROR;
675: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
676: p_data => p_msg_data);
677: --
678: when FND_API.G_EXC_UNEXPECTED_ERROR then
679: --

Line 682: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

678: when FND_API.G_EXC_UNEXPECTED_ERROR then
679: --
680: rollback to Update_Row ;
681: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
682: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
683: p_data => p_msg_data);
684: --
685: when OTHERS then
686: --

Line 689: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then

685: when OTHERS then
686: --
687: rollback to Update_Row ;
688: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
689: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
690: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
691: l_api_name);
692: end if;
693: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

Line 690: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

686: --
687: rollback to Update_Row ;
688: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
689: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
690: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
691: l_api_name);
692: end if;
693: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
694: p_data => p_msg_data);

Line 693: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

689: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
690: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
691: l_api_name);
692: end if;
693: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
694: p_data => p_msg_data);
695: --
696:
697: END UPDATE_ROW;

Line 748: FND_MSG_PUB.initialize;

744: --
745: -- Initialize message list if p_init_msg_list is set to TRUE.
746: --
747: if FND_API.to_Boolean (p_init_msg_list) then
748: FND_MSG_PUB.initialize;
749: end if;
750: --
751: p_return_status := FND_API.G_RET_STS_SUCCESS ;
752: --

Line 795: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

791: if FND_API.to_Boolean (p_commit) then
792: commit work;
793: end if;
794: -- Standard call to get message count and if count is 1, get message info.
795: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
796: p_data => p_msg_data);
797:
798: return;
799: END if;

Line 841: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

837: end if;
838:
839: -- Standard call to get message count and if count is 1, get message info.
840:
841: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
842: p_data => p_msg_data);
843:
844: END ADD_ROW;
845: --

Line 872: FND_MSG_PUB.initialize;

868: --
869: -- Initialize message list if p_init_msg_list is set to TRUE.
870: --
871: if FND_API.to_Boolean (p_init_msg_list) then
872: FND_MSG_PUB.initialize;
873: end if;
874: --
875: p_return_status := FND_API.G_RET_STS_SUCCESS ;
876: --

Line 915: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

911: end if;
912:
913: -- Standard call to get message count and if count is 1, get message info.
914:
915: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
916: p_data => p_msg_data);
917: --
918: EXCEPTION
919: when FND_API.G_EXC_ERROR then

Line 923: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

919: when FND_API.G_EXC_ERROR then
920: --
921: rollback to Delete_Row;
922: p_return_status := FND_API.G_RET_STS_ERROR;
923: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
924: p_data => p_msg_data);
925: --
926: when FND_API.G_EXC_UNEXPECTED_ERROR then
927: --

Line 930: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

926: when FND_API.G_EXC_UNEXPECTED_ERROR then
927: --
928: rollback to Delete_Row;
929: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
930: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
931: p_data => p_msg_data);
932: --
933: when OTHERS then
934: --

Line 937: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then

933: when OTHERS then
934: --
935: rollback to Delete_Row ;
936: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
937: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
938: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
939: l_api_name);
940: end if;
941: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

Line 938: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

934: --
935: rollback to Delete_Row ;
936: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
937: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
938: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
939: l_api_name);
940: end if;
941: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
942: p_data => p_msg_data);

Line 941: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

937: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
938: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
939: l_api_name);
940: end if;
941: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
942: p_data => p_msg_data);
943: --
944: END DELETE_ROW;
945: --

Line 967: FND_MSG_PUB.Add ;

963: AND budget_period_id <> p_budget_period_id ;
964: --
965: IF l_type_count > 0 THEN
966: FND_MESSAGE.SET_NAME('PSB', 'PSB_DUP_YEAR_TYPE_IN_CAL');
967: FND_MSG_PUB.Add ;
968: RAISE FND_API.G_EXC_ERROR ;
969: END IF;
970: --
971: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 1084: FND_MSG_PUB.Add ;

1080: IF (p_mode_type = 'A') THEN
1081: IF (p_curr_start_date <> l_prior_end_date + 1 ) OR
1082: (p_curr_end_date <> l_next_start_date - 1 ) THEN
1083: FND_MESSAGE.SET_NAME('PSB', 'PSB_YEAR_DATE_MUST_BE_CONSEC');
1084: FND_MSG_PUB.Add ;
1085: RAISE FND_API.G_EXC_ERROR ;
1086: ELSE
1087: IF ((l_prior_year_seq is not null and
1088: l_prior_seq is not null) and

Line 1094: FND_MSG_PUB.Add ;

1090: ((l_next_year_seq is not null and
1091: l_next_seq is not null) and
1092: l_next_year_seq <> l_next_seq ) THEN
1093: FND_MESSAGE.SET_NAME('PSB', 'PSB_YEAR_TYPE_MUST_BE_CONSEC');
1094: FND_MSG_PUB.Add ;
1095: RAISE FND_API.G_EXC_ERROR ;
1096: END IF ;
1097: END IF;
1098: END IF;

Line 1104: FND_MSG_PUB.Add ;

1100: IF (p_mode_type = 'D') THEN
1101: IF (p_curr_start_date = l_prior_end_date + 1 ) AND
1102: (p_curr_end_date = l_next_start_date - 1 ) THEN
1103: FND_MESSAGE.SET_NAME('PSB', 'PSB_CANNOT_DELETE_YEAR');
1104: FND_MSG_PUB.Add ;
1105: RAISE FND_API.G_EXC_ERROR ;
1106: END IF;
1107: END IF;
1108: --

Line 1112: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

1108: --
1109: p_return_status := FND_API.G_RET_STS_SUCCESS ;
1110:
1111: -- Standard call to get message count and if count is 1, get message info.
1112: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1113: p_data => p_msg_data);
1114: --
1115: --
1116: EXCEPTION

Line 1121: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

1117: --
1118: when FND_API.G_EXC_ERROR then
1119: --
1120: p_return_status := FND_API.G_RET_STS_ERROR;
1121: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1122: p_data => p_msg_data);
1123: --
1124: when FND_API.G_EXC_UNEXPECTED_ERROR then
1125: --

Line 1127: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

1123: --
1124: when FND_API.G_EXC_UNEXPECTED_ERROR then
1125: --
1126: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1127: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1128: p_data => p_msg_data);
1129: --
1130: when OTHERS then
1131: --

Line 1133: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then

1129: --
1130: when OTHERS then
1131: --
1132: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1133: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1134: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1135: l_api_name);
1136: END if;
1137: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

Line 1134: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

1130: when OTHERS then
1131: --
1132: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1133: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1134: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1135: l_api_name);
1136: END if;
1137: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1138: p_data => p_msg_data);

Line 1137: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

1133: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1134: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1135: l_api_name);
1136: END if;
1137: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1138: p_data => p_msg_data);
1139: --
1140: --
1141: END Check_Consecutive_Year_Types ;

Line 1575: FND_MSG_PUB.initialize;

1571:
1572: -- Initialize message list if p_init_msg_list is set to TRUE.
1573:
1574: if FND_API.to_Boolean (p_init_msg_list) then
1575: FND_MSG_PUB.initialize;
1576: end if;
1577:
1578: -- Initialize API return status to success
1579:

Line 1694: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

1690: when FND_API.G_EXC_ERROR then
1691: --
1692: rollback to Copy_Years_In_Calendar;
1693: p_return_status := FND_API.G_RET_STS_ERROR;
1694: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1695: p_data => p_msg_data);
1696: --
1697: when FND_API.G_EXC_UNEXPECTED_ERROR then
1698: --

Line 1701: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

1697: when FND_API.G_EXC_UNEXPECTED_ERROR then
1698: --
1699: rollback to Copy_Years_In_Calendar;
1700: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1701: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1702: p_data => p_msg_data);
1703: --
1704: when OTHERS then
1705: --

Line 1708: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then

1704: when OTHERS then
1705: --
1706: rollback to Copy_Years_In_Calendar ;
1707: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1708: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1709: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1710: l_api_name);
1711: end if;
1712: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

Line 1709: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

1705: --
1706: rollback to Copy_Years_In_Calendar ;
1707: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1708: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1709: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1710: l_api_name);
1711: end if;
1712: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1713: p_data => p_msg_data);

Line 1712: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

1708: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1709: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1710: l_api_name);
1711: end if;
1712: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1713: p_data => p_msg_data);
1714: --
1715: END Copy_Years_In_Calendar;
1716: --

Line 1734: FND_MSG_PUB.Add ;

1730: WHERE budget_calendar_id = p_calendar_id;
1731: --
1732: IF l_type_count > 0 THEN
1733: FND_MESSAGE.SET_NAME('PSB', 'PSB_CALENDAR_USED_IN_WORKSHEET');
1734: FND_MSG_PUB.Add ;
1735: RAISE FND_API.G_EXC_ERROR ;
1736: END IF;
1737: --
1738: p_return_status := FND_API.G_RET_STS_SUCCESS ;