[Home] [Help]
193: RAISE fnd_api.g_exc_unexpected_error;
194: END;
195:
196: IF (item_count = 0) THEN
197: fnd_message.set_name('INV', 'INV_INVALID_ORGANIZATION');
198: fnd_msg_pub.ADD;
199: --Bug 3153585:Raising exception to populate error message correctly.
200: RAISE fnd_api.g_exc_error;
201: END IF;
210: WHERE inventory_item_id = p_inventory_item_id
211: AND organization_id = p_organization_id;
212:
213: IF (l_serial_control_code = 1) THEN
214: fnd_message.set_name('INV', 'INV_ITEM_NOT_SERIAL_CONTROLLED');
215: fnd_msg_pub.ADD;
216: --Bug 3153585:Raising exception to populate error message correctly.
217: RAISE fnd_api.g_exc_error;
218: END IF;
226: WHEN fnd_api.g_exc_error THEN
227: RAISE fnd_api.g_exc_error;
228: --Bug 3153585:Raising exception to populate error message correctly.
229: WHEN NO_DATA_FOUND THEN
230: fnd_message.set_name('INV', 'INV_INVALID_ITEM');
231: fnd_msg_pub.ADD;
232: --Bug 3153585:Raising exception to populate error message correctly.
233: RAISE fnd_api.g_exc_error;
234: WHEN OTHERS THEN
475:
476: -- invtrace('serial_number_control_code is ' || l_serial_control_code);
477: IF (l_serial_control_code = 1) THEN
478: -- invtrace('serial_control_code is 1.there is no serial control.');
479: fnd_message.set_name('INV', 'INV_ITEM_NOT_SERIAL_CONTROLLED');
480: fnd_msg_pub.ADD;
481: --Bug 3153585:Populating the message from the message stack
482: RAISE fnd_api.g_exc_error;
483: END IF;
482: RAISE fnd_api.g_exc_error;
483: END IF;
484: EXCEPTION
485: WHEN NO_DATA_FOUND THEN
486: fnd_message.set_name('INV', 'INV_INVALID_ITEM');
487: fnd_msg_pub.ADD;
488: RAISE fnd_api.g_exc_error;
489: END;
490:
1414: -- Need to do uniqueness check here.
1415: -- If any serial is in use, then discard the entire range insertion.
1416: IF is_serial_unique(p_org_id => p_organization_id, p_item_id => p_inventory_item_id, p_serial => l_cur_serial_number
1417: , x_proc_msg => l_msg_data) = 1 THEN
1418: fnd_message.set_name('INV', 'INV_SERIAL_USED');
1419: fnd_msg_pub.ADD;
1420: RAISE fnd_api.g_exc_error;
1421: ELSE
1422: -- invtrace('INV_SERIAL_NUMBER_PUB', 'insert_range_serial - 60');
1464: , p_planning_tp_type => p_planning_tp_type
1465: );
1466:
1467: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
1468: fnd_message.set_name('INV', 'INV_SERIAL');
1469: fnd_msg_pub.ADD;
1470: RAISE fnd_api.g_exc_unexpected_error;
1471: END IF;
1472: END IF;
3582: IF (g_serial_attributes_tbl(k).COLUMN_VALUE IS NULL) THEN
3583: IF (l_debug = 1) THEN
3584: invtrace('VALIDATE_UPDATE_SERIAL_ATT:'||g_serial_attributes_tbl(k).COLUMN_NAME||':'||g_serial_attributes_tbl(k).COLUMN_VALUE);
3585: END IF;
3586: fnd_message.set_name('INV', 'INV_LOT_SEL_DEFAULT_REQUIRED');
3587: fnd_message.set_token('ATTRNAME',l_attributes_name);
3588: fnd_message.set_token('CONTEXTCODE', v_contexts.context_code(i));
3589: fnd_message.set_token('SEGMENT', v_segments.application_column_name(j));
3590: fnd_msg_pub.ADD;
3583: IF (l_debug = 1) THEN
3584: invtrace('VALIDATE_UPDATE_SERIAL_ATT:'||g_serial_attributes_tbl(k).COLUMN_NAME||':'||g_serial_attributes_tbl(k).COLUMN_VALUE);
3585: END IF;
3586: fnd_message.set_name('INV', 'INV_LOT_SEL_DEFAULT_REQUIRED');
3587: fnd_message.set_token('ATTRNAME',l_attributes_name);
3588: fnd_message.set_token('CONTEXTCODE', v_contexts.context_code(i));
3589: fnd_message.set_token('SEGMENT', v_segments.application_column_name(j));
3590: fnd_msg_pub.ADD;
3591: END IF;
3584: invtrace('VALIDATE_UPDATE_SERIAL_ATT:'||g_serial_attributes_tbl(k).COLUMN_NAME||':'||g_serial_attributes_tbl(k).COLUMN_VALUE);
3585: END IF;
3586: fnd_message.set_name('INV', 'INV_LOT_SEL_DEFAULT_REQUIRED');
3587: fnd_message.set_token('ATTRNAME',l_attributes_name);
3588: fnd_message.set_token('CONTEXTCODE', v_contexts.context_code(i));
3589: fnd_message.set_token('SEGMENT', v_segments.application_column_name(j));
3590: fnd_msg_pub.ADD;
3591: END IF;
3592: END IF;
3585: END IF;
3586: fnd_message.set_name('INV', 'INV_LOT_SEL_DEFAULT_REQUIRED');
3587: fnd_message.set_token('ATTRNAME',l_attributes_name);
3588: fnd_message.set_token('CONTEXTCODE', v_contexts.context_code(i));
3589: fnd_message.set_token('SEGMENT', v_segments.application_column_name(j));
3590: fnd_msg_pub.ADD;
3591: END IF;
3592: END IF;
3593: END IF;
3615: END IF;
3616: l_validation_status := 'N';
3617: x_return_status := FND_API.G_RET_STS_ERROR ;
3618: x_msg_data := fnd_flex_descval.error_message;
3619: fnd_message.set_name('INV', 'GENERIC');
3620: fnd_message.set_token('MSGBODY', x_msg_data );
3621: fnd_msg_pub.ADD;
3622: x_msg_count := nvl(x_msg_count,0) + 1 ;
3623: RAISE FND_API.G_EXC_ERROR;
3616: l_validation_status := 'N';
3617: x_return_status := FND_API.G_RET_STS_ERROR ;
3618: x_msg_data := fnd_flex_descval.error_message;
3619: fnd_message.set_name('INV', 'GENERIC');
3620: fnd_message.set_token('MSGBODY', x_msg_data );
3621: fnd_msg_pub.ADD;
3622: x_msg_count := nvl(x_msg_count,0) + 1 ;
3623: RAISE FND_API.G_EXC_ERROR;
3624: END IF;
3784: x_mask := L_sn_mask(L_group);
3785: END LOOP;
3786:
3787: IF x_to_status = 0 then
3788: FND_MESSAGE.SET_NAME('INV', 'INV_INLTIS_SNGETMASK');
3789: FND_MSG_PUB.Add;
3790: x_errorcode := 123;
3791: return(FALSE);
3792: ELSE
4238: end if;
4239: elsif( p_curr_status = 3 ) THEN
4240: l_newStatus := 4;
4241: else
4242: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4243: --FND_MSG_PUB.ADD;
4244: return -1;
4245: end if;
4246: elsif( p_ser_num_ctrl_code = 6 ) THEN
4250: end if;
4251: elsif( p_curr_status in (1, 3, 6) ) THEN
4252: l_newStatus := 4;
4253: else
4254: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4255: --FND_MSG_PUB.ADD;
4256: return -2;
4257: end if;
4258: end if;
4263: else
4264: if( (p_trx_src_type_id in (12, 7)) AND (p_curr_status in (5, 7))) THEN
4265: l_newStatus := 4;
4266: else
4267: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4268: --FND_MSG_PUB.ADD;
4269: return -3;
4270: end if;
4271: end if;
4270: end if;
4271: end if;
4272: elsif( p_ser_num_ctrl_code = 6 ) THEN
4273: if( p_last_trx_src_type_id = 12 AND p_curr_status = 1 AND l_isRestrictRcptSerial = 1 ) THEN
4274: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4275: --FND_MSG_PUB.ADD;
4276: return -1;
4277: elsif( (p_trx_src_type_id = 7 OR p_trx_action_id = 12) AND (p_curr_status in (5, 7 ))) THEN
4278: l_newStatus := 1;
4279: else
4280: if( p_curr_status in (1, 4, 5, 6, 7 ) ) THEN
4281: l_newStatus := 1;
4282: else
4283: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4284: --FND_MSG_PUB.ADD;
4285: return -1;
4286: end if;
4287: end if;
4291: if( p_ser_num_ctrl_code in (2, 3, 5)) THEN
4292: if( p_curr_status = 3 ) THEN
4293: l_newStatus := 3;
4294: else
4295: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4296: --FND_MSG_PUB.ADD;
4297: return -1;
4298: end if;
4299: end if;
4306: else
4307: l_newStatus := 5;
4308: end if;
4309: else
4310: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4311: --FND_MSG_PUB.ADD;
4312: return -1;
4313: end if;
4314: end if;
4316: if( p_ser_num_ctrl_code in (2, 3, 5) ) THEN
4317: if( p_curr_status in (1, 4, 5, 6, 7) ) THEN
4318: l_newStatus := 3;
4319: else
4320: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4321: --FND_MSG_PUB.ADD;
4322: return -1;
4323: end if;
4324: elsif( p_ser_num_ctrl_code = 6 ) THEN
4324: elsif( p_ser_num_ctrl_code = 6 ) THEN
4325: if( p_curr_status in (5,7) AND ( p_trx_src_type_id = 7 OR p_trx_action_id = 12) ) THEN
4326: l_newStatus := 1;
4327: else
4328: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4329: --FND_MSG_PUB.ADD;
4330: return -1;
4331: end if;
4332: end if;
4332: end if;
4333: end if;
4334: elsif( l_groupId = 4 ) THEN
4335: if( p_curr_status <> 3 ) THEN
4336: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4337: --FND_MSG_PUB.ADD;
4338: return -1;
4339: end if;
4340: elsif( l_groupId = 5 ) THEN
4342: if( p_ser_num_ctrl_code in (2, 3, 5)) THEN
4343: if( p_curr_status = 3 ) then
4344: l_newStatus := 4;
4345: else
4346: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4347: --FND_MSG_PUB.ADD;
4348: return -1;
4349: end if;
4350: end if;
4351: else
4352: if( p_ser_num_ctrl_code in (2, 3, 5) ) THEN
4353: if( l_isRestrictRcptSerial = 1 AND p_trx_action_id = 27 AND
4354: p_curr_status = 4 AND p_last_trx_src_Type_id = 2 ) THEN
4355: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4356: --FND_MSG_PUB.ADD;
4357: return -1;
4358: end if;
4359: if( p_curr_status in (1, 4, 6)) THEN
4366: if( (p_trx_src_type_id in (1, 5) AND p_curr_status = 5 )OR
4367: (p_trx_src_type_id = 1 AND p_curr_status = 7 )) THEN
4368: l_newStatus := 3;
4369: else
4370: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4371: --FND_MSG_PUB.ADD;
4372: return -1;
4373: end if;
4374: end if;
4487:
4488: -- Bug 7427382, supporting statuses 6, 7 and 8 also.
4489: IF ( p_db_current_status = -1 or p_db_current_status = 2 or
4490: p_db_current_status < 1 or p_db_current_status > 8 or p_db_current_status is NULL ) THEN
4491: --fnd_message.set_name( 'INV', 'INV_INVALID_SERIAL' );
4492: return -913;
4493: END IF;
4494:
4495: -- validate status
4516: end if;
4517: elsif( p_db_current_status in (1, 3, 6) ) THEN
4518: l_newStatus := 4;
4519: else
4520: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4521: --FND_MSG_PUB.ADD;
4522: l_retval := -902;
4523: end if;
4524: end if;
4529: else
4530: if( (p_trx_src_type_id in (12, 7)) AND (p_db_current_status in (5, 7))) THEN
4531: l_newStatus := 4;
4532: else
4533: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4534: --FND_MSG_PUB.ADD;
4535: l_retval := -903;
4536: end if;
4537: end if;
4536: end if;
4537: end if;
4538: elsif( p_ser_num_ctrl_code = 6 ) THEN
4539: if( p_db_lst_txn_src_type_id = 12 AND p_db_current_status = 1 AND l_isRestrictRcptSerial = 1 ) THEN
4540: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4541: --FND_MSG_PUB.ADD;
4542: l_retval := -904;
4543: elsif( (p_trx_src_type_id = 7 OR p_trx_action_id = 12) AND (p_db_current_status in (5, 7 ))) THEN
4544: l_newStatus := 1;
4545: else
4546: if( p_db_current_status in (1, 4, 5, 6, 7 ) ) THEN
4547: l_newStatus := 1;
4548: else
4549: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4550: --FND_MSG_PUB.ADD;
4551: l_retval := -905;
4552: end if;
4553: end if;
4557: if( p_ser_num_ctrl_code in (2, 3, 5)) THEN
4558: if( p_db_current_status = 3 ) THEN
4559: l_newStatus := 3;
4560: else
4561: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4562: --FND_MSG_PUB.ADD;
4563: l_retval := -906;
4564: end if;
4565: end if;
4572: else
4573: l_newStatus := 5;
4574: end if;
4575: else
4576: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4577: --FND_MSG_PUB.ADD;
4578: l_retval := -907;
4579: end if;
4580: end if;
4582: if( p_ser_num_ctrl_code in (2, 3, 5) ) THEN
4583: if( p_db_current_status in (1, 4, 5, 6, 7) ) THEN
4584: l_newStatus := 3;
4585: else
4586: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4587: --FND_MSG_PUB.ADD;
4588: l_retval := -908;
4589: end if;
4590: elsif( p_ser_num_ctrl_code = 6 ) THEN
4590: elsif( p_ser_num_ctrl_code = 6 ) THEN
4591: if( p_db_current_status in (5,7) AND ( p_trx_src_type_id = 7 OR p_trx_action_id = 12) ) THEN
4592: l_newStatus := 1;
4593: else
4594: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4595: --FND_MSG_PUB.ADD;
4596: l_retval := -908;
4597: end if;
4598: end if;
4598: end if;
4599: end if;
4600: elsif( l_groupId = 4 ) THEN
4601: if( p_db_current_status <> 3 ) THEN
4602: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4603: --FND_MSG_PUB.ADD;
4604: l_retval := -909;
4605: end if;
4606: elsif( l_groupId = 5 ) THEN
4609: if( p_ser_num_ctrl_code in (2, 3, 5)) THEN
4610: if( p_db_current_status = 3 ) then
4611: l_newStatus := 4;
4612: else
4613: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4614: --FND_MSG_PUB.ADD;
4615: l_retval := -910;
4616: end if;
4617: end if;
4619: --dbms_output.put_line('inside receipt part');
4620: if( p_ser_num_ctrl_code in (2, 3, 5) ) THEN
4621: if( l_isRestrictRcptSerial = 1 AND p_trx_action_id = 27 AND
4622: p_db_current_status = 4 AND p_db_lst_txn_src_Type_id = 2 ) THEN
4623: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4624: --FND_MSG_PUB.ADD;
4625: l_retval := -911;
4626: end if;
4627: if( p_db_current_status in (1, 4, 6)) THEN
4634: if( (p_trx_src_type_id in (1, 5) AND p_db_current_status = 5 )OR
4635: (p_trx_src_type_id = 1 AND p_db_current_status = 7 )) THEN
4636: l_newStatus := 3;
4637: else
4638: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_SERIAL');
4639: --FND_MSG_PUB.ADD;
4640: l_retval := -912;
4641: end if;
4642: end if;
4648: p_db_lst_txn_src_type_id, p_xfr_ser_num_ctrl_code, l_isRestrictRcptSerial);*/
4649:
4650: IF ( ( p_db_current_status = 3 OR p_db_current_status = 1 )
4651: AND p_db_current_organization_id <> p_curr_org_id ) THEN
4652: --fnd_message.set_name( 'INV', 'INV_SER_ORG_INVALID' );
4653: l_retval := -914;
4654: END IF;
4655:
4656:
4656:
4657: IF (p_db_current_status = 3) THEN
4658: IF (p_db_revision IS NOT NULL AND p_db_revision <> p_revision ) THEN
4659:
4660: --fnd_message.set_name('INV', 'INV_SER_REV_INVALID');
4661: --fnd_message.set_Token('TOKEN1', p_db_Revision);
4662: --fnd_message.set_Token('TOKEN2', p_revision);
4663: l_retval := -915;
4664: END IF;
4657: IF (p_db_current_status = 3) THEN
4658: IF (p_db_revision IS NOT NULL AND p_db_revision <> p_revision ) THEN
4659:
4660: --fnd_message.set_name('INV', 'INV_SER_REV_INVALID');
4661: --fnd_message.set_Token('TOKEN1', p_db_Revision);
4662: --fnd_message.set_Token('TOKEN2', p_revision);
4663: l_retval := -915;
4664: END IF;
4665:
4658: IF (p_db_revision IS NOT NULL AND p_db_revision <> p_revision ) THEN
4659:
4660: --fnd_message.set_name('INV', 'INV_SER_REV_INVALID');
4661: --fnd_message.set_Token('TOKEN1', p_db_Revision);
4662: --fnd_message.set_Token('TOKEN2', p_revision);
4663: l_retval := -915;
4664: END IF;
4665:
4666: IF ( p_db_lot_number IS NOT NULL AND p_db_Lot_Number <> p_lot ) THEN
4663: l_retval := -915;
4664: END IF;
4665:
4666: IF ( p_db_lot_number IS NOT NULL AND p_db_Lot_Number <> p_lot ) THEN
4667: --fnd_message.set_name('INV', 'INV_SER_LOT_INVALID');
4668: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4669: --fnd_message.set_Token('TOKEN2', p_db_Lot_Number);
4670: l_retval := -916;
4671: END IF;
4664: END IF;
4665:
4666: IF ( p_db_lot_number IS NOT NULL AND p_db_Lot_Number <> p_lot ) THEN
4667: --fnd_message.set_name('INV', 'INV_SER_LOT_INVALID');
4668: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4669: --fnd_message.set_Token('TOKEN2', p_db_Lot_Number);
4670: l_retval := -916;
4671: END IF;
4672: END IF;
4665:
4666: IF ( p_db_lot_number IS NOT NULL AND p_db_Lot_Number <> p_lot ) THEN
4667: --fnd_message.set_name('INV', 'INV_SER_LOT_INVALID');
4668: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4669: --fnd_message.set_Token('TOKEN2', p_db_Lot_Number);
4670: l_retval := -916;
4671: END IF;
4672: END IF;
4673:
4676: IF (l_isIssue AND p_db_current_status = 3 ) THEN
4677:
4678: IF (p_db_current_subinventory_code IS NOT NULL AND
4679: p_db_current_subinventory_code <> p_curr_subinv_code) THEN
4680: --fnd_message.set_name('INV', 'INV_SER_SUB_INVALID');
4681: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4682: --fnd_message.set_Token('TOKEN2', p_db_current_subinventory_code);
4683: l_retval := -917;
4684: END IF;
4677:
4678: IF (p_db_current_subinventory_code IS NOT NULL AND
4679: p_db_current_subinventory_code <> p_curr_subinv_code) THEN
4680: --fnd_message.set_name('INV', 'INV_SER_SUB_INVALID');
4681: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4682: --fnd_message.set_Token('TOKEN2', p_db_current_subinventory_code);
4683: l_retval := -917;
4684: END IF;
4685:
4678: IF (p_db_current_subinventory_code IS NOT NULL AND
4679: p_db_current_subinventory_code <> p_curr_subinv_code) THEN
4680: --fnd_message.set_name('INV', 'INV_SER_SUB_INVALID');
4681: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4682: --fnd_message.set_Token('TOKEN2', p_db_current_subinventory_code);
4683: l_retval := -917;
4684: END IF;
4685:
4686: IF (p_db_current_locator_id <> 0 AND
4684: END IF;
4685:
4686: IF (p_db_current_locator_id <> 0 AND
4687: p_db_current_locator_id <> p_locator_id ) THEN
4688: --fnd_message.set_name('INV', 'INV_SER_LOC_INVALID');
4689: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4690: l_retval := -918;
4691: END IF;
4692:
4685:
4686: IF (p_db_current_locator_id <> 0 AND
4687: p_db_current_locator_id <> p_locator_id ) THEN
4688: --fnd_message.set_name('INV', 'INV_SER_LOC_INVALID');
4689: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4690: l_retval := -918;
4691: END IF;
4692:
4693: END IF;
4697: IF ((p_trx_action_id = 31 AND p_db_current_status <> 1)
4698: OR (p_trx_action_id = 32)
4699: OR (p_trx_action_id = 27)) THEN -- {
4700: IF (p_db_wip_ent_id_ind = -1) THEN -- {
4701: --fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4702: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4703: l_retval := -919; -- return(FALSE);
4704: END IF; -- }
4705: END IF; -- }
4698: OR (p_trx_action_id = 32)
4699: OR (p_trx_action_id = 27)) THEN -- {
4700: IF (p_db_wip_ent_id_ind = -1) THEN -- {
4701: --fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4702: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4703: l_retval := -919; -- return(FALSE);
4704: END IF; -- }
4705: END IF; -- }
4706: END IF; -- }
4713: AND (p_trx_qty > 0 ) AND ( p_trx_action_id =27 )
4714: AND (p_trx_src_type_id <> 5) AND (p_db_wip_ent_id_ind <> -1)
4715: AND ( p_acct_prof_value = 'Y' /*1*/) AND (p_db_lst_txn_src_type_id = 5 )) THEN -- {
4716:
4717: --fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4718: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4719: l_retval := -920; -- return(FALSE);
4720:
4721: END IF; -- }
4714: AND (p_trx_src_type_id <> 5) AND (p_db_wip_ent_id_ind <> -1)
4715: AND ( p_acct_prof_value = 'Y' /*1*/) AND (p_db_lst_txn_src_type_id = 5 )) THEN -- {
4716:
4717: --fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4718: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4719: l_retval := -920; -- return(FALSE);
4720:
4721: END IF; -- }
4722:
4725: AND (p_trx_src_type_id <> 5) AND (p_db_wip_ent_id_ind <> -1)
4726: AND (p_acct_prof_value = 'Y' /*1*/) AND (p_db_lst_txn_src_type_id = 6 )
4727: AND (p_trx_src_type_id <> 6 )) THEN -- {
4728:
4729: --fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4730: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4731: l_retval := -920; -- return(FALSE);
4732:
4733: END IF; -- }
4726: AND (p_acct_prof_value = 'Y' /*1*/) AND (p_db_lst_txn_src_type_id = 6 )
4727: AND (p_trx_src_type_id <> 6 )) THEN -- {
4728:
4729: --fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4730: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4731: l_retval := -920; -- return(FALSE);
4732:
4733: END IF; -- }
4734:
4737: AND (p_trx_src_type_id = 5) AND (p_db_wip_ent_id_ind <> -1)
4738: AND (p_acct_prof_value = 'Y' /*1*/)
4739: AND ((p_db_lst_txn_src_type_id = 5) OR (p_db_lst_txn_src_type_id = 6 ))) THEN -- {
4740:
4741: --fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4742: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4743: l_retval := -921; -- return(FALSE);
4744:
4745: END IF; -- }
4738: AND (p_acct_prof_value = 'Y' /*1*/)
4739: AND ((p_db_lst_txn_src_type_id = 5) OR (p_db_lst_txn_src_type_id = 6 ))) THEN -- {
4740:
4741: --fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4742: --fnd_message.set_Token('TOKEN1', p_curr_ser_num);
4743: l_retval := -921; -- return(FALSE);
4744:
4745: END IF; -- }
4746: