DBA Data[Home] [Help]

APPS.CS_TP_CHOICES_PVT dependencies on FND_API

Line 10: DEBUG CONSTANT VARCHAR2(1) := FND_API.G_TRUE;

6: -- ---------------------------------------------------------
7: l_default_last_up_date_format CONSTANT VARCHAR2(30) := 'MM/DD/YYYY/SSSSS';
8: G_PKG_NAME CONSTANT VARCHAR2(100) := 'CS_TP_CHOCIES_PVT';
9:
10: DEBUG CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
11: procedure Add_Choice (
12: p_api_version_number IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR := FND_API.G_FALSE,

Line 13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

9:
10: DEBUG CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
11: procedure Add_Choice (
12: p_api_version_number IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR := FND_API.G_FALSE,
15: p_One_Choice IN Choice,
16: X_Msg_Count OUT NOCOPY NUMBER,
17: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 14: p_commit IN VARCHAR := FND_API.G_FALSE,

10: DEBUG CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
11: procedure Add_Choice (
12: p_api_version_number IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR := FND_API.G_FALSE,
15: p_One_Choice IN Choice,
16: X_Msg_Count OUT NOCOPY NUMBER,
17: X_Msg_Data OUT NOCOPY VARCHAR2,
18: X_Return_Status OUT NOCOPY VARCHAR2,

Line 30: l_current_date DATE :=FND_API.G_MISS_DATE;

26: l_choice_id NUMBER;
27: l_ROWID VARCHAR2(30);
28: Cursor C is
29: select max(SEQUENCE_NUMBER) from CS_TP_CHOICES_VL;
30: l_current_date DATE :=FND_API.G_MISS_DATE;
31: l_created_by NUMBER :=FND_API.G_MISS_NUM;
32: l_login NUMBER :=FND_API.G_MISS_NUM;
33: l_max_sequence NUMBER;
34: begin

Line 31: l_created_by NUMBER :=FND_API.G_MISS_NUM;

27: l_ROWID VARCHAR2(30);
28: Cursor C is
29: select max(SEQUENCE_NUMBER) from CS_TP_CHOICES_VL;
30: l_current_date DATE :=FND_API.G_MISS_DATE;
31: l_created_by NUMBER :=FND_API.G_MISS_NUM;
32: l_login NUMBER :=FND_API.G_MISS_NUM;
33: l_max_sequence NUMBER;
34: begin
35: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 32: l_login NUMBER :=FND_API.G_MISS_NUM;

28: Cursor C is
29: select max(SEQUENCE_NUMBER) from CS_TP_CHOICES_VL;
30: l_current_date DATE :=FND_API.G_MISS_DATE;
31: l_created_by NUMBER :=FND_API.G_MISS_NUM;
32: l_login NUMBER :=FND_API.G_MISS_NUM;
33: l_max_sequence NUMBER;
34: begin
35: -- Initialize message list if p_init_msg_list is set to TRUE.
36: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 36: IF FND_API.to_Boolean( p_init_msg_list ) THEN

32: l_login NUMBER :=FND_API.G_MISS_NUM;
33: l_max_sequence NUMBER;
34: begin
35: -- Initialize message list if p_init_msg_list is set to TRUE.
36: IF FND_API.to_Boolean( p_init_msg_list ) THEN
37: FND_MSG_PUB.initialize;
38: END IF;
39:
40: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

Line 40: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

36: IF FND_API.to_Boolean( p_init_msg_list ) THEN
37: FND_MSG_PUB.initialize;
38: END IF;
39:
40: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
41:
42: -- Start API Body
43:
44: -- Perform validation

Line 45: IF (P_One_Choice.mChoiceName is NULL OR P_One_Choice.mChoiceName= FND_API.G_MISS_CHAR) THEN

41:
42: -- Start API Body
43:
44: -- Perform validation
45: IF (P_One_Choice.mChoiceName is NULL OR P_One_Choice.mChoiceName= FND_API.G_MISS_CHAR) THEN
46: X_Return_Status := FND_API.G_RET_STS_ERROR;
47: FND_MESSAGE.SET_NAME('CS','CS_TP_Choice_NAME_INVALID');
48: FND_MSG_PUB.Add;
49: RAISE FND_API.G_EXC_ERROR;

Line 46: X_Return_Status := FND_API.G_RET_STS_ERROR;

42: -- Start API Body
43:
44: -- Perform validation
45: IF (P_One_Choice.mChoiceName is NULL OR P_One_Choice.mChoiceName= FND_API.G_MISS_CHAR) THEN
46: X_Return_Status := FND_API.G_RET_STS_ERROR;
47: FND_MESSAGE.SET_NAME('CS','CS_TP_Choice_NAME_INVALID');
48: FND_MSG_PUB.Add;
49: RAISE FND_API.G_EXC_ERROR;
50: END IF;

Line 49: RAISE FND_API.G_EXC_ERROR;

45: IF (P_One_Choice.mChoiceName is NULL OR P_One_Choice.mChoiceName= FND_API.G_MISS_CHAR) THEN
46: X_Return_Status := FND_API.G_RET_STS_ERROR;
47: FND_MESSAGE.SET_NAME('CS','CS_TP_Choice_NAME_INVALID');
48: FND_MSG_PUB.Add;
49: RAISE FND_API.G_EXC_ERROR;
50: END IF;
51:
52: IF (P_One_Choice.mScore is NULL OR P_One_Choice.mScore = FND_API.G_MISS_NUM) then
53: X_Return_Status := FND_API.G_RET_STS_ERROR;

Line 52: IF (P_One_Choice.mScore is NULL OR P_One_Choice.mScore = FND_API.G_MISS_NUM) then

48: FND_MSG_PUB.Add;
49: RAISE FND_API.G_EXC_ERROR;
50: END IF;
51:
52: IF (P_One_Choice.mScore is NULL OR P_One_Choice.mScore = FND_API.G_MISS_NUM) then
53: X_Return_Status := FND_API.G_RET_STS_ERROR;
54: FND_MESSAGE.SET_NAME('CS','CS_TP_Choice_Score_INVALID');
55: FND_MSG_PUB.Add;
56: RAISE FND_API.G_EXC_ERROR;

Line 53: X_Return_Status := FND_API.G_RET_STS_ERROR;

49: RAISE FND_API.G_EXC_ERROR;
50: END IF;
51:
52: IF (P_One_Choice.mScore is NULL OR P_One_Choice.mScore = FND_API.G_MISS_NUM) then
53: X_Return_Status := FND_API.G_RET_STS_ERROR;
54: FND_MESSAGE.SET_NAME('CS','CS_TP_Choice_Score_INVALID');
55: FND_MSG_PUB.Add;
56: RAISE FND_API.G_EXC_ERROR;
57: END IF;

Line 56: RAISE FND_API.G_EXC_ERROR;

52: IF (P_One_Choice.mScore is NULL OR P_One_Choice.mScore = FND_API.G_MISS_NUM) then
53: X_Return_Status := FND_API.G_RET_STS_ERROR;
54: FND_MESSAGE.SET_NAME('CS','CS_TP_Choice_Score_INVALID');
55: FND_MSG_PUB.Add;
56: RAISE FND_API.G_EXC_ERROR;
57: END IF;
58:
59: open LookupC;
60: fetch LookupC into l_lookup_count;

Line 63: X_Return_Status := FND_API.G_RET_STS_ERROR;

59: open LookupC;
60: fetch LookupC into l_lookup_count;
61: close LookupC;
62: if (l_lookup_count <1 or l_lookup_count>1) then
63: X_Return_Status := FND_API.G_RET_STS_ERROR;
64: FND_MESSAGE.SET_NAME('CS','CS_TP_LookUPID_INVALID');
65: FND_MSG_PUB.Add;
66: raise FND_API.G_EXC_UNEXPECTED_ERROR;
67: end if;

Line 66: raise FND_API.G_EXC_UNEXPECTED_ERROR;

62: if (l_lookup_count <1 or l_lookup_count>1) then
63: X_Return_Status := FND_API.G_RET_STS_ERROR;
64: FND_MESSAGE.SET_NAME('CS','CS_TP_LookUPID_INVALID');
65: FND_MSG_PUB.Add;
66: raise FND_API.G_EXC_UNEXPECTED_ERROR;
67: end if;
68:
69: open C;
70: fetch C into l_max_sequence;

Line 76: if (l_max_sequence is NULL or l_max_sequence = FND_API.G_MISS_NUM) then

72: l_max_sequence := 0;
73: end if;
74:
75: close C;
76: if (l_max_sequence is NULL or l_max_sequence = FND_API.G_MISS_NUM) then
77: l_max_sequence :=0;
78: end if;
79:
80: --Insert into the Cs_TO_CHOICES_B table, note start_date_active and end_date_active are null

Line 106: IF FND_API.To_Boolean( p_commit ) THEN

102: X_Choice_ID := L_Choice_ID;
103: -- End of API Body
104:
105: -- Standard check of p_commit.
106: IF FND_API.To_Boolean( p_commit ) THEN
107: COMMIT WORK;
108: END IF;
109: -- Standard call to get message count and if count is 1, get message info.
110: FND_MSG_PUB.Count_And_Get

Line 116: WHEN FND_API.G_EXC_ERROR THEN

112: p_data => x_msg_data
113: );
114:
115: EXCEPTION
116: WHEN FND_API.G_EXC_ERROR THEN
117: FND_MSG_PUB.Count_And_Get
118: (p_count => x_msg_count ,
119: p_data => x_msg_data
120: );

Line 124: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

120: );
121:
122:
123: WHEN OTHERS THEN
124: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
125: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
126: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
127: END IF;
128: FND_MSG_PUB.Count_And_Get

Line 137: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

133: END Add_Choice;
134:
135: procedure Delete_Choice (
136: p_api_version_number IN NUMBER,
137: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
138: p_commit IN VARCHAR := FND_API.G_FALSE,
139: P_Choice_ID IN NUMBER,
140: X_Msg_Count OUT NOCOPY NUMBER,
141: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 138: p_commit IN VARCHAR := FND_API.G_FALSE,

134:
135: procedure Delete_Choice (
136: p_api_version_number IN NUMBER,
137: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
138: p_commit IN VARCHAR := FND_API.G_FALSE,
139: P_Choice_ID IN NUMBER,
140: X_Msg_Count OUT NOCOPY NUMBER,
141: X_Msg_Data OUT NOCOPY VARCHAR2,
142: X_Return_Status OUT NOCOPY VARCHAR2

Line 150: IF FND_API.to_Boolean( p_init_msg_list ) THEN

146: l_api_version CONSTANT NUMBER := 1.0;
147:
148: begin
149: -- Initialize message list if p_init_msg_list is set to TRUE.
150: IF FND_API.to_Boolean( p_init_msg_list ) THEN
151: FND_MSG_PUB.initialize;
152: END IF;
153:
154: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

Line 154: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

150: IF FND_API.to_Boolean( p_init_msg_list ) THEN
151: FND_MSG_PUB.initialize;
152: END IF;
153:
154: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
155:
156: -- Start API Body
157:
158: -- delete choice

Line 165: IF FND_API.To_Boolean( p_commit ) THEN

161:
162: -- End of API Body
163:
164: -- Standard check of p_commit.
165: IF FND_API.To_Boolean( p_commit ) THEN
166: COMMIT WORK;
167: END IF;
168: -- Standard call to get message count and if count is 1, get message info.
169: FND_MSG_PUB.Count_And_Get

Line 176: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

172: );
173:
174: EXCEPTION
175: WHEN OTHERS THEN
176: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
177: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
178: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
179: END IF;
180: FND_MSG_PUB.Count_And_Get

Line 190: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

186: end Delete_Choice;
187:
188: procedure Sort_Choices (
189: p_api_version_number IN NUMBER,
190: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
191: p_commit IN VARCHAR := FND_API.G_FALSE,
192: P_Choices In Choice_List,
193: X_Msg_Count OUT NOCOPY NUMBER,
194: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 191: p_commit IN VARCHAR := FND_API.G_FALSE,

187:
188: procedure Sort_Choices (
189: p_api_version_number IN NUMBER,
190: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
191: p_commit IN VARCHAR := FND_API.G_FALSE,
192: P_Choices In Choice_List,
193: X_Msg_Count OUT NOCOPY NUMBER,
194: X_Msg_Data OUT NOCOPY VARCHAR2,
195: X_Return_Status OUT NOCOPY VARCHAR2

Line 202: l_current_date DATE :=FND_API.G_MISS_DATE;

198: is
199: l_api_name CONSTANT VARCHAR2(30) := 'Sort_Choices';
200: l_api_version CONSTANT NUMBER := 1.0;
201: i NUMBER;
202: l_current_date DATE :=FND_API.G_MISS_DATE;
203: l_last_updated_by VARCHAR2(200) :=FND_API.G_MISS_CHAR;
204: l_login VARCHAR2(200) :=FND_API.G_MISS_CHAR;
205: l_lookup_id NUMBER;
206: l_score NUMBER;

Line 203: l_last_updated_by VARCHAR2(200) :=FND_API.G_MISS_CHAR;

199: l_api_name CONSTANT VARCHAR2(30) := 'Sort_Choices';
200: l_api_version CONSTANT NUMBER := 1.0;
201: i NUMBER;
202: l_current_date DATE :=FND_API.G_MISS_DATE;
203: l_last_updated_by VARCHAR2(200) :=FND_API.G_MISS_CHAR;
204: l_login VARCHAR2(200) :=FND_API.G_MISS_CHAR;
205: l_lookup_id NUMBER;
206: l_score NUMBER;
207: l_value VARCHAR2(500);

Line 204: l_login VARCHAR2(200) :=FND_API.G_MISS_CHAR;

200: l_api_version CONSTANT NUMBER := 1.0;
201: i NUMBER;
202: l_current_date DATE :=FND_API.G_MISS_DATE;
203: l_last_updated_by VARCHAR2(200) :=FND_API.G_MISS_CHAR;
204: l_login VARCHAR2(200) :=FND_API.G_MISS_CHAR;
205: l_lookup_id NUMBER;
206: l_score NUMBER;
207: l_value VARCHAR2(500);
208: Cursor last_updateC (V_Choice_ID Number) is

Line 213: IF FND_API.to_Boolean( p_init_msg_list ) THEN

209: select last_update_date, LOOKUP_ID, SCORE, VALUE from CS_TP_CHOICES_VL where choice_ID = V_Choice_ID;
210: l_last_update_date DATE;
211: begin
212: -- Initialize message list if p_init_msg_list is set to TRUE.
213: IF FND_API.to_Boolean( p_init_msg_list ) THEN
214: FND_MSG_PUB.initialize;
215: END IF;
216:
217: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

Line 217: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

213: IF FND_API.to_Boolean( p_init_msg_list ) THEN
214: FND_MSG_PUB.initialize;
215: END IF;
216:
217: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
218:
219: -- Start API Body
220: l_current_date := sysdate;
221: l_last_updated_by := fnd_global.user_id;

Line 233: X_Return_Status := FND_API.G_RET_STS_ERROR;

229: raise no_data_found;
230: end if;
231: close last_updateC;
232: if (to_date( P_Choices(i).mLast_Updated_date, l_default_last_up_date_format) < l_last_update_date) then
233: X_Return_Status := FND_API.G_RET_STS_ERROR;
234: FND_MESSAGE.SET_NAME('CS','CS_TP_CHOICE_UPDATED');
235: FND_MSG_PUB.Add;
236: RAISE FND_API.G_EXC_ERROR;
237: end if;

Line 236: RAISE FND_API.G_EXC_ERROR;

232: if (to_date( P_Choices(i).mLast_Updated_date, l_default_last_up_date_format) < l_last_update_date) then
233: X_Return_Status := FND_API.G_RET_STS_ERROR;
234: FND_MESSAGE.SET_NAME('CS','CS_TP_CHOICE_UPDATED');
235: FND_MSG_PUB.Add;
236: RAISE FND_API.G_EXC_ERROR;
237: end if;
238: CS_TP_CHOICES_PKG.UPDATE_ROW (
239: X_CHOICE_ID => P_Choices (i).mChoiceID,
240: X_LOOKUP_ID => l_lookup_id,

Line 255: IF FND_API.To_Boolean( p_commit ) THEN

251: end loop;
252: end if;
253:
254: -- Standard check of p_commit.
255: IF FND_API.To_Boolean( p_commit ) THEN
256: COMMIT WORK;
257: END IF;
258: -- Standard call to get message count and if count is 1, get message info.
259: FND_MSG_PUB.Count_And_Get

Line 265: WHEN FND_API.G_EXC_ERROR THEN

261: p_data => x_msg_data
262: );
263:
264: EXCEPTION
265: WHEN FND_API.G_EXC_ERROR THEN
266: FND_MSG_PUB.Count_And_Get
267: (p_count => x_msg_count ,
268: p_data => x_msg_data
269: );

Line 273: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

269: );
270:
271:
272: WHEN OTHERS THEN
273: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
274: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
275: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
276: END IF;
277: FND_MSG_PUB.Count_And_Get

Line 288: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

284:
285:
286: procedure Show_Choices (
287: p_api_version_number IN NUMBER,
288: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
289: p_commit IN VARCHAR := FND_API.G_FALSE,
290: P_Lookup_Id IN NUMBER,
291: P_Display_Order IN VARCHAR2,
292: X_Msg_Count OUT NOCOPY NUMBER,

Line 289: p_commit IN VARCHAR := FND_API.G_FALSE,

285:
286: procedure Show_Choices (
287: p_api_version_number IN NUMBER,
288: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
289: p_commit IN VARCHAR := FND_API.G_FALSE,
290: P_Lookup_Id IN NUMBER,
291: P_Display_Order IN VARCHAR2,
292: X_Msg_Count OUT NOCOPY NUMBER,
293: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 315: IF FND_API.to_Boolean( p_init_msg_list ) THEN

311: l_total_choices_number NUMBER;
312: j NUMBER;
313: begin
314: -- Initialize message list if p_init_msg_list is set to TRUE.
315: IF FND_API.to_Boolean( p_init_msg_list ) THEN
316: FND_MSG_PUB.initialize;
317: END IF;
318:
319: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

Line 319: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

315: IF FND_API.to_Boolean( p_init_msg_list ) THEN
316: FND_MSG_PUB.initialize;
317: END IF;
318:
319: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
320:
321: -- Start API Body
322:
323: -- Construct query statement, open cursor, execute query statement, retrieve results

Line 326: if (P_Display_Order is NULL OR P_Display_Order=FND_API.G_MISS_CHAR OR length(P_Display_Order)<=0 OR P_Display_Order =NORMAL) then

322:
323: -- Construct query statement, open cursor, execute query statement, retrieve results
324: l_statement := 'SELECT CHOICE_ID, VALUE, LOOKUP_ID, SCORE, LAST_UPDATE_DATE, DEFAULT_CHOICE_FLAG from CS_TP_CHOICES_VL where LOOKUP_ID = : v_lookup_id';
325:
326: if (P_Display_Order is NULL OR P_Display_Order=FND_API.G_MISS_CHAR OR length(P_Display_Order)<=0 OR P_Display_Order =NORMAL) then
327: l_statement := l_statement || ' ORDER BY SEQUENCE_NUMBER ';
328:
329: elsif (P_Display_Order=ALPHABATICAL) then
330: l_statement := l_statement || ' ORDER BY VALUE ';

Line 378: IF FND_API.To_Boolean( p_commit) THEN

374:
375: end loop;
376: dbms_sql.close_cursor(l_CursorID);
377: -- Standard check of p_commit.
378: IF FND_API.To_Boolean( p_commit) THEN
379: COMMIT WORK;
380: END IF;
381: -- Standard call to get message count and if count is 1, get message info.
382: FND_MSG_PUB.Count_And_Get

Line 388: WHEN FND_API.G_EXC_ERROR THEN

384: p_data => x_msg_data
385: );
386:
387: EXCEPTION
388: WHEN FND_API.G_EXC_ERROR THEN
389: FND_MSG_PUB.Count_And_Get
390: (p_count => x_msg_count ,
391: p_data => x_msg_data
392: );

Line 395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

391: p_data => x_msg_data
392: );
393:
394: WHEN OTHERS THEN
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
396: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
397: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
398: END IF;
399: FND_MSG_PUB.Count_And_Get

Line 408: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

404: end Show_Choices;
405:
406: procedure Update_Choices (
407: p_api_version_number IN NUMBER,
408: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
409: p_commit IN VARCHAR := FND_API.G_FALSE,
410: P_Choices In Choice_List,
411: X_Msg_Count OUT NOCOPY NUMBER,
412: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 409: p_commit IN VARCHAR := FND_API.G_FALSE,

405:
406: procedure Update_Choices (
407: p_api_version_number IN NUMBER,
408: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
409: p_commit IN VARCHAR := FND_API.G_FALSE,
410: P_Choices In Choice_List,
411: X_Msg_Count OUT NOCOPY NUMBER,
412: X_Msg_Data OUT NOCOPY VARCHAR2,
413: X_Return_Status OUT NOCOPY VARCHAR2

Line 429: l_last_updated_by NUMBER :=FND_API.G_MISS_NUM;

425: l_value VARCHAR2(240);
426:
427: i NUMBER;
428:
429: l_last_updated_by NUMBER :=FND_API.G_MISS_NUM;
430: l_login NUMBER :=FND_API.G_MISS_NUM;
431: begin
432: -- Initialize message list if p_init_msg_list is set to TRUE.
433: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 430: l_login NUMBER :=FND_API.G_MISS_NUM;

426:
427: i NUMBER;
428:
429: l_last_updated_by NUMBER :=FND_API.G_MISS_NUM;
430: l_login NUMBER :=FND_API.G_MISS_NUM;
431: begin
432: -- Initialize message list if p_init_msg_list is set to TRUE.
433: IF FND_API.to_Boolean( p_init_msg_list ) THEN
434: FND_MSG_PUB.initialize;

Line 433: IF FND_API.to_Boolean( p_init_msg_list ) THEN

429: l_last_updated_by NUMBER :=FND_API.G_MISS_NUM;
430: l_login NUMBER :=FND_API.G_MISS_NUM;
431: begin
432: -- Initialize message list if p_init_msg_list is set to TRUE.
433: IF FND_API.to_Boolean( p_init_msg_list ) THEN
434: FND_MSG_PUB.initialize;
435: END IF;
436:
437: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

Line 437: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

433: IF FND_API.to_Boolean( p_init_msg_list ) THEN
434: FND_MSG_PUB.initialize;
435: END IF;
436:
437: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
438:
439: l_last_updated_by := fnd_global.user_id;
440: l_login := fnd_global.login_id;
441: if (P_Choices.COUNT>0) then

Line 455: X_Return_Status := FND_API.G_RET_STS_ERROR;

451:
452: /*
453: if (to_date( P_Choices(i).mLast_Updated_date, l_default_last_up_date_format)
454: < l_last_update_date) then
455: X_Return_Status := FND_API.G_RET_STS_ERROR;
456: FND_MESSAGE.SET_NAME('CS','CS_TP_CHOICE_UPDATED');
457: FND_MSG_PUB.Add;
458: RAISE FND_API.G_EXC_ERROR;
459: end if;

Line 458: RAISE FND_API.G_EXC_ERROR;

454: < l_last_update_date) then
455: X_Return_Status := FND_API.G_RET_STS_ERROR;
456: FND_MESSAGE.SET_NAME('CS','CS_TP_CHOICE_UPDATED');
457: FND_MSG_PUB.Add;
458: RAISE FND_API.G_EXC_ERROR;
459: end if;
460: */
461:
462: CS_TP_CHOICES_PKG.UPDATE_ROW (

Line 482: IF FND_API.To_Boolean( p_commit ) THEN

478: end if;
479:
480:
481: -- Standard check of p_commit.
482: IF FND_API.To_Boolean( p_commit ) THEN
483: COMMIT WORK;
484: END IF;
485: -- Standard call to get message count and if count is 1, get message info.
486: FND_MSG_PUB.Count_And_Get

Line 492: WHEN FND_API.G_EXC_ERROR THEN

488: p_data => x_msg_data
489: );
490:
491: EXCEPTION
492: WHEN FND_API.G_EXC_ERROR THEN
493: FND_MSG_PUB.Count_And_Get
494: (p_count => x_msg_count ,
495: p_data => x_msg_data
496: );

Line 500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

496: );
497:
498:
499: WHEN OTHERS THEN
500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
501: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
502: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
503: END IF;
504: FND_MSG_PUB.Count_And_Get

Line 514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

510: end Update_Choices;
511:
512: procedure Add_Freetext (
513: p_api_version_number IN NUMBER,
514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
515: p_commit IN VARCHAR := FND_API.G_FALSE,
516: P_One_Freetext in Freetext,
517: X_Msg_Count OUT NOCOPY NUMBER,
518: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 515: p_commit IN VARCHAR := FND_API.G_FALSE,

511:
512: procedure Add_Freetext (
513: p_api_version_number IN NUMBER,
514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
515: p_commit IN VARCHAR := FND_API.G_FALSE,
516: P_One_Freetext in Freetext,
517: X_Msg_Count OUT NOCOPY NUMBER,
518: X_Msg_Data OUT NOCOPY VARCHAR2,
519: X_Return_Status OUT NOCOPY VARCHAR2,

Line 537: l_current_date DATE :=FND_API.G_MISS_DATE;

533: l_lookup_count NUMBER;
534: l_freetext_id NUMBER:=NULL;
535: l_freetext_update_id number;
536: l_ROWID VARCHAR2(30);
537: l_current_date DATE :=FND_API.G_MISS_DATE;
538: l_created_by NUMBER :=FND_API.G_MISS_NUM;
539: l_login NUMBER :=FND_API.G_MISS_NUM;
540: l_freetext_count NUMBER;
541: begin

Line 538: l_created_by NUMBER :=FND_API.G_MISS_NUM;

534: l_freetext_id NUMBER:=NULL;
535: l_freetext_update_id number;
536: l_ROWID VARCHAR2(30);
537: l_current_date DATE :=FND_API.G_MISS_DATE;
538: l_created_by NUMBER :=FND_API.G_MISS_NUM;
539: l_login NUMBER :=FND_API.G_MISS_NUM;
540: l_freetext_count NUMBER;
541: begin
542: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 539: l_login NUMBER :=FND_API.G_MISS_NUM;

535: l_freetext_update_id number;
536: l_ROWID VARCHAR2(30);
537: l_current_date DATE :=FND_API.G_MISS_DATE;
538: l_created_by NUMBER :=FND_API.G_MISS_NUM;
539: l_login NUMBER :=FND_API.G_MISS_NUM;
540: l_freetext_count NUMBER;
541: begin
542: -- Initialize message list if p_init_msg_list is set to TRUE.
543: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 543: IF FND_API.to_Boolean( p_init_msg_list ) THEN

539: l_login NUMBER :=FND_API.G_MISS_NUM;
540: l_freetext_count NUMBER;
541: begin
542: -- Initialize message list if p_init_msg_list is set to TRUE.
543: IF FND_API.to_Boolean( p_init_msg_list ) THEN
544: FND_MSG_PUB.initialize;
545: END IF;
546:
547: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

Line 547: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

543: IF FND_API.to_Boolean( p_init_msg_list ) THEN
544: FND_MSG_PUB.initialize;
545: END IF;
546:
547: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
548:
549: -- Start API Body
550:
551: -- Perform validation

Line 552: IF (p_One_Freetext.mFreetextSize is NULL OR p_One_Freetext.mFreetextSize= FND_API.G_MISS_NUM) THEN

548:
549: -- Start API Body
550:
551: -- Perform validation
552: IF (p_One_Freetext.mFreetextSize is NULL OR p_One_Freetext.mFreetextSize= FND_API.G_MISS_NUM) THEN
553: X_Return_Status := FND_API.G_RET_STS_ERROR;
554: FND_MESSAGE.SET_NAME('CS','CS_TP_FreetextSize_INVALID');
555: FND_MSG_PUB.Add;
556: RAISE FND_API.G_EXC_ERROR;

Line 553: X_Return_Status := FND_API.G_RET_STS_ERROR;

549: -- Start API Body
550:
551: -- Perform validation
552: IF (p_One_Freetext.mFreetextSize is NULL OR p_One_Freetext.mFreetextSize= FND_API.G_MISS_NUM) THEN
553: X_Return_Status := FND_API.G_RET_STS_ERROR;
554: FND_MESSAGE.SET_NAME('CS','CS_TP_FreetextSize_INVALID');
555: FND_MSG_PUB.Add;
556: RAISE FND_API.G_EXC_ERROR;
557: END IF;

Line 556: RAISE FND_API.G_EXC_ERROR;

552: IF (p_One_Freetext.mFreetextSize is NULL OR p_One_Freetext.mFreetextSize= FND_API.G_MISS_NUM) THEN
553: X_Return_Status := FND_API.G_RET_STS_ERROR;
554: FND_MESSAGE.SET_NAME('CS','CS_TP_FreetextSize_INVALID');
555: FND_MSG_PUB.Add;
556: RAISE FND_API.G_EXC_ERROR;
557: END IF;
558: open LookupC;
559: fetch LookupC into l_lookup_count;
560: close LookupC;

Line 562: X_Return_Status := FND_API.G_RET_STS_ERROR;

558: open LookupC;
559: fetch LookupC into l_lookup_count;
560: close LookupC;
561: if (l_lookup_count <1 or l_lookup_count>1) then
562: X_Return_Status := FND_API.G_RET_STS_ERROR;
563: raise FND_API.G_EXC_UNEXPECTED_ERROR;
564: end if;
565:
566: l_current_date := sysdate;

Line 563: raise FND_API.G_EXC_UNEXPECTED_ERROR;

559: fetch LookupC into l_lookup_count;
560: close LookupC;
561: if (l_lookup_count <1 or l_lookup_count>1) then
562: X_Return_Status := FND_API.G_RET_STS_ERROR;
563: raise FND_API.G_EXC_UNEXPECTED_ERROR;
564: end if;
565:
566: l_current_date := sysdate;
567: l_created_by := FND_GLOBAL.user_id;

Line 601: IF FND_API.To_Boolean( p_commit ) THEN

597: X_Freetext_ID := l_Freetext_ID ;
598: -- End of API Body
599:
600: -- Standard check of p_commit.
601: IF FND_API.To_Boolean( p_commit ) THEN
602: COMMIT WORK;
603: END IF;
604: -- Standard call to get message count and if count is 1, get message info.
605: FND_MSG_PUB.Count_And_Get

Line 611: WHEN FND_API.G_EXC_ERROR THEN

607: p_data => x_msg_data
608: );
609:
610: EXCEPTION
611: WHEN FND_API.G_EXC_ERROR THEN
612: FND_MSG_PUB.Count_And_Get
613: (p_count => x_msg_count ,
614: p_data => x_msg_data
615: );

Line 619: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

615: );
616:
617: /*
618: WHEN OTHERS THEN
619: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
620: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
621: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
622: END IF;
623: FND_MSG_PUB.Count_And_Get

Line 633: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

629: end Add_Freetext;
630:
631: procedure Show_Freetext (
632: p_api_version_number IN NUMBER,
633: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
634: p_commit IN VARCHAR := FND_API.G_FALSE,
635: P_Lookup_ID IN NUMBER,
636: X_Msg_Count OUT NOCOPY NUMBER,
637: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 634: p_commit IN VARCHAR := FND_API.G_FALSE,

630:
631: procedure Show_Freetext (
632: p_api_version_number IN NUMBER,
633: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
634: p_commit IN VARCHAR := FND_API.G_FALSE,
635: P_Lookup_ID IN NUMBER,
636: X_Msg_Count OUT NOCOPY NUMBER,
637: X_Msg_Data OUT NOCOPY VARCHAR2,
638: X_Return_Status OUT NOCOPY VARCHAR2,

Line 660: IF FND_API.to_Boolean( p_init_msg_list ) THEN

656: l_freetext freetextC%ROWTYPE;
657:
658: begin
659: -- Initialize message list if p_init_msg_list is set to TRUE.
660: IF FND_API.to_Boolean( p_init_msg_list ) THEN
661: FND_MSG_PUB.initialize;
662: END IF;
663:
664: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

Line 664: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

660: IF FND_API.to_Boolean( p_init_msg_list ) THEN
661: FND_MSG_PUB.initialize;
662: END IF;
663:
664: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
665:
666: -- Start API Body
667: open freetextC;
668:

Line 674: IF (fND_API.to_boolean (DEBUG)) then

670:
671: fetch freetextC into l_freetext;
672: if (freetextC%notfound) then
673: /*
674: IF (fND_API.to_boolean (DEBUG)) then
675: dbms_output.put_line ('Freetext cursor not found for the lookup id');
676: end if;
677: */
678: close freetextC;

Line 689: IF FND_API.To_Boolean( p_commit ) THEN

685:
686: -- End of API Body
687:
688: -- Standard check of p_commit.
689: IF FND_API.To_Boolean( p_commit ) THEN
690: COMMIT WORK;
691: END IF;
692: -- Standard call to get message count and if count is 1, get message info.
693: FND_MSG_PUB.Count_And_Get

Line 699: WHEN FND_API.G_EXC_ERROR THEN

695: p_data => x_msg_data
696: );
697:
698: EXCEPTION
699: WHEN FND_API.G_EXC_ERROR THEN
700: FND_MSG_PUB.Count_And_Get
701: (p_count => x_msg_count ,
702: p_data => x_msg_data
703: );

Line 707: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

703: );
704:
705: /*
706: WHEN OTHERS THEN
707: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
708: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
709: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
710: END IF;
711: FND_MSG_PUB.Count_And_Get