32: x_object_id NUMBER;
33: BEGIN
34:
35: SAVEPOINT inv_new_serial;
36: x_return_status := fnd_api.g_ret_sts_success;
37: x_is_new_serial := 'N';
38:
39: BEGIN
40: select serial_number
53: -- start to create a new serial number
54: /*
55: inv_serial_number_pub.insert_range_serial(
56: p_api_version => 1.0
57: , p_validation_level => fnd_api.g_valid_level_full
58: , p_inventory_item_id => p_inventory_item_id
59: , p_organization_id => p_organization_id
60: , p_from_serial_number => p_from_serial_number
61: , p_to_serial_number => p_to_serial_number
90: );*/
91:
92: inv_serial_number_pub.insertserial(
93: p_api_version =>1.0
94: , p_validation_level => fnd_api.g_valid_level_full
95: , p_inventory_item_id =>p_inventory_item_id
96: , p_organization_id =>p_organization_id
97: , p_serial_number =>p_from_serial_number
98: , p_current_status =>1
105:
106: IF g_debug = 1 THEN
107: mydebug('Program insert_range_serial ' || x_return_status);
108: END IF;
109: IF x_return_status = fnd_api.g_ret_sts_error THEN
110: IF g_debug = 1 THEN
111: mydebug('Program insert_range_serial has failed with a user defined exception');
112: END IF;
113: RAISE g_exc_error;
110: IF g_debug = 1 THEN
111: mydebug('Program insert_range_serial has failed with a user defined exception');
112: END IF;
113: RAISE g_exc_error;
114: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
115: IF g_debug = 1 THEN
116: mydebug('Program insert_range_serial has failed with a Unexpected exception');
117: END IF;
118: FND_MESSAGE.SET_NAME('INV','INV_PROGRAM_ERROR');
126:
127:
128: EXCEPTION
129: WHEN NO_DATA_FOUND THEN
130: x_return_status := fnd_api.g_ret_sts_error;
131: ROLLBACK TO inv_new_serial;
132: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
133: if( x_msg_count > 1 ) then
134: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
128: EXCEPTION
129: WHEN NO_DATA_FOUND THEN
130: x_return_status := fnd_api.g_ret_sts_error;
131: ROLLBACK TO inv_new_serial;
132: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
133: if( x_msg_count > 1 ) then
134: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
135: end if;
136: mydebug('In No data found ' || SQLERRM);
130: x_return_status := fnd_api.g_ret_sts_error;
131: ROLLBACK TO inv_new_serial;
132: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
133: if( x_msg_count > 1 ) then
134: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
135: end if;
136: mydebug('In No data found ' || SQLERRM);
137: WHEN g_exc_error THEN
138: x_return_status := fnd_api.g_ret_sts_error;
134: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
135: end if;
136: mydebug('In No data found ' || SQLERRM);
137: WHEN g_exc_error THEN
138: x_return_status := fnd_api.g_ret_sts_error;
139: ROLLBACK TO inv_new_serial;
140: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
141: if( x_msg_count > 1 ) then
142: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
136: mydebug('In No data found ' || SQLERRM);
137: WHEN g_exc_error THEN
138: x_return_status := fnd_api.g_ret_sts_error;
139: ROLLBACK TO inv_new_serial;
140: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
141: if( x_msg_count > 1 ) then
142: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
143: end if;
144: mydebug('In g_exc_error ' || SQLERRM);
138: x_return_status := fnd_api.g_ret_sts_error;
139: ROLLBACK TO inv_new_serial;
140: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
141: if( x_msg_count > 1 ) then
142: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
143: end if;
144: mydebug('In g_exc_error ' || SQLERRM);
145: WHEN g_exc_unexpected_error THEN
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
142: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
143: end if;
144: mydebug('In g_exc_error ' || SQLERRM);
145: WHEN g_exc_unexpected_error THEN
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
147: ROLLBACK TO inv_new_serial;
148: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
149: if( x_msg_count > 1 ) then
150: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
144: mydebug('In g_exc_error ' || SQLERRM);
145: WHEN g_exc_unexpected_error THEN
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
147: ROLLBACK TO inv_new_serial;
148: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
149: if( x_msg_count > 1 ) then
150: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
151: end if;
152: mydebug('In g_exc_unexpected_error ' || SQLERRM);
146: x_return_status := fnd_api.g_ret_sts_unexp_error;
147: ROLLBACK TO inv_new_serial;
148: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
149: if( x_msg_count > 1 ) then
150: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
151: end if;
152: mydebug('In g_exc_unexpected_error ' || SQLERRM);
153: WHEN OTHERS THEN
154: x_return_status := fnd_api.g_ret_sts_unexp_error;
150: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
151: end if;
152: mydebug('In g_exc_unexpected_error ' || SQLERRM);
153: WHEN OTHERS THEN
154: x_return_status := fnd_api.g_ret_sts_unexp_error;
155: ROLLBACK TO inv_new_serial;
156: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
157: if( x_msg_count > 1 ) then
158: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
152: mydebug('In g_exc_unexpected_error ' || SQLERRM);
153: WHEN OTHERS THEN
154: x_return_status := fnd_api.g_ret_sts_unexp_error;
155: ROLLBACK TO inv_new_serial;
156: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
157: if( x_msg_count > 1 ) then
158: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
159: end if;
160: mydebug('In others ' || SQLERRM);
154: x_return_status := fnd_api.g_ret_sts_unexp_error;
155: ROLLBACK TO inv_new_serial;
156: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
157: if( x_msg_count > 1 ) then
158: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
159: end if;
160: mydebug('In others ' || SQLERRM);
161:
162: END preprocess_serial;
178: and serial_number between p_from_serial_number and p_to_serial_number;
179:
180: EXCEPTION
181: WHEN OTHERS THEN
182: x_return_status := fnd_api.g_ret_sts_unexp_error;
183: mydebug('In g_exc_unexpected_error ' || SQLERRM);
184: END delete_serial;
185:
186:
511: l_validation_status VARCHAR2(1);
512: begin
513:
514: SAVEPOINT inv_update_serial;
515: x_return_status := fnd_api.g_ret_sts_success;
516:
517: -- copy data to the local IN or IN-OUT args, if any
518:
519:
574: p_intraoperation_step_type,
575: p_line_mark_id);
576:
577: mydebug('after calling updateSerial');
578: IF x_return_status = fnd_api.g_ret_sts_error THEN
579: IF g_debug = 1 THEN
580: mydebug('Program insert_range_serial has failed with a user defined exception');
581: END IF;
582: RAISE g_exc_error;
579: IF g_debug = 1 THEN
580: mydebug('Program insert_range_serial has failed with a user defined exception');
581: END IF;
582: RAISE g_exc_error;
583: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
584: IF g_debug = 1 THEN
585: mydebug('Program insert_range_serial has failed with a Unexpected exception');
586: END IF;
587: FND_MESSAGE.SET_NAME('INV','INV_PROGRAM_ERROR');
701: --raise error
702: fnd_message.set_name ('INV' , 'INV_FAIL_VALIDATE_SERIAL' );
703: fnd_msg_pub.ADD;
704:
705: RAISE fnd_api.g_exc_error;
706: END IF;
707:
708: mydebug('After calling validate_update_serial_att');
709:
734:
735:
736: EXCEPTION
737: WHEN NO_DATA_FOUND THEN
738: x_return_status := fnd_api.g_ret_sts_error;
739: ROLLBACK TO inv_update_serial;
740: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
741: if( x_msg_count > 1 ) then
742: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
736: EXCEPTION
737: WHEN NO_DATA_FOUND THEN
738: x_return_status := fnd_api.g_ret_sts_error;
739: ROLLBACK TO inv_update_serial;
740: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
741: if( x_msg_count > 1 ) then
742: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
743: end if;
744: mydebug('In No data found ' || SQLERRM);
738: x_return_status := fnd_api.g_ret_sts_error;
739: ROLLBACK TO inv_update_serial;
740: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
741: if( x_msg_count > 1 ) then
742: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
743: end if;
744: mydebug('In No data found ' || SQLERRM);
745: WHEN g_exc_error THEN
746: x_return_status := fnd_api.g_ret_sts_error;
742: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
743: end if;
744: mydebug('In No data found ' || SQLERRM);
745: WHEN g_exc_error THEN
746: x_return_status := fnd_api.g_ret_sts_error;
747: ROLLBACK TO inv_update_serial;
748: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
749: if( x_msg_count > 1 ) then
750: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
744: mydebug('In No data found ' || SQLERRM);
745: WHEN g_exc_error THEN
746: x_return_status := fnd_api.g_ret_sts_error;
747: ROLLBACK TO inv_update_serial;
748: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
749: if( x_msg_count > 1 ) then
750: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
751: end if;
752: mydebug('In g_exc_error ' || SQLERRM);
746: x_return_status := fnd_api.g_ret_sts_error;
747: ROLLBACK TO inv_update_serial;
748: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
749: if( x_msg_count > 1 ) then
750: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
751: end if;
752: mydebug('In g_exc_error ' || SQLERRM);
753: WHEN g_exc_unexpected_error THEN
754: x_return_status := fnd_api.g_ret_sts_unexp_error;
750: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
751: end if;
752: mydebug('In g_exc_error ' || SQLERRM);
753: WHEN g_exc_unexpected_error THEN
754: x_return_status := fnd_api.g_ret_sts_unexp_error;
755: ROLLBACK TO inv_update_serial;
756: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
757: if( x_msg_count > 1 ) then
758: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
752: mydebug('In g_exc_error ' || SQLERRM);
753: WHEN g_exc_unexpected_error THEN
754: x_return_status := fnd_api.g_ret_sts_unexp_error;
755: ROLLBACK TO inv_update_serial;
756: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
757: if( x_msg_count > 1 ) then
758: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
759: end if;
760: mydebug('In g_exc_unexpected_error ' || SQLERRM);
754: x_return_status := fnd_api.g_ret_sts_unexp_error;
755: ROLLBACK TO inv_update_serial;
756: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
757: if( x_msg_count > 1 ) then
758: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
759: end if;
760: mydebug('In g_exc_unexpected_error ' || SQLERRM);
761: WHEN OTHERS THEN
762: x_return_status := fnd_api.g_ret_sts_unexp_error;
758: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
759: end if;
760: mydebug('In g_exc_unexpected_error ' || SQLERRM);
761: WHEN OTHERS THEN
762: x_return_status := fnd_api.g_ret_sts_unexp_error;
763: ROLLBACK TO inv_update_serial;
764: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
765: if( x_msg_count > 1 ) then
766: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
760: mydebug('In g_exc_unexpected_error ' || SQLERRM);
761: WHEN OTHERS THEN
762: x_return_status := fnd_api.g_ret_sts_unexp_error;
763: ROLLBACK TO inv_update_serial;
764: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
765: if( x_msg_count > 1 ) then
766: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
767: end if;
768: mydebug('In others ' || SQLERRM);
762: x_return_status := fnd_api.g_ret_sts_unexp_error;
763: ROLLBACK TO inv_update_serial;
764: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
765: if( x_msg_count > 1 ) then
766: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE);
767: end if;
768: mydebug('In others ' || SQLERRM);
769:
770: