235: FND_MESSAGE.Set_Name('JTF','JTF_FM_API_DEBUG_MESSAGE');
236: FND_MESSAGE.Set_Token('ARG1',l_full_name||': End');
237: FND_MSG_PUB.Add;
238: END IF;
239: --Standard call to get message count and if count=1, get the message
240: FND_MSG_PUB.Count_And_Get (
241: p_encoded => FND_API.g_false,
242: p_count => x_msg_count,
243: p_data => x_msg_data
251: EXCEPTION
252: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
254: --JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
255: -- Standard call to get message count and if count=1, get the message
256: FND_MSG_PUB.Count_And_Get (
257: p_encoded => FND_API.g_false,
258: p_count => x_msg_count,
259: p_data => x_msg_data
261: JTF_FM_UTL_V.GET_ERROR_MESSAGE(x_msg_data);
262: WHEN FND_API.G_EXC_ERROR THEN
263: x_return_status := FND_API.G_RET_STS_ERROR;
264: --JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
265: -- Standard call to get message count and if count=1, get the message
266: FND_MSG_PUB.Count_And_Get (
267: p_encoded => FND_API.g_false,
268: p_count => x_msg_count,
269: p_data => x_msg_data
278: THEN
279: FND_MSG_PUB.Add_Exc_Msg
280: (G_PKG_NAME, l_api_name);
281: END IF;
282: -- Standard call to get message count and if count=1, get the message
283: FND_MSG_PUB.Count_And_Get (
284: p_encoded => FND_API.g_false,
285: p_count => x_msg_count,
286: p_data => x_msg_data
327: l_msg_count NUMBER;
328: l_msg_data VARCHAR2(2000);
329: BEGIN
330: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
331: -- Standard begin of API savepoint
332: SAVEPOINT new_Cancel;
333:
334: IF NOT FND_API.Compatible_API_Call (
335: l_api_version,
378: FND_MESSAGE.Set_Name('JTF', 'JTF_FM_API_SUCCESS_MESSAGE');
379: FND_MESSAGE.Set_Token('ARG1', l_full_name);
380: FND_MSG_PUB.Add;
381: END IF;
382: --Standard check of commit
383: IF FND_API.To_Boolean ( p_commit ) THEN
384: COMMIT WORK;
385: END IF;
386: -- Debug Message
388: FND_MESSAGE.Set_Name('JTF','JTF_FM_API_DEBUG_MESSAGE');
389: FND_MESSAGE.Set_Token('ARG1',l_full_name||': End');
390: FND_MSG_PUB.Add;
391: END IF;
392: --Standard call to get message count and if count=1, get the message
393: FND_MSG_PUB.Count_And_Get (
394: p_encoded => FND_API.g_false,
395: p_count => x_msg_count,
396: p_data => x_msg_data
405: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
406: ROLLBACK TO new_cancel;
407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
409: -- Standard call to get message count and if count=1, get the message
410: FND_MSG_PUB.Count_And_Get (
411: p_encoded => FND_API.g_false,
412: p_count => x_msg_count,
413: p_data => x_msg_data
416: WHEN FND_API.G_EXC_ERROR THEN
417: ROLLBACK TO new_cancel;
418: x_return_status := FND_API.G_RET_STS_ERROR;
419: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
420: -- Standard call to get message count and if count=1, get the message
421: FND_MSG_PUB.Count_And_Get (
422: p_encoded => FND_API.g_false,
423: p_count => x_msg_count,
424: p_data => x_msg_data
434: THEN
435: FND_MSG_PUB.Add_Exc_Msg
436: (G_PKG_NAME, l_api_name);
437: END IF;
438: -- Standard call to get message count and if count=1, get the message
439: FND_MSG_PUB.Count_And_Get (
440: p_encoded => FND_API.g_false,
441: p_count => x_msg_count,
442: p_data => x_msg_data
511: l_api_name CONSTANT VARCHAR2(30) := 'INSERT_QUERY';
512: l_full_name CONSTANT VARCHAR2(2000) := G_PKG_NAME || '.' || l_api_name;
513:
514: BEGIN
515: -- Standard savepoint
516: SAVEPOINT query_status;
517:
518:
519: OPEN query_c;
621: l_api_name CONSTANT VARCHAR2(30) := 'CHECK_AND_INSERT_QUERY';
622: l_full_name CONSTANT VARCHAR2(2000) := G_PKG_NAME || '.' || l_api_name;
623:
624: BEGIN
625: -- Standard savepoint
626: SAVEPOINT query_status;
627: BEGIN
628: Select file_id into x_query_file_id from fnd_lobs where file_id = p_query_file_id;
629: JTF_FM_UTL_V.PRINT_MESSAGE('File PRESENT Id in FND_LOBS ',JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
3062: THEN
3063:
3064: x_citem_name := NULL;
3065: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3066: -- Standard call to get message count and if count=1, get the message
3067: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
3068: p_count => x_msg_count,
3069: p_data => x_msg_data
3070: );
3075:
3076: x_citem_name := NULL;
3077: x_return_status := FND_API.G_RET_STS_ERROR;
3078:
3079: -- Standard call to get message count and if count=1, get the message
3080: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
3081: p_count => x_msg_count,
3082: p_data => x_msg_data
3083: );
3094: THEN
3095: FND_MSG_PUB.Add_Exc_Msg('JTF_FM_REQUEST_GRP', G_PKG_NAME );
3096: END IF; -- IF FND_MSG_PUB.Check_Msg_Level
3097:
3098: -- Standard call to get message count and if count=1, get the message
3099: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
3100: p_count => x_msg_count,
3101: p_data => x_msg_data
3102: );
3528:
3529: x_citem_name := NULL;
3530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3531: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
3532: -- Standard call to get message count and if count=1, get the message
3533: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
3534: p_count => x_msg_count,
3535: p_data => x_msg_data
3536: );
3540: THEN
3541: x_citem_name := NULL;
3542: x_return_status := FND_API.G_RET_STS_ERROR;
3543: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
3544: -- Standard call to get message count and if count=1, get the message
3545: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
3546: p_count => x_msg_count,
3547: p_data => x_msg_data
3548: );
3559: THEN
3560: FND_MSG_PUB.Add_Exc_Msg('JTF_FM_REQUEST_GRP', l_api_name);
3561: END IF; -- IF FND_MSG_PUB.Check_Msg_Level
3562:
3563: -- Standard call to get message count and if count=1, get the message
3564: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
3565: p_count => x_msg_count,
3566: p_data => x_msg_data
3567: );
3601: BEGIN
3602:
3603: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN' || l_full_name, JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
3604:
3605: -- Standard begin of API savepoint
3606: SAVEPOINT Start_request;
3607:
3608: IF NOT FND_API.Compatible_API_Call (
3609: l_api_version,
3638: FND_MESSAGE.Set_Token('ARG1', l_full_name);
3639: FND_MSG_PUB.Add;
3640: END IF;
3641:
3642: --Standard check of commit
3643: IF FND_API.To_Boolean ( p_commit ) THEN
3644: COMMIT WORK;
3645: END IF;
3646: JTF_FM_UTL_V.PRINT_MESSAGE('End procedure start_request ' ,JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
3651: FND_MESSAGE.Set_Token('ARG1', l_full_name||': End');
3652: FND_MSG_PUB.Add;
3653: END IF;
3654:
3655: --Standard call to get message count and if count=1, get the message
3656: FND_MSG_PUB.count_and_get(
3657: p_encoded => FND_API.g_false,
3658: p_count => x_msg_count,
3659: p_data => x_msg_data
3662: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3663: ROLLBACK TO Start_Request;
3664: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3665: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
3666: -- Standard call to get message count and if count=1, get the message
3667: FND_MSG_PUB.count_and_get(
3668: p_encoded => FND_API.g_false,
3669: p_count => x_msg_count,
3670: p_data => x_msg_data
3673: WHEN FND_API.G_EXC_ERROR THEN
3674: ROLLBACK TO Start_Request;
3675: x_return_status := FND_API.G_RET_STS_ERROR;
3676: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
3677: -- Standard call to get message count and if count=1, get the message
3678: FND_MSG_PUB.count_and_get(
3679: p_encoded => FND_API.g_false,
3680: p_count => x_msg_count,
3681: p_data => x_msg_data
3690: THEN
3691: FND_MSG_PUB.Add_Exc_Msg
3692: (G_PKG_NAME, l_api_name);
3693: END IF;
3694: -- Standard call to get message count and if count=1, get the message
3695: FND_MSG_PUB.count_and_get(
3696: p_encoded => FND_API.g_false,
3697: p_count => x_msg_count,
3698: p_data => x_msg_data
3773: BEGIN
3774:
3775: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN' || l_full_name, JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
3776:
3777: -- Standard begin of API savepoint
3778: SAVEPOINT Content_XML;
3779:
3780: -- Select end-of-line character from dual
3781: /* select chr(13) cr, chr(10) lf into b, c from dual;
4098: FND_MESSAGE.Set_Token('ARG1', l_full_name);
4099: FND_MSG_PUB.Add;
4100: END IF; -- IF FND_MSG_PUB.Check_Msg_Level
4101:
4102: --Standard check of commit
4103:
4104: IF FND_API.To_Boolean ( p_commit )
4105: THEN
4106: COMMIT WORK;
4113: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4114: FND_MSG_PUB.Add;
4115: END IF; -- IF FND_MSG_PUB.Check_Msg_level
4116:
4117: --Standard call to get message count and if count=1, get the message
4118: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
4119: p_count => x_msg_count,
4120: p_data => x_msg_data
4121: );
4126: ROLLBACK TO Content_XML;
4127: x_content_xml := NULL;
4128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4129: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
4130: -- Standard call to get message count and if count=1, get the message
4131: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
4132: p_count => x_msg_count,
4133: p_data => x_msg_data
4134: );
4139: ROLLBACK TO Content_XML;
4140: x_content_xml := NULL;
4141: x_return_status := FND_API.G_RET_STS_ERROR;
4142: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
4143: -- Standard call to get message count and if count=1, get the message
4144: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
4145: p_count => x_msg_count,
4146: p_data => x_msg_data
4147: );
4159: FND_MSG_PUB.Add_Exc_Msg
4160: (G_PKG_NAME, l_api_name);
4161: END IF; -- IF FND_MSG_PUB.Check_Msg_Level
4162:
4163: -- Standard call to get message count and if count=1, get the message
4164: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
4165: p_count => x_msg_count,
4166: p_data => x_msg_data
4167: );
4292: l_fm_pvt_rec JTF_FM_UTL_V.FM_PVT_REC_TYPE;
4293: l_error_msg VARCHAR2(2000);
4294:
4295: BEGIN
4296: -- Standard begin of API savepoint
4297: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN ' || l_full_name , JTF_FM_UTL_V.G_LEVEL_PROCEDURE ,l_full_name);
4298: --
4299: SAVEPOINT SEND_Request;
4300:
4387: FND_MESSAGE.Set_Token('ARG1', l_full_name);
4388: FND_MSG_PUB.Add;
4389: END IF; -- IF FND_MSG_PUB.Check_Msg_Level
4390:
4391: --Standard check of commit
4392: IF FND_API.To_Boolean ( p_commit )
4393: THEN
4394: COMMIT WORK;
4395: END IF; -- IF FND_API.To_Boolean
4409: FND_MESSAGE.Set_Token('ARG1',l_full_name||': End');
4410: FND_MSG_PUB.Add;
4411: END IF; -- IF FND_MSG.PUB.Check_Msg_level
4412:
4413: --Standard call to get message count and if count=1, get the message
4414: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
4415: p_count => x_msg_count,
4416: p_data => x_msg_data
4417: );
4421: THEN
4422: ROLLBACK TO Send_Request;
4423: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4424: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
4425: -- Standard call to get message count and if count=1, get the message
4426: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
4427: p_count => x_msg_count,
4428: p_data => x_msg_data
4429: );
4434: ROLLBACK TO Send_Request;
4435: x_return_status := FND_API.G_RET_STS_ERROR;
4436: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
4437: JTF_FM_UTL_V.PRINT_MESSAGE('Expected Error Occured'||l_Error_Msg,JTF_FM_UTL_V.G_LEVEL_STATEMENT,l_full_name);
4438: -- Standard call to get message count and if count=1, get the message
4439: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
4440: p_count => x_msg_count,
4441: p_data => x_msg_data
4442: );
4452: THEN
4453: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4454: END IF; -- IF FND_MSG_PUB.Check_Msg_Level
4455:
4456: -- Standard call to get message count and if count=1, get the message
4457: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.g_false,
4458: p_count => x_msg_count,
4459: p_data => x_msg_data
4460: );
4599:
4600: BEGIN
4601:
4602: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
4603: -- Standard begin of API savepoint
4604: SAVEPOINT Previewed;
4605:
4606: IF NOT FND_API.Compatible_API_Call (
4607: l_api_version,
4751: CLOSE GETREQUEST;
4752: END IF; -- IF (GETREQUEST%NOTFOUND)
4753: END IF; -- IF (p_request_id IS NULL)
4754:
4755: --Standard check of commit
4756: IF FND_API.To_Boolean ( p_commit ) THEN
4757: COMMIT WORK;
4758: END IF;
4759: -- Debug Message
4769: FND_MESSAGE.Set_Token('ARG1', l_full_name);
4770: FND_MSG_PUB.Add;
4771: END IF;
4772:
4773: --Standard call to get message count and if count=1, get the message
4774: FND_MSG_PUB.Count_And_Get (
4775: p_encoded => FND_API.g_false,
4776: p_count => x_msg_count,
4777: p_data => x_msg_data
4786: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4787: ROLLBACK TO Previewed;
4788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4789: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
4790: -- Standard call to get message count and if count=1, get the message
4791: FND_MSG_PUB.Count_And_Get (
4792: p_encoded => FND_API.g_false,
4793: p_count => x_msg_count,
4794: p_data => x_msg_data
4797: WHEN FND_API.G_EXC_ERROR THEN
4798: ROLLBACK TO Previewed;
4799: x_return_status := FND_API.G_RET_STS_ERROR;
4800: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
4801: -- Standard call to get message count and if count=1, get the message
4802: FND_MSG_PUB.Count_And_Get (
4803: p_encoded => FND_API.g_false,
4804: p_count => x_msg_count,
4805: p_data => x_msg_data
4812: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4813: THEN
4814: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4815: END IF;
4816: -- Standard call to get message count and if count=1, get the message
4817: FND_MSG_PUB.Count_And_Get (
4818: p_encoded => FND_API.g_false,
4819: p_count => x_msg_count,
4820: p_data => x_msg_data
4923: HIST_REQ_ID = p_request_id;
4924:
4925: BEGIN
4926: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
4927: -- Standard begin of API savepoint
4928: SAVEPOINT Resubmit;
4929:
4930: IF NOT FND_API.Compatible_API_Call (
4931: l_api_version,
5175: END IF;
5176: CLOSE CDATA;
5177: END IF;
5178:
5179: --Standard check of commit
5180: IF FND_API.To_Boolean ( p_commit ) THEN
5181: COMMIT WORK;
5182: END IF;
5183: -- Debug Message
5192: FND_MESSAGE.Set_Name('JTF', 'JTF_FM_API_SUCCESS_MESSAGE');
5193: FND_MESSAGE.Set_Token('ARG1', l_full_name);
5194: FND_MSG_PUB.Add;
5195: END IF;
5196: --Standard call to get message count and if count=1, get the message
5197: FND_MSG_PUB.Count_And_Get (
5198: p_encoded => FND_API.g_false,
5199: p_count => x_msg_count,
5200: p_data => x_msg_data
5208: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5209: ROLLBACK TO Resubmit;
5210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5211: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
5212: -- Standard call to get message count and if count=1, get the message
5213: FND_MSG_PUB.Count_And_Get (
5214: p_encoded => FND_API.g_false,
5215: p_count => x_msg_count,
5216: p_data => x_msg_data
5219: WHEN FND_API.G_EXC_ERROR THEN
5220: ROLLBACK TO Resubmit;
5221: x_return_status := FND_API.G_RET_STS_ERROR;
5222: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
5223: -- Standard call to get message count and if count=1, get the message
5224: FND_MSG_PUB.Count_And_Get (
5225: p_encoded => FND_API.g_false,
5226: p_count => x_msg_count,
5227: p_data => x_msg_data
5236: THEN
5237: FND_MSG_PUB.Add_Exc_Msg
5238: (G_PKG_NAME, l_api_name);
5239: END IF;
5240: -- Standard call to get message count and if count=1, get the message
5241: FND_MSG_PUB.Count_And_Get (
5242: p_encoded => FND_API.g_false,
5243: p_count => x_msg_count,
5244: p_data => x_msg_data
5422:
5423: BEGIN
5424:
5425: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
5426: -- Standard begin of API savepoint
5427: SAVEPOINT Resubmit_job;
5428:
5429: IF NOT FND_API.Compatible_API_Call (
5430: l_api_version,
5807: END IF;
5808: CLOSE CDATA;
5809: END IF;
5810:
5811: --Standard check of commit
5812: IF FND_API.To_Boolean ( p_commit )
5813: THEN
5814: COMMIT WORK;
5815: END IF;
5826: FND_MESSAGE.Set_Name('JTF', 'JTF_FM_API_SUCCESS_MESSAGE');
5827: FND_MESSAGE.Set_Token('ARG1', l_full_name);
5828: FND_MSG_PUB.Add;
5829: END IF;
5830: --Standard call to get message count and if count=1, get the message
5831: FND_MSG_PUB.Count_And_Get (
5832: p_encoded => FND_API.g_false,
5833: p_count => x_msg_count,
5834: p_data => x_msg_data
5842: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5843: ROLLBACK TO Resubmit_job;
5844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5845: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
5846: -- Standard call to get message count and if count=1, get the message
5847: FND_MSG_PUB.Count_And_Get (
5848: p_encoded => FND_API.g_false,
5849: p_count => x_msg_count,
5850: p_data => x_msg_data
5853: WHEN FND_API.G_EXC_ERROR THEN
5854: ROLLBACK TO Resubmit_job;
5855: x_return_status := FND_API.G_RET_STS_ERROR;
5856: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
5857: -- Standard call to get message count and if count=1, get the message
5858: FND_MSG_PUB.Count_And_Get (
5859: p_encoded => FND_API.g_false,
5860: p_count => x_msg_count,
5861: p_data => x_msg_data
5870: THEN
5871: FND_MSG_PUB.Add_Exc_Msg
5872: (G_PKG_NAME, l_api_name);
5873: END IF;
5874: -- Standard call to get message count and if count=1, get the message
5875: FND_MSG_PUB.Count_And_Get (
5876: p_encoded => FND_API.g_false,
5877: p_count => x_msg_count,
5878: p_data => x_msg_data
5994:
5995: END LOOP;
5996: END IF;
5997:
5998: --Standard check of commit
5999: IF FND_API.To_Boolean ( p_commit )
6000: THEN
6001: COMMIT WORK;
6002: END IF;
6006: FND_MESSAGE.Set_Name('JTF', 'JTF_FM_API_SUCCESS_MESSAGE');
6007: FND_MESSAGE.Set_Token('ARG1', l_full_name);
6008: FND_MSG_PUB.Add;
6009: END IF;
6010: --Standard call to get message count and if count=1, get the message
6011: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
6012: p_count => x_msg_count,
6013: p_data => x_msg_data
6014: );
6127: END LOOP;
6128: CLOSE CGET_MALFORMED_CORRECTED;
6129:
6130:
6131: --Standard check of commit
6132: IF FND_API.To_Boolean ( p_commit )
6133: THEN
6134: COMMIT WORK;
6135: END IF;
6140: FND_MESSAGE.Set_Token('ARG1', l_full_name);
6141: FND_MSG_PUB.Add;
6142: END IF;
6143:
6144: --Standard call to get message count and if count=1, get the message
6145: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.g_false,
6146: p_count => x_msg_count,
6147: p_data => x_msg_data
6148: );
6247: WHERE REQUEST_ID = p_request_id;
6248:
6249: BEGIN
6250: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
6251: -- Standard begin of API savepoint
6252: SAVEPOINT Cancel;
6253:
6254: IF NOT FND_API.Compatible_API_Call (
6255: l_api_version,
6412: FND_MESSAGE.Set_Name('JTF', 'JTF_FM_API_SUCCESS_MESSAGE');
6413: FND_MESSAGE.Set_Token('ARG1', l_full_name);
6414: FND_MSG_PUB.Add;
6415: END IF;
6416: --Standard check of commit
6417: IF FND_API.To_Boolean ( p_commit ) THEN
6418: COMMIT WORK;
6419: END IF;
6420: -- Debug Message
6422: FND_MESSAGE.Set_Name('JTF','JTF_FM_API_DEBUG_MESSAGE');
6423: FND_MESSAGE.Set_Token('ARG1',l_full_name||': End');
6424: FND_MSG_PUB.Add;
6425: END IF;
6426: --Standard call to get message count and if count=1, get the message
6427: FND_MSG_PUB.Count_And_Get (
6428: p_encoded => FND_API.g_false,
6429: p_count => x_msg_count,
6430: p_data => x_msg_data
6453: FND_MESSAGE.Set_Name('JTF','JTF_FM_API_CANCEL_FAILED');
6454: FND_MSG_PUB.Add;
6455: END IF;
6456: END IF;
6457: -- Standard call to get message count and if count=1, get the message
6458: FND_MSG_PUB.Count_And_Get (
6459: p_encoded => FND_API.g_false,
6460: p_count => x_msg_count,
6461: p_data => x_msg_data
6464: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6465: ROLLBACK TO Cancel;
6466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6467: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
6468: -- Standard call to get message count and if count=1, get the message
6469: FND_MSG_PUB.Count_And_Get (
6470: p_encoded => FND_API.g_false,
6471: p_count => x_msg_count,
6472: p_data => x_msg_data
6475: WHEN FND_API.G_EXC_ERROR THEN
6476: ROLLBACK TO Cancel;
6477: x_return_status := FND_API.G_RET_STS_ERROR;
6478: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
6479: -- Standard call to get message count and if count=1, get the message
6480: FND_MSG_PUB.Count_And_Get (
6481: p_encoded => FND_API.g_false,
6482: p_count => x_msg_count,
6483: p_data => x_msg_data
6493: THEN
6494: FND_MSG_PUB.Add_Exc_Msg
6495: (G_PKG_NAME, l_api_name);
6496: END IF;
6497: -- Standard call to get message count and if count=1, get the message
6498: FND_MSG_PUB.Count_And_Get (
6499: p_encoded => FND_API.g_false,
6500: p_count => x_msg_count,
6501: p_data => x_msg_data
6564: --
6565: l_message VARCHAR2(32767);
6566: --
6567: BEGIN
6568: -- Standard begin of API savepoint
6569: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
6570: SAVEPOINT Attachment_XML;
6571:
6572: IF NOT FND_API.Compatible_API_Call (
6748: FND_MESSAGE.Set_Name('JTF', 'JTF_FM_API_SUCCESS_MESSAGE');
6749: FND_MESSAGE.Set_Token('ARG1', l_full_name);
6750: FND_MSG_PUB.Add;
6751: END IF;
6752: --Standard check of commit
6753: IF FND_API.To_Boolean ( p_commit ) THEN
6754: COMMIT WORK;
6755: END IF;
6756: -- Debug Message
6758: FND_MESSAGE.Set_Name('JTF','JTF_FM_API_DEBUG_MESSAGE');
6759: FND_MESSAGE.Set_Token('ARG1',l_full_name||': End');
6760: FND_MSG_PUB.Add;
6761: END IF;
6762: --Standard call to get message count and if count=1, get the message
6763: FND_MSG_PUB.Count_And_Get (
6764: p_encoded => FND_API.g_false,
6765: p_count => x_msg_count,
6766: p_data => x_msg_data
6769: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6770: ROLLBACK TO Attachment_XML;
6771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6772: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
6773: -- Standard call to get message count and if count=1, get the message
6774: FND_MSG_PUB.Count_And_Get (
6775: p_encoded => FND_API.g_false,
6776: p_count => x_msg_count,
6777: p_data => x_msg_data
6780: WHEN FND_API.G_EXC_ERROR THEN
6781: ROLLBACK TO Attachment_XML;
6782: x_return_status := FND_API.G_RET_STS_ERROR;
6783: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
6784: -- Standard call to get message count and if count=1, get the message
6785: FND_MSG_PUB.Count_And_Get (
6786: p_encoded => FND_API.g_false,
6787: p_count => x_msg_count,
6788: p_data => x_msg_data
6797: THEN
6798: FND_MSG_PUB.Add_Exc_Msg
6799: (G_PKG_NAME, l_api_name);
6800: END IF;
6801: -- Standard call to get message count and if count=1, get the message
6802: FND_MSG_PUB.Count_And_Get (
6803: p_encoded => FND_API.g_false,
6804: p_count => x_msg_count,
6805: p_data => x_msg_data
6869: l_queue_response VARCHAR2(2) := 'B';
6870: --
6871: BEGIN
6872: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
6873: -- Standard begin of API savepoint
6874: SAVEPOINT Batch_Request;
6875:
6876: IF NOT FND_API.Compatible_API_Call (
6877: l_api_version,
7048: FND_MESSAGE.Set_Name('JTF', 'JTF_FM_API_SUCCESS_MESSAGE');
7049: FND_MESSAGE.Set_Token('ARG1', l_full_name);
7050: FND_MSG_PUB.Add;
7051: END IF;
7052: --Standard check of commit
7053: IF FND_API.To_Boolean ( p_commit ) THEN
7054: COMMIT WORK;
7055: END IF;
7056: -- Debug Message
7058: FND_MESSAGE.Set_Name('JTF','JTF_FM_API_DEBUG_MESSAGE');
7059: FND_MESSAGE.Set_Token('ARG1',l_full_name||': End');
7060: FND_MSG_PUB.Add;
7061: END IF;
7062: --Standard call to get message count and if count=1, get the message
7063: FND_MSG_PUB.Count_And_Get (
7064: p_encoded => FND_API.g_false,
7065: p_count => x_msg_count,
7066: p_data => x_msg_data
7069: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7070: ROLLBACK TO Batch_Request;
7071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7072: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
7073: -- Standard call to get message count and if count=1, get the message
7074: FND_MSG_PUB.Count_And_Get (
7075: p_encoded => FND_API.g_false,
7076: p_count => x_msg_count,
7077: p_data => x_msg_data
7080: WHEN FND_API.G_EXC_ERROR THEN
7081: ROLLBACK TO Batch_Request;
7082: x_return_status := FND_API.G_RET_STS_ERROR;
7083: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
7084: -- Standard call to get message count and if count=1, get the message
7085: FND_MSG_PUB.Count_And_Get (
7086: p_encoded => FND_API.g_false,
7087: p_count => x_msg_count,
7088: p_data => x_msg_data
7097: THEN
7098: FND_MSG_PUB.Add_Exc_Msg
7099: (G_PKG_NAME, l_api_name);
7100: END IF;
7101: -- Standard call to get message count and if count=1, get the message
7102: FND_MSG_PUB.Count_And_Get (
7103: p_encoded => FND_API.g_false,
7104: p_count => x_msg_count,
7105: p_data => x_msg_data
7184: --
7185: BEGIN
7186: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
7187:
7188: -- Standard begin of API savepoint
7189: SAVEPOINT Mass_Request;
7190:
7191: IF NOT FND_API.Compatible_API_Call (
7192: l_api_version,
7282: FND_MESSAGE.Set_Name('JTF', 'JTF_FM_API_SUCCESS_MESSAGE');
7283: FND_MESSAGE.Set_Token('ARG1', l_full_name);
7284: FND_MSG_PUB.Add;
7285: END IF;
7286: --Standard check of commit
7287: IF FND_API.To_Boolean ( p_commit ) THEN
7288: COMMIT WORK;
7289: END IF;
7290: -- Debug Message
7292: FND_MESSAGE.Set_Name('JTF','JTF_FM_API_DEBUG_MESSAGE');
7293: FND_MESSAGE.Set_Token('ARG1',l_full_name||': End');
7294: FND_MSG_PUB.Add;
7295: END IF;
7296: --Standard call to get message count and if count=1, get the message
7297: FND_MSG_PUB.Count_And_Get (
7298: p_encoded => FND_API.g_false,
7299: p_count => x_msg_count,
7300: p_data => x_msg_data
7303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7304: ROLLBACK TO Mass_Request;
7305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7306: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
7307: -- Standard call to get message count and if count=1, get the message
7308: FND_MSG_PUB.Count_And_Get (
7309: p_encoded => FND_API.g_false,
7310: p_count => x_msg_count,
7311: p_data => x_msg_data
7314: WHEN FND_API.G_EXC_ERROR THEN
7315: ROLLBACK TO Mass_Request;
7316: x_return_status := FND_API.G_RET_STS_ERROR;
7317: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
7318: -- Standard call to get message count and if count=1, get the message
7319: FND_MSG_PUB.Count_And_Get (
7320: p_encoded => FND_API.g_false,
7321: p_count => x_msg_count,
7322: p_data => x_msg_data
7331: THEN
7332: FND_MSG_PUB.Add_Exc_Msg
7333: (G_PKG_NAME, l_api_name);
7334: END IF;
7335: -- Standard call to get message count and if count=1, get the message
7336: FND_MSG_PUB.Count_And_Get (
7337: p_encoded => FND_API.g_false,
7338: p_count => x_msg_count,
7339: p_data => x_msg_data
7404:
7405:
7406: BEGIN
7407: JTF_FM_UTL_V.PRINT_MESSAGE('BEGIN: '|| l_full_name,JTF_FM_UTL_V.G_LEVEL_PROCEDURE,l_full_name);
7408: -- Standard begin of API savepoint
7409: SAVEPOINT PAUSE_RESUME;
7410: -- Initialize API return status to success
7411: x_return_status := FND_API.G_RET_STS_SUCCESS;
7412:
7587: FND_MESSAGE.Set_Token('ARG1', l_full_name);
7588: FND_MSG_PUB.Add;
7589: END IF;
7590: --JTF_FM_UTL_V.HANDLE_ERROR('JTF_FM_API_SUCCESS_MESSAGE', l_full_name);
7591: --Standard check of commit
7592: IF FND_API.To_Boolean ( p_commit )
7593: THEN
7594: COMMIT WORK;
7595: END IF;
7593: THEN
7594: COMMIT WORK;
7595: END IF;
7596:
7597: --Standard call to get message count and if count=1, get the message
7598: FND_MSG_PUB.Count_And_Get (
7599: p_encoded => FND_API.g_false,
7600: p_count => x_msg_count,
7601: p_data => x_msg_data
7611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7612: ROLLBACK TO PAUSE_RESUME;
7613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7614: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
7615: -- Standard call to get message count and if count=1, get the message
7616: FND_MSG_PUB.Count_And_Get (
7617: p_encoded => FND_API.g_false,
7618: p_count => x_msg_count,
7619: p_data => x_msg_data
7622: WHEN FND_API.G_EXC_ERROR THEN
7623: ROLLBACK TO PAUSE_RESUME;
7624: x_return_status := FND_API.G_RET_STS_ERROR;
7625: JTF_FM_UTL_V.ADD_ERROR_MESSAGE (l_api_name, l_Error_Msg);
7626: -- Standard call to get message count and if count=1, get the message
7627: FND_MSG_PUB.Count_And_Get (
7628: p_encoded => FND_API.g_false,
7629: p_count => x_msg_count,
7630: p_data => x_msg_data
7639: THEN
7640: FND_MSG_PUB.Add_Exc_Msg
7641: (G_PKG_NAME, l_api_name);
7642: END IF;
7643: -- Standard call to get message count and if count=1, get the message
7644: FND_MSG_PUB.Count_And_Get (
7645: p_encoded => FND_API.g_false,
7646: p_count => x_msg_count,
7647: p_data => x_msg_data