DBA Data[Home] [Help]

APPS.INV_MATERIAL_ALLOCATIONS_GRP dependencies on FND_API

Line 137: IF FND_API.to_Boolean( p_init_msg_list ) THEN

133: l_dummy_v varchar2(3);
134: l_dummy_n number;
135: BEGIN
136: SAVEPOINT DELETE_ALLOCATION;
137: IF FND_API.to_Boolean( p_init_msg_list ) THEN
138: FND_MSG_PUB.initialize;
139: END IF;
140: x_return_status := FND_API.G_RET_STS_SUCCESS;
141: x_msg_count := 0;

Line 140: x_return_status := FND_API.G_RET_STS_SUCCESS;

136: SAVEPOINT DELETE_ALLOCATION;
137: IF FND_API.to_Boolean( p_init_msg_list ) THEN
138: FND_MSG_PUB.initialize;
139: END IF;
140: x_return_status := FND_API.G_RET_STS_SUCCESS;
141: x_msg_count := 0;
142:
143: if (l_plog) then
144: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,

Line 155: x_return_status := fnd_api.g_ret_sts_error;

151: --information(saves a db hit). If these are not provided, then we cn query up MMTT
152: if (not get_mmtt_info(p_transaction_temp_id,l_primary_mmtt_qty,
153: l_tx_qty, l_move_order_line_id, l_dummy_v, l_dummy_v, l_dummy_n)) then
154: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);
155: x_return_status := fnd_api.g_ret_sts_error;
156: return;
157: end if;
158: --Reduce the allocation quantities in Move order headers, lines and in WRO
159: reduce_move_order(l_move_order_line_id, l_primary_mmtt_qty, 'Y');

Line 178: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

174: 'inv_trx_util_pub.delete_transaction returns. Return status='
175: || x_return_status|| ', Message Count = '|| x_msg_count
176: || ', Message data=' || REPLACE(x_msg_data, CHR(0), ' '));
177: end if;
178: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
179: raise fnd_api.g_exc_error;
180: end if;
181: --API end
182:

Line 179: raise fnd_api.g_exc_error;

175: || x_return_status|| ', Message Count = '|| x_msg_count
176: || ', Message data=' || REPLACE(x_msg_data, CHR(0), ' '));
177: end if;
178: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
179: raise fnd_api.g_exc_error;
180: end if;
181: --API end
182:
183: IF FND_API.To_Boolean( p_commit ) THEN

Line 183: IF FND_API.To_Boolean( p_commit ) THEN

179: raise fnd_api.g_exc_error;
180: end if;
181: --API end
182:
183: IF FND_API.To_Boolean( p_commit ) THEN
184: COMMIT WORK;
185: END IF;
186: x_return_status := FND_API.G_RET_STS_SUCCESS;
187: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);

Line 186: x_return_status := FND_API.G_RET_STS_SUCCESS;

182:
183: IF FND_API.To_Boolean( p_commit ) THEN
184: COMMIT WORK;
185: END IF;
186: x_return_status := FND_API.G_RET_STS_SUCCESS;
187: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);
188: if (l_plog) then
189: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module, 'End of ' || l_module);
190: end if;

Line 193: WHEN fnd_api.g_exc_error THEN

189: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module, 'End of ' || l_module);
190: end if;
191:
192: EXCEPTION
193: WHEN fnd_api.g_exc_error THEN
194: x_return_status := fnd_api.g_ret_sts_error;
195: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
196: ROLLBACK to delete_allocation;
197: WHEN OTHERS THEN

Line 194: x_return_status := fnd_api.g_ret_sts_error;

190: end if;
191:
192: EXCEPTION
193: WHEN fnd_api.g_exc_error THEN
194: x_return_status := fnd_api.g_ret_sts_error;
195: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
196: ROLLBACK to delete_allocation;
197: WHEN OTHERS THEN
198: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 198: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

194: x_return_status := fnd_api.g_ret_sts_error;
195: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
196: ROLLBACK to delete_allocation;
197: WHEN OTHERS THEN
198: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
199: FND_MSG_PUB.Count_And_Get(
200: p_count => x_msg_count,
201: p_data => x_msg_data);
202: ROLLBACK to delete_allocation;

Line 240: x_return_status := FND_API.G_RET_STS_SUCCESS;

236: l_transaction_uom varchar2(3);
237: l_inventory_item_id number;
238: BEGIN
239: SAVEPOINT reduce_allocation_header;
240: x_return_status := FND_API.G_RET_STS_SUCCESS;
241: x_msg_count := 0;
242:
243: if (l_plog) then
244: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,

Line 331: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

327: || x_return_status|| ', Message Count = '|| x_msg_count
328: || 'x_new_txn_temp_id='|| x_new_transaction_temp_id
329: || ', Message data=' || REPLACE(x_msg_data, CHR(0), ' '));
330: end if;
331: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
332: raise fnd_api.g_exc_error;
333: end if;
334: end if;
335: --API end

Line 332: raise fnd_api.g_exc_error;

328: || 'x_new_txn_temp_id='|| x_new_transaction_temp_id
329: || ', Message data=' || REPLACE(x_msg_data, CHR(0), ' '));
330: end if;
331: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
332: raise fnd_api.g_exc_error;
333: end if;
334: end if;
335: --API end
336:

Line 337: IF FND_API.To_Boolean( p_commit ) THEN

333: end if;
334: end if;
335: --API end
336:
337: IF FND_API.To_Boolean( p_commit ) THEN
338: COMMIT WORK;
339: END IF;
340: x_return_status := FND_API.G_RET_STS_SUCCESS;
341: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);

Line 340: x_return_status := FND_API.G_RET_STS_SUCCESS;

336:
337: IF FND_API.To_Boolean( p_commit ) THEN
338: COMMIT WORK;
339: END IF;
340: x_return_status := FND_API.G_RET_STS_SUCCESS;
341: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);
342: if (l_plog) then
343: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module, 'End of ' || l_module);
344: end if;

Line 347: WHEN fnd_api.g_exc_error THEN

343: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module, 'End of ' || l_module);
344: end if;
345:
346: EXCEPTION
347: WHEN fnd_api.g_exc_error THEN
348: x_return_status := fnd_api.g_ret_sts_error;
349: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
350: ROLLBACK to reduce_allocation_header;
351: WHEN OTHERS THEN

Line 348: x_return_status := fnd_api.g_ret_sts_error;

344: end if;
345:
346: EXCEPTION
347: WHEN fnd_api.g_exc_error THEN
348: x_return_status := fnd_api.g_ret_sts_error;
349: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
350: ROLLBACK to reduce_allocation_header;
351: WHEN OTHERS THEN
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

348: x_return_status := fnd_api.g_ret_sts_error;
349: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
350: ROLLBACK to reduce_allocation_header;
351: WHEN OTHERS THEN
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
353: FND_MSG_PUB.Count_And_Get(
354: p_count => x_msg_count,
355: p_data => x_msg_data);
356: ROLLBACK to reduce_allocation_header;

Line 387: x_return_status := FND_API.G_RET_STS_SUCCESS;

383: l_plog boolean := (l_elog and (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL));
384: l_slog boolean := (l_plog and (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL));
385: BEGIN
386: SAVEPOINT remove_serial;
387: x_return_status := FND_API.G_RET_STS_SUCCESS;
388: x_msg_count := 0;
389:
390: if (l_plog) then
391: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,

Line 426: IF FND_API.To_Boolean( p_commit ) THEN

422: AND serial_number = p_serial;
423: end if;
424: --API end
425:
426: IF FND_API.To_Boolean( p_commit ) THEN
427: COMMIT WORK;
428: END IF;
429: x_return_status := FND_API.G_RET_STS_SUCCESS;
430: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);

Line 429: x_return_status := FND_API.G_RET_STS_SUCCESS;

425:
426: IF FND_API.To_Boolean( p_commit ) THEN
427: COMMIT WORK;
428: END IF;
429: x_return_status := FND_API.G_RET_STS_SUCCESS;
430: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);
431: if (l_plog) then
432: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module, 'End of ' || l_module);
433: end if;

Line 437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

433: end if;
434:
435: EXCEPTION
436: WHEN OTHERS THEN
437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
438: FND_MSG_PUB.Count_And_Get(
439: p_count => x_msg_count,
440: p_data => x_msg_data);
441: ROLLBACK to remove_serial;

Line 468: x_return_status := FND_API.G_RET_STS_SUCCESS;

464: l_update_count number;
465: l_insert_err_code number;
466: BEGIN
467: SAVEPOINT add_serial;
468: x_return_status := FND_API.G_RET_STS_SUCCESS;
469: x_msg_count := 0;
470:
471: if (l_plog) then
472: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,

Line 505: IF FND_API.To_Boolean( p_commit ) THEN

501: l_update_count|| ' serials marked in MSN');
502: end if;
503: --API end
504:
505: IF FND_API.To_Boolean( p_commit ) THEN
506: COMMIT WORK;
507: END IF;
508: if (l_insert_err_code = 0) then -- 0 = success
509: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 509: x_return_status := FND_API.G_RET_STS_SUCCESS;

505: IF FND_API.To_Boolean( p_commit ) THEN
506: COMMIT WORK;
507: END IF;
508: if (l_insert_err_code = 0) then -- 0 = success
509: x_return_status := FND_API.G_RET_STS_SUCCESS;
510: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);
511: else
512: x_return_status := FND_API.G_RET_STS_ERROR;
513: end if;

Line 512: x_return_status := FND_API.G_RET_STS_ERROR;

508: if (l_insert_err_code = 0) then -- 0 = success
509: x_return_status := FND_API.G_RET_STS_SUCCESS;
510: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);
511: else
512: x_return_status := FND_API.G_RET_STS_ERROR;
513: end if;
514: if (l_plog) then
515: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module, 'End of ' || l_module);
516: end if;

Line 520: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

516: end if;
517:
518: EXCEPTION
519: WHEN OTHERS THEN
520: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
521: FND_MSG_PUB.Count_And_Get(
522: p_count => x_msg_count,
523: p_data => x_msg_data);
524: ROLLBACK to add_serial;

Line 560: x_return_status := FND_API.G_RET_STS_SUCCESS;

556: l_insert_ret_status number := null;
557: l_reduction_qty number := null;
558: BEGIN
559: SAVEPOINT reduce_lot;
560: x_return_status := FND_API.G_RET_STS_SUCCESS;
561: x_msg_count := 0;
562:
563: if (l_plog) then
564: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,

Line 637: IF FND_API.To_Boolean( p_commit ) THEN

633: end if;
634: end if;
635: --API end
636:
637: IF FND_API.To_Boolean( p_commit ) THEN
638: COMMIT WORK;
639: END IF;
640: x_return_status := FND_API.G_RET_STS_SUCCESS;
641: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);

Line 640: x_return_status := FND_API.G_RET_STS_SUCCESS;

636:
637: IF FND_API.To_Boolean( p_commit ) THEN
638: COMMIT WORK;
639: END IF;
640: x_return_status := FND_API.G_RET_STS_SUCCESS;
641: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);
642: if (l_plog) then
643: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module, 'End of ' || l_module);
644: end if;

Line 648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

644: end if;
645:
646: EXCEPTION
647: WHEN OTHERS THEN
648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
649: FND_MSG_PUB.Count_And_Get(
650: p_count => x_msg_count,
651: p_data => x_msg_data);
652: ROLLBACK to reduce_lot;

Line 678: x_return_status := FND_API.G_RET_STS_ERROR;

674: l_update_count number := 0;
675: l_ser_trx_id number;
676: BEGIN
677: SAVEPOINT mark_lot_with_ser_temp_id;
678: x_return_status := FND_API.G_RET_STS_ERROR;
679: x_msg_count := 0;
680:
681: if (l_plog) then
682: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,

Line 698: x_return_status := FND_API.G_RET_STS_SUCCESS;

694: and primary_quantity = p_primary_quantity
695: and rownum = 1;
696: l_update_count := SQL%ROWCOUNT;
697: if (l_update_count = 1) then
698: x_return_status := FND_API.G_RET_STS_SUCCESS;
699: x_ser_trx_id := l_ser_trx_id;
700: end if;
701: if (l_slog) then
702: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, l_module, l_update_count ||

Line 707: IF FND_API.To_Boolean( p_commit ) THEN

703: ' row(s) updated in MTLT with serial_transaction_temp_id: '|| x_ser_trx_id);
704: end if;
705: --API end
706:
707: IF FND_API.To_Boolean( p_commit ) THEN
708: COMMIT WORK;
709: END IF;
710: FND_MSG_PUB.Count_And_Get('T', x_msg_count, x_msg_data);
711: if (l_plog) then

Line 717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

713: end if;
714:
715: EXCEPTION
716: WHEN OTHERS THEN
717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
718: FND_MSG_PUB.Count_And_Get(
719: p_count => x_msg_count,
720: p_data => x_msg_data);
721: ROLLBACK to mark_lot_with_ser_temp_id;