[Home] [Help]
565: *************************************************************************/
566:
567: PROCEDURE Raise_ServiceRequest_Event(
568: p_api_version IN NUMBER,
569: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
570: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
571: p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full,
572: p_Event_Code IN VARCHAR2,
573: p_Incident_Number IN VARCHAR2,
566:
567: PROCEDURE Raise_ServiceRequest_Event(
568: p_api_version IN NUMBER,
569: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
570: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
571: p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full,
572: p_Event_Code IN VARCHAR2,
573: p_Incident_Number IN VARCHAR2,
574: p_USER_ID IN NUMBER DEFAULT FND_GLOBAL.USER_ID, -- p_last_updated_by from Update_ServiceREquest()
567: PROCEDURE Raise_ServiceRequest_Event(
568: p_api_version IN NUMBER,
569: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
570: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
571: p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full,
572: p_Event_Code IN VARCHAR2,
573: p_Incident_Number IN VARCHAR2,
574: p_USER_ID IN NUMBER DEFAULT FND_GLOBAL.USER_ID, -- p_last_updated_by from Update_ServiceREquest()
575: p_RESP_ID IN NUMBER, -- p_resp_id from Update_ServiceREquest()
812:
813: --dbms_output.put_line('Start of Raise_ServiceRequest_Event');
814:
815: -- Initialize return status to SUCCESS
816: x_return_status := FND_API.G_RET_STS_SUCCESS;
817:
818: --INSERT INTO rm_tmp values (p_Incident_Number, 'In Start of BES wrapper ',rm_tmp_seq.nextval);
819:
820: IF ( p_Incident_Number IS NULL) THEN
1068:
1069: WHILE l_contact_index IS NOT NULL LOOP
1070:
1071: IF (p_Contacts_Table(l_contact_index).SR_CONTACT_POINT_ID IS NULL OR
1072: p_Contacts_Table(l_contact_index).SR_CONTACT_POINT_ID = FND_API.G_MISS_NUM ) THEN -- new contact
1073:
1074: l_contact_party_id := p_Contacts_Table(l_contact_index).PARTY_ID;
1075:
1076:
1098: -- IF (l_sel_party_name_csr%FOUND AND l_contact_name IS NOT NULL )THEN
1099: IF (l_contact_name IS NOT NULL )THEN
1100:
1101: IF (p_Contacts_table(l_contact_index).party_role_code = 'CONTACT' OR
1102: p_Contacts_table(l_contact_index).party_role_code = FND_API.G_MISS_CHAR OR
1103: p_Contacts_table(l_contact_index).party_role_code IS NULL ) THEN
1104:
1105: -- Check for l_new_contact_point_name list length not to exceed 2000 .
1106: IF (nvl(LENGTH(l_new_contact_point_name),0) + nvl(LENGTH(l_contact_name),0) + 1) <= 2000 THEN
1263: p_event_key => l_event_key,
1264: p_parameters => l_param_list);
1265: EXCEPTION -- Added the exception for bug 8849523
1266: WHEN OTHERS THEN
1267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1268: END;
1269:
1270: /* Roopa - begin
1271: Fix for bug 2798269
1270: /* Roopa - begin
1271: Fix for bug 2798269
1272: */
1273: -- Standard check of p_commit
1274: IF FND_API.To_Boolean(p_commit) THEN
1275: COMMIT WORK;
1276: END IF;
1277: /* END IF;
1278: END LOOP;
1311: /* Roopa - begin
1312: Fix for bug 2798269
1313: */
1314: -- Standard check of p_commit
1315: IF FND_API.To_Boolean(p_commit) THEN
1316: COMMIT WORK;
1317: END IF;
1318: -- commit;
1319:
1446: /* Roopa - begin
1447: Fix for bug 2798269
1448: */
1449: -- Standard check of p_commit
1450: IF FND_API.To_Boolean(p_commit) THEN
1451: COMMIT WORK;
1452: END IF;
1453: -- commit;
1454:
1508: /* Roopa - begin
1509: Fix for bug 2798269
1510: */
1511: -- Standard check of p_commit
1512: IF FND_API.To_Boolean(p_commit) THEN
1513: COMMIT WORK;
1514: END IF;
1515: -- commit;
1516: --x_wf_process_id := l_event_id;
1593: --dbms_output.put_line('Calling Launch_Servereq_Workflow ');
1594:
1595: CS_Workflow_PUB.Launch_Servereq_Workflow(
1596: p_api_version => 1.0,
1597: p_init_msg_list => FND_API.G_TRUE,
1598: p_commit => p_commit,
1599: p_return_status => l_return_status,
1600: p_msg_count => l_msg_count,
1601: p_msg_data => l_msg_data,
1603: p_initiator_user_id => p_USER_ID,
1604: p_initiator_resp_id => p_RESP_ID,
1605: p_initiator_resp_appl_id => p_RESP_APPL_ID,
1606: p_itemkey => l_itemkey,
1607: p_nowait => FND_API.G_TRUE);
1608:
1609: --dbms_output.put_line('Calling Launch_Servereq_Workflow,return status= '|| l_return_status);
1610:
1611: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1607: p_nowait => FND_API.G_TRUE);
1608:
1609: --dbms_output.put_line('Calling Launch_Servereq_Workflow,return status= '|| l_return_status);
1610:
1611: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1612: raise FND_API.G_EXC_ERROR;
1613: END IF;
1614:
1615: l_pos := INSTR(l_itemkey, '-',-1,1); -- Bug#4007088
1608:
1609: --dbms_output.put_line('Calling Launch_Servereq_Workflow,return status= '|| l_return_status);
1610:
1611: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1612: raise FND_API.G_EXC_ERROR;
1613: END IF;
1614:
1615: l_pos := INSTR(l_itemkey, '-',-1,1); -- Bug#4007088
1616: x_wf_process_id := SUBSTR(l_itemkey, l_pos+1);
1646:
1647: WHEN l_INVALID_EVENT_ARGS THEN
1648: --dbms_output.put_line('Exception : WHEN l_INVALID_EVENT_ARGS ');
1649: --l_param_list.DELETE;
1650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1651: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1652: FND_MSG_PUB.Add_Exc_Msg( 'CS_WF_EVENT_PKG',
1653: 'Raise_ServiceRequest_Event' );
1654: END IF;
1653: 'Raise_ServiceRequest_Event' );
1654: END IF;
1655: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1656: p_data => x_msg_data,
1657: p_encoded => FND_API.G_FALSE );
1658:
1659: WHEN l_INVALID_EVENT_CODE THEN
1660: --dbms_output.put_line('Exception : WHEN l_INVALID_EVENT_CODE');
1661: --l_param_list.DELETE;
1658:
1659: WHEN l_INVALID_EVENT_CODE THEN
1660: --dbms_output.put_line('Exception : WHEN l_INVALID_EVENT_CODE');
1661: --l_param_list.DELETE;
1662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1663: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1664: FND_MSG_PUB.Add_Exc_Msg( 'CS_WF_EVENT_PKG',
1665: 'Raise_ServiceRequest_Event' );
1666: END IF;
1665: 'Raise_ServiceRequest_Event' );
1666: END IF;
1667: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1668: p_data => x_msg_data,
1669: p_encoded => FND_API.G_FALSE );
1670:
1671: WHEN FND_API.G_EXC_ERROR THEN
1672: --dbms_output.put_line('Exception : WHEN FND_API.G_EXC_ERROR');
1673: --l_param_list.DELETE;
1667: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1668: p_data => x_msg_data,
1669: p_encoded => FND_API.G_FALSE );
1670:
1671: WHEN FND_API.G_EXC_ERROR THEN
1672: --dbms_output.put_line('Exception : WHEN FND_API.G_EXC_ERROR');
1673: --l_param_list.DELETE;
1674: IF (l_sel_request_csr%ISOPEN) THEN
1675: CLOSE l_sel_request_csr;
1668: p_data => x_msg_data,
1669: p_encoded => FND_API.G_FALSE );
1670:
1671: WHEN FND_API.G_EXC_ERROR THEN
1672: --dbms_output.put_line('Exception : WHEN FND_API.G_EXC_ERROR');
1673: --l_param_list.DELETE;
1674: IF (l_sel_request_csr%ISOPEN) THEN
1675: CLOSE l_sel_request_csr;
1676: END IF;
1673: --l_param_list.DELETE;
1674: IF (l_sel_request_csr%ISOPEN) THEN
1675: CLOSE l_sel_request_csr;
1676: END IF;
1677: x_return_status := FND_API.G_RET_STS_ERROR;
1678: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1679: p_data => x_msg_data,
1680: p_encoded => FND_API.G_FALSE );
1681:
1676: END IF;
1677: x_return_status := FND_API.G_RET_STS_ERROR;
1678: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1679: p_data => x_msg_data,
1680: p_encoded => FND_API.G_FALSE );
1681:
1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: --dbms_output.put_line('Exception : WHEN FND_API.G_EXC_UNEXPECTED_ERROR');
1684: --l_param_list.DELETE;
1678: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1679: p_data => x_msg_data,
1680: p_encoded => FND_API.G_FALSE );
1681:
1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: --dbms_output.put_line('Exception : WHEN FND_API.G_EXC_UNEXPECTED_ERROR');
1684: --l_param_list.DELETE;
1685: IF (l_sel_request_csr%ISOPEN) THEN
1686: CLOSE l_sel_request_csr;
1679: p_data => x_msg_data,
1680: p_encoded => FND_API.G_FALSE );
1681:
1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: --dbms_output.put_line('Exception : WHEN FND_API.G_EXC_UNEXPECTED_ERROR');
1684: --l_param_list.DELETE;
1685: IF (l_sel_request_csr%ISOPEN) THEN
1686: CLOSE l_sel_request_csr;
1687: END IF;
1684: --l_param_list.DELETE;
1685: IF (l_sel_request_csr%ISOPEN) THEN
1686: CLOSE l_sel_request_csr;
1687: END IF;
1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1689: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1690: p_data => x_msg_data,
1691: p_encoded => FND_API.G_FALSE );
1692:
1687: END IF;
1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1689: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1690: p_data => x_msg_data,
1691: p_encoded => FND_API.G_FALSE );
1692:
1693: WHEN OTHERS THEN
1694: --dbms_output.put_line('Exception : WHEN OTHERS');
1695: --l_param_list.DELETE;
1692:
1693: WHEN OTHERS THEN
1694: --dbms_output.put_line('Exception : WHEN OTHERS');
1695: --l_param_list.DELETE;
1696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1697: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1698: FND_MSG_PUB.Add_Exc_Msg( 'CS_WF_EVENT_PKG',
1699: 'Raise_ServiceRequest_Event' );
1700: END IF;
1699: 'Raise_ServiceRequest_Event' );
1700: END IF;
1701: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1702: p_data => x_msg_data,
1703: p_encoded => FND_API.G_FALSE );
1704:
1705:
1706:
1707: