DBA Data[Home] [Help]

APPS.JTF_FM_OCM_REQUEST_GRP dependencies on FND_API

Line 67: x_return_status := FND_API.G_RET_STS_SUCCESS;

63:
64: BEGIN
65:
66: -- Initialize API return status to success
67: x_return_status := FND_API.G_RET_STS_SUCCESS;
68:
69: l_message := '' || p_content_xml || '';
70:
71: JTF_FM_UTL_V.PRINT_MESSAGE('Creating Batch XML ..',JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);

Line 91: RAISE FND_API.G_EXC_ERROR;

87: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
88: FND_MESSAGE.set_name('JTF', 'JTF_FM_API_MISSING_BATCH_LIST');
89: FND_MSG_PUB.Add;
90: END IF;
91: RAISE FND_API.G_EXC_ERROR;
92: ELSE
93:
94: l_message := l_message||'';
95: JTF_FM_UTL_V.PRINT_MESSAGE('Getting the greatest value ..'||TO_CHAR(l_index),

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

149:
150:
151: PROCEDURE create_fulfillment
152: (
153: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
154: p_api_version IN NUMBER,
155: p_commit IN VARCHAR2 := FND_API.G_FALSE,
156: p_order_header_rec IN JTF_Fulfillment_PUB.ORDER_HEADER_REC_TYPE,
157: p_order_line_tbl IN JTF_Fulfillment_PUB.ORDER_LINE_TBL_TYPE,

Line 155: p_commit IN VARCHAR2 := FND_API.G_FALSE,

151: PROCEDURE create_fulfillment
152: (
153: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
154: p_api_version IN NUMBER,
155: p_commit IN VARCHAR2 := FND_API.G_FALSE,
156: p_order_header_rec IN JTF_Fulfillment_PUB.ORDER_HEADER_REC_TYPE,
157: p_order_line_tbl IN JTF_Fulfillment_PUB.ORDER_LINE_TBL_TYPE,
158: p_fulfill_electronic_rec IN JTF_FM_OCM_REQUEST_GRP.FULFILL_ELECTRONIC_REC_TYPE,
159: p_request_type IN VARCHAR2,

Line 171: l_init_msg_list VARCHAR2(2) := FND_API.G_FALSE;

167:
168: l_api_name CONSTANT VARCHAR2(30) := 'create_fulfillment';
169: l_full_name CONSTANT VARCHAR2(100) := G_PKG_NAME ||'.'|| l_api_name;
170: l_api_version CONSTANT NUMBER := 1.0;
171: l_init_msg_list VARCHAR2(2) := FND_API.G_FALSE;
172: l_content_xml VARCHAR2(10000);
173: l_content_xml1 VARCHAR2(1000);
174: l_bind_var JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
175: l_bind_val JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;

Line 187: l_commit VARCHAR2(2) := FND_API.G_FALSE;

183: l_request_history_id NUMBER;
184: l_msg_data VARCHAR2(1000);
185: l_Error_Msg VARCHAR2(1000);
186: l_msg_count NUMBER;
187: l_commit VARCHAR2(2) := FND_API.G_FALSE;
188: l_total NUMBER;
189: l_var_media_type VARCHAR2(30);
190: l_printer_val VARCHAR2(250) := null;
191: l_fax_val VARCHAR2(250):= null;

Line 207: IF NOT FND_API.Compatible_API_Call

203: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN' || l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
204: -- Standard Start of API savepoint
205: SAVEPOINT create_fulfillment;
206: -- Standard call to check for call compatibility.
207: IF NOT FND_API.Compatible_API_Call
208: (
209: l_api_version,
210: p_api_version,
211: l_api_name, G_PKG_NAME )

Line 213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

209: l_api_version,
210: p_api_version,
211: l_api_name, G_PKG_NAME )
212: THEN
213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
214: END IF;
215:
216: -- Initialize message list if p_init_msg_list is set to TRUE.
217: IF FND_API.to_Boolean( p_init_msg_list )

Line 217: IF FND_API.to_Boolean( p_init_msg_list )

213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
214: END IF;
215:
216: -- Initialize message list if p_init_msg_list is set to TRUE.
217: IF FND_API.to_Boolean( p_init_msg_list )
218: THEN
219: FND_MSG_PUB.initialize;
220: END IF;
221:

Line 238: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

234: p_order_line_tbl => p_order_line_tbl,
235: x_order_header_rec => x_order_header_rec,
236: x_request_history_id => x_request_history_id
237: );
238: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
239: THEN
240: RAISE FND_API.G_EXC_ERROR;
241: END IF;
242: ELSIF (IS_REQ_ETSL(p_fulfill_electronic_rec.request_type)) THEN

Line 240: RAISE FND_API.G_EXC_ERROR;

236: x_request_history_id => x_request_history_id
237: );
238: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
239: THEN
240: RAISE FND_API.G_EXC_ERROR;
241: END IF;
242: ELSIF (IS_REQ_ETSL(p_fulfill_electronic_rec.request_type)) THEN
243:
244:

