eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.MTL_SERIAL_CHECK dependencies on FND_API

Line 143: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

139: +-------------------------------------------------------------------------*/
140:
141: PROCEDURE INV_QTYBETWN
142: ( p_api_version IN NUMBER,
143: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
144: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
145: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
146: x_return_status OUT NOCOPY VARCHAR2,
147: x_msg_count OUT NOCOPY NUMBER,

Line 144: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

140:
141: PROCEDURE INV_QTYBETWN
142: ( p_api_version IN NUMBER,
143: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
144: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
145: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
146: x_return_status OUT NOCOPY VARCHAR2,
147: x_msg_count OUT NOCOPY NUMBER,
148: x_msg_data OUT NOCOPY VARCHAR2,

Line 145: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,

141: PROCEDURE INV_QTYBETWN
142: ( p_api_version IN NUMBER,
143: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
144: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
145: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
146: x_return_status OUT NOCOPY VARCHAR2,
147: x_msg_count OUT NOCOPY NUMBER,
148: x_msg_data OUT NOCOPY VARCHAR2,
149: x_errorcode OUT NOCOPY NUMBER,

Line 166: p_simulate IN VARCHAR2 DEFAULT FND_API.G_FALSE

162: P_LOT_NUMBER IN VARCHAR2,
163: P_SUBINVENTORY IN VARCHAR2,
164: P_LOCATOR_ID IN NUMBER,
165: P_RECEIPT_ISSUE_FLAG IN VARCHAR2,
166: p_simulate IN VARCHAR2 DEFAULT FND_API.G_FALSE
167: ) IS
168:
169: -- Start OF comments
170: -- API name : INV_QTYBETWN

Line 181: -- DEFAULT = FND_API.G_FALSE,

177: -- p_api_version IN NUMBER (required)
178: -- API Version of this procedure
179: --
180: -- p_init_msg_list IN VARCHAR2 (optional)
181: -- DEFAULT = FND_API.G_FALSE,
182: --
183: -- p_commit IN VARCHAR2 (optional)
184: -- DEFAULT = FND_API.G_FALSE
185: --

Line 184: -- DEFAULT = FND_API.G_FALSE

180: -- p_init_msg_list IN VARCHAR2 (optional)
181: -- DEFAULT = FND_API.G_FALSE,
182: --
183: -- p_commit IN VARCHAR2 (optional)
184: -- DEFAULT = FND_API.G_FALSE
185: --
186: -- p_validation_level IN NUMBER (optional)
187: -- DEFAULT = FND_API.G_VALID_LEVEL_FULL,
188: --

Line 187: -- DEFAULT = FND_API.G_VALID_LEVEL_FULL,

183: -- p_commit IN VARCHAR2 (optional)
184: -- DEFAULT = FND_API.G_FALSE
185: --
186: -- p_validation_level IN NUMBER (optional)
187: -- DEFAULT = FND_API.G_VALID_LEVEL_FULL,
188: --
189: -- P_FROM_SERIAL_NUMBER VARCHAR2
190: -- P_TO_SERIAL_NUMBER VARCHAR2
191: -- X_QUANTITY VARCHAR2

Line 206: -- if equals to FND_API.G_TRUE then no inserts/updates will be done

202: -- P_LOCATOR_ID NUMBER
203: -- P_RECEIPT_ISSUE_FLAG VARCHAR2
204: -- P_VALIDATE VARCHAR2
205: -- p_simulate - flag that signals whether to do any insertions/updates
206: -- if equals to FND_API.G_TRUE then no inserts/updates will be done
207: -- and procedure will run in simulation mode. by default does necessary
208: -- inserts/updates
209: --
210: -- OUT :

Line 254: IF NOT FND_API.Compatible_API_Call(l_api_version

250: --
251: -- Standard start of API savepoint
252: SAVEPOINT InvQtyBetwn;
253: -- Standard Call to check for call compatibility
254: IF NOT FND_API.Compatible_API_Call(l_api_version
255: , p_api_version
256: , l_api_name
257: , G_PKG_NAME) THEN
258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

254: IF NOT FND_API.Compatible_API_Call(l_api_version
255: , p_api_version
256: , l_api_name
257: , G_PKG_NAME) THEN
258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
259: END IF;
260: --
261: -- Initialize message list if p_init_msg_list is set to true
262: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 262: IF FND_API.to_Boolean(p_init_msg_list) THEN

258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
259: END IF;
260: --
261: -- Initialize message list if p_init_msg_list is set to true
262: IF FND_API.to_Boolean(p_init_msg_list) THEN
263: FND_MSG_PUB.initialize;
264: END IF;
265: --
266: -- Initialisize API return status to access

Line 267: x_return_status := FND_API.G_RET_STS_SUCCESS;

263: FND_MSG_PUB.initialize;
264: END IF;
265: --
266: -- Initialisize API return status to access
267: x_return_status := FND_API.G_RET_STS_SUCCESS;
268: x_errorcode := 0;
269:
270: --
271: -- API Body

Line 281: RAISE FND_API.G_EXC_ERROR;

277: IF p_receipt_issue_flag NOT IN ('I','R') then
278: FND_MESSAGE.set_name('INV','INV_QTYBTWN_ISSREC');
279: FND_MSG_PUB.Add;
280: x_errorcode := 116;
281: RAISE FND_API.G_EXC_ERROR;
282: END IF;
283:
284: -- Calling Serial Info Routine
285: --

Line 298: RAISE FND_API.G_EXC_ERROR;

294: x_errorcode => x_errorcode)
295: THEN
296: -- no need to process error here since it was already added to msg
297: -- list inside inv_serial_info subroutine
298: RAISE FND_API.G_EXC_ERROR;
299: END IF;
300:
301: IF (l_debug = 1) THEN
302: mdebug('Quantity ' || to_char(x_quantity));

Line 308: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL) THEN

304: mdebug('FROM QTY ' || l_from_number);
305: mdebug('TO QTY ' || l_to_number);
306: END IF;
307:
308: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL) THEN
309:
310: l_mask := '00000000000000';
311: --
312: IF (l_debug = 1) THEN

