[Home] [Help]
1: PACKAGE BODY CS_ServiceRequest_PVT AS
2: /* $Header: csvsrb.pls 120.48.12010000.2 2008/11/14 22:03:06 rtripath ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CS_ServiceRequest_PVT';
5: G_INITIALIZED CONSTANT VARCHAR2(1) := 'R';
1: PACKAGE BODY CS_ServiceRequest_PVT AS
2: /* $Header: csvsrb.pls 120.48.12010000.2 2008/11/14 22:03:06 rtripath ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CS_ServiceRequest_PVT';
5: G_INITIALIZED CONSTANT VARCHAR2(1) := 'R';
6: G_SR_SUBTYPE CONSTANT VARCHAR2(5) := 'INC';
7: G_API_REVISION CONSTANT NUMBER := 1.0;
8: G_TABLE_NAME CONSTANT VARCHAR2(40) := 'CS_INCIDENTS_ALL_B';
151: lx_timezone_name VARCHAR2(80);
152: l_server_timezone_id NUMBER;
153: l_log_module VARCHAR2(255);
154: BEGIN
155: l_log_module := 'cs.plsql.' || 'CS_SERVICEREQUEST_PVT.get_default_contract' || '.';
156: px_inp_rec.contract_number := NULL;
157: px_inp_rec.contract_number_modifier := NULL;
158: px_inp_rec.service_line_id := NULL;
159: px_inp_rec.party_id := p_customer_id;
380: l_orig_group_type_null varchar2(1) := 'N';
381: l_owner_id CS_INCIDENTS_ALL_B.incident_owner_id % TYPE;
382: l_owner_name jtf_rs_resource_extns_tl.resource_name % TYPE;
383: BEGIN
384: l_api_name := 'CS_SERVICEREQUEST_PVT.vldt_sr_rec';
385: l_log_module := 'cs.plsql.' || l_api_name || '.';
386: l_contract_service_id_valid := 'Y';
387: l_contract_defaulted := 'N';
388: x_return_status := FND_API.G_RET_STS_SUCCESS;
542: )
543: )
544: THEN
545: l_contract_defaulted := 'Y';
546: CS_SERVICEREQUEST_PVT.get_default_contract
547: ( p_business_process_id => p_sr_related_data.business_process_id
548: , p_customer_id => p_sr_rec.customer_id
549: , p_install_site_use_id => p_sr_rec.install_site_use_id
550: , p_account_id => p_sr_rec.account_id
1043:
1044: -- Initialize API return status to success
1045: x_return_status := FND_API.G_RET_STS_SUCCESS;
1046:
1047: CS_ServiceRequest_PVT.Create_ServiceRequest
1048: ( p_api_version => 4.0,
1049: p_init_msg_list => fnd_api.g_false ,
1050: p_commit => p_commit,
1051: p_validation_level => p_validation_level,
1496: THEN
1497: FND_MESSAGE.set_name ('CS', 'CS_SR_ITEM_SERIAL_OBSOLETE');
1498: FND_MESSAGE.set_token
1499: ( 'API_NAME'
1500: , 'CS_SERVICEREQUEST_PVT.create_servicerequest'
1501: );
1502: FND_MSG_PUB.ADD_DETAIL
1503: ( p_associated_column1 => 'CS_INCIDENTS_ALL_B.ITEM_SERIAL_NUMBER'
1504: );
1555: THEN
1556: FND_MESSAGE.set_name ('CS', 'CS_SR_MAINT_ORG_NOT_ALLOWED');
1557: FND_MESSAGE.set_token
1558: ( 'API_NAME'
1559: , 'CS_SERVICEREQUEST_PVT.create_servicerequest'
1560: );
1561: FND_MSG_PUB.ADD_DETAIL
1562: ( p_associated_column1 => 'CS_INCIDENTS_ALL_B.MAINT_ORGANIZATION_ID'
1563: );
1595: -- if type attributes are needed for some other purpose then the if condition
1596: -- can be modified accordingly
1597: IF p_default_contract_sla_ind = 'Y'
1598: THEN
1599: CS_SERVICEREQUEST_PVT.get_incident_type_details
1600: ( p_incident_type_id => p_service_request_rec.type_id
1601: , x_business_process_id => l_sr_related_data.business_process_id
1602: , x_autolaunch_workflow_flag => l_sr_related_data.autolaunch_workflow_flag
1603: , x_abort_workflow_close_flag => l_sr_related_data.abort_workflow_close_flag
1630: -- Make the preprocessing call to the user hooks
1631: --
1632: -- Pre call to the Customer Type User Hook
1633: --
1634: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
1635: 'Create_ServiceRequest',
1636: 'B', 'C') THEN
1637:
1638: -- hardcoded the version 2.0 shijain nov 27 2002
1668: END IF;
1669:
1670: -- Pre call to the Vertical Type User Hook
1671: --
1672: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
1673: 'Create_ServiceRequest',
1674: 'B', 'V') THEN
1675:
1676: -- hardcoded the version 2.0 shijain nov 27 2002
1734:
1735: ELSE
1736: l_org_id := p_org_id;
1737: END IF;
1738: CS_ServiceRequest_PVT.Create_SR_Validation
1739: ( p_api_name => l_api_name_full,
1740: p_service_request_rec => p_service_request_rec,
1741: p_contacts => p_contacts,
1742: p_resp_id => p_resp_id,
2587: l_audit_vals_rec.CHANGE_SITE_FLAG := 'Y';
2588: l_audit_vals_rec.site_id := l_service_request_rec.site_id;
2589: END IF;
2590:
2591: CS_ServiceRequest_PVT.Create_Audit_Record (
2592: p_api_version => 2.0,
2593: x_return_status => l_return_status,
2594: x_msg_count => x_msg_count,
2595: x_msg_data => x_msg_data,
2793:
2794:
2795: --CS_ServiceRequest_UTIL.Add_Null_Parameter_Msg(l_api_name_full, 'step #8');
2796: -- Launching the workflow (HOOK)
2797: IF (JTF_USR_HKS.Ok_To_Execute('CS_ServiceRequest_PVT', 'Create_ServiceRequest',
2798: 'W', 'W')) THEN
2799:
2800: IF (cs_servicerequest_cuhk.Ok_To_Launch_Workflow(p_request_id => l_request_id,
2801: p_service_request_rec=>l_service_request_rec)) THEN
2838: -- Make the post processing call to the user hooks
2839: --
2840: -- Post call to the Customer Type User Hook
2841: --
2842: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
2843: 'Create_ServiceRequest',
2844: 'A', 'C') THEN
2845:
2846: -- hardcoded the version 2.0 shijain nov 27 2002
2878:
2879:
2880: -- Post call to the Vertical Type User Hook
2881: --
2882: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
2883: 'Create_ServiceRequest',
2884: 'A', 'V') THEN
2885:
2886: -- hardcoded the version 2.0 shijain nov 27 2002
2968: x_sr_create_out_rec.request_id := l_request_id;
2969: x_sr_create_out_rec.request_number := l_request_number;
2970:
2971: -- Standard call for message generation
2972: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
2973: 'Create_ServiceRequest',
2974: 'M', 'M') THEN
2975:
2976: IF (cs_servicerequest_cuhk.Ok_To_Generate_Msg(p_request_id => l_request_id,
3265: -- Initialize API return status to success
3266: x_return_status := FND_API.G_RET_STS_SUCCESS;
3267:
3268: -- Call 11.5.10 version of the Update SR API
3269: CS_ServiceRequest_PVT.Update_ServiceRequest
3270: ( p_api_version => 4.0,
3271: p_init_msg_list => FND_API.G_FALSE,
3272: p_commit => p_commit,
3273: p_validation_level => p_validation_level,
3390: -- if new status has pending approval flag as 'Y' then raise
3391: -- error because SR cannot be updated to an status needing
3392: -- approval
3393: -- Added new parameters to procedure
3394: -- CS_SERVICEREQUEST_PVT.get_default_contract call
3395: -- Moved SR Audit creation after ERES processing
3396: -- If SR status needs approval then Call ERES apporval
3397: -- CS_ERES_INT_PKG.start_approval_process procedure.
3398: -- if this procedure return NO_ACTION then do the following
3974: THEN
3975: FND_MESSAGE.set_name ('CS', 'CS_SR_ITEM_SERIAL_OBSOLETE');
3976: FND_MESSAGE.set_token
3977: ( 'API_NAME'
3978: , 'CS_SERVICEREQUEST_PVT.update_servicerequest'
3979: );
3980: FND_MSG_PUB.ADD_DETAIL
3981: ( p_associated_column1 => 'CS_INCIDENTS_ALL_B.ITEM_SERIAL_NUMBER'
3982: );
3991: THEN
3992: l_service_request_rec.status_id := l_old_servicerequest_rec.incident_status_id;
3993: END IF;
3994:
3995: CS_SERVICEREQUEST_PVT.get_incident_type_details
3996: ( p_incident_type_id => l_service_request_rec.type_id
3997: , x_business_process_id => l_sr_related_data.business_process_id
3998: , x_autolaunch_workflow_flag => l_sr_related_data.autolaunch_workflow_flag
3999: , x_abort_workflow_close_flag => l_sr_related_data.abort_workflow_close_flag
4126: THEN
4127: FND_MESSAGE.set_name ('CS', 'CS_SR_MAINT_ORG_NOT_ALLOWED');
4128: FND_MESSAGE.set_token
4129: ( 'API_NAME'
4130: , 'CS_SERVICEREQUEST_PVT.update_servicerequest'
4131: );
4132: FND_MSG_PUB.ADD_DETAIL
4133: ( p_associated_column1 => 'CS_INCIDENTS_ALL_B.MAINT_ORGANIZATION_ID'
4134: );
4270: THEN
4271: FND_MESSAGE.set_name ('CS', 'CS_SR_INTERMEDIATE_STATUS');
4272: FND_MESSAGE.set_token
4273: ( 'API_NAME'
4274: , 'CS_SERVICEREQUEST_PVT.update_servicerequest'
4275: );
4276: FND_MESSAGE.set_token('STATUS_ID',l_sr_related_data.target_status_id);
4277: FND_MSG_PUB.ADD_DETAIL
4278: ( p_associated_column1 => 'CS_INCIDENTS_ALL_B.incident_status_id'
4313: );
4314: RETURN;
4315: ELSE
4316: l_last_updated_by_temp := l_service_request_rec.last_updated_by;
4317: CS_SERVICEREQUEST_PVT.initialize_rec(l_service_request_rec);
4318: -- we need to copy back intermediate status because this case will happen only if
4319: -- input status has intermediate status
4320: l_service_request_rec.status_id := l_sr_related_data.intermediate_status_id;
4321: l_service_request_rec.last_updated_by := p_service_request_rec.last_updated_by;
4339: -- Make the preprocessing call to the user hooks
4340: --
4341: -- Pre call to the Customer Type User Hook
4342: --
4343: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
4344: 'Update_ServiceRequest',
4345: 'B', 'C') THEN
4346:
4347: -- hardcoded the version 2.0 shijain nov 27 2002
4378: END IF;
4379:
4380: -- Pre call to the Vertical Type User Hook
4381: --
4382: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
4383: 'Update_ServiceRequest',
4384: 'B', 'V') THEN
4385:
4386: -- hardcoded the version 2.0 shijain nov 27 2002
4524: );
4525: END IF;
4526:
4527:
4528: CS_Servicerequest_PVT.Update_Status
4529: ( p_api_version => 2.0,
4530: p_init_msg_list => fnd_api.g_false ,
4531: p_resp_id => p_resp_id,
4532: p_validation_level => fnd_api.g_valid_level_full,
5609: l_note_index := p_notes.NEXT(l_note_index);
5610: END LOOP;
5611:
5612: -- Launching the workflow (HOOK)
5613: IF (JTF_USR_HKS.Ok_To_Execute('CS_ServiceRequest_PVT', 'Update_ServiceRequest',
5614: 'W', 'W')) THEN
5615:
5616: IF (cs_servicerequest_cuhk.Ok_To_Launch_Workflow
5617: (p_request_id => p_request_id,
5658: -- Make the post processing call to the user hooks
5659: --
5660: -- Post call to the Customer Type User Hook
5661: --
5662: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
5663: 'Update_ServiceRequest',
5664: 'A', 'C') THEN
5665:
5666: -- hardcoded the version 2.0 shijain nov 27 2002
5697: END IF;
5698:
5699: -- Post call to the Vertical Type User Hook
5700: --
5701: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
5702: 'Update_ServiceRequest',
5703: 'A', 'V') THEN
5704:
5705: -- hardcoded the version 2.0 shijain nov 27 2002
5768: END IF; /* only status update flag check */
5769:
5770:
5771: -- Standard call for message generation
5772: IF jtf_usr_hks.Ok_To_Execute('CS_ServiceRequest_PVT',
5773: 'Create_ServiceRequest',
5774: 'M', 'M') THEN
5775:
5776: IF (cs_servicerequest_cuhk.Ok_To_Generate_Msg(p_request_id => p_request_id,
5830: IF l_approval_status = 'NO_ACTION'
5831: THEN
5832: -- validated orginal target status
5833: CS_ServiceRequest_UTIL.Validate_Updated_Status
5834: ( p_api_name => 'CS_SERVICEREQUEST_PVT.update_servicerequest'
5835: , p_parameter_name => 'p_status_id'
5836: , p_resp_id => p_resp_id
5837: , p_new_status_id => l_sr_related_data.target_status_id
5838: , p_old_status_id => l_old_servicerequest_rec.incident_status_id
6050: END IF;
6051: l_audit_vals_rec.old_site_id := l_old_ServiceRequest_rec.site_id;
6052: l_audit_vals_rec.site_id := l_service_request_rec.site_id;
6053:
6054: CS_ServiceRequest_PVT.Create_Audit_Record
6055: ( p_api_version => 2.0
6056: , x_return_status => l_return_status
6057: , x_msg_count => x_msg_count
6058: , x_msg_data => x_msg_data
6798: (l_sr_related_data.old_disallow_request_update = 'Y') THEN
6799: FND_MESSAGE.set_name('CS','CS_ERES_SR_FROZEN_STATUS');
6800: FND_MSG_PUB.ADD;
6801: --FND_MESSAGE.set_name('CS','CS_SR_INTERMEDIATE_STATUS');
6802: --FND_MESSAGE.set_token('API_NAME','CS_SERVICEREQUEST_PVT.update_status');
6803: --FND_MESSAGE.set_token('STATUS_ID',l_servicerequest_rec.incident_status_id);
6804: --FND_MSG_PUB.ADD_DETAIL(p_associated_column1=>'CS_INCIDENTS_ALL_B.incident_status_id');
6805: RAISE FND_API.G_EXC_ERROR;
6806: END IF; -- l_pending approval flag is Y
6825: IF l_sr_related_data.pending_approval_flag = 'Y' THEN
6826: FND_MESSAGE.set_name ('CS', 'CS_SR_INTERMEDIATE_STATUS');
6827: FND_MESSAGE.set_token
6828: ( 'API_NAME'
6829: , 'CS_SERVICEREQUEST_PVT.update_status'
6830: );
6831: FND_MESSAGE.set_token('STATUS_ID',p_status_id);
6832: FND_MSG_PUB.ADD_DETAIL
6833: ( p_associated_column1 => 'CS_INCIDENTS_ALL_B.incident_status_id'
6837: */
6838: IF l_sr_related_data.intermediate_status_id IS NOT NULL
6839: THEN
6840:
6841: CS_ServiceRequest_PVT.Update_ServiceRequest
6842: ( p_api_version => 4.0
6843: , p_init_msg_list => p_init_msg_list
6844: , p_commit => p_commit
6845: , p_validation_level => p_validation_level
19419:
19420: -- Initialize API return status to success
19421: x_return_status := FND_API.G_RET_STS_SUCCESS;
19422:
19423: CS_ServiceRequest_PVT.Create_ServiceRequest
19424: ( p_api_version => 3.0,
19425: p_init_msg_list => p_init_msg_list,
19426: p_commit => p_commit,
19427: p_validation_level => p_validation_level,
19957: -- IN :
19958: -- OUT :
19959: --
19960: -- Description : This is a wrapper for procedure
19961: -- cs_servicerequest_pvt.process_sr_ext_attrs
19962: --
19963: -- Modification History:
19964: -- Date Name Desc
19965: -- -------- -------- -----------------------------------------------------------
20899: END IF ;
20900:
20901: END Log_SR_PVT_Parameters;
20902:
20903: END CS_ServiceRequest_PVT;