Line 245: x_return_status := FND_API.G_RET_STS_SUCCESS;

241: END IF;
242: ELSIF (IS_REQ_ETSL(p_fulfill_electronic_rec.request_type)) THEN
243:
244:
245: x_return_status := FND_API.G_RET_STS_SUCCESS;
246: l_bind_var := JTF_FM_REQUEST_GRP.L_VARCHAR_TBL;
247: l_bind_val := JTF_FM_REQUEST_GRP.L_VARCHAR_TBL;
248: l_bind_var_type := JTF_FM_REQUEST_GRP.L_VARCHAR_TBL;
249:

Line 256: RAISE FND_API.G_EXC_ERROR;

252: l_Error_Msg := 'Invalid media type specified. Only allowed values are ';
253: l_Error_Msg := l_ERROR_Msg || 'EPF,EFP,FEP,FPE,PEF,PFE,EP,EF,E,PE,PF,P,FE,FP,F';
254: JTF_FM_UTL_V.PRINT_MESSAGE(l_Error_msg, JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
255: JTF_FM_UTL_V.HANDLE_ERROR('JTF_FM_API_CF_INVALID_MEDIA');
256: RAISE FND_API.G_EXC_ERROR;
257:
258: ELSE
259: IF (IS_MED_EPF(p_fulfill_electronic_rec.media_types)) THEN
260:

Line 272: RAISE FND_API.G_EXC_ERROR;

268: IF p_fulfill_electronic_rec.request_type = 'S' THEN
269: l_Error_Msg := 'Chosen Media is Print but missing print address';
270: JTF_FM_UTL_V.PRINT_MESSAGE(l_Error_msg, JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
271: JTF_FM_UTL_V.HANDLE_ERROR('JTF_FM_API_MISSING_PRINT_ADDR');
272: RAISE FND_API.G_EXC_ERROR;
273: ELSE--for mass requests
274: l_printer_val := 'Query';
275: END IF;
276: END IF;

Line 289: RAISE FND_API.G_EXC_ERROR;

285: IF p_fulfill_electronic_rec.request_type = 'S' THEN
286: l_Error_Msg := 'Chosen Media is FAX but missing FAX address';
287: JTF_FM_UTL_V.PRINT_MESSAGE(l_Error_msg, JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
288: JTF_FM_UTL_V.HANDLE_ERROR('JTF_FM_API_MISSING_FAX_ADDR');
289: RAISE FND_API.G_EXC_ERROR;
290: ELSE -- no need of fax address for mass requests
291: l_fax_val := 'Query';
292: END IF;
293: END IF;

Line 299: OR p_fulfill_electronic_rec.media_types= FND_API.G_MISS_CHAR) THEN

295: END IF;
296:
297: IF((INSTR(upper(p_fulfill_electronic_rec.media_types),'E')>0)
298: OR p_fulfill_electronic_rec.media_types IS NULL
299: OR p_fulfill_electronic_rec.media_types= FND_API.G_MISS_CHAR) THEN
300: l_var_media_type := l_var_media_type ||'EMAIL';
301: IF p_fulfill_electronic_rec.email.EXISTS(1) THEN
302: l_email_val := p_fulfill_electronic_rec.email(1);
303: ELSE

Line 309: RAISE FND_API.G_EXC_ERROR;

305:
306: l_Error_Msg := 'Chosen Media is Email but missing email address';
307: JTF_FM_UTL_V.PRINT_MESSAGE(l_Error_msg, JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
308: JTF_FM_UTL_V.HANDLE_ERROR('JTF_FM_API_MISSING_EMAIL_ADDR');
309: RAISE FND_API.G_EXC_ERROR;
310: ELSE
311: l_email_val := 'Query';
312: END IF;
313: END IF;

Line 323: RAISE FND_API.G_EXC_ERROR;

319: l_Error_Msg := 'Invalid media type specified. Only allowed values are ';
320: l_Error_Msg := l_ERROR_Msg || 'EPF,EFP,FEP,FPE,PEF,PFE,EP,EF,E,PE,PF,P,FE,FP,F';
321: JTF_FM_UTL_V.PRINT_MESSAGE(l_Error_msg, JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
322: JTF_FM_UTL_V.HANDLE_ERROR('JTF_FM_API_CF_INVALID_MEDIA');
323: RAISE FND_API.G_EXC_ERROR;
324:
325:
326: END IF;
327:

Line 335: l_extended_header := FND_API.G_MISS_CHAR;

331:
332:
333: IF(p_fulfill_electronic_rec.extended_header IS NULL) THEN
334: JTF_FM_UTL_V.PRINT_MESSAGE('Extended header is null',JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
335: l_extended_header := FND_API.G_MISS_CHAR;
336: ELSE
337: l_extended_header := p_fulfill_electronic_rec.extended_header;
338: END IF;
339:

Line 357: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

353: );
354: JTF_FM_UTL_V.PRINT_MESSAGE('Start_Request Return Status is ' || x_return_status,
355: JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
356:
357: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
358: RAISE FND_API.G_EXC_ERROR;
359: END IF;
360:
361: JTF_FM_UTL_V.PRINT_MESSAGE('Inside ocm pkg request id is ' || to_char(x_request_history_id),

Line 358: RAISE FND_API.G_EXC_ERROR;

354: JTF_FM_UTL_V.PRINT_MESSAGE('Start_Request Return Status is ' || x_return_status,
355: JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
356:
357: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
358: RAISE FND_API.G_EXC_ERROR;
359: END IF;
360:
361: JTF_FM_UTL_V.PRINT_MESSAGE('Inside ocm pkg request id is ' || to_char(x_request_history_id),
362: JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);

Line 434: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

430: JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
431:
432: l_content_xml := l_content_xml1;
433:
434: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
435: RAISE FND_API.G_EXC_ERROR;
436: END IF;
437:
438: IF(upper(p_fulfill_electronic_rec.log_user_ih) = 'Y') THEN

Line 435: RAISE FND_API.G_EXC_ERROR;

431:
432: l_content_xml := l_content_xml1;
433:
434: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
435: RAISE FND_API.G_EXC_ERROR;
436: END IF;
437:
438: IF(upper(p_fulfill_electronic_rec.log_user_ih) = 'Y') THEN
439: l_per_user_history := FND_API.G_TRUE;

Line 439: l_per_user_history := FND_API.G_TRUE;

435: RAISE FND_API.G_EXC_ERROR;
436: END IF;
437:
438: IF(upper(p_fulfill_electronic_rec.log_user_ih) = 'Y') THEN
439: l_per_user_history := FND_API.G_TRUE;
440: ELSE
441: l_per_user_history := FND_API.G_FALSE;
442: END IF;
443:

Line 441: l_per_user_history := FND_API.G_FALSE;

437:
438: IF(upper(p_fulfill_electronic_rec.log_user_ih) = 'Y') THEN
439: l_per_user_history := FND_API.G_TRUE;
440: ELSE
441: l_per_user_history := FND_API.G_FALSE;
442: END IF;
443:
444: IF(length(p_fulfill_electronic_rec.subject) > 250) THEN
445: l_subject := substrb(p_fulfill_electronic_rec.subject,1,250);

Line 466: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)

462:
463: ) ;
464: JTF_FM_UTL_V.PRINT_MESSAGE('GET_TEST_XML Return Status is ' || x_return_status,
465: JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
466: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
467: THEN
468: RAISE FND_API.G_EXC_ERROR;
469: END IF;
470:

Line 468: RAISE FND_API.G_EXC_ERROR;

464: JTF_FM_UTL_V.PRINT_MESSAGE('GET_TEST_XML Return Status is ' || x_return_status,
465: JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
466: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
467: THEN
468: RAISE FND_API.G_EXC_ERROR;
469: END IF;
470:
471: END IF;
472:

Line 475: IF l_per_user_history = FND_API.G_FALSE THEN

471: END IF;
472:
473:
474: -- Check if the agent wants detailed history
475: IF l_per_user_history = FND_API.G_FALSE THEN
476: l_fm_pvt_rec.party_id := -229929;
477: END IF;
478:
479: /**

Line 512: RAISE FND_API.G_EXC_ERROR;

508: ELSE
509: -- throw error, item should have a query assoc for mass requests
510: l_Error_Msg := 'Content must have a valid query associated with it.';
511: JTF_FM_UTL_V.HANDLE_ERROR('JTF_FM_API_MISSING_OCM_QUERY',l_content_id);
512: RAISE FND_API.G_EXC_ERROR;
513: END IF;
514: END IF;
515: l_fm_pvt_rec.priority := 1.0;
516: l_fm_pvt_rec.content_xml := l_message;

Line 533: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

529: l_fm_pvt_rec
530: );
531: JTF_FM_UTL_V.PRINT_MESSAGE('Submit_Mass_Request Return Status is ' || x_return_status,
532: JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
533: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
534: RAISE FND_API.G_EXC_ERROR;
535: END IF;
536:
537: IF(upper(p_fulfill_electronic_rec.request_type) = 'T') THEN

Line 534: RAISE FND_API.G_EXC_ERROR;

530: );
531: JTF_FM_UTL_V.PRINT_MESSAGE('Submit_Mass_Request Return Status is ' || x_return_status,
532: JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
533: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
534: RAISE FND_API.G_EXC_ERROR;
535: END IF;
536:
537: IF(upper(p_fulfill_electronic_rec.request_type) = 'T') THEN
538:

Line 553: RAISE FND_API.G_EXC_ERROR;

549: THEN
550: FND_MESSAGE.set_name('JTF', 'JTF_FM_API_INVALID_REQTYPE');
551: FND_MSG_PUB.Add;
552: END IF; -- IF FND_MSG_PUB.check_msg_level
553: RAISE FND_API.G_EXC_ERROR;
554: END IF; -- end if electronic fulfillment
555:
556: -- Standard check of p_commit.
557: IF FND_API.To_Boolean( p_commit ) THEN

Line 557: IF FND_API.To_Boolean( p_commit ) THEN

553: RAISE FND_API.G_EXC_ERROR;
554: END IF; -- end if electronic fulfillment
555:
556: -- Standard check of p_commit.
557: IF FND_API.To_Boolean( p_commit ) THEN
558: COMMIT WORK;
559: END IF;
560:
561: -- Standard call to get message count and if count is 1, get message info.

Line 566: WHEN FND_API.G_EXC_ERROR THEN

562: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
563:
564:
565: EXCEPTION
566: WHEN FND_API.G_EXC_ERROR THEN
567: ROLLBACK TO create_fulfillment;
568: x_return_status := FND_API.G_RET_STS_ERROR ;
569: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
570:

Line 568: x_return_status := FND_API.G_RET_STS_ERROR ;

564:
565: EXCEPTION
566: WHEN FND_API.G_EXC_ERROR THEN
567: ROLLBACK TO create_fulfillment;
568: x_return_status := FND_API.G_RET_STS_ERROR ;
569: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
570:
571: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
572: THEN

Line 571: WHEN FND_API.G_EXC_UNEXPECTED_ERROR

567: ROLLBACK TO create_fulfillment;
568: x_return_status := FND_API.G_RET_STS_ERROR ;
569: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
570:
571: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
572: THEN
573: ROLLBACK TO create_fulfillment;
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
575: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

570:
571: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
572: THEN
573: ROLLBACK TO create_fulfillment;
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
575: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
576:
577: WHEN OTHERS
578: THEN

Line 580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

576:
577: WHEN OTHERS
578: THEN
579: ROLLBACK TO create_fulfillment;
580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
581: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
582: THEN
583: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name);
584: END IF;