[Home] [Help]
38: Begin
39: x_return_status := FND_API.G_RET_STS_SUCCESS;
40: select charge_upload_status,ib_update_status,spare_update_status
41: into l_charge_upload_status,l_ib_update_status,l_spare_update_status
42: from csf_debrief_lines
43: where debrief_line_id = p_debrief_line_id
44: for update nowait;
45: Exception
46: WHEN RECORD_LOCK_EXCEPTION THEN
250: cdl.removed_product_id,
251: cdl.expenditure_org_id,
252: cdl.project_id,
253: cdl.project_task_id
254: from csf_debrief_lines cdl
255: where cdl.debrief_header_id = p_debrief_header_id
256: and nvl(cdl.quantity,-1) <> 0
257: and nvl(cdl.inventory_item_id,-1) <> 9999999
258: and nvl(p_debrief_line_id,cdl.debrief_line_id)=cdl.debrief_line_id;
470: cursor c_error_dbf_items (p_debrief_header_id number, p_inventory_item_id number) is
471: SELECT inventory_item_id,
472: uom_code,
473: SUM(quantity) sum_qty
474: FROM csf_debrief_lines
475: WHERE debrief_header_id = p_debrief_header_id
476: AND inventory_item_id = nvl(p_inventory_item_id, inventory_item_id)
477: AND NVL(spare_update_status, 'FAILED') <> 'SUCCEEDED'
478: GROUP BY inventory_item_id, uom_code;
851: cs_std.get_item_valdn_orgzn_id));
852: l_subinventory_code := nvl(l_issuing_sub_inventory_code,
853: l_receiving_sub_inventory_code);
854:
855: csf_debrief_lines_pkg.update_row(
856: p_debrief_line_id => l_debrief_line_id,
857: p_error_text => null,
858: p_charge_upload_status => l_spare_update_status,
859: p_spare_update_status => l_spare_update_status,
1099: if l_charges_interface_status <> 'FAILED' then
1100: l_charges_interface_status := fnd_api.g_miss_char;
1101: end if;
1102: log('main','calling update_row when failed');
1103: csf_debrief_lines_pkg.update_row(
1104: p_debrief_line_id => l_debrief_line_id,
1105: p_error_text => substr(l_msg_data,1,2000),
1106: p_charge_upload_status => l_charges_interface_status,
1107: p_last_updated_by => fnd_global.user_id,
1112: else
1113:
1114: if l_charges_interface_status = 'SUCCEEDED' then
1115: log('main','calling update_row when succeeded');
1116: csf_debrief_lines_pkg.update_row(
1117: p_debrief_line_id => l_debrief_line_id,
1118: p_error_text => null,
1119: p_charge_upload_status => l_charges_interface_status,
1120: p_last_updated_by => fnd_global.user_id,
1128: elsif l_create_charge_flag = 'N' then
1129: l_charges_interface_status := 'SUCCEEDED';
1130: l_charge_upload_status := 'SUCCEEDED';
1131: log('main','calling update_row when create_charge_flag = N');
1132: csf_debrief_lines_pkg.update_row(
1133: p_debrief_line_id => l_debrief_line_id,
1134: p_error_text => null,
1135: p_charge_upload_status => l_charges_interface_status,
1136: p_last_updated_by => fnd_global.user_id,
1221: if l_ib_interface_status <> 'FAILED' then
1222: l_ib_interface_status := fnd_api.g_miss_char;
1223: end if;
1224: log('main','update_row a');
1225: csf_debrief_lines_pkg.update_row(
1226: p_debrief_line_id => l_debrief_line_id,
1227: p_error_text => substr(l_msg_data,1,2000),
1228: p_charge_upload_status => l_charges_interface_status,
1229: p_ib_update_status => l_ib_interface_status,
1242: if l_line_category_code <> 'RETURN' then
1243: l_instance_id := l_new_instance_id;
1244: end if;
1245: log('main','update_row b');
1246: csf_debrief_lines_pkg.update_row(
1247: p_debrief_line_id => l_debrief_line_id,
1248: p_error_text => null,
1249: p_instance_id => l_instance_id,
1250: p_ib_update_status => l_ib_interface_status,
1325: p_trx_source_line_id => l_debrief_line_id,
1326: p_transaction_source_name => l_debrief_number,
1327: p_transaction_date => l_service_date );
1328:
1329: update csf_debrief_lines
1330: set material_transaction_id = l_inv_transaction_id
1331: where debrief_line_id = l_debrief_line_id;
1332:
1333: log('main','l_return_status:'||l_return_status);
1335: if l_RETURN_STATUS = 'S' then -- success
1336: l_inv_interface_status := 'SUCCEEDED';
1337: l_msg_data := null;
1338: log('main','calling update_row c');
1339: csf_debrief_lines_pkg.update_row(
1340: p_debrief_line_id => l_debrief_line_id,
1341: p_error_text => null,
1342: p_spare_update_status => l_inv_interface_status,
1343: p_last_updated_by => fnd_global.user_id,
1468: if l_RETURN_STATUS = 'S' then -- success
1469: l_charges_interface_status := 'SUCCEEDED';
1470: l_msg_data := null;
1471: log('main','calling update_row d');
1472: csf_debrief_lines_pkg.update_row(
1473: p_debrief_line_id => l_debrief_line_id,
1474: p_error_text => substr(l_msg_data,1,2000),
1475: p_charge_upload_status => l_charges_interface_status,
1476: p_last_updated_by => fnd_global.user_id,
1507: if l_inv_interface_status <> 'FAILED' then
1508: l_inv_interface_status := fnd_api.g_miss_char;
1509: end if;
1510: log('main','calling update_row e');
1511: csf_debrief_lines_pkg.update_row(
1512: p_debrief_line_id => l_debrief_line_id,
1513: p_error_text => substr(l_msg_data,1,2000),
1514: p_charge_upload_status => l_charges_interface_status,
1515: p_ib_update_status => l_ib_interface_status,
1528: or (l_ib_update_status = 'SUCCEEDED' and l_trackable ='Y')
1529: or l_trackable ='N' or l_trackable is null ) then
1530: --we tried to update inventory
1531: log('main','calling update_row f l_inv_interface_status:'||l_inv_interface_status);
1532: csf_debrief_lines_pkg.update_row(
1533: p_debrief_line_id => l_debrief_line_id,
1534: p_error_text => null,
1535: p_spare_update_status => l_inv_interface_status,
1536: p_last_updated_by => fnd_global.user_id,
1595: else
1596: l_msg_data := null;
1597: end if;
1598:
1599: csf_debrief_lines_pkg.update_row(
1600: p_debrief_line_id => l_debrief_line_id,
1601: p_error_text => substr(l_msg_data,1,2000));
1602:
1603: end if; -- end of charges status check