DBA Data[Home] [Help]

APPS.CSD_REPAIRS_UTIL dependencies on CSD_REPAIRS_UTIL

Line 1: Package BODY Csd_Repairs_Util AS

1: Package BODY Csd_Repairs_Util AS
2: /* $Header: csdxutlb.pls 120.21.12020000.5 2013/04/09 05:15:50 subhat ship $ */
3: --
4: -- Package name : CSD_REPAIRS_UTIL
5: -- Purpose : This package contains utility programs for the Depot

Line 4: -- Package name : CSD_REPAIRS_UTIL

1: Package BODY Csd_Repairs_Util AS
2: /* $Header: csdxutlb.pls 120.21.12020000.5 2013/04/09 05:15:50 subhat ship $ */
3: --
4: -- Package name : CSD_REPAIRS_UTIL
5: -- Purpose : This package contains utility programs for the Depot
6: -- Repair module. Access is restricted to Oracle Depot
7: -- Repair Internal Development.
8: -- History :

Line 23: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CSD_REPAIRS_UTIL';

19: -- 120.2 07/13/05 vparvath Added utility proc for webservice
20: --
21: -- NOTE :
22: --
23: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CSD_REPAIRS_UTIL';
24: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdxutlb.pls';
25: g_debug NUMBER := Csd_Gen_Utility_Pvt.g_debug_level;
26:
27: procedure debug( l_msg in varchar2)

Line 103: p_attr_values IN OUT NOCOPY CSD_REPAIRS_UTIL.DEF_Rec_Type,

99:
100: FUNCTION Is_DescFlex_Valid
101: ( p_api_name IN VARCHAR2,
102: p_desc_flex_name IN VARCHAR2,
103: p_attr_values IN OUT NOCOPY CSD_REPAIRS_UTIL.DEF_Rec_Type,
104: -- bug#7151536, subhat.
105: p_validate_only IN VARCHAR2 := FND_API.G_TRUE
106: ) RETURN BOOLEAN IS
107: --

Line 466: x_DEF_Rec OUT NOCOPY Csd_Repairs_Util.DEF_Rec_Type

462: p_attribute27 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute28 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute29 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute30 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: x_DEF_Rec OUT NOCOPY Csd_Repairs_Util.DEF_Rec_Type
467: ) IS
468: --
469: BEGIN
470: --

