[Home] [Help]
1: PACKAGE BODY CSD_REPAIR_MANAGER_UTIL as
2: /* $Header: csdurpmb.pls 120.7.12020000.3 2013/04/09 05:14:15 subhat ship $ */
3: -- Start of Comments
4: -- Package name : CSD_REPAIR_MANAGER_UTIL
5: -- Purpose : This package will be used as utility package for repair manager portal
1: PACKAGE BODY CSD_REPAIR_MANAGER_UTIL as
2: /* $Header: csdurpmb.pls 120.7.12020000.3 2013/04/09 05:14:15 subhat ship $ */
3: -- Start of Comments
4: -- Package name : CSD_REPAIR_MANAGER_UTIL
5: -- Purpose : This package will be used as utility package for repair manager portal
6: --
7: --
8: -- History : 15/07/2009, Created by Sudheer Bhat
258: x_msg_count OUT NOCOPY NUMBER,
259: x_msg_data OUT NOCOPY VARCHAR2)
260: IS
261: lc_api_version CONSTANT NUMBER := 1.0;
262: lc_api_name CONSTANT VARCHAR2(80) := 'CSD_REPAIR_MANAGER_UTIL.create_internal_orders';
263: l_source_ou NUMBER := fnd_profile.value('ORG_ID');
264: l_source_org NUMBER := fnd_profile.value('CSD_DEF_REP_INV_ORG');
265: l_dest_ou NUMBER := fnd_profile.value('ORG_ID');
266: l_dest_org NUMBER;
730: )
731: IS
732:
733: l_api_version_number constant number := 1.0;
734: l_api_name constant varchar2(100) := 'CSD_REPAIR_MANAGER_UTIL.MASS_UPDATE_REPAIR_ORDERS';
735: TYPE l_repln_rec_tbl_type is table of Csd_Repairs_Pub.REPLN_Rec_Type
736: index by binary_integer;
737: l_repln_rec_tbl l_repln_rec_tbl_type;
738: l_repobj_ver JTF_NUMBER_TABLE := p_ro_obj_ver_nos;
1214: x_msg_count OUT NOCOPY NUMBER,
1215: x_msg_data OUT NOCOPY VARCHAR2
1216: )
1217: IS
1218: lc_api_name constant varchar(100) := 'CSD_REPAIR_MANAGER_UTIL.MASS_CREATE_ATTACHMENTS';
1219: l_api_version_number constant number := 1.0;
1220: lc_data_type_short_text constant number := 1;
1221: lc_data_type_long_text constant number := 2;
1222: lc_data_type_file constant number := 6;
1460: x_msg_data OUT NOCOPY VARCHAR2,
1461: x_incident_id OUT NOCOPY NUMBER)
1462: IS
1463: l_api_version_number number := 1.0;
1464: lc_api_name constant varchar2(100) := 'CSD_REPAIR_MANAGER_UTIL.MASS_CREATE_REPAIR_ORDERS';
1465:
1466: l_repln_tbl csd_repairs_pub.repln_tbl_type;
1467:
1468: x_repair_line_id number;
1558: p_one_sr_per_group in varchar2 default 'Y',
1559: p_group_id in number
1560: )
1561: is
1562: lc_api_name varchar2(100) := 'csd_repair_manager_util.mass_create_repair_orders_cp';
1563: --l_interface_rec_type csd.csd_repairs_interface%rowtype;
1564: type l_interface_tbl_type is table of csd_repairs_interface%rowtype index by binary_integer;
1565: --type repln_tbl_type is table of csd_repairs_pub.repln_rec_type;
1566: l_repln_tbl csd_repairs_pub.repln_tbl_type;
1680: where transaction_id = l_interface_tbl(i).transaction_id;
1681: end if;
1682: end if;
1683: -- Create the SR, RO and product transaction lines.
1684: csd_repair_manager_util.create_sr_repair_order
1685: (p_api_version => 1.0,
1686: p_init_msg_list => fnd_api.g_true,
1687: p_commit => fnd_api.g_false,
1688: p_sr_rec => l_sr_tbl(i),
1765: l_api_version_number constant number := 1.0;
1766: l_service_request_rec CSD_PROCESS_PVT.SERVICE_REQUEST_REC := CSD_PROCESS_UTIL.SR_REC;
1767: x_incident_number varchar2(30);
1768: l_sr_notes_tbl cs_servicerequest_pub.notes_table;
1769: lc_api_name constant varchar2(100) := 'csd_repair_manager_util.create_sr_repair_order';
1770: l_instance_rec csd_mass_rcv_pvt.instance_rec_type;
1771: l_create_instance boolean default false;
1772: l_rule_input_rec CSD_RULES_ENGINE_PVT.CSD_RULE_INPUT_REC_TYPE;
1773:
2478: x_return_status OUT NOCOPY varchar2,
2479: x_msg_count OUT NOCOPY number,
2480: x_msg_data OUT NOCOPY varchar2)
2481: is
2482: lc_api_name constant varchar2(100) := 'csd_repair_manager_util.update_external_reference';
2483: l_object_version_number number;
2484: l_instance_rec csi_datastructures_pub.instance_rec;
2485: l_ext_attrib_values_tbl csi_datastructures_pub.extend_attrib_values_tbl;
2486: l_party_tbl csi_datastructures_pub.party_tbl;
2598: END LOOP;
2599: RETURN l_value;
2600: END string_aggregate;
2601:
2602: END CSD_REPAIR_MANAGER_UTIL;