Line 328: RAISE FND_API.G_EXC_ERROR ;

324:
325: IF (l_debug = 1) THEN
326: mdebug('Mask Proc - Error');
327: END IF;
328: RAISE FND_API.G_EXC_ERROR ;
329: END IF;
330:
331: IF (l_debug = 1) THEN
332: mdebug('Mask ' || l_mask);

Line 391: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

387: p_mask => l_mask,
388: p_dynamic_ok => l_dynamic_ok);
389:
390:
391: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
392: IF (l_debug = 1) THEN
393: mdebug('Calling SNValidate : Error!');
394: END IF;
395: RAISE FND_API.G_EXC_ERROR ;

Line 395: RAISE FND_API.G_EXC_ERROR ;

391: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
392: IF (l_debug = 1) THEN
393: mdebug('Calling SNValidate : Error!');
394: END IF;
395: RAISE FND_API.G_EXC_ERROR ;
396: END IF;
397:
398: IF (l_debug = 1) THEN
399: mdebug('After Calling SNValidate procedure ');

Line 418: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

414: p_org_id => P_Organization_Id,
415: p_serial_number_type => P_Serial_number_type,
416: p_serial_number => l_Serial_number);
417:
418: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
419: RAISE FND_API.G_EXC_ERROR ;
420: END IF;
421:
422:

Line 419: RAISE FND_API.G_EXC_ERROR ;

415: p_serial_number_type => P_Serial_number_type,
416: p_serial_number => l_Serial_number);
417:
418: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
419: RAISE FND_API.G_EXC_ERROR ;
420: END IF;
421:
422:
423: IF (l_debug = 1) THEN

Line 435: IF NOT FND_API.to_Boolean(p_simulate) THEN

431: SELECT MTL_GEN_OBJECT_ID_S.NEXTVAL
432: INTO l_obj_seq_num FROM DUAL;
433:
434:
435: IF NOT FND_API.to_Boolean(p_simulate) THEN
436: l_user_id := FND_GLOBAL.USER_ID ;
437: BEGIN
438: IF (l_debug = 1) THEN
439: mdebug('Inserting row with SL NO '||l_serial_number);

Line 492: IF FND_API.to_Boolean(p_commit) THEN

488: -- END of API Body
489: --
490:
491: -- Standard check of p_commit
492: IF FND_API.to_Boolean(p_commit) THEN
493: COMMIT;
494: END IF;
495:
496: -- Standard call to get message count and if count is 1, get message info

Line 501: WHEN FND_API.G_EXC_ERROR THEN

497: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
498: , p_data => x_msg_data);
499:
500: EXCEPTION
501: WHEN FND_API.G_EXC_ERROR THEN
502: --
503: ROLLBACK TO InvQtyBetwn;
504: --
505: x_return_status := FND_API.G_RET_STS_ERROR;

Line 505: x_return_status := FND_API.G_RET_STS_ERROR;

501: WHEN FND_API.G_EXC_ERROR THEN
502: --
503: ROLLBACK TO InvQtyBetwn;
504: --
505: x_return_status := FND_API.G_RET_STS_ERROR;
506: --
507: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
508: , p_data => x_msg_data);
509: --

Line 511: mdebug('Exception :FND_API.G_EXC_ERROR');

507: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
508: , p_data => x_msg_data);
509: --
510: IF (l_debug = 1) THEN
511: mdebug('Exception :FND_API.G_EXC_ERROR');
512: END IF;
513:
514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
515: IF (l_debug = 1) THEN

Line 514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

510: IF (l_debug = 1) THEN
511: mdebug('Exception :FND_API.G_EXC_ERROR');
512: END IF;
513:
514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
515: IF (l_debug = 1) THEN
516: mdebug('InvQtyBetwn: Unexpected error');
517: END IF;
518: --

Line 528: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

524: x_errorcode := -1;
525: IF (l_debug = 1) THEN
526: mdebug('InvQtyBetwn: Unexpected error-3');
527: END IF;
528: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
529: IF (l_debug = 1) THEN
530: mdebug('InvQtyBetwn: x_return_status='||x_return_status);
531: END IF;
532:

Line 537: mdebug('Exception :FND_API.G_EXC_UNEXPECTED_ERROR');

533: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
534: , p_data => x_msg_data);
535: --
536: IF (l_debug = 1) THEN
537: mdebug('Exception :FND_API.G_EXC_UNEXPECTED_ERROR');
538: END IF;
539:
540: WHEN OTHERS THEN
541: --

Line 545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

541: --
542: ROLLBACK TO InvQtyBetwn;
543: --
544: x_errorcode := -1;
545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
546: --
547: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
548: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
549: END IF;

Line 622: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

618: +-------------------------------------------------------------*/
619: PROCEDURE SNUniqueCheck
620: (
621: p_api_version IN NUMBER,
622: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
623: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
624: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
625: x_return_status OUT NOCOPY VARCHAR2,
626: x_msg_count OUT NOCOPY NUMBER,

Line 623: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

619: PROCEDURE SNUniqueCheck
620: (
621: p_api_version IN NUMBER,
622: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
623: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
624: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
625: x_return_status OUT NOCOPY VARCHAR2,
626: x_msg_count OUT NOCOPY NUMBER,
627: x_msg_data OUT NOCOPY VARCHAR2,

Line 624: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,

620: (
621: p_api_version IN NUMBER,
622: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
623: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
624: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
625: x_return_status OUT NOCOPY VARCHAR2,
626: x_msg_count OUT NOCOPY NUMBER,
627: x_msg_data OUT NOCOPY VARCHAR2,
628: x_errorcode OUT NOCOPY NUMBER,

Line 643: IF NOT FND_API.Compatible_API_Call(l_api_version

639: BEGIN
640: -- Standard start of API savepoint
641: SAVEPOINT SNUniqueCheck;
642: -- Standard Call to check for call compatibility
643: IF NOT FND_API.Compatible_API_Call(l_api_version
644: , p_api_version
645: , l_api_name
646: , G_PKG_NAME) THEN
647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

643: IF NOT FND_API.Compatible_API_Call(l_api_version
644: , p_api_version
645: , l_api_name
646: , G_PKG_NAME) THEN
647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
648: END IF;
649: --
650: -- Initialize message list if p_init_msg_list is set to true
651: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 651: IF FND_API.to_Boolean(p_init_msg_list) THEN

647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
648: END IF;
649: --
650: -- Initialize message list if p_init_msg_list is set to true
651: IF FND_API.to_Boolean(p_init_msg_list) THEN
652: FND_MSG_PUB.initialize;
653: END IF;
654: --
655: -- Initialisize API return status to access

Line 656: x_return_status := FND_API.G_RET_STS_SUCCESS;

652: FND_MSG_PUB.initialize;
653: END IF;
654: --
655: -- Initialisize API return status to access
656: x_return_status := FND_API.G_RET_STS_SUCCESS;
657: x_errorcode := 0;
658:
659: --
660: -- API Body

Line 676: RAISE FND_API.G_EXC_ERROR;

672: FND_MESSAGE.set_name('INV','INV_SER_UNIQ1');
673: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
674: FND_MSG_PUB.Add;
675: x_errorcode := 113;
676: RAISE FND_API.G_EXC_ERROR;
677: end if;
678: EXCEPTION
679: WHEN TOO_MANY_ROWS THEN
680: FND_MESSAGE.set_name('INV','INV_SER_UNIQ1');

Line 684: RAISE FND_API.G_EXC_ERROR;

680: FND_MESSAGE.set_name('INV','INV_SER_UNIQ1');
681: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
682: FND_MSG_PUB.Add;
683: x_errorcode := 113;
684: RAISE FND_API.G_EXC_ERROR;
685:
686: WHEN NO_DATA_FOUND then
687: null;
688: END;

Line 704: raise FND_API.G_EXC_ERROR;

700: FND_MESSAGE.set_name('INV','INV_SER_UNIACR');
701: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
702: FND_MSG_PUB.Add;
703: x_errorcode := 114;
704: raise FND_API.G_EXC_ERROR;
705: end if;
706:
707: EXCEPTION
708: WHEN TOO_MANY_ROWS THEN

Line 713: RAISE FND_API.G_EXC_ERROR;

709: FND_MESSAGE.set_name('INV','INV_SER_UNIACR');
710: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
711: FND_MSG_PUB.Add;
712: x_errorcode := 114;
713: RAISE FND_API.G_EXC_ERROR;
714: WHEN NO_DATA_FOUND THEN
715: null;
716: END;
717:

Line 729: RAISE FND_API.G_EXC_ERROR;

725: FND_MESSAGE.set_name('INV','INV_INLTIS_SER1');
726: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
727: FND_MSG_PUB.Add;
728: x_errorcode := 115;
729: RAISE FND_API.G_EXC_ERROR;
730: end if;
731: EXCEPTION
732: WHEN TOO_MANY_ROWS THEN
733: FND_MESSAGE.set_name('INV','INV_INLTIS_SER1');

Line 737: RAISE FND_API.G_EXC_ERROR;

733: FND_MESSAGE.set_name('INV','INV_INLTIS_SER1');
734: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
735: FND_MSG_PUB.Add;
736: x_errorcode := 115;
737: RAISE FND_API.G_EXC_ERROR;
738: WHEN NO_DATA_FOUND THEN
739: null;
740: END;
741: END IF;

Line 748: IF FND_API.to_Boolean(p_commit) THEN

744: -- END of API body
745: --
746:
747: -- Standard check of p_commit
748: IF FND_API.to_Boolean(p_commit) THEN
749: COMMIT;
750: END IF;
751:
752: -- Standard call to get message count and if count is 1, get message info

Line 758: WHEN FND_API.G_EXC_ERROR THEN

754: , p_data => x_msg_data);
755:
756:
757: EXCEPTION
758: WHEN FND_API.G_EXC_ERROR THEN
759: --
760: ROLLBACK TO SNUniqueCheck;
761: --
762: x_return_status := FND_API.G_RET_STS_ERROR;

Line 762: x_return_status := FND_API.G_RET_STS_ERROR;

758: WHEN FND_API.G_EXC_ERROR THEN
759: --
760: ROLLBACK TO SNUniqueCheck;
761: --
762: x_return_status := FND_API.G_RET_STS_ERROR;
763: --
764: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
765:
766: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 766: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

762: x_return_status := FND_API.G_RET_STS_ERROR;
763: --
764: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
765:
766: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
767: --
768: ROLLBACK TO SNUniqueCheck;
769:
770: x_errorcode := -1;

Line 771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

767: --
768: ROLLBACK TO SNUniqueCheck;
769:
770: x_errorcode := -1;
771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
772:
773: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
774: , p_data => x_msg_data);
775:

Line 781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

777: --
778: ROLLBACK TO SNUniqueCheck;
779: --
780: x_errorcode := -1;
781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
782: --
783: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
784: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
785: END IF;

Line 903: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE ,

899:
900: -- TODO: need to add serial geneology stuff
901: PROCEDURE SNValidate
902: (p_api_version IN NUMBER,
903: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
904: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
905: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
906: x_return_status OUT NOCOPY VARCHAR2,
907: x_msg_count OUT NOCOPY NUMBER,

Line 904: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

900: -- TODO: need to add serial geneology stuff
901: PROCEDURE SNValidate
902: (p_api_version IN NUMBER,
903: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
904: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
905: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
906: x_return_status OUT NOCOPY VARCHAR2,
907: x_msg_count OUT NOCOPY NUMBER,
908: x_msg_data OUT NOCOPY VARCHAR2,

Line 905: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,

901: PROCEDURE SNValidate
902: (p_api_version IN NUMBER,
903: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
904: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
905: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
906: x_return_status OUT NOCOPY VARCHAR2,
907: x_msg_count OUT NOCOPY NUMBER,
908: x_msg_data OUT NOCOPY VARCHAR2,
909: x_errorcode OUT NOCOPY NUMBER,

Line 942: IF NOT FND_API.Compatible_API_Call(l_api_version

938: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
939: BEGIN
940: SAVEPOINT SNValidate;
941: -- Standard Call to check for call compatibility
942: IF NOT FND_API.Compatible_API_Call(l_api_version
943: , p_api_version
944: , l_api_name
945: , G_PKG_NAME) THEN
946: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 946: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

942: IF NOT FND_API.Compatible_API_Call(l_api_version
943: , p_api_version
944: , l_api_name
945: , G_PKG_NAME) THEN
946: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
947: END IF;
948: --
949: -- Initialize message list if p_init_msg_list is set to true
950: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 950: IF FND_API.to_Boolean(p_init_msg_list) THEN

946: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
947: END IF;
948: --
949: -- Initialize message list if p_init_msg_list is set to true
950: IF FND_API.to_Boolean(p_init_msg_list) THEN
951: FND_MSG_PUB.initialize;
952: END IF;
953: --
954: -- Initialisize API return status to success

Line 955: x_return_status := FND_API.G_RET_STS_SUCCESS;

951: FND_MSG_PUB.initialize;
952: END IF;
953: --
954: -- Initialisize API return status to success
955: x_return_status := FND_API.G_RET_STS_SUCCESS;
956: x_errorcode := 0;
957:
958:
959: --

Line 1017: raise FND_API.G_EXC_ERROR;

1013: FND_MESSAGE.set_name('INV','INV_SER_INVALID_STATUS');
1014: FND_MESSAGE.SET_TOKEN('TOKEN',P_serial_number);
1015: FND_MSG_PUB.Add;
1016: x_errorcode := 105;
1017: raise FND_API.G_EXC_ERROR;
1018: END IF;
1019:
1020: IF (l_debug = 1) THEN
1021: mdebug ('SNValidate : After status check ');

Line 1035: raise FND_API.G_EXC_ERROR;

1031: FND_MESSAGE.set_name('INV','INV_SER_STATUS_NA');
1032: FND_MESSAGE.SET_TOKEN('TOKEN',P_serial_number);
1033: FND_MSG_PUB.Add;
1034: x_errorcode := 106;
1035: raise FND_API.G_EXC_ERROR;
1036: END IF;
1037: IF (l_debug = 1) THEN
1038: mdebug ('SNValidate : After Stats+7 ');
1039: END IF;

Line 1062: RAISE FND_API.G_EXC_ERROR;

1058: FND_MESSAGE.set_name('INV','INV_SER_ORG_INVALID');
1059: FND_MESSAGE.SET_TOKEN('TOKEN',P_serial_number);
1060: FND_MSG_PUB.Add;
1061: x_errorcode := 107;
1062: RAISE FND_API.G_EXC_ERROR;
1063: END IF;
1064:
1065: IF (l_debug = 1) THEN
1066: mdebug ('SNValidate : After Stats - not org ');

Line 1076: raise FND_API.G_EXC_ERROR;

1072: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
1073: FND_MESSAGE.SET_TOKEN('TOKEN2',L_current_revision);
1074: FND_MSG_PUB.Add;
1075: x_errorcode := 108;
1076: raise FND_API.G_EXC_ERROR;
1077: ELSIF L_current_lot_number <> P_lot_number then
1078: FND_MESSAGE.set_name('INV','INV_SER_LOT_INVALID');
1079: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
1080: FND_MESSAGE.SET_TOKEN('TOKEN2',L_current_lot_number);

Line 1083: raise FND_API.G_EXC_ERROR;

1079: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
1080: FND_MESSAGE.SET_TOKEN('TOKEN2',L_current_lot_number);
1081: FND_MSG_PUB.Add;
1082: x_errorcode := 109;
1083: raise FND_API.G_EXC_ERROR;
1084: END IF;
1085: END IF;
1086: /*--------------------------------------------------------------+
1087: | If issuing a unit which is currently in inventory, then we

Line 1101: RAISE FND_API.G_EXC_ERROR;

1097: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
1098: FND_MESSAGE.SET_TOKEN('TOKEN2',L_current_subinventory);
1099: FND_MSG_PUB.Add;
1100: x_errorcode := 110;
1101: RAISE FND_API.G_EXC_ERROR;
1102: ELSIF L_current_locator_id <> P_locator_id then
1103: FND_MESSAGE.set_name('INV','INV_SER_LOC_INVALID');
1104: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
1105: FND_MSG_PUB.Add;

Line 1107: RAISE FND_API.G_EXC_ERROR;

1103: FND_MESSAGE.set_name('INV','INV_SER_LOC_INVALID');
1104: FND_MESSAGE.SET_TOKEN('TOKEN1',P_serial_number);
1105: FND_MSG_PUB.Add;
1106: x_errorcode := 111;
1107: RAISE FND_API.G_EXC_ERROR;
1108: END IF;
1109: END IF;
1110:
1111: EXCEPTION

Line 1122: RAISE FND_API.G_EXC_ERROR;

1118: FND_MESSAGE.set_name('INV','INV_SER_NOTEXIST');
1119: FND_MESSAGE.SET_TOKEN('TOKEN',P_serial_number);
1120: FND_MSG_PUB.Add;
1121: x_errorcode := 118;
1122: RAISE FND_API.G_EXC_ERROR;
1123: ELSE
1124: x_SerExists := 0;
1125: END IF;
1126: END;

Line 1138: raise FND_API.G_EXC_ERROR;

1134: FND_MESSAGE.set_name('INV','INV_SER_STATUS_NA');
1135: FND_MESSAGE.SET_TOKEN('TOKEN',P_serial_number);
1136: FND_MSG_PUB.Add;
1137: x_errorcode := 106;
1138: raise FND_API.G_EXC_ERROR;
1139: END IF;
1140:
1141: --
1142: -- SERIAL GENEOLOGY UPDATE GOES HERE

Line 1150: IF FND_API.to_Boolean(p_commit) THEN

1146: --
1147: -- END of API body
1148: --
1149:
1150: IF FND_API.to_Boolean(p_commit) THEN
1151: COMMIT;
1152: END IF;
1153: -- Standard call to get message count and if count is 1, get message info
1154: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count

Line 1158: WHEN FND_API.G_EXC_ERROR THEN

1154: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1155: , p_data => x_msg_data);
1156:
1157: EXCEPTION
1158: WHEN FND_API.G_EXC_ERROR THEN
1159: --
1160: ROLLBACK TO SNValidate;
1161: --
1162: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1162: x_return_status := FND_API.G_RET_STS_ERROR;

1158: WHEN FND_API.G_EXC_ERROR THEN
1159: --
1160: ROLLBACK TO SNValidate;
1161: --
1162: x_return_status := FND_API.G_RET_STS_ERROR;
1163: --
1164: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1165: , p_data => x_msg_data);
1166: --

Line 1168: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1164: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1165: , p_data => x_msg_data);
1166: --
1167:
1168: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1169: IF (l_debug = 1) THEN
1170: mdebug('InvQtyBetwn: Unexpected error '||sqlerrm);
1171: END IF;
1172: --

Line 1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1173: ROLLBACK TO SNValidate;
1174: --
1175: x_errorcode := -1;
1176:
1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1178:
1179: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1180: , p_data => x_msg_data);
1181:

Line 1191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1187: --
1188: ROLLBACK TO SNValidate;
1189: --
1190: x_errorcode := -1;
1191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1192: --
1193: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1194: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1195: END IF;