Line 776: Fnd_Log.STRING (Fnd_Log.LEVEL_PROCEDURE, 'csd.plsql.csd_repairs_util.check_task_n_wipjob.begin',

772: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
773: l_debug_level := Fnd_Log.G_CURRENT_RUNTIME_LEVEL;
774:
775: IF (Fnd_Log.LEVEL_PROCEDURE >= l_debug_level) THEN
776: Fnd_Log.STRING (Fnd_Log.LEVEL_PROCEDURE, 'csd.plsql.csd_repairs_util.check_task_n_wipjob.begin',
777: '-------------Entered check_task_n_wipjob----------------');
778: END IF;
779:
780:

Line 798: Fnd_Log.STRING (Fnd_Log.LEVEL_EVENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',

794: ****/
795: IF( p_repair_status = C_CLOSED_STATUS) THEN
796:
797: IF (Fnd_Log.LEVEL_EVENT >= l_debug_level) THEN
798: Fnd_Log.STRING (Fnd_Log.LEVEL_EVENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',
799: '-------------status is being changed to close,ro['||p_repair_line_id||']-----');
800: END IF;
801:
802: IF (l_repair_mode = C_WIP_MODE) THEN

Line 805: Fnd_Log.STRING (Fnd_Log.LEVEL_STATEMENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',

801:
802: IF (l_repair_mode = C_WIP_MODE) THEN
803:
804: IF (Fnd_Log.LEVEL_STATEMENT >= l_debug_level) THEN
805: Fnd_Log.STRING (Fnd_Log.LEVEL_STATEMENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',
806: '-------------checking for open jobs---------------');
807: END IF;
808:
809: OPEN wipjob_cur;

Line 814: Fnd_Log.STRING (Fnd_Log.LEVEL_STATEMENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',

810: FETCH wipjob_cur INTO l_tmp_char;
811: IF(wipjob_cur%NOTFOUND) THEN
812: CLOSE wipjob_cur;
813: IF (Fnd_Log.LEVEL_STATEMENT >= l_debug_level) THEN
814: Fnd_Log.STRING (Fnd_Log.LEVEL_STATEMENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',
815: '-------------there are open jobs---------------');
816: END IF;
817: Fnd_Message.set_name('CSD', 'CSD_API_OPEN_WIP_JOBS');
818: Fnd_Msg_Pub.ADD;

Line 825: Fnd_Log.STRING (Fnd_Log.LEVEL_STATEMENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',

821: CLOSE wipjob_cur;
822: ELSIF (l_repair_mode = C_TASK_MODE) THEN
823:
824: IF (Fnd_Log.LEVEL_STATEMENT >= l_debug_level) THEN
825: Fnd_Log.STRING (Fnd_Log.LEVEL_STATEMENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',
826: '-------------checking for open tasks---------------');
827: END IF;
828:
829: OPEN task_cur;

Line 834: Fnd_Log.STRING (Fnd_Log.LEVEL_STATEMENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',

830: FETCH task_cur INTO l_tmp_char;
831: IF(task_cur%NOTFOUND) THEN
832: CLOSE task_cur;
833: IF (Fnd_Log.LEVEL_STATEMENT >= l_debug_level) THEN
834: Fnd_Log.STRING (Fnd_Log.LEVEL_STATEMENT, 'csd.plsql.csd_repairs_util.check_task_n_wipjob',
835: '-------------there are open tasks---------------');
836: END IF;
837: Fnd_Message.set_name('CSD', 'CSD_API_OPEN_TASKS');
838: Fnd_Msg_Pub.ADD;

Line 846: Fnd_Log.STRING (Fnd_Log.level_procedure, 'csd.plsql.csd_repairs_util.check_task_n_wipjob.end',

842: END IF;
843: END IF;
844:
845: IF (Fnd_Log.level_procedure >= l_debug_level) THEN
846: Fnd_Log.STRING (Fnd_Log.level_procedure, 'csd.plsql.csd_repairs_util.check_task_n_wipjob.end',
847: '-------------Leaving check_task_n_wipjob----------------');
848: END IF;
849:
850: EXCEPTION

Line 856: 'csd.plsql.csd_repairs_util.check_task_n_wipjob',

852: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
853: Fnd_Msg_Pub.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
854: IF ( Fnd_Log.LEVEL_ERROR >= Fnd_Log.G_CURRENT_RUNTIME_LEVEL ) THEN
855: Fnd_Log.STRING(Fnd_Log.LEVEL_ERROR,
856: 'csd.plsql.csd_repairs_util.check_task_n_wipjob',
857: 'EXC_ERROR ['||x_msg_data||']');
858: END IF;
859:
860: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 865: 'csd.plsql.csd_repairs_util.check_task_n_wipjob',

861: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
862: Fnd_Msg_Pub.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data );
863: IF ( Fnd_Log.LEVEL_EXCEPTION >= Fnd_Log.G_CURRENT_RUNTIME_LEVEL ) THEN
864: Fnd_Log.STRING(Fnd_Log.LEVEL_EXCEPTION,
865: 'csd.plsql.csd_repairs_util.check_task_n_wipjob',
866: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
867: END IF;
868:
869: WHEN OTHERS THEN

Line 879: 'csd.plsql.csd_repairs_util.check_task_n_wipjob',

875: Fnd_Msg_Pub.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data );
876:
877: IF ( Fnd_Log.LEVEL_EXCEPTION >= Fnd_Log.G_CURRENT_RUNTIME_LEVEL ) THEN
878: Fnd_Log.STRING(Fnd_Log.LEVEL_EXCEPTION,
879: 'csd.plsql.csd_repairs_util.check_task_n_wipjob',
880: 'SQL Message ['||SQLERRM||']');
881: END IF;
882:
883:

Line 932: Fnd_Log.STRING (Fnd_Log.LEVEL_PROCEDURE, 'csd.plsql.csd_repairs_util.Convert_Status_val_to_Id.begin',

928: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
929: l_debug_level := Fnd_Log.G_CURRENT_RUNTIME_LEVEL;
930:
931: IF (Fnd_Log.LEVEL_PROCEDURE >= l_debug_level) THEN
932: Fnd_Log.STRING (Fnd_Log.LEVEL_PROCEDURE, 'csd.plsql.csd_repairs_util.Convert_Status_val_to_Id.begin',
933: '-------------Entered Convert_Status_val_to_Id----------------');
934: END IF;
935:
936:

Line 1006: Fnd_Log.STRING (Fnd_Log.level_procedure, 'csd.plsql.csd_repairs_util.Convert_Status_Val_to_Id.end',

1002:
1003:
1004:
1005: IF (Fnd_Log.level_procedure >= l_debug_level) THEN
1006: Fnd_Log.STRING (Fnd_Log.level_procedure, 'csd.plsql.csd_repairs_util.Convert_Status_Val_to_Id.end',
1007: '-------------Leaving Convert_Status_Val_to_Id----------------');
1008: END IF;
1009:
1010: END Convert_status_Val_to_Id;

Line 1326: 'CSD.PLSQL.CSD_REPAIRS_UTIL.CHANGE_ITEM_IB_OWNER.BEGIN',

1322: savepoint CHANGE_ITEM_IB_OWNER;
1323:
1324: if (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1325: fnd_log.STRING (fnd_log.level_procedure,
1326: 'CSD.PLSQL.CSD_REPAIRS_UTIL.CHANGE_ITEM_IB_OWNER.BEGIN',
1327: 'Enter - Change Item IB Owner');
1328: end if;
1329:
1330: -- Initialize API return status to success

Line 1485: 'CSD.PLSQL.CSD_REPAIRS_UTIL.CHANGE_ITEM_IB_OWNER.END',

1481: COMMIT WORK;
1482:
1483: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1484: fnd_log.STRING (fnd_log.level_procedure,
1485: 'CSD.PLSQL.CSD_REPAIRS_UTIL.CHANGE_ITEM_IB_OWNER.END',
1486: 'Exit - Change Item IB Owner');
1487: End if;
1488:
1489: EXCEPTION

Line 1587: lc_api_name CONSTANT VARCHAR2(50) := 'csd_repairs_util.get_contract_resolve_by_date';

1583: x_msg_data OUT NOCOPY VARCHAR2,
1584: x_resolve_by_date OUT NOCOPY DATE
1585: ) IS
1586: -- define constants
1587: lc_api_name CONSTANT VARCHAR2(50) := 'csd_repairs_util.get_contract_resolve_by_date';
1588:
1589: -- define variables
1590: l_server_timezone_id NUMBER;
1591:

Line 1766: lc_mod_name varchar2(100) := 'csd.plsql.csd_repairs_util.auto_update_ro_status';

1762: l_repair_type_id number;
1763: l_object_version_number number;
1764: lc_log_level number := fnd_log.g_current_runtime_level;
1765: lc_procedure_level number := fnd_log.level_procedure;
1766: lc_mod_name varchar2(100) := 'csd.plsql.csd_repairs_util.auto_update_ro_status';
1767: lc_api_version_number number := 1.0;
1768: lc_api_name varchar2(60) := 'auto_update_ro_status';
1769: l_un_rcvd_lines_exists varchar2(3);
1770:

Line 1998: lc_mod_name varchar2(100) := 'csd.plsql.csd_repairs_util.default_ro_attrs_from_rule';

1994: l_repair_mode VARCHAR2(30) := ''; -- repair mode display name
1995: l_auto_process_rma VARCHAR2(30) := '';
1996: lc_log_level number := fnd_log.g_current_runtime_level;
1997: lc_procedure_level number := fnd_log.level_procedure;
1998: lc_mod_name varchar2(100) := 'csd.plsql.csd_repairs_util.default_ro_attrs_from_rule';
1999: lc_api_version_number number := 1.0;
2000: lc_api_name varchar2(60) := 'default_ro_attrs_from_rule';
2001:
2002: BEGIN

Line 2276: lc_mod_name CONSTANT VARCHAR2(40) := 'csd_repairs_util.create_requisition';

2272: ) IS
2273:
2274: lc_api_version CONSTANT NUMBER default 1.0;
2275: lc_api_name CONSTANT VARCHAR2(30) := 'CREATE_REQUISITION';
2276: lc_mod_name CONSTANT VARCHAR2(40) := 'csd_repairs_util.create_requisition';
2277:
2278: l_person_id NUMBER;
2279: l_material_account JTF_NUMBER_TABLE;
2280: l_material_variance_account JTF_NUMBER_TABLE;

Line 3025: lc_mod_name CONSTANT VARCHAR2(50) := 'csd_repairs_util.create_repair_warranty';

3021: )
3022: IS
3023: lc_api_version CONSTANT NUMBER DEFAULT 1.0;
3024: lc_api_name CONSTANT VARCHAR2(30) := 'create_repair_warranty';
3025: lc_mod_name CONSTANT VARCHAR2(50) := 'csd_repairs_util.create_repair_warranty';
3026:
3027: l_repair_line_id NUMBER;
3028: l_incident_id NUMBER;
3029: l_service_item_id NUMBER;

Line 3693: lc_mod_name CONSTANT VARCHAR2(50) := 'csd_repairs_util.create_inst_party_relation';

3689: ) IS
3690:
3691: lc_api_version CONSTANT NUMBER DEFAULT 1.0;
3692: lc_api_name CONSTANT VARCHAR2(30) := 'create_inst_party_relation';
3693: lc_mod_name CONSTANT VARCHAR2(50) := 'csd_repairs_util.create_inst_party_relation';
3694:
3695: l_exists VARCHAR2(1);
3696:
3697: -- csi datastructures.

Line 3849: END Csd_Repairs_Util;

3845: END IF;
3846:
3847: END create_inst_party_relation;
3848:
3849: END Csd_Repairs_Util;