[Home] [Help]
68: WHEN no_data_found THEN
69: l_return_value := FALSE;
70: fnd_message.set_name('CSI','CSI_NO_ORG_SET');
71: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
72: fnd_msg_pub.add;
73: RETURN l_return_value;
74: END;
75: --
76: l_temp := NULL;
92: IF l_temp IS NOT NULL THEN
93: l_return_value := FALSE;
94: fnd_message.set_name('CSI','CSI_LOT_CASE2');
95: fnd_message.set_token('LOT_NUMBER',p_instance_rec.lot_number);
96: fnd_msg_pub.add;
97: RETURN l_return_value;
98: END IF;
99: END IF;
100: --
125: WHEN no_data_found THEN
126: l_return_value := FALSE;
127: fnd_message.set_name('CSI','CSI_NO_ORG_SET');
128: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
129: fnd_msg_pub.add;
130: RETURN l_return_value;
131: END;
132: --
133: l_temp := NULL;
145: l_return_value := FALSE;
146: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM');
147: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',p_instance_rec.inventory_item_id);
148: FND_MESSAGE.SET_TOKEN('INVENTORY_ORGANIZATION_ID',p_instance_rec.vld_organization_id);
149: FND_MSG_PUB.Add;
150: RETURN l_return_value;
151: End;
152: --
153: FOR j IN p_instance_tbl.FIRST .. p_instance_tbl.LAST LOOP
190: IF nvl(l_temp,'0') = '1' THEN
191: l_return_value := FALSE;
192: fnd_message.set_name('CSI','CSI_SER_CASE1');
193: fnd_message.set_token('SERIAL_NUMBER',p_instance_rec.serial_number);
194: fnd_msg_pub.add;
195: RETURN l_return_value;
196: ELSIF nvl(l_temp,'0') = '4' THEN
197: l_return_value := FALSE;
198: fnd_message.set_name('CSI','CSI_SER_CASE4');
196: ELSIF nvl(l_temp,'0') = '4' THEN
197: l_return_value := FALSE;
198: fnd_message.set_name('CSI','CSI_SER_CASE4');
199: fnd_message.set_token('SERIAL_NUMBER',p_instance_rec.serial_number);
200: fnd_msg_pub.add;
201: RETURN l_return_value;
202: END IF;
203: END IF; -- Serial Type 1
204: --
217: IF l_temp IS NOT NULL THEN
218: l_return_value := FALSE;
219: fnd_message.set_name('CSI','CSI_SER_CASE1');
220: fnd_message.set_token('SERIAL_NUMBER',p_instance_rec.serial_number);
221: fnd_msg_pub.add;
222: RETURN l_return_value;
223: END IF;
224: END IF; -- serial_type 4
225: --
238: IF l_temp IS NOT NULL THEN
239: l_return_value := FALSE;
240: fnd_message.set_name('CSI','CSI_SER_CASE2');
241: fnd_message.set_token('SERIAL_NUMBER',p_instance_rec.serial_number);
242: fnd_msg_pub.add;
243: RETURN l_return_value;
244: END IF;
245: --
246: -- Also check if it has been already defined as
257: IF l_temp IS NOT NULL THEN
258: l_return_value := FALSE;
259: fnd_message.set_name('CSI','CSI_SER_CASE21');
260: fnd_message.set_token('SERIAL_NUMBER',p_instance_rec.serial_number);
261: fnd_msg_pub.add;
262: RETURN l_return_value;
263: END IF;
264: EXCEPTION
265: WHEN OTHERS THEN
281: IF l_temp IS NOT NULL THEN
282: l_return_value := FALSE;
283: fnd_message.set_name('CSI','CSI_SER_CASE3');
284: fnd_message.set_token('SERIAL_NUMBER',p_instance_rec.serial_number);
285: fnd_msg_pub.add;
286: RETURN l_return_value;
287: END IF;
288: END IF; -- serial_type 3
289: --
312: IF TRUNC(l_party_rec.active_start_date,'MI') > TRUNC(l_party_rec.active_end_date,'MI') THEN --Changed to trunc for bug 9756224
313: l_return_status := FALSE;
314: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_PTY_START_DATE');
315: FND_MESSAGE.SET_TOKEN('ACTIVE_START_DATE',l_party_rec.active_start_date);
316: FND_MSG_PUB.ADD;
317: RETURN l_return_status;
318: END IF;
319: --
320: IF ( (TRUNC(l_party_rec.active_end_date,'MI') < TRUNC(SYSDATE,'MI')) OR
321: (p_end_date IS NOT NULL AND TRUNC(l_party_rec.active_end_date,'MI') > TRUNC(p_end_date,'MI'))) THEN --Changed to trunc for bug 9756224
322: l_return_status := FALSE;
323: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_PTY_END_DATE');
324: FND_MESSAGE.SET_TOKEN('ACTIVE_END_DATE',l_party_rec.active_end_date);
325: FND_MSG_PUB.ADD;
326: RETURN l_return_status;
327: END IF;
328: END IF;
329: --
331: (p_end_date IS NOT NULL AND p_end_date <> FND_API.G_MISS_DATE AND TRUNC(l_party_rec.active_start_date,'MI') > TRUNC(p_end_date,'MI')) ) THEN --Changed to trunc for bug 9756224
332: l_return_status := FALSE;
333: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_PTY_START_DATE');
334: FND_MESSAGE.SET_TOKEN('ACTIVE_START_DATE',l_party_rec.active_start_date);
335: FND_MSG_PUB.ADD;
336: RETURN l_return_status;
337: END IF;
338: IF l_party_tbl.count < 2 THEN
339: l_return_status := TRUE;
356: l_return_status := FALSE;
357: FND_MESSAGE.SET_NAME('CSI','CSI_PREFERRED_PTY_TYPE');
358: FND_MESSAGE.SET_TOKEN('PARTY_TYPE',l_party_rec.PARTY_SOURCE_TABLE);
359: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',l_party_rec.INSTANCE_ID);
360: FND_MSG_PUB.ADD;
361: RETURN l_return_status;
362: END IF;
363: END IF;
364: END IF;
388: l_return_status := FALSE;
389: FND_MESSAGE.SET_NAME('CSI','CSI_PRIMARY_PTY_TYPE');
390: FND_MESSAGE.SET_TOKEN('PARTY_TYPE',l_party_rec.PARTY_SOURCE_TABLE);
391: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',l_party_rec.INSTANCE_ID);
392: FND_MSG_PUB.ADD;
393: exit;
394: ELSE
395: -- Check for Primary Party
396: IF l_party_tbl(pty_row).primary_flag = 'Y' AND
414: IF l_count > 1 THEN
415: l_return_status := FALSE;
416: FND_MESSAGE.SET_NAME('CSI','CSI_API_MANY_PTY_REL_COM_EXIST');
417: FND_MESSAGE.SET_TOKEN('PARTY_REL_COMB',to_char(l_party_rec.INSTANCE_ID)||','||l_party_rec.PARTY_SOURCE_TABLE||','||to_char(l_party_rec.party_id)||','||l_party_rec.relationship_type_code);
418: FND_MSG_PUB.ADD;
419: RETURN l_return_status;
420: END IF;
421: --
422: IF l_primary_pty_count > 1 OR
424: l_return_status := FALSE;
425: FND_MESSAGE.SET_NAME('CSI','CSI_API_PRIMARY_PTY_EXISTS');
426: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',l_party_rec.INSTANCE_ID);
427: FND_MESSAGE.SET_TOKEN('RELATIONSHIP_TYPE',l_party_rec.relationship_type_code);
428: FND_MSG_PUB.ADD;
429: RETURN l_return_status;
430: END IF;
431: --
432: RETURN l_return_status;
458: IF TRUNC(p_account_rec.active_start_date,'MI') > TRUNC(p_account_rec.active_end_date,'MI') THEN --Changed to trunc for bug 9756224
459: l_return_status := FALSE;
460: FND_MESSAGE.SET_NAME('CSI','CSI_API_INV_ACCT_START_DATE');
461: FND_MESSAGE.SET_TOKEN('ACTIVE_START_DATE',p_account_rec.active_start_date);
462: FND_MSG_PUB.ADD;
463: RETURN l_return_status;
464: END IF;
465: --
466: IF ( (TRUNC(p_account_rec.active_end_date,'MI') < TRUNC(SYSDATE,'MI')) OR
467: (p_end_date IS NOT NULL AND TRUNC(p_account_rec.active_end_date,'MI') > TRUNC(p_end_date,'MI')) ) THEN --Changed to trunc for bug 9756224
468: l_return_status := FALSE;
469: FND_MESSAGE.SET_NAME('CSI','CSI_API_INV_ACCT_END_DATE');
470: FND_MESSAGE.SET_TOKEN('ACTIVE_END_DATE',p_account_rec.active_end_date);
471: FND_MSG_PUB.ADD;
472: RETURN l_return_status;
473: END IF;
474: END IF;
475: --
477: (p_end_date IS NOT NULL AND p_end_date <> FND_API.G_MISS_DATE AND TRUNC(p_account_rec.active_start_date,'MI') > TRUNC(p_end_date,'MI')) ) THEN --Changed to trunc for bug 9756224
478: l_return_status := FALSE;
479: FND_MESSAGE.SET_NAME('CSI','CSI_API_INV_ACCT_START_DATE');
480: FND_MESSAGE.SET_TOKEN('ACTIVE_START_DATE',p_account_rec.active_start_date);
481: FND_MSG_PUB.ADD;
482: RETURN l_return_status;
483: END IF;
484: --
485: /**** IF p_pty_src_table = 'HZ_PARTIES' AND
531: IF l_valid_flag <> 'Y' THEN
532: l_return_status := FALSE;
533: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_PTY_ACCT_ID');
534: FND_MESSAGE.SET_TOKEN('PARTY_ACCOUNT_ID',p_account_rec.party_account_id);
535: FND_MSG_PUB.ADD;
536: RETURN l_return_status;
537: END IF;
538: END IF;
539: --
551: p_acct_id_tbl(l_ctr).valid_flag := 'N';
552: l_return_status := FALSE;
553: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_PTY_ACCT_ID');
554: FND_MESSAGE.SET_TOKEN('PARTY_ACCOUNT_ID',p_account_rec.party_account_id);
555: FND_MSG_PUB.ADD;
556: RETURN l_return_status;
557: End;
558: END IF;
559: END IF;
578: l_return_status := FALSE;
579: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_PARTY_ACCT_COM');
580: FND_MESSAGE.SET_TOKEN('ACCT_COMBINATION',to_char(p_account_rec.instance_party_id) ||', '
581: ||to_char(p_account_rec.party_account_id) ||','||p_account_rec.relationship_type_code);
582: FND_MSG_PUB.ADD;
583: RETURN l_return_status;
584: END IF;
585: --
586: IF l_rel_count > 1 THEN
586: IF l_rel_count > 1 THEN
587: l_return_status := FALSE;
588: FND_MESSAGE.SET_NAME('CSI','CSI_API_DUP_ACCT_TYPE');
589: FND_MESSAGE.SET_TOKEN('RELATIONSHIP_TYPE_CODE',p_account_rec.relationship_type_code);
590: FND_MSG_PUB.ADD;
591: RETURN l_return_status;
592: END IF;
593: --
594: RETURN l_return_status;
611: IF p_org_units_rec.active_start_date > p_org_units_rec.active_end_date THEN
612: l_return_status := FALSE;
613: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_ORG_START_DATE');
614: FND_MESSAGE.SET_TOKEN('START_DATE',p_org_units_rec.active_start_date);
615: FND_MSG_PUB.ADD;
616: RETURN l_return_status;
617: END IF;
618: --
619: IF ( (p_org_units_rec.active_end_date < SYSDATE) OR
620: (p_end_date IS NOT NULL AND p_org_units_rec.active_end_date > p_end_date) ) THEN
621: l_return_status := FALSE;
622: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_ORG_END_DATE');
623: FND_MESSAGE.SET_TOKEN('END_DATE',p_org_units_rec.active_end_date);
624: FND_MSG_PUB.ADD;
625: RETURN l_return_status;
626: END IF;
627: END IF;
628: --
630: (p_end_date IS NOT NULL AND p_end_date <> FND_API.G_MISS_DATE AND p_org_units_rec.active_start_date > p_end_date) ) THEN
631: l_return_status := FALSE;
632: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_ORG_START_DATE');
633: FND_MESSAGE.SET_TOKEN('START_DATE',p_org_units_rec.active_start_date);
634: FND_MSG_PUB.ADD;
635: RETURN l_return_status;
636: END IF;
637: --
638: IF p_org_units_tbl.count < 2 THEN
649: IF l_count > 1 THEN
650: l_return_status := FALSE;
651: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ALTERNATE_PK');
652: FND_MESSAGE.SET_TOKEN('ALTERNATE_PK',to_char(p_org_units_rec.instance_id)||' '||p_org_units_rec.relationship_type_code);
653: FND_MSG_PUB.ADD;
654: RETURN l_return_status;
655: END IF;
656: --
657: RETURN l_return_status;
673: IF p_pricing_rec.active_start_date > p_pricing_rec.active_end_date THEN
674: l_return_status := FALSE;
675: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_PRI_START_DATE');
676: FND_MESSAGE.SET_TOKEN('START_DATE',p_pricing_rec.active_start_date);
677: FND_MSG_PUB.ADD;
678: RETURN l_return_status;
679: END IF;
680: --
681: IF ( (p_pricing_rec.active_end_date < SYSDATE) OR
682: (p_end_date IS NOT NULL AND p_pricing_rec.active_end_date > p_end_date) ) THEN
683: l_return_status := FALSE;
684: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_PRI_END_DATE');
685: FND_MESSAGE.SET_TOKEN('END_DATE',p_pricing_rec.active_end_date);
686: FND_MSG_PUB.ADD;
687: RETURN l_return_status;
688: END IF;
689: END IF;
690: --
692: (p_end_date IS NOT NULL AND p_end_date <> FND_API.G_MISS_DATE AND p_pricing_rec.active_start_date > p_end_date) ) THEN
693: l_return_status := FALSE;
694: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_PRI_START_DATE');
695: FND_MESSAGE.SET_TOKEN('START_DATE',p_pricing_rec.active_start_date);
696: FND_MSG_PUB.ADD;
697: RETURN l_return_status;
698: END IF;
699: --
700: RETURN l_return_status;
718: IF p_ext_rec.active_start_date > p_ext_rec.active_end_date THEN
719: l_return_status := FALSE;
720: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_EXT_START_DATE');
721: FND_MESSAGE.SET_TOKEN('START_DATE',p_ext_rec.active_start_date);
722: FND_MSG_PUB.ADD;
723: RETURN l_return_status;
724: END IF;
725: --
726: IF ( (p_ext_rec.active_end_date < SYSDATE) OR
727: (p_end_date IS NOT NULL AND p_ext_rec.active_end_date > p_end_date) ) THEN
728: l_return_status := FALSE;
729: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_EXT_END_DATE');
730: FND_MESSAGE.SET_TOKEN('END_DATE',p_ext_rec.active_end_date);
731: FND_MSG_PUB.ADD;
732: RETURN l_return_status;
733: END IF;
734: END IF;
735: --
737: (p_end_date IS NOT NULL AND p_end_date <> FND_API.G_MISS_DATE AND p_ext_rec.active_start_date > p_end_date) ) THEN
738: l_return_status := FALSE;
739: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_EXT_START_DATE');
740: FND_MESSAGE.SET_TOKEN('START_DATE',p_ext_rec.active_start_date);
741: FND_MSG_PUB.ADD;
742: RETURN l_return_status;
743: END IF;
744: --
745: IF p_ext_tbl.count < 2 THEN
756: IF l_count > 1 THEN
757: l_return_status := FALSE;
758: FND_MESSAGE.SET_NAME('CSI','CSI_EXT_INVALID_ALTERNATE_PK');
759: FND_MESSAGE.SET_TOKEN('ALTERNATE_PK',to_char(p_ext_rec.instance_id)||','||to_char(p_ext_rec.attribute_id));
760: FND_MSG_PUB.ADD;
761: RETURN l_return_status;
762: END IF;
763: --
764: RETURN l_return_status;
780: IF p_asset_rec.active_start_date > p_asset_rec.active_end_date THEN
781: l_return_status := FALSE;
782: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_AST_START_DATE');
783: FND_MESSAGE.SET_TOKEN('START_DATE',p_asset_rec.active_start_date);
784: FND_MSG_PUB.ADD;
785: RETURN l_return_status;
786: END IF;
787: --
788: IF ( (p_asset_rec.active_end_date < SYSDATE) OR
789: (p_end_date IS NOT NULL AND p_asset_rec.active_end_date > p_end_date) ) THEN
790: l_return_status := FALSE;
791: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_AST_END_DATE');
792: FND_MESSAGE.SET_TOKEN('END_DATE',p_asset_rec.active_end_date);
793: FND_MSG_PUB.ADD;
794: RETURN l_return_status;
795: END IF;
796: END IF;
797: --
799: (p_end_date IS NOT NULL AND p_end_date <> FND_API.G_MISS_DATE AND p_asset_rec.active_start_date > p_end_date) ) THEN
800: l_return_status := FALSE;
801: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVAL_AST_START_DATE');
802: FND_MESSAGE.SET_TOKEN('START_DATE',p_asset_rec.active_start_date);
803: FND_MSG_PUB.ADD;
804: RETURN l_return_status;
805: END IF;
806: --
807: RETURN l_return_status;
6026: END IF;
6027:
6028: -- Initialize message list if p_init_msg_list is set to TRUE.
6029: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6030: FND_MSG_PUB.initialize;
6031: END IF;
6032:
6033: -- Initialize API return status to success
6034: x_return_status := FND_API.G_RET_STS_SUCCESS;
6070: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
6071: --
6072: IF l_internal_party_id IS NULL THEN
6073: FND_MESSAGE.SET_NAME('CSI','CSI_API_UNINSTALLED_PARAMETER');
6074: FND_MSG_PUB.ADD;
6075: RAISE OTHER_ERROR;
6076: END IF;
6077: --
6078: BEGIN
6084: EXCEPTION
6085: WHEN OTHERS THEN
6086: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_STATUS_ID');
6087: FND_MESSAGE.SET_TOKEN('INSTANCE_STATUS',l_instance_status);
6088: FND_MSG_PUB.Add;
6089: -- RAISE FND_API.G_EXC_ERROR;
6090: RAISE OTHER_ERROR; -- Added for bug 3579121 (rel 11.5.9)
6091: END;
6092: --
6207: FOR inst_tab_row IN p_instance_tbl.FIRST .. p_instance_tbl.LAST
6208: LOOP
6209: BEGIN
6210: IF p_instance_tbl.EXISTS(inst_tab_row) THEN
6211: FND_MSG_PUB.initialize;
6212: csi_gen_utility_pvt.dump_instance_rec(p_instance_tbl(inst_tab_row));
6213:
6214: -- Standard Start of API savepoint
6215: SAVEPOINT create_item_instance;
6362: IF ((p_instance_tbl(inst_tab_row).version_label IS NULL) OR
6363: (p_instance_tbl(inst_tab_row).version_label = FND_API.G_MISS_CHAR)) THEN
6364: IF l_version_label IS NULL THEN
6365: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_VERSION_LABEL');
6366: FND_MSG_PUB.ADD;
6367: l_msg_index := 1;
6368: FND_MSG_PUB.Count_And_Get
6369: (p_count => x_msg_count,
6370: p_data => x_msg_data
6364: IF l_version_label IS NULL THEN
6365: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_VERSION_LABEL');
6366: FND_MSG_PUB.ADD;
6367: l_msg_index := 1;
6368: FND_MSG_PUB.Count_And_Get
6369: (p_count => x_msg_count,
6370: p_data => x_msg_data
6371: );
6372: l_msg_count := x_msg_count;
6370: p_data => x_msg_data
6371: );
6372: l_msg_count := x_msg_count;
6373: WHILE l_msg_count > 0 LOOP
6374: x_msg_data := FND_MSG_PUB.GET
6375: ( l_msg_index,
6376: FND_API.G_FALSE );
6377: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
6378: l_msg_index := l_msg_index + 1;
6401: ( p_instance_rec => p_instance_tbl(inst_tab_row),
6402: p_instance_tbl => p_instance_tbl,
6403: p_inst_tab_row => inst_tab_row) THEN --bug 9227016
6404: l_msg_index := 1;
6405: FND_MSG_PUB.Count_And_Get
6406: (p_count => x_msg_count,
6407: p_data => x_msg_data
6408: );
6409: l_msg_count := x_msg_count;
6407: p_data => x_msg_data
6408: );
6409: l_msg_count := x_msg_count;
6410: WHILE l_msg_count > 0 LOOP
6411: x_msg_data := FND_MSG_PUB.GET
6412: ( l_msg_index,
6413: FND_API.G_FALSE );
6414: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
6415: l_msg_index := l_msg_index + 1;
6430: IF NOT Valid_Lot_Number
6431: ( p_instance_rec => p_instance_tbl(inst_tab_row),
6432: p_instance_tbl => p_instance_tbl) THEN
6433: l_msg_index := 1;
6434: FND_MSG_PUB.Count_And_Get
6435: (p_count => x_msg_count,
6436: p_data => x_msg_data
6437: );
6438: l_msg_count := x_msg_count;
6436: p_data => x_msg_data
6437: );
6438: l_msg_count := x_msg_count;
6439: WHILE l_msg_count > 0 LOOP
6440: x_msg_data := FND_MSG_PUB.GET
6441: ( l_msg_index,
6442: FND_API.G_FALSE );
6443: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
6444: l_msg_index := l_msg_index + 1;
6490: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6491: l_msg_index := 1;
6492: l_msg_count := x_msg_count;
6493: WHILE l_msg_count > 0 LOOP
6494: x_msg_data := FND_MSG_PUB.GET
6495: ( l_msg_index,
6496: FND_API.G_FALSE );
6497: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre API ');
6498: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
6536: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6537: l_msg_index := 1;
6538: l_msg_count := x_msg_count;
6539: WHILE l_msg_count > 0 LOOP
6540: x_msg_data := FND_MSG_PUB.GET
6541: ( l_msg_index,
6542: FND_API.G_FALSE );
6543: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre API ');
6544: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
6582: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.. ');
6583: l_msg_index := 1;
6584: l_msg_count := x_msg_count;
6585: WHILE l_msg_count > 0 LOOP
6586: x_msg_data := FND_MSG_PUB.GET
6587: ( l_msg_index,
6588: FND_API.G_FALSE );
6589: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
6590: l_msg_index := l_msg_index + 1;
6622: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6623: l_msg_index := 1;
6624: l_msg_count := x_msg_count;
6625: WHILE l_msg_count > 0 LOOP
6626: x_msg_data := FND_MSG_PUB.GET
6627: ( l_msg_index,
6628: FND_API.G_FALSE );
6629: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post API ');
6630: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
6766: ,p_start_date => p_instance_tbl(inst_tab_row).active_start_date
6767: ,p_end_date => p_instance_tbl(inst_tab_row).active_end_date
6768: ) ) THEN
6769: l_msg_index := 1;
6770: FND_MSG_PUB.Count_And_Get
6771: (p_count => x_msg_count,
6772: p_data => x_msg_data
6773: );
6774: l_msg_count := x_msg_count;
6772: p_data => x_msg_data
6773: );
6774: l_msg_count := x_msg_count;
6775: WHILE l_msg_count > 0 LOOP
6776: x_msg_data := FND_MSG_PUB.GET
6777: ( l_msg_index,
6778: FND_API.G_FALSE );
6779: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6780: l_msg_index := l_msg_index + 1;
6806: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6807: l_msg_index := 1;
6808: l_msg_count := x_msg_count;
6809: WHILE l_msg_count > 0 LOOP
6810: x_msg_data := FND_MSG_PUB.GET
6811: ( l_msg_index,
6812: FND_API.G_FALSE );
6813: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6814: l_msg_index := l_msg_index + 1;
6871: ,p_start_date => p_party_tbl(l_party_index).active_start_date
6872: ,p_end_date => p_party_tbl(l_party_index).active_end_date
6873: ) ) THEN
6874: l_msg_index := 1;
6875: FND_MSG_PUB.Count_And_Get
6876: (p_count => x_msg_count,
6877: p_data => x_msg_data
6878: );
6879: l_msg_count := x_msg_count;
6877: p_data => x_msg_data
6878: );
6879: l_msg_count := x_msg_count;
6880: WHILE l_msg_count > 0 LOOP
6881: x_msg_data := FND_MSG_PUB.GET(
6882: l_msg_index,
6883: FND_API.G_FALSE );
6884: csi_gen_utility_pvt.put_line( 'message data = '||x_msg_data);
6885: l_msg_index := l_msg_index + 1;
6910: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6911: l_msg_index := 1;
6912: l_msg_count := x_msg_count;
6913: WHILE l_msg_count > 0 LOOP
6914: x_msg_data := FND_MSG_PUB.GET(
6915: l_msg_index,
6916: FND_API.G_FALSE );
6917: csi_gen_utility_pvt.put_line( 'message data = '||x_msg_data);
6918: l_msg_index := l_msg_index + 1;
6959: ,p_start_date => p_instance_tbl(inst_tab_row).active_start_date
6960: ,p_end_date => p_instance_tbl(inst_tab_row).active_end_date
6961: ) ) THEN
6962: l_msg_index := 1;
6963: FND_MSG_PUB.Count_And_Get
6964: (p_count => x_msg_count,
6965: p_data => x_msg_data
6966: );
6967: l_msg_count := x_msg_count;
6965: p_data => x_msg_data
6966: );
6967: l_msg_count := x_msg_count;
6968: WHILE l_msg_count > 0 LOOP
6969: x_msg_data := FND_MSG_PUB.GET
6970: ( l_msg_index,
6971: FND_API.G_FALSE );
6972: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
6973: l_msg_index := l_msg_index + 1;
6998: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PVT..');
6999: l_msg_index := 1;
7000: l_msg_count := x_msg_count;
7001: WHILE l_msg_count > 0 LOOP
7002: x_msg_data := FND_MSG_PUB.GET
7003: ( l_msg_index,
7004: FND_API.G_FALSE );
7005: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
7006: l_msg_index := l_msg_index + 1;
7038: ,p_start_date => p_instance_tbl(inst_tab_row).active_start_date
7039: ,p_end_date => p_instance_tbl(inst_tab_row).active_end_date
7040: ) ) THEN
7041: l_msg_index := 1;
7042: FND_MSG_PUB.Count_And_Get
7043: (p_count => x_msg_count,
7044: p_data => x_msg_data
7045: );
7046: l_msg_count := x_msg_count;
7044: p_data => x_msg_data
7045: );
7046: l_msg_count := x_msg_count;
7047: WHILE l_msg_count > 0 LOOP
7048: x_msg_data := FND_MSG_PUB.GET
7049: ( l_msg_index,
7050: FND_API.G_FALSE );
7051: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
7052: l_msg_index := l_msg_index + 1;
7074: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
7075: l_msg_index := 1;
7076: l_msg_count := x_msg_count;
7077: WHILE l_msg_count > 0 LOOP
7078: x_msg_data := FND_MSG_PUB.GET
7079: ( l_msg_index,
7080: FND_API.G_FALSE );
7081: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
7082: l_msg_index := l_msg_index + 1;
7126: ,p_start_date => p_instance_tbl(inst_tab_row).active_start_date
7127: ,p_end_date => p_instance_tbl(inst_tab_row).active_end_date
7128: ) ) THEN
7129: l_msg_index := 1;
7130: FND_MSG_PUB.Count_And_Get
7131: (p_count => x_msg_count,
7132: p_data => x_msg_data
7133: );
7134: l_msg_count := x_msg_count;
7132: p_data => x_msg_data
7133: );
7134: l_msg_count := x_msg_count;
7135: WHILE l_msg_count > 0 LOOP
7136: x_msg_data := FND_MSG_PUB.GET
7137: ( l_msg_index,
7138: FND_API.G_FALSE );
7139: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
7140: l_msg_index := l_msg_index + 1;
7166: csi_gen_utility_pvt.put_line( ' Error from CSI_EXTENDED_ATTRIBS_PUB..');
7167: l_msg_index := 1;
7168: l_msg_count := x_msg_count;
7169: WHILE l_msg_count > 0 LOOP
7170: x_msg_data := FND_MSG_PUB.GET
7171: ( l_msg_index,
7172: FND_API.G_FALSE );
7173: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
7174: l_msg_index := l_msg_index + 1;
7206: ,p_start_date => p_instance_tbl(inst_tab_row).active_start_date
7207: ,p_end_date => p_instance_tbl(inst_tab_row).active_end_date
7208: ) ) THEN
7209: l_msg_index := 1;
7210: FND_MSG_PUB.Count_And_Get
7211: (p_count => x_msg_count,
7212: p_data => x_msg_data
7213: );
7214: l_msg_count := x_msg_count;
7212: p_data => x_msg_data
7213: );
7214: l_msg_count := x_msg_count;
7215: WHILE l_msg_count > 0 LOOP
7216: x_msg_data := FND_MSG_PUB.GET
7217: ( l_msg_index,
7218: FND_API.G_FALSE );
7219: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
7220: l_msg_index := l_msg_index + 1;
7277: csi_gen_utility_pvt.put_line( ' Error from CSI_ASSET_PVT..');
7278: l_msg_index := 1;
7279: l_msg_count := x_msg_count;
7280: WHILE l_msg_count > 0 LOOP
7281: x_msg_data := FND_MSG_PUB.GET
7282: ( l_msg_index,
7283: FND_API.G_FALSE );
7284: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
7285: l_msg_index := l_msg_index + 1;
7478: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7479: l_msg_index := 1;
7480: l_msg_count := x_msg_count;
7481: WHILE l_msg_count > 0 LOOP
7482: x_msg_data := FND_MSG_PUB.GET
7483: ( l_msg_index,
7484: FND_API.G_FALSE );
7485: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post API ');
7486: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7631: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7632: l_msg_index := 1;
7633: l_msg_count := x_msg_count;
7634: WHILE l_msg_count > 0 LOOP
7635: x_msg_data := FND_MSG_PUB.GET
7636: ( l_msg_index,
7637: FND_API.G_FALSE );
7638: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post API ');
7639: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7675: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7676: l_msg_index := 1;
7677: l_msg_count := x_msg_count;
7678: WHILE l_msg_count > 0 LOOP
7679: x_msg_data := FND_MSG_PUB.GET
7680: ( l_msg_index,
7681: FND_API.G_FALSE );
7682: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post API ');
7683: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7826: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7827: l_msg_index := 1;
7828: l_msg_count := x_msg_count;
7829: WHILE l_msg_count > 0 LOOP
7830: x_msg_data := FND_MSG_PUB.GET
7831: ( l_msg_index,
7832: FND_API.G_FALSE );
7833: l_msg_index := l_msg_index + 1;
7834: l_msg_count := l_msg_count - 1;
7877: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7878: l_msg_index := 1;
7879: l_msg_count := x_msg_count;
7880: WHILE l_msg_count > 0 LOOP
7881: x_msg_data := FND_MSG_PUB.GET
7882: ( l_msg_index,
7883: FND_API.G_FALSE );
7884: l_msg_index := l_msg_index + 1;
7885: l_msg_count := l_msg_count - 1;
7981: csi_gen_utility_pvt.put_line('Error from Call_to_contracts...');
7982: l_msg_index := 1;
7983: l_msg_count := x_msg_count;
7984: WHILE l_msg_count > 0 LOOP
7985: x_msg_data := FND_MSG_PUB.GET
7986: ( l_msg_index,
7987: FND_API.G_FALSE
7988: );
7989: l_msg_index := l_msg_index + 1;
8040: csi_gen_utility_pvt.put_line('Error from Call_to_contracts...');
8041: l_msg_index := 1;
8042: l_msg_count := x_msg_count;
8043: WHILE l_msg_count > 0 LOOP
8044: x_msg_data := FND_MSG_PUB.GET
8045: ( l_msg_index,
8046: FND_API.G_FALSE
8047: );
8048: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8168: -- End disable trace
8169: ****/
8170:
8171: -- Standard call to get message count and if count is get message info.
8172: FND_MSG_PUB.Count_And_Get
8173: (p_count => x_msg_count ,
8174: p_data => x_msg_data
8175: );
8176:
8177: EXCEPTION
8178: -- The following other_error exception is added for bug 3579121 (rel 11.5.9)
8179: WHEN OTHER_ERROR THEN
8180: x_return_status := FND_API.G_RET_STS_ERROR ;
8181: FND_MSG_PUB.Count_And_Get
8182: ( p_count => x_msg_count,
8183: p_data => x_msg_data
8184: );
8185:
8185:
8186: WHEN FND_API.G_EXC_ERROR THEN
8187: x_return_status := FND_API.G_RET_STS_ERROR ;
8188: ROLLBACK TO create_item_instance;
8189: FND_MSG_PUB.Count_And_Get
8190: ( p_count => x_msg_count,
8191: p_data => x_msg_data
8192: );
8193:
8195: FND_File.Put_Line(Fnd_File.LOG,'Into unexpected exception of grp.create_item_instance');
8196: FND_File.Put_Line(Fnd_File.LOG,'SQLERRM:'||substr(SQLERRM,1,200));
8197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8198: ROLLBACK TO create_item_instance;
8199: FND_MSG_PUB.Count_And_Get
8200: ( p_count => x_msg_count,
8201: p_data => x_msg_data
8202: );
8203:
8205: FND_File.Put_Line(Fnd_File.LOG,'Into when others exception of grp.create_item_instance');
8206: FND_File.Put_Line(Fnd_File.LOG,'SQLERRM:'||substr(SQLERRM,1,200));
8207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8208: ROLLBACK TO create_item_instance;
8209: IF FND_MSG_PUB.Check_Msg_Level
8210: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8211: THEN
8212: FND_MSG_PUB.Add_Exc_Msg
8213: (G_PKG_NAME,
8206: FND_File.Put_Line(Fnd_File.LOG,'SQLERRM:'||substr(SQLERRM,1,200));
8207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8208: ROLLBACK TO create_item_instance;
8209: IF FND_MSG_PUB.Check_Msg_Level
8210: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8211: THEN
8212: FND_MSG_PUB.Add_Exc_Msg
8213: (G_PKG_NAME,
8214: l_api_name
8208: ROLLBACK TO create_item_instance;
8209: IF FND_MSG_PUB.Check_Msg_Level
8210: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8211: THEN
8212: FND_MSG_PUB.Add_Exc_Msg
8213: (G_PKG_NAME,
8214: l_api_name
8215: );
8216: END IF;
8213: (G_PKG_NAME,
8214: l_api_name
8215: );
8216: END IF;
8217: FND_MSG_PUB.Count_And_Get
8218: ( p_count => x_msg_count,
8219: p_data => x_msg_data
8220: );
8221:
8529: END IF;
8530:
8531: -- Initialize message list if p_init_msg_list is set to TRUE.
8532: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8533: FND_MSG_PUB.initialize;
8534: END IF;
8535:
8536: -- Initialize API return status to success
8537: x_return_status := FND_API.G_RET_STS_SUCCESS;
8556: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
8557: --
8558: IF l_internal_party_id IS NULL THEN
8559: FND_MESSAGE.SET_NAME('CSI','CSI_API_UNINSTALLED_PARAMETER');
8560: FND_MSG_PUB.ADD;
8561: RAISE FND_API.G_EXC_ERROR;
8562: END IF;
8563: --
8564: l_old_instance_tbl.DELETE;
8658: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
8659: l_msg_index := 1;
8660: l_msg_count := x_msg_count;
8661: WHILE l_msg_count > 0 LOOP
8662: x_msg_data := FND_MSG_PUB.GET
8663: ( l_msg_index,
8664: FND_API.G_FALSE );
8665: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8666: l_msg_index := l_msg_index + 1;
8778: l_msg_index := 1;
8779: l_msg_count := x_msg_count;
8780: WHILE l_msg_count > 0
8781: LOOP
8782: x_msg_data := FND_MSG_PUB.GET
8783: ( l_msg_index,
8784: FND_API.G_FALSE );
8785: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8786: l_msg_index := l_msg_index + 1;
8834: l_msg_index := 1;
8835: l_msg_count := x_msg_count;
8836: WHILE l_msg_count > 0
8837: LOOP
8838: x_msg_data := FND_MSG_PUB.GET
8839: ( l_msg_index,
8840: FND_API.G_FALSE );
8841: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8842: l_msg_index := l_msg_index + 1;
8873: l_msg_index := 1;
8874: l_msg_count := x_msg_count;
8875: WHILE l_msg_count > 0
8876: LOOP
8877: x_msg_data := FND_MSG_PUB.GET
8878: ( l_msg_index,
8879: FND_API.G_FALSE );
8880: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8881: l_msg_index := l_msg_index + 1;
8948: l_msg_index := 1;
8949: l_msg_count := x_msg_count;
8950: WHILE l_msg_count > 0
8951: LOOP
8952: x_msg_data := FND_MSG_PUB.GET
8953: ( l_msg_index,
8954: FND_API.G_FALSE );
8955: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8956: l_msg_index := l_msg_index + 1;
8982: l_msg_index := 1;
8983: l_msg_count := x_msg_count;
8984: WHILE l_msg_count > 0
8985: LOOP
8986: x_msg_data := FND_MSG_PUB.GET
8987: ( l_msg_index,
8988: FND_API.G_FALSE );
8989: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8990: l_msg_index := l_msg_index + 1;
9048: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PVT..');
9049: l_msg_index := 1;
9050: l_msg_count := x_msg_count;
9051: WHILE l_msg_count > 0 LOOP
9052: x_msg_data := FND_MSG_PUB.GET
9053: ( l_msg_index,
9054: FND_API.G_FALSE );
9055: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9056: l_msg_index := l_msg_index + 1;
9107: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PVT..');
9108: l_msg_index := 1;
9109: l_msg_count := x_msg_count;
9110: WHILE l_msg_count > 0 LOOP
9111: x_msg_data := FND_MSG_PUB.GET
9112: ( l_msg_index,
9113: FND_API.G_FALSE );
9114: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9115: l_msg_index := l_msg_index + 1;
9170: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.EXTENDED_ATTRIBS..');
9171: l_msg_index := 1;
9172: l_msg_count := x_msg_count;
9173: WHILE l_msg_count > 0 LOOP
9174: x_msg_data := FND_MSG_PUB.GET
9175: ( l_msg_index,
9176: FND_API.G_FALSE );
9177: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9178: l_msg_index := l_msg_index + 1;
9236: csi_gen_utility_pvt.put_line( ' Error from CSI_ASSET_PVT..');
9237: l_msg_index := 1;
9238: l_msg_count := x_msg_count;
9239: WHILE l_msg_count > 0 LOOP
9240: x_msg_data := FND_MSG_PUB.GET
9241: ( l_msg_index,
9242: FND_API.G_FALSE );
9243: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9244: l_msg_index := l_msg_index + 1;
9312: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
9313: l_msg_index := 1;
9314: l_msg_count := x_msg_count;
9315: WHILE l_msg_count > 0 LOOP
9316: x_msg_data := FND_MSG_PUB.GET
9317: ( l_msg_index,
9318: FND_API.G_FALSE );
9319: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9320: l_msg_index := l_msg_index + 1;
9398: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.CREATE_VERSION_LABEL..');
9399: l_msg_index := 1;
9400: l_msg_count := x_msg_count;
9401: WHILE l_msg_count > 0 LOOP
9402: x_msg_data := FND_MSG_PUB.GET
9403: ( l_msg_index,
9404: FND_API.G_FALSE );
9405: csi_gen_utility_pvt.put_line( ' MESSAGE DATA = '||x_msg_data);
9406: l_msg_index := l_msg_index + 1;
9476: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
9477: l_msg_index := 1;
9478: l_msg_count := x_msg_count;
9479: WHILE l_msg_count > 0 LOOP
9480: x_msg_data := FND_MSG_PUB.GET
9481: ( l_msg_index,
9482: FND_API.G_FALSE
9483: );
9484: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9526: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
9527: l_msg_index := 1;
9528: l_msg_count := x_msg_count;
9529: WHILE l_msg_count > 0 LOOP
9530: x_msg_data := FND_MSG_PUB.GET
9531: ( l_msg_index,
9532: FND_API.G_FALSE
9533: );
9534: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9617: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
9618: l_msg_index := 1;
9619: l_msg_count := x_msg_count;
9620: WHILE l_msg_count > 0 LOOP
9621: x_msg_data := FND_MSG_PUB.GET
9622: ( l_msg_index,
9623: FND_API.G_FALSE
9624: );
9625: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9682: --
9683: l_msg_index := 1;
9684: l_msg_count := x_msg_count;
9685: WHILE l_msg_count > 0 LOOP
9686: x_msg_data := FND_MSG_PUB.GET
9687: ( l_msg_index,
9688: FND_API.G_FALSE
9689: );
9690: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9690: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9691: l_msg_index := l_msg_index + 1;
9692: l_msg_count := l_msg_count - 1;
9693: END LOOP;
9694: FND_MSG_PUB.Count_And_Get
9695: ( p_count => x_msg_count,
9696: p_data => x_msg_data
9697: );
9698: ELSIF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
9699: csi_gen_utility_pvt.put_line('Error from Call_to_contracts...');
9700: l_msg_index := 1;
9701: l_msg_count := x_msg_count;
9702: WHILE l_msg_count > 0 LOOP
9703: x_msg_data := FND_MSG_PUB.GET
9704: ( l_msg_index,
9705: FND_API.G_FALSE
9706: );
9707: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9742: END IF;
9743: -- End disable trace
9744: ****/
9745: -- Standard call to get message count and if count is get message info.
9746: FND_MSG_PUB.Count_And_Get
9747: (p_count => x_msg_count ,
9748: p_data => x_msg_data
9749: );
9750: EXCEPTION
9750: EXCEPTION
9751: WHEN FND_API.G_EXC_ERROR THEN
9752: ROLLBACK TO update_item_instance;
9753: x_return_status := FND_API.G_RET_STS_ERROR ;
9754: FND_MSG_PUB.Count_And_Get
9755: ( p_count => x_msg_count,
9756: p_data => x_msg_data
9757: );
9758:
9758:
9759: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9760: ROLLBACK TO update_item_instance;
9761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9762: FND_MSG_PUB.Count_And_Get
9763: ( p_count => x_msg_count,
9764: p_data => x_msg_data
9765: );
9766:
9766:
9767: WHEN OTHERS THEN
9768: ROLLBACK TO update_item_instance;
9769: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9770: IF FND_MSG_PUB.Check_Msg_Level
9771: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9772: THEN
9773: FND_MSG_PUB.Add_Exc_Msg
9774: ( G_PKG_NAME ,
9767: WHEN OTHERS THEN
9768: ROLLBACK TO update_item_instance;
9769: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9770: IF FND_MSG_PUB.Check_Msg_Level
9771: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9772: THEN
9773: FND_MSG_PUB.Add_Exc_Msg
9774: ( G_PKG_NAME ,
9775: l_api_name
9769: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9770: IF FND_MSG_PUB.Check_Msg_Level
9771: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9772: THEN
9773: FND_MSG_PUB.Add_Exc_Msg
9774: ( G_PKG_NAME ,
9775: l_api_name
9776: );
9777: END IF;
9774: ( G_PKG_NAME ,
9775: l_api_name
9776: );
9777: END IF;
9778: FND_MSG_PUB.Count_And_Get
9779: ( p_count => x_msg_count,
9780: p_data => x_msg_data
9781: );
9782: END update_item_instance;
9834: END IF;
9835:
9836: -- Initialize message list if p_init_msg_list is set to TRUE.
9837: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9838: FND_MSG_PUB.initialize;
9839: END IF;
9840: -- Initialize API return status to success
9841: x_return_status := FND_API.G_RET_STS_SUCCESS;
9842:
9894: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
9895: l_msg_index := 1;
9896: l_msg_count := x_msg_count;
9897: WHILE l_msg_count > 0 LOOP
9898: x_msg_data := FND_MSG_PUB.GET
9899: (
9900: l_msg_index,
9901: FND_API.G_FALSE
9902: );
9951: csi_gen_utility_pvt.put_line('Error from Call_to_contracts...');
9952: l_msg_index := 1;
9953: l_msg_count := x_msg_count;
9954: WHILE l_msg_count > 0 LOOP
9955: x_msg_data := FND_MSG_PUB.GET
9956: ( l_msg_index,
9957: FND_API.G_FALSE
9958: );
9959: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
9988: END IF;
9989: -- End disable trace
9990: ****/
9991: -- Standard call to get message count and if count is get message info.
9992: FND_MSG_PUB.Count_And_Get
9993: (p_count => x_msg_count ,
9994: p_data => x_msg_data );
9995:
9996: EXCEPTION
9996: EXCEPTION
9997: WHEN FND_API.G_EXC_ERROR THEN
9998: ROLLBACK TO expire_item_instance;
9999: x_return_status := FND_API.G_RET_STS_ERROR ;
10000: FND_MSG_PUB.Count_And_Get
10001: ( p_count => x_msg_count,
10002: p_data => x_msg_data
10003: );
10004:
10004:
10005: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10006: ROLLBACK TO expire_item_instance;
10007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10008: FND_MSG_PUB.Count_And_Get
10009: ( p_count => x_msg_count,
10010: p_data => x_msg_data );
10011:
10012: WHEN OTHERS THEN
10011:
10012: WHEN OTHERS THEN
10013: ROLLBACK TO expire_item_instance;
10014: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10015: IF FND_MSG_PUB.Check_Msg_Level
10016: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10017: THEN
10018: FND_MSG_PUB.Add_Exc_Msg
10019: ( G_PKG_NAME, l_api_name );
10012: WHEN OTHERS THEN
10013: ROLLBACK TO expire_item_instance;
10014: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10015: IF FND_MSG_PUB.Check_Msg_Level
10016: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10017: THEN
10018: FND_MSG_PUB.Add_Exc_Msg
10019: ( G_PKG_NAME, l_api_name );
10020: END IF;
10014: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10015: IF FND_MSG_PUB.Check_Msg_Level
10016: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10017: THEN
10018: FND_MSG_PUB.Add_Exc_Msg
10019: ( G_PKG_NAME, l_api_name );
10020: END IF;
10021: FND_MSG_PUB.Count_And_Get
10022: ( p_count => x_msg_count,
10017: THEN
10018: FND_MSG_PUB.Add_Exc_Msg
10019: ( G_PKG_NAME, l_api_name );
10020: END IF;
10021: FND_MSG_PUB.Count_And_Get
10022: ( p_count => x_msg_count,
10023: p_data => x_msg_data );
10024:
10025: END expire_item_instance;
10064: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10065: END IF;
10066: -- Initialize message list if p_init_msg_list is set to TRUE.
10067: IF FND_API.to_Boolean( p_init_msg_list ) THEN
10068: FND_MSG_PUB.initialize;
10069: END IF;
10070: -- Initialize API return status to success
10071: x_return_status := FND_API.G_RET_STS_SUCCESS;
10072: --
10071: x_return_status := FND_API.G_RET_STS_SUCCESS;
10072: --
10073: IF p_subject_id IS NULL OR p_subject_id = FND_API.G_MISS_NUM THEN
10074: fnd_message.set_name('CSI', 'CSI_INVALID_PARAMETERS');
10075: fnd_msg_pub.add;
10076: x_return_status := fnd_api.g_ret_sts_error;
10077: RAISE fnd_api.g_exc_error;
10078: END IF;
10079: --
10119: End;
10120: END LOOP;
10121: -- End of API body
10122: -- Standard call to get message count and if count is get message info.
10123: FND_MSG_PUB.Count_And_Get
10124: (p_count => x_msg_count ,
10125: p_data => x_msg_data
10126: );
10127: EXCEPTION
10126: );
10127: EXCEPTION
10128: WHEN FND_API.G_EXC_ERROR THEN
10129: x_return_status := FND_API.G_RET_STS_ERROR ;
10130: FND_MSG_PUB.Count_And_Get
10131: ( p_count => x_msg_count,
10132: p_data => x_msg_data
10133: );
10134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10132: p_data => x_msg_data
10133: );
10134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10136: FND_MSG_PUB.Count_And_Get
10137: ( p_count => x_msg_count,
10138: p_data => x_msg_data
10139: );
10140:
10140:
10141: WHEN OTHERS THEN
10142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10143: csi_gen_utility_pvt.put_line('Others Error '||substr(sqlerrm,1,250));
10144: IF FND_MSG_PUB.Check_Msg_Level
10145: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10146: THEN
10147: FND_MSG_PUB.Add_Exc_Msg
10148: ( G_PKG_NAME ,
10141: WHEN OTHERS THEN
10142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10143: csi_gen_utility_pvt.put_line('Others Error '||substr(sqlerrm,1,250));
10144: IF FND_MSG_PUB.Check_Msg_Level
10145: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10146: THEN
10147: FND_MSG_PUB.Add_Exc_Msg
10148: ( G_PKG_NAME ,
10149: l_api_name
10143: csi_gen_utility_pvt.put_line('Others Error '||substr(sqlerrm,1,250));
10144: IF FND_MSG_PUB.Check_Msg_Level
10145: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10146: THEN
10147: FND_MSG_PUB.Add_Exc_Msg
10148: ( G_PKG_NAME ,
10149: l_api_name
10150: );
10151: END IF;
10148: ( G_PKG_NAME ,
10149: l_api_name
10150: );
10151: END IF;
10152: FND_MSG_PUB.Count_And_Get
10153: ( p_count => x_msg_count,
10154: p_data => x_msg_data
10155: );
10156: END Get_All_Parents;
10226: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10227: l_msg_index := 1;
10228: l_msg_count := x_msg_count;
10229: WHILE l_msg_count > 0 LOOP
10230: x_msg_data := FND_MSG_PUB.GET
10231: ( l_msg_index,
10232: FND_API.G_FALSE );
10233: l_msg_index := l_msg_index + 1;
10234: l_msg_count := l_msg_count - 1;
10569: EXCEPTION
10570: WHEN FND_API.G_EXC_ERROR THEN
10571: ROLLBACK TO Get_And_Build_Instance_Details;
10572: x_return_status := FND_API.G_RET_STS_ERROR ;
10573: FND_MSG_PUB.Count_And_Get
10574: ( p_count => x_msg_count,
10575: p_data => x_msg_data
10576: );
10577: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10576: );
10577: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10578: ROLLBACK TO Get_And_Build_Instance_Details;
10579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10580: FND_MSG_PUB.Count_And_Get
10581: ( p_count => x_msg_count,
10582: p_data => x_msg_data
10583: );
10584: WHEN OTHERS THEN
10583: );
10584: WHEN OTHERS THEN
10585: ROLLBACK TO Get_And_Build_Instance_Details;
10586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10587: IF FND_MSG_PUB.Check_Msg_Level
10588: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10589: THEN
10590: FND_MSG_PUB.Add_Exc_Msg
10591: ( G_PKG_NAME ,
10584: WHEN OTHERS THEN
10585: ROLLBACK TO Get_And_Build_Instance_Details;
10586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10587: IF FND_MSG_PUB.Check_Msg_Level
10588: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10589: THEN
10590: FND_MSG_PUB.Add_Exc_Msg
10591: ( G_PKG_NAME ,
10592: l_api_name
10586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10587: IF FND_MSG_PUB.Check_Msg_Level
10588: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10589: THEN
10590: FND_MSG_PUB.Add_Exc_Msg
10591: ( G_PKG_NAME ,
10592: l_api_name
10593: );
10594: END IF;
10591: ( G_PKG_NAME ,
10592: l_api_name
10593: );
10594: END IF;
10595: FND_MSG_PUB.Count_And_Get
10596: ( p_count => x_msg_count,
10597: p_data => x_msg_data
10598: );
10599: END Get_And_Build_Instance_Details;
10670: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10671: END IF;
10672: -- Initialize message list if p_init_msg_list is set to TRUE.
10673: IF FND_API.to_Boolean( p_init_msg_list ) THEN
10674: FND_MSG_PUB.initialize;
10675: END IF;
10676: -- Initialize API return status to success
10677: x_return_status := FND_API.G_RET_STS_SUCCESS;
10678: -- Check the profile option debug_level for debug message reporting
10699: OR (p_source_instance_tbl(src_rec).QUANTITY = FND_API.G_MISS_NUM )
10700: OR (p_source_instance_tbl(src_rec).QUANTITY <> 1)) THEN
10701: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_QUANTITY');
10702: FND_MESSAGE.SET_TOKEN('QUANTITY',p_source_instance_tbl(src_rec).QUANTITY);
10703: FND_MSG_PUB.Add;
10704: RAISE FND_API.G_EXC_ERROR;
10705: END IF;
10706: --
10707: IF (p_source_instance_tbl(src_rec).instance_id IS NULL) OR
10706: --
10707: IF (p_source_instance_tbl(src_rec).instance_id IS NULL) OR
10708: (p_source_instance_tbl(src_rec).instance_id = FND_API.G_MISS_NUM) THEN
10709: FND_MESSAGE.SET_NAME('CSI','CSI_API_INSTANCE_ID_NULL');
10710: FND_MSG_PUB.Add;
10711: RAISE FND_API.G_EXC_ERROR;
10712: END IF;
10713: --
10714: -- Verify if configruation has been exploded before
10740: );
10741: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
10742: csi_gen_utility_pvt.put_line('Error in Explode_BOM Regular Routine..');
10743: FOR i in 1..x_msg_Count LOOP
10744: FND_MSG_PUB.Get(p_msg_index => i,
10745: p_encoded => 'F',
10746: p_data => x_msg_data,
10747: p_msg_index_out => x_msg_index_out );
10748: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
10771: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10772: l_msg_index := 1;
10773: l_msg_count := x_msg_count;
10774: WHILE l_msg_count > 0 LOOP
10775: x_msg_data := FND_MSG_PUB.GET
10776: ( l_msg_index,
10777: FND_API.G_FALSE );
10778: l_msg_index := l_msg_index + 1;
10779: l_msg_count := l_msg_count - 1;
11001: --
11002: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11003: csi_gen_utility_pvt.put_line('Error from Group Create_item_instance..');
11004: FOR i in 1..x_msg_Count LOOP
11005: FND_MSG_PUB.Get(p_msg_index => i,
11006: p_encoded => 'F',
11007: p_data => x_msg_data,
11008: p_msg_index_out => x_msg_index_out );
11009: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
11029: csi_gen_utility_pvt.put_line('End of Create Relationship...');
11030: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11031: csi_gen_utility_pvt.put_line('Error while trying to Create II Relationships..');
11032: FOR i in 1..x_msg_Count LOOP
11033: FND_MSG_PUB.Get(p_msg_index => i,
11034: p_encoded => 'F',
11035: p_data => x_msg_data,
11036: p_msg_index_out => x_msg_index_out );
11037: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
11044: IF FND_API.To_Boolean( p_commit ) THEN
11045: COMMIT WORK;
11046: END IF;
11047: -- Standard call to get message count and if count is get message info.
11048: FND_MSG_PUB.Count_And_Get
11049: ( p_count => x_msg_count ,
11050: p_data => x_msg_data
11051: );
11052: EXCEPTION
11052: EXCEPTION
11053: WHEN FND_API.G_EXC_ERROR THEN
11054: ROLLBACK TO explode_bom;
11055: x_return_status := FND_API.G_RET_STS_ERROR ;
11056: FND_MSG_PUB.Count_And_Get
11057: ( p_count => x_msg_count,
11058: p_data => x_msg_data
11059: );
11060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11059: );
11060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11061: ROLLBACK TO explode_bom;
11062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11063: FND_MSG_PUB.Count_And_Get
11064: ( p_count => x_msg_count,
11065: p_data => x_msg_data
11066: );
11067: WHEN OTHERS THEN
11066: );
11067: WHEN OTHERS THEN
11068: ROLLBACK TO explode_bom;
11069: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11070: IF FND_MSG_PUB.Check_Msg_Level
11071: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11072: THEN
11073: FND_MSG_PUB.Add_Exc_Msg
11074: ( G_PKG_NAME ,
11067: WHEN OTHERS THEN
11068: ROLLBACK TO explode_bom;
11069: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11070: IF FND_MSG_PUB.Check_Msg_Level
11071: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11072: THEN
11073: FND_MSG_PUB.Add_Exc_Msg
11074: ( G_PKG_NAME ,
11075: l_api_name
11069: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11070: IF FND_MSG_PUB.Check_Msg_Level
11071: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11072: THEN
11073: FND_MSG_PUB.Add_Exc_Msg
11074: ( G_PKG_NAME ,
11075: l_api_name
11076: );
11077: END IF;
11074: ( G_PKG_NAME ,
11075: l_api_name
11076: );
11077: END IF;
11078: FND_MSG_PUB.Count_And_Get
11079: ( p_count => x_msg_count,
11080: p_data => x_msg_data
11081: );
11082: END Explode_Bom;
11119: END IF;
11120:
11121: -- Initialize message list if p_init_msg_list is set to TRUE.
11122: IF FND_API.to_Boolean( p_init_msg_list ) THEN
11123: FND_MSG_PUB.initialize;
11124: END IF;
11125:
11126: -- Initialize API return status to success
11127: x_return_status := FND_API.G_RET_STS_SUCCESS;
11160: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11161: l_msg_index := 1;
11162: l_msg_count := x_msg_count;
11163: WHILE l_msg_count > 0 LOOP
11164: x_msg_data := FND_MSG_PUB.GET
11165: ( l_msg_index,
11166: FND_API.G_FALSE );
11167: csi_gen_utility_pvt.put_line('Error while locking item instances..');
11168: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
11176: COMMIT WORK;
11177: END IF;
11178:
11179: -- Standard call to get message count and if count is get message info.
11180: FND_MSG_PUB.Count_And_Get
11181: (p_count => x_msg_count ,
11182: p_data => x_msg_data );
11183:
11184: EXCEPTION
11184: EXCEPTION
11185: WHEN FND_API.G_EXC_ERROR THEN
11186: ROLLBACK TO csi_lock_item_grp;
11187: x_return_status := FND_API.G_RET_STS_ERROR ;
11188: FND_MSG_PUB.Count_And_Get
11189: ( p_count => x_msg_count,
11190: p_data => x_msg_data );
11191: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11192: ROLLBACK TO csi_lock_item_grp;
11190: p_data => x_msg_data );
11191: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11192: ROLLBACK TO csi_lock_item_grp;
11193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11194: FND_MSG_PUB.Count_And_Get
11195: ( p_count => x_msg_count,
11196: p_data => x_msg_data );
11197: WHEN OTHERS THEN
11198: ROLLBACK TO csi_lock_item_grp;
11196: p_data => x_msg_data );
11197: WHEN OTHERS THEN
11198: ROLLBACK TO csi_lock_item_grp;
11199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11200: IF FND_MSG_PUB.Check_Msg_Level
11201: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11202: THEN
11203: FND_MSG_PUB.Add_Exc_Msg
11204: ( g_pkg_name, l_api_name );
11197: WHEN OTHERS THEN
11198: ROLLBACK TO csi_lock_item_grp;
11199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11200: IF FND_MSG_PUB.Check_Msg_Level
11201: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11202: THEN
11203: FND_MSG_PUB.Add_Exc_Msg
11204: ( g_pkg_name, l_api_name );
11205: END IF;
11199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11200: IF FND_MSG_PUB.Check_Msg_Level
11201: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11202: THEN
11203: FND_MSG_PUB.Add_Exc_Msg
11204: ( g_pkg_name, l_api_name );
11205: END IF;
11206: FND_MSG_PUB.Count_And_Get
11207: ( p_count => x_msg_count,
11202: THEN
11203: FND_MSG_PUB.Add_Exc_Msg
11204: ( g_pkg_name, l_api_name );
11205: END IF;
11206: FND_MSG_PUB.Count_And_Get
11207: ( p_count => x_msg_count,
11208: p_data => x_msg_data );
11209: END lock_item_instances;
11210:
11245: END IF;
11246:
11247: -- Initialize message list if p_init_msg_list is set to TRUE.
11248: IF FND_API.to_Boolean( p_init_msg_list ) THEN
11249: FND_MSG_PUB.initialize;
11250: END IF;
11251:
11252: -- Initialize API return status to success
11253: x_return_status := FND_API.G_RET_STS_SUCCESS;
11288: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11289: l_msg_index := 1;
11290: l_msg_count := x_msg_count;
11291: WHILE l_msg_count > 0 LOOP
11292: x_msg_data := FND_MSG_PUB.GET
11293: ( l_msg_index,
11294: FND_API.G_FALSE );
11295: csi_gen_utility_pvt.put_line('Error while unlocking item instances..');
11296: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
11305: COMMIT WORK;
11306: END IF;
11307:
11308: -- Standard call to get message count and if count is get message info.
11309: FND_MSG_PUB.Count_And_Get
11310: (p_count => x_msg_count ,
11311: p_data => x_msg_data );
11312:
11313: EXCEPTION
11313: EXCEPTION
11314: WHEN FND_API.G_EXC_ERROR THEN
11315: ROLLBACK TO csi_unlock_item_grp;
11316: x_return_status := FND_API.G_RET_STS_ERROR ;
11317: FND_MSG_PUB.Count_And_Get
11318: ( p_count => x_msg_count,
11319: p_data => x_msg_data );
11320: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11321: ROLLBACK TO csi_unlock_item_grp;
11319: p_data => x_msg_data );
11320: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11321: ROLLBACK TO csi_unlock_item_grp;
11322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11323: FND_MSG_PUB.Count_And_Get
11324: ( p_count => x_msg_count,
11325: p_data => x_msg_data );
11326: WHEN OTHERS THEN
11327: ROLLBACK TO csi_unlock_item_grp;
11325: p_data => x_msg_data );
11326: WHEN OTHERS THEN
11327: ROLLBACK TO csi_unlock_item_grp;
11328: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11329: IF FND_MSG_PUB.Check_Msg_Level
11330: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11331: THEN
11332: FND_MSG_PUB.Add_Exc_Msg
11333: ( g_pkg_name, l_api_name );
11326: WHEN OTHERS THEN
11327: ROLLBACK TO csi_unlock_item_grp;
11328: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11329: IF FND_MSG_PUB.Check_Msg_Level
11330: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11331: THEN
11332: FND_MSG_PUB.Add_Exc_Msg
11333: ( g_pkg_name, l_api_name );
11334: END IF;
11328: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11329: IF FND_MSG_PUB.Check_Msg_Level
11330: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11331: THEN
11332: FND_MSG_PUB.Add_Exc_Msg
11333: ( g_pkg_name, l_api_name );
11334: END IF;
11335: FND_MSG_PUB.Count_And_Get
11336: ( p_count => x_msg_count,
11331: THEN
11332: FND_MSG_PUB.Add_Exc_Msg
11333: ( g_pkg_name, l_api_name );
11334: END IF;
11335: FND_MSG_PUB.Count_And_Get
11336: ( p_count => x_msg_count,
11337: p_data => x_msg_data );
11338: END unlock_item_instances;
11339: