[Home] [Help]
643: END;
644:
645: IF (l_crt_inst_party_relation IS NOT NULL AND l_relationship IS NULL)
646: THEN
647: csd_repairs_util.create_inst_party_relation
648: (p_api_version_number => 1.0,
649: p_commit => 'F',
650: p_init_msg_list => 'F',
651: x_return_status => x_return_status,
1028: l_owner_party_id Number;
1029: l_instance_id Number;
1030: l_revision_qty_control_code Number;
1031: l_install_base_flag Varchar2(1);
1032: l_repln_rec csd_repairs_pub.repln_rec_type;
1033: l_blkrcv_rec csd_bulk_receive_items_b%ROWTYPE;
1034: c_non_serialized CONSTANT Number := 1;
1035: l_instance_rec csd_mass_rcv_pvt.instance_rec_type;
1036: l_revision Varchar2(30);
1233: Close c_get_install_site_use_id;
1234:
1235: fnd_profile.get('SERVER_TIMEZONE_ID', l_server_tz_id);
1236:
1237: CSD_REPAIRS_UTIL.GET_ENTITLEMENTS(
1238: p_api_version_number => 1.0,
1239: p_init_msg_list => fnd_api.g_false,
1240: p_commit => fnd_api.g_false,
1241: p_contract_number => null,
1360: End if;
1361:
1362:
1363: -- Call the Repairs private API
1364: CSD_REPAIRS_PVT.Create_Repair_Order
1365: (p_api_version_number => 1.0,
1366: p_commit => fnd_api.g_false,
1367: p_init_msg_list => fnd_api.g_true,
1368: p_validation_level => fnd_api.g_valid_level_full,
1810: -- end 12.2 changes, subhat
1811: from
1812: csd_product_txns_v cpt,
1813: cs_incidents_all_b cib,
1814: csd_repairs cr,
1815: mtl_system_items_kfv mtl
1816: where cpt.repair_line_id = p_repair_line_id
1817: and cr.repair_line_id = cpt.repair_line_id
1818: and cib.incident_id = cr.incident_id
2325: -- Cursor to get Repair Order number
2326: Cursor c_get_ro_details(p_repair_line_id in number) is
2327: Select repair_number
2328: ,status
2329: from csd_repairs
2330: where repair_line_id = p_repair_line_id;
2331:
2332: -- Cursor to get Item description
2333: Cursor c_get_item_desc(p_inventory_item_id in number) is
2623: l_no_exact_match varchar2(3) := 'N';
2624:
2625:
2626: lc_sql_string_ro varchar2(2000) :=' select sr.incident_id,cr.repair_line_id,cr.quantity,''N'',''N''' ||
2627: ' from cs_incidents_all_b sr,csd_repairs cr,csd_repair_types_b crt '||
2628: ' where cr.inventory_item_id = :p_inv_item_id '||
2629: ' and cr.status = ''O'' '||
2630: ' and cr.incident_id = sr.incident_id '||
2631: ' and sr.account_id = :p_acc_id '||
2646: ' AND cpt1.action_type = ''RMA'' '||
2647: ' AND ((cpt1.action_code = ''LOANER'' AND cpt1.prod_txn_status IN (''CANCELLED'',''RECEIVED''))AND ' ||
2648: ' (cpt1.action_code = ''CUST_PROD'' AND cpt1.prod_txn_status IN (''CANCELLED'',''RECEIVED'')) )) ';
2649:
2650: l_ro_query_sql varchar2(2000) := ' select repair_line_id from csd_repairs where '||
2651: ' incident_id := :b_incident_id and '||
2652: ' status := ''O'' ' ;
2653: l_sql_string_tmp varchar2(2000);
2654: l_repair_line_ids_in varchar2(2000);
2783: into x_sr_ro_rma_tbl(l_counter).incident_id,x_sr_ro_rma_tbl(l_counter).repair_line_id,
2784: x_sr_ro_rma_tbl(l_counter).create_sr_flag,x_sr_ro_rma_tbl(l_counter).create_ro_flag
2785: from (
2786: select sr.incident_id,cr.repair_line_id,'N' create_sr_flag,'N' create_ro_flag
2787: from csd_repairs cr,cs_incidents_all_b sr
2788: where cr.inventory_item_id = x_sr_ro_rma_tbl(l_counter).inventory_item_id
2789: and cr.status = 'O'
2790: and cr.incident_id = sr.incident_id
2791: and sr.account_id = x_sr_ro_rma_tbl(l_counter).cust_acct_id
2832: x_sr_ro_rma_tbl(l_counter).incident_id,
2833: x_sr_ro_rma_tbl(l_counter).repair_line_id,
2834: x_sr_ro_rma_tbl(l_counter).create_sr_flag,
2835: x_sr_ro_rma_tbl(l_counter).create_ro_flag
2836: from csd_repairs cr,
2837: csd_product_transactions cpt,
2838: cs_incidents_all_b sr,
2839: cs_estimate_details ced
2840: where cr.incident_id = sr.incident_id
2881: into x_sr_ro_rma_tbl(l_counter).incident_id,x_sr_ro_rma_tbl(l_counter).repair_line_id,
2882: x_sr_ro_rma_tbl(l_counter).create_sr_flag,x_sr_ro_rma_tbl(l_counter).create_ro_flag
2883: from(
2884: select sr.incident_id,cr.repair_line_id,'N' create_sr_flag,'N' create_ro_flag
2885: from csd_repairs cr,cs_incidents_all_b sr
2886: where cr.inventory_item_id = x_sr_ro_rma_tbl(l_counter).inventory_item_id
2887: and cr.status = 'O'
2888: and cr.incident_id = sr.incident_id
2889: and sr.account_id = x_sr_ro_rma_tbl(l_counter).cust_acct_id
2931: x_sr_ro_rma_tbl(l_counter).incident_id,
2932: x_sr_ro_rma_tbl(l_counter).repair_line_id,
2933: x_sr_ro_rma_tbl(l_counter).create_sr_flag,
2934: x_sr_ro_rma_tbl(l_counter).create_ro_flag
2935: FROM csd_repairs cr,
2936: csd_product_transactions cpt,
2937: cs_incidents_all_b sr
2938: WHERE cr.incident_id = sr.incident_id
2939: AND sr.account_id = x_sr_ro_rma_tbl(l_counter).cust_acct_id
3049: l_matching_rma_tbl
3050: from csd_product_transactions cpt,
3051: cs_estimate_details ced,
3052: oe_order_lines_all ool,
3053: csd_repairs cr,
3054: csd_repair_types_b crtb
3055: where
3056: cpt.repair_line_id = p_repair_line_id and
3057: cpt.action_type = 'RMA' and
3121: l_matching_rma_tbl
3122: from csd_product_transactions cpt,
3123: cs_estimate_details ced,
3124: oe_order_lines_all ool,
3125: csd_repairs cr
3126: where
3127: cpt.repair_line_id = p_repair_line_id and
3128: cpt.action_type = 'RMA' and
3129: cpt.action_code = 'LOANER' and
3279: l_prod_txn_rec.bill_to_account_id := l_prod_txn_rec.ship_to_account_id;
3280: -- before calling the product transactions api, need to update the repair order quantity.
3281: -- otherwise the quantity validations will fail in the prod txn api.
3282:
3283: update csd_repairs
3284: set quantity = (p_rma_quantity + p_new_rma_qty)
3285: where repair_line_id = p_repair_line_id
3286: and quantity = p_rma_quantity;
3287:
3523: cpt.lot_number
3524: from
3525: csd_product_txns_v cpt,
3526: cs_incidents_all_b cib,
3527: csd_repairs cr,
3528: mtl_system_items_kfv mtl
3529: where cpt.repair_line_id = p_repair_line_id
3530: and cr.repair_line_id = cpt.repair_line_id
3531: and cib.incident_id = cr.incident_id