[Home] [Help]
562: fdh.assigned_to fa_employee_id,
563: cia.asset_quantity instance_asset_qty,
564: cia.instance_asset_id
565: FROM fa_distribution_history fdh,
566: csi_i_assets cia,
567: fa_additions fa,
568: fa_books fb,
569: csi_item_instances cii
570: WHERE cii.instance_id = c_instance_id
696: l_csi_txn_rec csi_datastructures_pub.transaction_rec ;
697:
698: CURSOR inst_asset_cur (c_instance_asset_id IN NUMBER) IS
699: SELECT cia.object_version_number
700: FROM csi_i_assets cia
701: WHERE cia.instance_asset_id = c_instance_asset_id ;
702:
703: BEGIN
704: x_return_status := fnd_api.g_ret_sts_success ;
892: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
893: l_asset_dist_tbl FA_API_TYPES.asset_dist_tbl_type ;
894: i PLS_INTEGER ;
895: l_transaction_units NUMBER ;
896: l_upd_csi_i_assets VARCHAR2(1);
897: l_hook_used number;
898: l_fnd_success VARCHAR2(1);
899: l_fnd_error VARCHAR2(1);
900: l_asset_attrib_rec CSE_DATASTRUCTURES_PUB.asset_attrib_rec;
912: l_fnd_success := FND_API.G_RET_STS_SUCCESS;
913: l_fnd_error := FND_API.G_RET_STS_ERROR;
914: x_return_status := l_fnd_success ;
915: l_calling_fn := 'OAT';
916: l_upd_csi_i_assets := 'N';
917:
918: IF p_src_fa_inst_dtls_rec.fa_location_id <> p_dest_fa_dist_rec.location_id THEN
919: debug('Source and Destination Location are different, perfroming Dist. Transfer');
920:
982: l_error_msg := cse_util_pkg.dump_error_stack;
983: debug('Error :'||l_error_msg);
984: RAISE e_error ;
985: END IF;
986: l_upd_csi_i_assets := 'Y';
987: ELSE
988:
989: IF p_src_fa_inst_dtls_rec.instance_id = p_dest_move_trans_rec.instance_id THEN
990: ---As FA Locations are same and also the Instance ID's are same, no need to take any action.
988:
989: IF p_src_fa_inst_dtls_rec.instance_id = p_dest_move_trans_rec.instance_id THEN
990: ---As FA Locations are same and also the Instance ID's are same, no need to take any action.
991: debug('Both Source and Destination Location and also Instances are same, no updates are required');
992: l_upd_csi_i_assets := 'N' ;
993: ELSE
994: debug('Both Source and Destination Location are same but Instances are different, updating just CIA');
995: l_upd_csi_i_assets := 'Y';
996: END IF ;
991: debug('Both Source and Destination Location and also Instances are same, no updates are required');
992: l_upd_csi_i_assets := 'N' ;
993: ELSE
994: debug('Both Source and Destination Location are same but Instances are different, updating just CIA');
995: l_upd_csi_i_assets := 'Y';
996: END IF ;
997: END IF ; --p_src_fa_inst_dtls_rec.fa_location_id <> p_dest_fa_location_id
998:
999: IF l_upd_csi_i_assets = 'Y' THEN
995: l_upd_csi_i_assets := 'Y';
996: END IF ;
997: END IF ; --p_src_fa_inst_dtls_rec.fa_location_id <> p_dest_fa_location_id
998:
999: IF l_upd_csi_i_assets = 'Y' THEN
1000: debug('Updating Inst-Asset link ');
1001: ---Now update the Source CSI_I_ASSETS.
1002: l_src_inst_asset_rec.instance_asset_id := p_src_fa_inst_dtls_rec.instance_asset_id ;
1003: l_src_inst_asset_rec.asset_quantity := p_src_fa_inst_dtls_rec.instance_asset_qty ;
997: END IF ; --p_src_fa_inst_dtls_rec.fa_location_id <> p_dest_fa_location_id
998:
999: IF l_upd_csi_i_assets = 'Y' THEN
1000: debug('Updating Inst-Asset link ');
1001: ---Now update the Source CSI_I_ASSETS.
1002: l_src_inst_asset_rec.instance_asset_id := p_src_fa_inst_dtls_rec.instance_asset_id ;
1003: l_src_inst_asset_rec.asset_quantity := p_src_fa_inst_dtls_rec.instance_asset_qty ;
1004: l_transaction_units := (-1)*p_transaction_units ;
1005:
1038: IF l_return_status = l_fnd_error THEN
1039: debug('Destination Inst-Asset link Failed'); --???
1040: RAISE e_error ;
1041: END IF ;
1042: END IF ; --l_upd_csi_i_assets = 'Y
1043:
1044: EXCEPTION
1045: WHEN e_error THEN
1046: x_return_status := l_fnd_error ;
1586: cit.transaction_type_id
1587: FROM csi_item_instances_h ciih,
1588: csi_item_instances cii,
1589: csi_transactions cit,
1590: csi_i_assets cia
1591: WHERE cit.transaction_id <= p_transaction_id
1592: AND cii.inventory_item_id = p_item_id
1593: AND cii.instance_id = ciih.instance_id
1594: AND ciih.transaction_id = cit.transaction_id
1600: CURSOR nsrl_asset_cur( p_instance_id NUMBER ) IS
1601: SELECT cia.instance_id,
1602: cia.fa_asset_id,
1603: cia.asset_quantity
1604: FROM csi_i_assets cia
1605: WHERE cia.instance_id = p_instance_id
1606: AND cia.asset_quantity > 0
1607: AND cia.active_end_date IS NULL ;
1608:
2642: ,fa_book_type_code
2643: ,asset_quantity
2644: ,object_version_number
2645: ,fa_sync_flag
2646: FROM csi_i_assets
2647: WHERE update_status IN ('OUT_OF_SERVICE', 'IN_SERVICE')
2648: AND instance_id = c_instance_id
2649: AND asset_quantity > 0
2650: ORDER BY fa_asset_id ;
2651:
2652: CURSOR inst_asset_avail_qty (c_instance_id IN NUMBER)
2653: IS
2654: SELECT SUM(asset_quantity)
2655: FROM csi_i_assets
2656: WHERE update_status = 'IN_SERVICE'
2657: AND instance_id = c_instance_id
2658: AND asset_quantity > 0 ;
2659:
4020: AND cii.inventory_item_id = p_inventory_item_id;
4021:
4022: CURSOR cia_cur(p_inst_id IN number) IS
4023: SELECT instance_asset_id
4024: FROM csi_i_assets
4025: WHERE instance_id = p_inst_id
4026: AND asset_quantity > 0
4027: AND fa_sync_flag = 'Y';
4028:
4027: AND fa_sync_flag = 'Y';
4028:
4029: CURSOR cia_pending_in_fma(p_inst_id IN number) IS
4030: SELECT cia.instance_asset_id
4031: FROM csi_i_assets cia,
4032: fa_mass_additions fma
4033: WHERE cia.instance_id = p_inst_id
4034: AND cia.asset_quantity > 0
4035: AND cia.fa_asset_id is null