5:
6:
7: procedure CREATE_RUNTIME_DATA (
8: p_api_version IN NUMBER,
9: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
10: p_commit IN VARCHAR := FND_API.G_FALSE,
11: p_sr_tbl IN OUT NOCOPY sr_tbl,
12: x_msg_count OUT NOCOPY NUMBER,
13: x_msg_data OUT NOCOPY VARCHAR2,
6:
7: procedure CREATE_RUNTIME_DATA (
8: p_api_version IN NUMBER,
9: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
10: p_commit IN VARCHAR := FND_API.G_FALSE,
11: p_sr_tbl IN OUT NOCOPY sr_tbl,
12: x_msg_count OUT NOCOPY NUMBER,
13: x_msg_data OUT NOCOPY VARCHAR2,
14: x_return_status OUT NOCOPY VARCHAR2 )
14: x_return_status OUT NOCOPY VARCHAR2 )
15: is
16: l_api_name CONSTANT VARCHAR2(30) := 'CUG_INCIDNT_ATTR_VALS_PVT';
17: l_api_version CONSTANT NUMBER := 1.0;
18: l_sr_id NUMBER :=FND_API.G_MISS_NUM;
19: l_current_date DATE :=sysdate;
20: l_created_by NUMBER := fnd_global.user_id;
21: l_login NUMBER :=fnd_global.login_id;
22: l_rowid VARCHAR2(100);
44: SELECT incident_type_id into l_incident_type_id from cs_incidents_all_b where incident_id = l_incident_id;
45: OPEN l_CheckIfSRHdrInfoPresent_csr;
46: FETCH l_CheckIfSRHdrInfoPresent_csr into l_CheckIfSRHdrInfoPresent_rec;
47: IF(l_CheckIfSRHdrInfoPresent_csr%NOTFOUND) THEN
48: x_return_status := FND_API.G_RET_STS_SUCCESS;
49: ELSE
50: --End - To fix bug # 2440305
51: x_return_status := FND_API.G_RET_STS_SUCCESS;
52: -- Initialize message list if p_init_msg_list is set to TRUE.
47: IF(l_CheckIfSRHdrInfoPresent_csr%NOTFOUND) THEN
48: x_return_status := FND_API.G_RET_STS_SUCCESS;
49: ELSE
50: --End - To fix bug # 2440305
51: x_return_status := FND_API.G_RET_STS_SUCCESS;
52: -- Initialize message list if p_init_msg_list is set to TRUE.
53:
54: l_num_rec := p_sr_tbl.count;
55: IF l_num_rec > 0
133: END LOOP;
134: end if;
135:
136: -- Standard check of p_commit.
137: IF FND_API.To_Boolean( p_commit ) THEN
138: COMMIT WORK;
139: END IF;
140:
141:
151: );
152:
153: EXCEPTION
154:
155: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
157: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
158: p_count => x_msg_count,
159: p_data => x_msg_data);
152:
153: EXCEPTION
154:
155: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
157: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
158: p_count => x_msg_count,
159: p_data => x_msg_data);
160: WHEN FND_API.G_EXC_ERROR THEN
153: EXCEPTION
154:
155: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
157: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
158: p_count => x_msg_count,
159: p_data => x_msg_data);
160: WHEN FND_API.G_EXC_ERROR THEN
161: x_return_status := FND_API.G_RET_STS_ERROR;
156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
157: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
158: p_count => x_msg_count,
159: p_data => x_msg_data);
160: WHEN FND_API.G_EXC_ERROR THEN
161: x_return_status := FND_API.G_RET_STS_ERROR;
162: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
163: p_count => x_msg_count,
164: p_data => x_msg_data);
157: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
158: p_count => x_msg_count,
159: p_data => x_msg_data);
160: WHEN FND_API.G_EXC_ERROR THEN
161: x_return_status := FND_API.G_RET_STS_ERROR;
162: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
163: p_count => x_msg_count,
164: p_data => x_msg_data);
165: WHEN OTHERS THEN
158: p_count => x_msg_count,
159: p_data => x_msg_data);
160: WHEN FND_API.G_EXC_ERROR THEN
161: x_return_status := FND_API.G_RET_STS_ERROR;
162: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
163: p_count => x_msg_count,
164: p_data => x_msg_data);
165: WHEN OTHERS THEN
166: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
162: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
163: p_count => x_msg_count,
164: p_data => x_msg_data);
165: WHEN OTHERS THEN
166: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
167: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
168: p_count => x_msg_count,
169: p_data => x_msg_data);
170: END CREATE_RUNTIME_DATA;
163: p_count => x_msg_count,
164: p_data => x_msg_data);
165: WHEN OTHERS THEN
166: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
167: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
168: p_count => x_msg_count,
169: p_data => x_msg_data);
170: END CREATE_RUNTIME_DATA;
171:
175: p_commit IN VARCHAR2 DEFAULT NULL , */
176:
177: PROCEDURE LAUNCH_WORKFLOW(
178: p_api_version IN NUMBER ,
179: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
180: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
181: x_return_status OUT NOCOPY VARCHAR2 ,
182: x_msg_count OUT NOCOPY NUMBER ,
183: x_msg_data OUT NOCOPY VARCHAR2 ,
176:
177: PROCEDURE LAUNCH_WORKFLOW(
178: p_api_version IN NUMBER ,
179: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
180: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
181: x_return_status OUT NOCOPY VARCHAR2 ,
182: x_msg_count OUT NOCOPY NUMBER ,
183: x_msg_data OUT NOCOPY VARCHAR2 ,
184: p_incident_id IN NUMBER ,
207: l_servereq_csr_rec l_servereq_csr%ROWTYPE;
208:
209: BEGIN
210: --Initialize message listif p_init_msg_list is set to TRUE.
211: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
212: FND_MSG_PUB.initialize;
213: END IF;
214:
215: -- Initialize API return status to success
212: FND_MSG_PUB.initialize;
213: END IF;
214:
215: -- Initialize API return status to success
216: x_return_status := FND_API.G_RET_STS_SUCCESS;
217:
218: -- API body
219:
220: IF (p_incident_id IS NOT NULL ) THEN
281:
282: -- Endof API body.
283:
284: -- Standard check for p_commit.
285: IF FND_API.To_Boolean ( p_commit ) THEN
286: COMMIT WORK;
287: END IF;
288:
289:
295:
296:
297: EXCEPTION
298:
299: WHEN FND_API.G_EXC_ERROR THEN
300: IF (l_servereq_csr%ISOPEN) THEN
301: CLOSE l_servereq_csr;
302: END IF;
303: x_return_status := FND_API.G_RET_STS_ERROR;
299: WHEN FND_API.G_EXC_ERROR THEN
300: IF (l_servereq_csr%ISOPEN) THEN
301: CLOSE l_servereq_csr;
302: END IF;
303: x_return_status := FND_API.G_RET_STS_ERROR;
304: FND_MSG_PUB.Count_And_Get
305: (
306: p_count => x_msg_count,
307: p_data => x_msg_data
306: p_count => x_msg_count,
307: p_data => x_msg_data
308: );
309:
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: IF (l_servereq_csr%ISOPEN) THEN
312: CLOSE l_servereq_csr;
313: END IF;
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: IF (l_servereq_csr%ISOPEN) THEN
312: CLOSE l_servereq_csr;
313: END IF;
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
315: FND_MSG_PUB.Count_And_Get
316: (
317: p_count => x_msg_count,
318: p_data => x_msg_data
321: WHEN OTHERS THEN
322: IF (l_servereq_csr%ISOPEN) THEN
323: CLOSE l_servereq_csr;
324: END IF;
325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
326: IF FND_MSG_PUB.Check_Msg_Level
327: ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
328: THEN
329: FND_MSG_PUB.Add_Exc_Msg
342:
343:
344: PROCEDURE Create_Address_Note (
345: p_api_version IN NUMBER,
346: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
347: p_commit IN VARCHAR := FND_API.G_FALSE,
348: p_incident_id IN Number,
349: x_msg_count OUT NOCOPY NUMBER,
350: x_msg_data OUT NOCOPY VARCHAR2,
343:
344: PROCEDURE Create_Address_Note (
345: p_api_version IN NUMBER,
346: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
347: p_commit IN VARCHAR := FND_API.G_FALSE,
348: p_incident_id IN Number,
349: x_msg_count OUT NOCOPY NUMBER,
350: x_msg_data OUT NOCOPY VARCHAR2,
351: x_return_status OUT NOCOPY VARCHAR2 ,
350: x_msg_data OUT NOCOPY VARCHAR2,
351: x_return_status OUT NOCOPY VARCHAR2 ,
352: x_note_id OUT NOCOPY NUMBER )
353: is
354: l_return_status VARCHAR2(30) := FND_API.G_RET_STS_SUCCESS ;
355: l_msg_data VARCHAR2(240) := null;
356: l_commit VARCHAR2(1) := FND_API.G_FALSE;
357: l_addr_notes VARCHAR2(2000) := null;
358: l_msg_count NUMBER;
352: x_note_id OUT NOCOPY NUMBER )
353: is
354: l_return_status VARCHAR2(30) := FND_API.G_RET_STS_SUCCESS ;
355: l_msg_data VARCHAR2(240) := null;
356: l_commit VARCHAR2(1) := FND_API.G_FALSE;
357: l_addr_notes VARCHAR2(2000) := null;
358: l_msg_count NUMBER;
359: l_login_id NUMBER := 0 ;
360: l_created_by_user_id NUMBER := 0;
362: l_note_context_tab_dflt JTF_NOTES_PUB.jtf_note_contexts_tbl_type;
363:
364:
365: Begin
366: x_return_status := FND_API.G_RET_STS_SUCCESS;
367:
368: --dbms_output.put_line( ' Came Here 10' || x_return_status );
369: -- Changed from CHR(10) to '' to Comply with GSCC Error for New Line File.SQL.10
370: -- P.S DO NOT TRY TO INDENT THIS CODE SINCE IT WILL EFFECT THE NEW LINE CHAR
422: dbms_output.put_line( 'l_msg_data is ' || l_msg_data );
423:
424: */
425: -- Standard check of p_commit.
426: IF FND_API.To_Boolean( p_commit ) THEN
427: COMMIT WORK;
428: END IF;
429: -- Standard call to get message count and if count is 1, get message info.
430: FND_MSG_PUB.Count_And_Get
433: );
434:
435: EXCEPTION
436:
437: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
439: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
440: p_count => x_msg_count,
441: p_data => x_msg_data);
434:
435: EXCEPTION
436:
437: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
439: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
440: p_count => x_msg_count,
441: p_data => x_msg_data);
442: WHEN FND_API.G_EXC_ERROR THEN
435: EXCEPTION
436:
437: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
439: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
440: p_count => x_msg_count,
441: p_data => x_msg_data);
442: WHEN FND_API.G_EXC_ERROR THEN
443: x_return_status := FND_API.G_RET_STS_ERROR;
438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
439: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
440: p_count => x_msg_count,
441: p_data => x_msg_data);
442: WHEN FND_API.G_EXC_ERROR THEN
443: x_return_status := FND_API.G_RET_STS_ERROR;
444: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
445: p_count => x_msg_count,
446: p_data => x_msg_data);
439: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
440: p_count => x_msg_count,
441: p_data => x_msg_data);
442: WHEN FND_API.G_EXC_ERROR THEN
443: x_return_status := FND_API.G_RET_STS_ERROR;
444: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
445: p_count => x_msg_count,
446: p_data => x_msg_data);
447: WHEN OTHERS THEN
440: p_count => x_msg_count,
441: p_data => x_msg_data);
442: WHEN FND_API.G_EXC_ERROR THEN
443: x_return_status := FND_API.G_RET_STS_ERROR;
444: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
445: p_count => x_msg_count,
446: p_data => x_msg_data);
447: WHEN OTHERS THEN
448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
445: p_count => x_msg_count,
446: p_data => x_msg_data);
447: WHEN OTHERS THEN
448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
449: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
450: p_count => x_msg_count,
451: p_data => x_msg_data);
452:
445: p_count => x_msg_count,
446: p_data => x_msg_data);
447: WHEN OTHERS THEN
448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
449: FND_MSG_PUB.count_and_get( p_encoded=> FND_API.G_FALSE,
450: p_count => x_msg_count,
451: p_data => x_msg_data);
452:
453: