DBA Data[Home] [Help]

APPS.CSD_BULK_RECEIVE_UTIL dependencies on FND_LOG

Line 42: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

38: l_create_charge_err exception;
39: BEGIN
40: -- entered
41: savepoint after_under_receipt_prcs;
42: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
43: fnd_log.STRING (fnd_log.level_procedure,
44: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
45: 'Under-receipt: Entered the routine');
46: End if;

Line 43: fnd_log.STRING (fnd_log.level_procedure,

39: BEGIN
40: -- entered
41: savepoint after_under_receipt_prcs;
42: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
43: fnd_log.STRING (fnd_log.level_procedure,
44: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
45: 'Under-receipt: Entered the routine');
46: End if;
47: -- get the charges default values for the line to be updated/created.

Line 100: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

96: END;
97: -- update the estimate_quantity to quantity received.
98: l_Charge_Details_rec_upd.quantity_required := p_received_qty;
99:
100: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
101: fnd_log.STRING (fnd_log.level_procedure,
102: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
103: 'Under-receipt: before updating order header_id');
104: End if;

Line 101: fnd_log.STRING (fnd_log.level_procedure,

97: -- update the estimate_quantity to quantity received.
98: l_Charge_Details_rec_upd.quantity_required := p_received_qty;
99:
100: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
101: fnd_log.STRING (fnd_log.level_procedure,
102: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
103: 'Under-receipt: before updating order header_id');
104: End if;
105: -- need to fake as if the charges line is not submitted to OM.

Line 119: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

115: l_Charge_Details_rec_upd.business_process_id := l_Charge_Details_rec.business_process_id;
116: l_Charge_Details_rec_upd.transaction_type_id := l_Charge_Details_rec.transaction_type_id;
117: l_Charge_Details_rec_upd.inventory_item_id_in := l_Charge_Details_rec.inventory_item_id_in;
118:
119: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
120: fnd_log.STRING (fnd_log.level_procedure,
121: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
122: 'Under-receipt: Calling update charges API to update the quantity');
123: End if;

Line 120: fnd_log.STRING (fnd_log.level_procedure,

116: l_Charge_Details_rec_upd.transaction_type_id := l_Charge_Details_rec.transaction_type_id;
117: l_Charge_Details_rec_upd.inventory_item_id_in := l_Charge_Details_rec.inventory_item_id_in;
118:
119: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
120: fnd_log.STRING (fnd_log.level_procedure,
121: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
122: 'Under-receipt: Calling update charges API to update the quantity');
123: End if;
124: savepoint update_charge;

Line 143: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

139: );
140: --
141:
142: if x_return_status <> 'S' THEN
143: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
144: fnd_log.STRING (fnd_log.level_procedure,
145: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
146: 'Under-receipt: Return Status '||x_return_status||' Message '||x_msg_data);
147: End if;

Line 144: fnd_log.STRING (fnd_log.level_procedure,

140: --
141:
142: if x_return_status <> 'S' THEN
143: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
144: fnd_log.STRING (fnd_log.level_procedure,
145: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
146: 'Under-receipt: Return Status '||x_return_status||' Message '||x_msg_data);
147: End if;
148: raise l_update_charge_err;

Line 186: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

182: l_Charge_Details_rec.original_source_code := 'DR';
183: l_Charge_Details_rec.interface_to_oe_flag := 'Y';
184: l_Charge_Details_rec.original_source_id := p_repair_line_id;
185:
186: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
187: fnd_log.STRING (fnd_log.level_procedure,
188: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
189: 'Under-receipt: before calling create charge details');
190: End if;

Line 187: fnd_log.STRING (fnd_log.level_procedure,

183: l_Charge_Details_rec.interface_to_oe_flag := 'Y';
184: l_Charge_Details_rec.original_source_id := p_repair_line_id;
185:
186: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
187: fnd_log.STRING (fnd_log.level_procedure,
188: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
189: 'Under-receipt: before calling create charge details');
190: End if;
191: -- call the create charges API

Line 209: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

205: p_Charges_Rec => l_Charge_Details_rec
206: );
207:
208: if x_return_status <> fnd_api.g_ret_sts_success then
209: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
210: fnd_log.STRING (fnd_log.level_procedure,
211: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
212: 'Under-receipt: Error in creating charge lines: '|| x_msg_data);
213: End if;

Line 210: fnd_log.STRING (fnd_log.level_procedure,

206: );
207:
208: if x_return_status <> fnd_api.g_ret_sts_success then
209: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
210: fnd_log.STRING (fnd_log.level_procedure,
211: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
212: 'Under-receipt: Error in creating charge lines: '|| x_msg_data);
213: End if;
214: raise l_create_charge_err;

Line 327: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

323: null;
324: end;
325:
326: l_prod_txns_rec.estimate_detail_id := x_estimate_detail_id;
327: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
328: fnd_log.STRING (fnd_log.level_procedure,
329: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
330: 'Under-receipt: before calling insert: product txn id :'||l_prod_txns_rec.product_transaction_id);
331: End if;

Line 328: fnd_log.STRING (fnd_log.level_procedure,

324: end;
325:
326: l_prod_txns_rec.estimate_detail_id := x_estimate_detail_id;
327: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
328: fnd_log.STRING (fnd_log.level_procedure,
329: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
330: 'Under-receipt: before calling insert: product txn id :'||l_prod_txns_rec.product_transaction_id);
331: End if;
332: -- insert the values into csd_product_transactions.

Line 438: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

434: WHEN l_update_charge_err THEN
435: -- write the error message to bulk receive log.
436: write_to_conc_log(x_msg_count,x_msg_data);
437:
438: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
439: FOR j in 1 ..x_msg_count
440: LOOP
441: FND_MSG_PUB.Get(
442: p_msg_index => j,

Line 446: fnd_log.STRING (fnd_log.level_procedure,

442: p_msg_index => j,
443: p_encoded => 'F',
444: p_data => x_msg_data,
445: p_msg_index_out => x_msg_index_out);
446: fnd_log.STRING (fnd_log.level_procedure,
447: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
448: 'Under-receipt: Return Status '||x_msg_count||' Message '||x_msg_data);
449: END LOOP;
450: End if;

Line 456: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

452:
453: WHEN l_create_charge_err THEN
454: write_to_conc_log(x_msg_count,x_msg_data);
455:
456: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
457: FOR j in 1 ..x_msg_count
458: LOOP
459: FND_MSG_PUB.Get(
460: p_msg_index => j,

Line 464: fnd_log.STRING (fnd_log.level_procedure,

460: p_msg_index => j,
461: p_encoded => 'F',
462: p_data => x_msg_data,
463: p_msg_index_out => x_msg_index_out);
464: fnd_log.STRING (fnd_log.level_procedure,
465: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
466: 'Under-receipt: create charge err '||x_msg_count||' Message '||x_msg_data);
467: END LOOP;
468: End if;

Line 471: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

467: END LOOP;
468: End if;
469: rollback to create_charge;
470: WHEN OTHERS THEN
471: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
472: fnd_log.STRING (fnd_log.level_procedure,
473: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
474: 'Under-receipt: WHEN OTHERS : Message '||SQLERRM);
475: End if;

Line 472: fnd_log.STRING (fnd_log.level_procedure,

468: End if;
469: rollback to create_charge;
470: WHEN OTHERS THEN
471: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
472: fnd_log.STRING (fnd_log.level_procedure,
473: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.AFTER_UNDER_RECEIPT_PRCS',
474: 'Under-receipt: WHEN OTHERS : Message '||SQLERRM);
475: End if;
476: raise;

Line 544: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

540: x_relationship_created VARCHAR2(1);
541:
542: BEGIN
543:
544: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
545: fnd_log.STRING (fnd_log.level_procedure,
546: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.VALIDATE_BULK_RECEIVE_REC.BEGIN',
547: 'Enter - Validate bulk receive rec');
548: End if;

Line 545: fnd_log.STRING (fnd_log.level_procedure,

541:
542: BEGIN
543:
544: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
545: fnd_log.STRING (fnd_log.level_procedure,
546: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.VALIDATE_BULK_RECEIVE_REC.BEGIN',
547: 'Enter - Validate bulk receive rec');
548: End if;
549: --

Line 721: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then

717: End if;
718:
719: End if;
720:
721: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
722: fnd_log.STRING (fnd_log.level_statement,
723: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.VALIDATE_BULK_RECEIVE_REC',
724: 'Warning Flag - '||x_warning_flag||
725: ',Warning Reason Code - '||x_warning_reason_code||

Line 722: fnd_log.STRING (fnd_log.level_statement,

718:
719: End if;
720:
721: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
722: fnd_log.STRING (fnd_log.level_statement,
723: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.VALIDATE_BULK_RECEIVE_REC',
724: 'Warning Flag - '||x_warning_flag||
725: ',Warning Reason Code - '||x_warning_reason_code||
726: ',Internal SR Flag - '||x_internal_sr_flag||

Line 730: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

726: ',Internal SR Flag - '||x_internal_sr_flag||
727: ',Change Owner Flag - '||x_change_owner_flag);
728: End if;
729:
730: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
731: fnd_log.STRING (fnd_log.level_procedure,
732: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.VALIDATE_BULK_RECEIVE_REC.END',
733: 'Exit - Validate bulk receive rec');
734: End if;

Line 731: fnd_log.STRING (fnd_log.level_procedure,

727: ',Change Owner Flag - '||x_change_owner_flag);
728: End if;
729:
730: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
731: fnd_log.STRING (fnd_log.level_procedure,
732: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.VALIDATE_BULK_RECEIVE_REC.END',
733: 'Exit - Validate bulk receive rec');
734: End if;
735:

Line 797: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

793: BEGIN
794:
795: savepoint create_blkrcv_sr;
796:
797: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
798: fnd_log.STRING (fnd_log.level_procedure,
799: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_SR.BEGIN',
800: 'Enter - Create Blkrcv SR');
801: End if;

Line 798: fnd_log.STRING (fnd_log.level_procedure,

794:
795: savepoint create_blkrcv_sr;
796:
797: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
798: fnd_log.STRING (fnd_log.level_procedure,
799: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_SR.BEGIN',
800: 'Enter - Create Blkrcv SR');
801: End if;
802:

Line 885: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

881: If NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) then
882: RAISE FND_API.G_EXC_ERROR;
883: End If;
884:
885: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
886: fnd_log.STRING (fnd_log.level_procedure,
887: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_SR.END',
888: 'Exit - Create Blkrcv SR');
889: End if;

Line 886: fnd_log.STRING (fnd_log.level_procedure,

882: RAISE FND_API.G_EXC_ERROR;
883: End If;
884:
885: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
886: fnd_log.STRING (fnd_log.level_procedure,
887: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_SR.END',
888: 'Exit - Create Blkrcv SR');
889: End if;
890:

Line 1050: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

1046: BEGIN
1047:
1048: savepoint create_blkrcv_ro;
1049:
1050: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1051: fnd_log.STRING (fnd_log.level_procedure,
1052: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO.BEGIN',
1053: 'Enter - Create Blkrcv RO');
1054: End if;

Line 1051: fnd_log.STRING (fnd_log.level_procedure,

1047:
1048: savepoint create_blkrcv_ro;
1049:
1050: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1051: fnd_log.STRING (fnd_log.level_procedure,
1052: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO.BEGIN',
1053: 'Enter - Create Blkrcv RO');
1054: End if;
1055:

Line 1094: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then

1090: l_blkrcv_rec.serial_number);
1091: Fetch c_get_item_revision into l_revision;
1092: Close c_get_item_revision;
1093:
1094: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
1095: fnd_log.STRING (fnd_log.level_statement,
1096: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1097: 'Derived Revision - '||l_revision||
1098: 'for Item id - '||l_blkrcv_rec.inventory_item_id);

Line 1095: fnd_log.STRING (fnd_log.level_statement,

1091: Fetch c_get_item_revision into l_revision;
1092: Close c_get_item_revision;
1093:
1094: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
1095: fnd_log.STRING (fnd_log.level_statement,
1096: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1097: 'Derived Revision - '||l_revision||
1098: 'for Item id - '||l_blkrcv_rec.inventory_item_id);
1099: End if;

Line 1118: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then

1114: Fetch c_get_ib_info into l_owner_party_id,
1115: l_instance_id;
1116: Close c_get_ib_info;
1117:
1118: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
1119: fnd_log.STRING (fnd_log.level_statement,
1120: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1121: 'Derived Instance Id - '||l_instance_id||
1122: 'for Item id - '||l_blkrcv_rec.inventory_item_id||

Line 1119: fnd_log.STRING (fnd_log.level_statement,

1115: l_instance_id;
1116: Close c_get_ib_info;
1117:
1118: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
1119: fnd_log.STRING (fnd_log.level_statement,
1120: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1121: 'Derived Instance Id - '||l_instance_id||
1122: 'for Item id - '||l_blkrcv_rec.inventory_item_id||
1123: ',Serial number - '||l_blkrcv_rec.serial_number);

Line 1140: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then

1136: Open c_get_item_uom_code (l_blkrcv_rec.inventory_item_id);
1137: Fetch c_get_item_uom_code into l_uom_code;
1138: Close c_get_item_uom_code;
1139:
1140: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
1141: fnd_log.STRING (fnd_log.level_statement,
1142: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1143: 'Derived Uom code - '||l_uom_code||
1144: 'for Item id - '||l_blkrcv_rec.inventory_item_id);

Line 1141: fnd_log.STRING (fnd_log.level_statement,

1137: Fetch c_get_item_uom_code into l_uom_code;
1138: Close c_get_item_uom_code;
1139:
1140: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
1141: fnd_log.STRING (fnd_log.level_statement,
1142: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1143: 'Derived Uom code - '||l_uom_code||
1144: 'for Item id - '||l_blkrcv_rec.inventory_item_id);
1145: End if;

Line 1178: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then

1174: l_instance_rec.item_revision := l_revision;
1175: l_instance_rec.lot_number := l_lot_num;
1176: -- end Bulk Rcv enhancement changes, subhat.
1177:
1178: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then
1179: fnd_log.STRING (fnd_log.level_event,
1180: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1181: 'Calling create item instance api');
1182: End if;

Line 1179: fnd_log.STRING (fnd_log.level_event,

1175: l_instance_rec.lot_number := l_lot_num;
1176: -- end Bulk Rcv enhancement changes, subhat.
1177:
1178: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then
1179: fnd_log.STRING (fnd_log.level_event,
1180: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1181: 'Calling create item instance api');
1182: End if;
1183:

Line 1356: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then

1352: l_repln_rec.repair_group_id := null;
1353: l_repln_rec.item_revision := l_revision;
1354: l_repln_rec.repair_mode := l_repair_mode;
1355:
1356: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then
1357: fnd_log.STRING (fnd_log.level_event,
1358: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1359: 'Calling create repair order api');
1360: End if;

Line 1357: fnd_log.STRING (fnd_log.level_event,

1353: l_repln_rec.item_revision := l_revision;
1354: l_repln_rec.repair_mode := l_repair_mode;
1355:
1356: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then
1357: fnd_log.STRING (fnd_log.level_event,
1358: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO',
1359: 'Calling create repair order api');
1360: End if;
1361:

Line 1382: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

1378: If NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) then
1379: RAISE FND_API.G_EXC_ERROR;
1380: End If;
1381:
1382: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1383: fnd_log.STRING (fnd_log.level_procedure,
1384: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO.END',
1385: 'Exit - Create Blkrcv RO');
1386: End if;

Line 1383: fnd_log.STRING (fnd_log.level_procedure,

1379: RAISE FND_API.G_EXC_ERROR;
1380: End If;
1381:
1382: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1383: fnd_log.STRING (fnd_log.level_procedure,
1384: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_RO.END',
1385: 'Exit - Create Blkrcv RO');
1386: End if;
1387:

Line 1449: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

1445: BEGIN
1446:
1447: savepoint create_blkrcv_default_prod_txn;
1448:
1449: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1450: fnd_log.STRING (fnd_log.level_procedure,
1451: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_DEFAULT_PROD_TXN.BEGIN',
1452: 'Enter - Create Blkrcv Default Prod Txn');
1453: End if;

Line 1450: fnd_log.STRING (fnd_log.level_procedure,

1446:
1447: savepoint create_blkrcv_default_prod_txn;
1448:
1449: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1450: fnd_log.STRING (fnd_log.level_procedure,
1451: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_DEFAULT_PROD_TXN.BEGIN',
1452: 'Enter - Create Blkrcv Default Prod Txn');
1453: End if;
1454:

Line 1474: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

1470: If NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) then
1471: RAISE FND_API.G_EXC_ERROR;
1472: End If;
1473:
1474: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1475: fnd_log.STRING (fnd_log.level_procedure,
1476: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_DEFAULT_PROD_TXN.END',
1477: 'Exit - Create Blkrcv Default Prod Txn');
1478: End if;

Line 1475: fnd_log.STRING (fnd_log.level_procedure,

1471: RAISE FND_API.G_EXC_ERROR;
1472: End If;
1473:
1474: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1475: fnd_log.STRING (fnd_log.level_procedure,
1476: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CREATE_BULKRCV_DEFAULT_PROD_TXN.END',
1477: 'Exit - Create Blkrcv Default Prod Txn');
1478: End if;
1479:

Line 1599: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

1595: BEGIN
1596:
1597: savepoint change_blkrcv_ib_owner;
1598:
1599: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1600: fnd_log.STRING (fnd_log.level_procedure,
1601: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CHANGE_BULKRCV_IB_OWNER.BEGIN',
1602: 'Enter - Change Blkrcv IB Owner');
1603: End if;

Line 1600: fnd_log.STRING (fnd_log.level_procedure,

1596:
1597: savepoint change_blkrcv_ib_owner;
1598:
1599: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1600: fnd_log.STRING (fnd_log.level_procedure,
1601: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CHANGE_BULKRCV_IB_OWNER.BEGIN',
1602: 'Enter - Change Blkrcv IB Owner');
1603: End if;
1604:

Line 1708: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

1704: If NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) then
1705: RAISE FND_API.G_EXC_ERROR;
1706: End If;
1707:
1708: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1709: fnd_log.STRING (fnd_log.level_procedure,
1710: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CHANGE_BULKRCV_IB_OWNER.END',
1711: 'Exit - Change Blkrcv IB Owner');
1712: End if;

Line 1709: fnd_log.STRING (fnd_log.level_procedure,

1705: RAISE FND_API.G_EXC_ERROR;
1706: End If;
1707:
1708: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1709: fnd_log.STRING (fnd_log.level_procedure,
1710: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.CHANGE_BULKRCV_IB_OWNER.END',
1711: 'Exit - Change Blkrcv IB Owner');
1712: End if;
1713:

Line 1841: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

1837: BEGIN
1838:
1839: Savepoint bulk_auto_receive;
1840:
1841: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1842: fnd_log.STRING (fnd_log.level_procedure,
1843: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.BULK_AUTO_RECEIVE.BEGIN',
1844: 'Enter - Bulk auto receive');
1845: End if;

Line 1842: fnd_log.STRING (fnd_log.level_procedure,

1838:
1839: Savepoint bulk_auto_receive;
1840:
1841: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
1842: fnd_log.STRING (fnd_log.level_procedure,
1843: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.BULK_AUTO_RECEIVE.BEGIN',
1844: 'Enter - Bulk auto receive');
1845: End if;
1846:

Line 1933: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then

1929:
1930: End Loop;
1931:
1932: -- Call the Receive API
1933: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then
1934: fnd_log.STRING (fnd_log.level_event,
1935: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.BULK_AUTO_RECEIVE.BEGIN',
1936: 'Call receive item api');
1937: End if;

Line 1934: fnd_log.STRING (fnd_log.level_event,

1930: End Loop;
1931:
1932: -- Call the Receive API
1933: If (fnd_log.level_event >= fnd_log.g_current_runtime_level) then
1934: fnd_log.STRING (fnd_log.level_event,
1935: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.BULK_AUTO_RECEIVE.BEGIN',
1936: 'Call receive item api');
1937: End if;
1938:

Line 2198: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2194: End if; -- End if of the Status check
2195:
2196: End if; -- End if of the l_rcv_rec_tbl.count > 0
2197:
2198: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2199: fnd_log.STRING (fnd_log.level_procedure,
2200: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.BULK_AUTO_RECEIVE.END',
2201: 'Exit - Bulk auto receive');
2202: End if;

Line 2199: fnd_log.STRING (fnd_log.level_procedure,

2195:
2196: End if; -- End if of the l_rcv_rec_tbl.count > 0
2197:
2198: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2199: fnd_log.STRING (fnd_log.level_procedure,
2200: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.BULK_AUTO_RECEIVE.END',
2201: 'Exit - Bulk auto receive');
2202: End if;
2203:

Line 2252: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2248: l_msg Varchar2(2000);
2249:
2250: BEGIN
2251:
2252: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2253: fnd_log.STRING (fnd_log.level_procedure,
2254: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.WRITE_TO_CONC_LOG.BEGIN',
2255: 'Enter - Write to conc log');
2256: End if;

Line 2253: fnd_log.STRING (fnd_log.level_procedure,

2249:
2250: BEGIN
2251:
2252: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2253: fnd_log.STRING (fnd_log.level_procedure,
2254: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.WRITE_TO_CONC_LOG.BEGIN',
2255: 'Enter - Write to conc log');
2256: End if;
2257:

Line 2280: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2276: End If;
2277:
2278: End If;
2279:
2280: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2281: fnd_log.STRING (fnd_log.level_procedure,
2282: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.WRITE_TO_CONC_LOG.END',
2283: 'Exit - Write to conc log');
2284: End if;

Line 2281: fnd_log.STRING (fnd_log.level_procedure,

2277:
2278: End If;
2279:
2280: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2281: fnd_log.STRING (fnd_log.level_procedure,
2282: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.WRITE_TO_CONC_LOG.END',
2283: 'Exit - Write to conc log');
2284: End if;
2285:

Line 2341: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2337:
2338:
2339: BEGIN
2340:
2341: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2342: fnd_log.STRING (fnd_log.level_procedure,
2343: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.WRITE_TO_CONC_OUTPUT.BEGIN',
2344: 'Enter - Write to conc output');
2345: End if;

Line 2342: fnd_log.STRING (fnd_log.level_procedure,

2338:
2339: BEGIN
2340:
2341: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2342: fnd_log.STRING (fnd_log.level_procedure,
2343: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.WRITE_TO_CONC_OUTPUT.BEGIN',
2344: 'Enter - Write to conc output');
2345: End if;
2346:

Line 2460: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2456: Fnd_file.put_line(fnd_file.output,rpad(rtrim(l_status),28,' '));
2457:
2458: End Loop;
2459:
2460: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2461: fnd_log.STRING (fnd_log.level_procedure,
2462: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.WRITE_TO_CONC_OUTPUT.END',
2463: 'Exit - Write to conc output');
2464: End if;

Line 2461: fnd_log.STRING (fnd_log.level_procedure,

2457:
2458: End Loop;
2459:
2460: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2461: fnd_log.STRING (fnd_log.level_procedure,
2462: 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.WRITE_TO_CONC_OUTPUT.END',
2463: 'Exit - Write to conc output');
2464: End if;
2465:

Line 2697: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2693: for i in 1 ..x_sr_ro_rma_tbl.COUNT
2694: loop
2695:
2696: l_counter := l_counter + 1;
2697: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2698: fnd_log.STRING (fnd_log.level_procedure,
2699: lc_api_name,'Start processing bulk receive id '||x_sr_ro_rma_tbl(l_counter).bulk_receive_id);
2700: End if;
2701: if x_sr_ro_rma_tbl(l_counter).inventory_item_id is not null then

Line 2698: fnd_log.STRING (fnd_log.level_procedure,

2694: loop
2695:
2696: l_counter := l_counter + 1;
2697: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2698: fnd_log.STRING (fnd_log.level_procedure,
2699: lc_api_name,'Start processing bulk receive id '||x_sr_ro_rma_tbl(l_counter).bulk_receive_id);
2700: End if;
2701: if x_sr_ro_rma_tbl(l_counter).inventory_item_id is not null then
2702:

Line 2707: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2703: if (x_sr_ro_rma_tbl(l_counter).serial_number is not null and x_sr_ro_rma_tbl(l_counter).instance_id is not null) then
2704: -- case1.
2705: -- We will look for the exact matching RO. If we find it we will return it else,
2706: -- we will try to find the latest open SR for the customer account and party combination.
2707: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2708: fnd_log.STRING (fnd_log.level_procedure,
2709: lc_api_name,'Searching the match for SN '||x_sr_ro_rma_tbl(l_counter).Serial_number);
2710: End if;
2711: l_sql_string_tmp := 'select repair_line_id,incident_id,''N'',''N'' from (' ||lc_sql_string_ro||

Line 2708: fnd_log.STRING (fnd_log.level_procedure,

2704: -- case1.
2705: -- We will look for the exact matching RO. If we find it we will return it else,
2706: -- we will try to find the latest open SR for the customer account and party combination.
2707: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2708: fnd_log.STRING (fnd_log.level_procedure,
2709: lc_api_name,'Searching the match for SN '||x_sr_ro_rma_tbl(l_counter).Serial_number);
2710: End if;
2711: l_sql_string_tmp := 'select repair_line_id,incident_id,''N'',''N'' from (' ||lc_sql_string_ro||
2712: ' and cr.serial_number = :p_serial_number '||

Line 2733: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2729: end;
2730:
2731: elsif (x_sr_ro_rma_tbl(l_counter).serial_number is not null and x_sr_ro_rma_tbl(l_counter).instance_id is null) then
2732: -- the instance number is null.
2733: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2734: fnd_log.STRING (fnd_log.level_procedure,
2735: lc_api_name,'Searching the match for SN(Non-IB) '||x_sr_ro_rma_tbl(l_counter).Serial_number);
2736: End if;
2737: l_sql_string_tmp := NULL;

Line 2734: fnd_log.STRING (fnd_log.level_procedure,

2730:
2731: elsif (x_sr_ro_rma_tbl(l_counter).serial_number is not null and x_sr_ro_rma_tbl(l_counter).instance_id is null) then
2732: -- the instance number is null.
2733: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2734: fnd_log.STRING (fnd_log.level_procedure,
2735: lc_api_name,'Searching the match for SN(Non-IB) '||x_sr_ro_rma_tbl(l_counter).Serial_number);
2736: End if;
2737: l_sql_string_tmp := NULL;
2738: l_sql_string_tmp := ' select repair_line_id,incident_id,''N'',''N'' from ( '||

Line 2777: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2773: l_sql_string_tmp := NULL;
2774: l_sql_string_tmp := ' select incident_id,repair_line_id,''N'',''N'' from ('||lc_sql_string_ro||
2775: ' and cr.quantity = :p_quantity order by sr.incident_id desc ) where rownum = 1';
2776: begin
2777: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2778: fnd_log.STRING (fnd_log.level_procedure,
2779: lc_api_name,
2780: 'RO-SR Match: begin matching non-serial controlled items');
2781: End if;

Line 2778: fnd_log.STRING (fnd_log.level_procedure,

2774: l_sql_string_tmp := ' select incident_id,repair_line_id,''N'',''N'' from ('||lc_sql_string_ro||
2775: ' and cr.quantity = :p_quantity order by sr.incident_id desc ) where rownum = 1';
2776: begin
2777: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2778: fnd_log.STRING (fnd_log.level_procedure,
2779: lc_api_name,
2780: 'RO-SR Match: begin matching non-serial controlled items');
2781: End if;
2782: select incident_id,repair_line_id, create_sr_flag,create_ro_flag

Line 2807: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2803: order by cr.creation_date desc ) where rownum = 1;
2804:
2805: l_repair_line_ids_in := x_sr_ro_rma_tbl(l_counter).repair_line_id||',';
2806:
2807: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2808: fnd_log.STRING (fnd_log.level_procedure,
2809: lc_api_name,
2810: 'RO-SR Match: found a row for non serial controlled item '||l_repair_line_ids_in);
2811: End if;

Line 2808: fnd_log.STRING (fnd_log.level_procedure,

2804:
2805: l_repair_line_ids_in := x_sr_ro_rma_tbl(l_counter).repair_line_id||',';
2806:
2807: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2808: fnd_log.STRING (fnd_log.level_procedure,
2809: lc_api_name,
2810: 'RO-SR Match: found a row for non serial controlled item '||l_repair_line_ids_in);
2811: End if;
2812: exception

Line 2818: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2814: -- customer, and Item. Start from RO and proceed.
2815: when no_data_found then
2816: l_check_loaner_non_sn := 'Y';
2817: --l_no_exact_match := 'Y';
2818: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2819: fnd_log.STRING (fnd_log.level_procedure,
2820: lc_api_name,
2821: 'RO-SR Match: In no data found');
2822: End if;

Line 2819: fnd_log.STRING (fnd_log.level_procedure,

2815: when no_data_found then
2816: l_check_loaner_non_sn := 'Y';
2817: --l_no_exact_match := 'Y';
2818: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2819: fnd_log.STRING (fnd_log.level_procedure,
2820: lc_api_name,
2821: 'RO-SR Match: In no data found');
2822: End if;
2823: end;

Line 2871: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

2867: end;
2868: end if;
2869:
2870: if l_no_exact_match = 'Y' then
2871: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2872: fnd_log.STRING (fnd_log.level_procedure,
2873: lc_api_name,
2874: 'RO-SR Match: look for the latest match: Ignore quantity');
2875: End if;

Line 2872: fnd_log.STRING (fnd_log.level_procedure,

2868: end if;
2869:
2870: if l_no_exact_match = 'Y' then
2871: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
2872: fnd_log.STRING (fnd_log.level_procedure,
2873: lc_api_name,
2874: 'RO-SR Match: look for the latest match: Ignore quantity');
2875: End if;
2876: /*l_sql_string_tmp := NULL;

Line 3565: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3561: lc_api_name CONSTANT varchar2(100) := 'CSD.PLSQL.CSD_BULK_RECEIVE_UTIL.after_receipt';
3562:
3563: begin
3564:
3565: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3566: fnd_log.STRING (fnd_log.level_procedure,
3567: lc_api_name,
3568: 'Begin execution, populating bulk receive rec');
3569: End if;

Line 3566: fnd_log.STRING (fnd_log.level_procedure,

3562:
3563: begin
3564:
3565: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3566: fnd_log.STRING (fnd_log.level_procedure,
3567: lc_api_name,
3568: 'Begin execution, populating bulk receive rec');
3569: End if;
3570: -- build bulk autorecv tbl.

Line 3610: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3606: and cpt.estimate_detail_id = ced.estimate_detail_id;
3607:
3608: -- get the errors message table.
3609:
3610: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3611: fnd_log.STRING (fnd_log.level_procedure,
3612: lc_api_name,
3613: 'Calling csd_receive_util.check_rcv_errors');
3614: End if;

Line 3611: fnd_log.STRING (fnd_log.level_procedure,

3607:
3608: -- get the errors message table.
3609:
3610: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3611: fnd_log.STRING (fnd_log.level_procedure,
3612: lc_api_name,
3613: 'Calling csd_receive_util.check_rcv_errors');
3614: End if;
3615: csd_receive_util.check_rcv_errors(x_return_status => l_return_Status,

Line 3644: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3640:
3641: -- If there is header error the update all the Auto Receive lines
3642: -- in Bulk Rcv table to Errored
3643: If (l_header_error) then
3644: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3645: fnd_log.STRING (fnd_log.level_procedure,
3646: lc_api_name,
3647: 'Header error, updating all the records to errored ');
3648: End if;

Line 3645: fnd_log.STRING (fnd_log.level_procedure,

3641: -- If there is header error the update all the Auto Receive lines
3642: -- in Bulk Rcv table to Errored
3643: If (l_header_error) then
3644: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3645: fnd_log.STRING (fnd_log.level_procedure,
3646: lc_api_name,
3647: 'Header error, updating all the records to errored ');
3648: End if;
3649: -- Update all the auto receive records to error

Line 3709: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3705: End Loop;
3706:
3707: If (l_errored) then
3708:
3709: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3710: fnd_log.STRING (fnd_log.level_procedure,
3711: lc_api_name,
3712: 'Bulk receive line ['||l_bulk_autorcv_tbl(i).bulk_receive_id||' ] is errored');
3713: End if;

Line 3710: fnd_log.STRING (fnd_log.level_procedure,

3706:
3707: If (l_errored) then
3708:
3709: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3710: fnd_log.STRING (fnd_log.level_procedure,
3711: lc_api_name,
3712: 'Bulk receive line ['||l_bulk_autorcv_tbl(i).bulk_receive_id||' ] is errored');
3713: End if;
3714: Update csd_bulk_receive_items_b

Line 3721: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3717:
3718: Else
3719:
3720: if nvl(l_bulk_autorcv_tbl(i).under_receipt_flag,'N') = 'Y' then
3721: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3722: fnd_log.STRING (fnd_log.level_procedure,
3723: lc_api_name,
3724: 'Calling after_under_receipt_prcs for processing under-receipts');
3725: End if;

Line 3722: fnd_log.STRING (fnd_log.level_procedure,

3718: Else
3719:
3720: if nvl(l_bulk_autorcv_tbl(i).under_receipt_flag,'N') = 'Y' then
3721: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3722: fnd_log.STRING (fnd_log.level_procedure,
3723: lc_api_name,
3724: 'Calling after_under_receipt_prcs for processing under-receipts');
3725: End if;
3726: after_under_receipt_prcs(p_repair_line_id => l_bulk_autorcv_tbl(i).repair_line_id,

Line 3733: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3729: p_received_qty => l_bulk_autorcv_tbl(i).receipt_qty
3730: );
3731: end if;
3732:
3733: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3734: fnd_log.STRING (fnd_log.level_procedure,
3735: lc_api_name,
3736: 'Calling CSD_UPDATE_PROGRAMS_PVT.RECEIPTS_UPDATE');
3737: End if;

Line 3734: fnd_log.STRING (fnd_log.level_procedure,

3730: );
3731: end if;
3732:
3733: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3734: fnd_log.STRING (fnd_log.level_procedure,
3735: lc_api_name,
3736: 'Calling CSD_UPDATE_PROGRAMS_PVT.RECEIPTS_UPDATE');
3737: End if;
3738: -- Call Update receipts program

Line 3753: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3749: p_repair_line_id => l_bulk_autorcv_tbl(i).repair_line_id);
3750:
3751:
3752: If NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) then
3753: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3754: fnd_log.STRING (fnd_log.level_procedure,
3755: lc_api_name,
3756: 'Error in CSD_UPDATE_PROGRAMS_PVT.RECEIPTS_UPDATE: Return status '||l_return_status);
3757: End if;

Line 3754: fnd_log.STRING (fnd_log.level_procedure,

3750:
3751:
3752: If NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) then
3753: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3754: fnd_log.STRING (fnd_log.level_procedure,
3755: lc_api_name,
3756: 'Error in CSD_UPDATE_PROGRAMS_PVT.RECEIPTS_UPDATE: Return status '||l_return_status);
3757: End if;
3758:

Line 3815: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3811: p_repair_line_id => l_bulk_autorcv_tbl(i).repair_line_id);
3812:
3813:
3814: If NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) then
3815: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3816: fnd_log.STRING (fnd_log.level_procedure,
3817: lc_api_name,
3818: 'Error in CSD_UPDATE_PROGRAMS_PVT.RECEIPTS_UPDATE: Return status '||l_return_status);
3819: End if;

Line 3816: fnd_log.STRING (fnd_log.level_procedure,

3812:
3813:
3814: If NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) then
3815: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3816: fnd_log.STRING (fnd_log.level_procedure,
3817: lc_api_name,
3818: 'Error in CSD_UPDATE_PROGRAMS_PVT.RECEIPTS_UPDATE: Return status '||l_return_status);
3819: End if;
3820:

Line 3834: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3830: Fetch c_get_prod_txn_status into l_prod_txn_status;
3831: Close c_get_prod_txn_status;
3832:
3833: If ( l_prod_txn_status = 'RECEIVED' ) then
3834: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3835: fnd_log.STRING (fnd_log.level_procedure,
3836: lc_api_name,
3837: 'No errors during receiving,update the line as processed: id = '||l_bulk_autorcv_tbl(i).bulk_receive_id);
3838: End if;

Line 3835: fnd_log.STRING (fnd_log.level_procedure,

3831: Close c_get_prod_txn_status;
3832:
3833: If ( l_prod_txn_status = 'RECEIVED' ) then
3834: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3835: fnd_log.STRING (fnd_log.level_procedure,
3836: lc_api_name,
3837: 'No errors during receiving,update the line as processed: id = '||l_bulk_autorcv_tbl(i).bulk_receive_id);
3838: End if;
3839:

Line 3898: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3894: begin
3895:
3896: savepoint pre_process_rma;
3897:
3898: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3899: fnd_log.STRING (fnd_log.level_procedure,
3900: lc_api_name,
3901: 'Begin pre_process_rma');
3902: End if;

Line 3899: fnd_log.STRING (fnd_log.level_procedure,

3895:
3896: savepoint pre_process_rma;
3897:
3898: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3899: fnd_log.STRING (fnd_log.level_procedure,
3900: lc_api_name,
3901: 'Begin pre_process_rma');
3902: End if;
3903: -- initialize the return status.

Line 3926: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

3922: elsif px_order_header_id is null and p_repair_line_id is not null then
3923: l_rma_status := 'ENTERED';
3924: end if;
3925:
3926: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3927: fnd_log.STRING (fnd_log.level_procedure,
3928: lc_api_name,
3929: 'Finding the existing RMA line');
3930: End if;

Line 3927: fnd_log.STRING (fnd_log.level_procedure,

3923: l_rma_status := 'ENTERED';
3924: end if;
3925:
3926: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
3927: fnd_log.STRING (fnd_log.level_procedure,
3928: lc_api_name,
3929: 'Finding the existing RMA line');
3930: End if;
3931: begin

Line 4028: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4024: rownum < 2;
4025: l_check_loaner := 'N';
4026: end if;
4027:
4028: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4029: fnd_log.STRING (fnd_log.level_procedure,
4030: lc_api_name,
4031: 'Populating l_prod_txn_rec with the default values');
4032: End if;

Line 4029: fnd_log.STRING (fnd_log.level_procedure,

4025: l_check_loaner := 'N';
4026: end if;
4027:
4028: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4029: fnd_log.STRING (fnd_log.level_procedure,
4030: lc_api_name,
4031: 'Populating l_prod_txn_rec with the default values');
4032: End if;
4033: l_prod_txn_rec.source_id := p_repair_line_id;

Line 4090: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4086: l_prod_txn_rec.new_order_flag := 'Y';
4087: end if;
4088: end if;
4089:
4090: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4091: fnd_log.STRING (fnd_log.level_procedure,
4092: lc_api_name,
4093: 'Calling csd_process_pvt.update_product_txn to book the order');
4094: End if;

Line 4091: fnd_log.STRING (fnd_log.level_procedure,

4087: end if;
4088: end if;
4089:
4090: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4091: fnd_log.STRING (fnd_log.level_procedure,
4092: lc_api_name,
4093: 'Calling csd_process_pvt.update_product_txn to book the order');
4094: End if;
4095:

Line 4107: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4103: x_msg_count => x_msg_count,
4104: x_msg_data => x_msg_data
4105: );
4106: if x_return_status <> fnd_api.g_ret_sts_success then
4107: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4108: fnd_log.STRING (fnd_log.level_procedure,
4109: lc_api_name,
4110: 'Error while trying to book the existing line ');
4111: End if;

Line 4108: fnd_log.STRING (fnd_log.level_procedure,

4104: x_msg_data => x_msg_data
4105: );
4106: if x_return_status <> fnd_api.g_ret_sts_success then
4107: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4108: fnd_log.STRING (fnd_log.level_procedure,
4109: lc_api_name,
4110: 'Error while trying to book the existing line ');
4111: End if;
4112: raise fnd_api.g_exc_error;

Line 4126: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4122: and cpt.action_type = 'RMA';
4123:
4124: exception
4125: when fnd_api.g_exc_error then
4126: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4127: fnd_log.STRING (fnd_log.level_procedure,
4128: lc_api_name,
4129: 'In g_exc_error exception, rolling back to pre_process_rma ');
4130: End if;

Line 4127: fnd_log.STRING (fnd_log.level_procedure,

4123:
4124: exception
4125: when fnd_api.g_exc_error then
4126: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4127: fnd_log.STRING (fnd_log.level_procedure,
4128: lc_api_name,
4129: 'In g_exc_error exception, rolling back to pre_process_rma ');
4130: End if;
4131: x_return_status := fnd_api.g_ret_sts_error;

Line 4134: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4130: End if;
4131: x_return_status := fnd_api.g_ret_sts_error;
4132: rollback to pre_process_rma;
4133: when no_data_found then
4134: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4135: fnd_log.STRING (fnd_log.level_procedure,
4136: lc_api_name,
4137: 'In no_data_found exception.');
4138: End if;

Line 4135: fnd_log.STRING (fnd_log.level_procedure,

4131: x_return_status := fnd_api.g_ret_sts_error;
4132: rollback to pre_process_rma;
4133: when no_data_found then
4134: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4135: fnd_log.STRING (fnd_log.level_procedure,
4136: lc_api_name,
4137: 'In no_data_found exception.');
4138: End if;
4139: x_return_status := fnd_api.g_ret_sts_error;

Line 4142: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4138: End if;
4139: x_return_status := fnd_api.g_ret_sts_error;
4140: rollback to pre_process_rma;
4141: when others then
4142: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4143: fnd_log.STRING (fnd_log.level_procedure,
4144: lc_api_name,
4145: 'In when others exception and the error message is '||SQLERRM);
4146: End if;

Line 4143: fnd_log.STRING (fnd_log.level_procedure,

4139: x_return_status := fnd_api.g_ret_sts_error;
4140: rollback to pre_process_rma;
4141: when others then
4142: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4143: fnd_log.STRING (fnd_log.level_procedure,
4144: lc_api_name,
4145: 'In when others exception and the error message is '||SQLERRM);
4146: End if;
4147: raise;

Line 4176: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4172:
4173: BEGIN
4174: savepoint create_new_ship_line;
4175: -- get the default values from the existing SHIP line
4176: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4177: fnd_log.STRING (fnd_log.level_procedure,
4178: lc_api_name,
4179: 'Begin creating new ship line');
4180: End if;

Line 4177: fnd_log.STRING (fnd_log.level_procedure,

4173: BEGIN
4174: savepoint create_new_ship_line;
4175: -- get the default values from the existing SHIP line
4176: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4177: fnd_log.STRING (fnd_log.level_procedure,
4178: lc_api_name,
4179: 'Begin creating new ship line');
4180: End if;
4181:

Line 4225: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4221: end;
4222: l_prod_txn_rec.bill_to_party_id := l_prod_txn_rec.ship_to_party_id;
4223: l_prod_txn_rec.bill_to_account_id := l_prod_txn_rec.ship_to_account_id;
4224:
4225: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4226: fnd_log.STRING (fnd_log.level_procedure,
4227: lc_api_name,
4228: 'Before calling csd_process_pvt.create_product_txn');
4229: End if;

Line 4226: fnd_log.STRING (fnd_log.level_procedure,

4222: l_prod_txn_rec.bill_to_party_id := l_prod_txn_rec.ship_to_party_id;
4223: l_prod_txn_rec.bill_to_account_id := l_prod_txn_rec.ship_to_account_id;
4224:
4225: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4226: fnd_log.STRING (fnd_log.level_procedure,
4227: lc_api_name,
4228: 'Before calling csd_process_pvt.create_product_txn');
4229: End if;
4230: -- call the routine to create the additional RMA.

Line 4243: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4239: x_msg_count => x_msg_count
4240: );
4241:
4242: if x_return_status <> FND_API.g_ret_sts_success then
4243: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4244: fnd_log.STRING (fnd_log.level_procedure,
4245: lc_api_name,
4246: 'Error in csd_process_pvt.create_product_txn');
4247: End if;

Line 4244: fnd_log.STRING (fnd_log.level_procedure,

4240: );
4241:
4242: if x_return_status <> FND_API.g_ret_sts_success then
4243: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4244: fnd_log.STRING (fnd_log.level_procedure,
4245: lc_api_name,
4246: 'Error in csd_process_pvt.create_product_txn');
4247: End if;
4248: raise FND_API.G_EXC_ERROR;

Line 4254: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then

4250:
4251: EXCEPTION
4252: when FND_API.G_EXC_ERROR THEN
4253: -- an error occured during creation of new RMA.
4254: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4255: fnd_log.STRING (fnd_log.level_procedure,
4256: lc_api_name,
4257: 'Error encountered during creation of new ship line.');
4258: fnd_log.STRING (fnd_log.level_procedure,

Line 4255: fnd_log.STRING (fnd_log.level_procedure,

4251: EXCEPTION
4252: when FND_API.G_EXC_ERROR THEN
4253: -- an error occured during creation of new RMA.
4254: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4255: fnd_log.STRING (fnd_log.level_procedure,
4256: lc_api_name,
4257: 'Error encountered during creation of new ship line.');
4258: fnd_log.STRING (fnd_log.level_procedure,
4259: lc_api_name,

Line 4258: fnd_log.STRING (fnd_log.level_procedure,

4254: If (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) then
4255: fnd_log.STRING (fnd_log.level_procedure,
4256: lc_api_name,
4257: 'Error encountered during creation of new ship line.');
4258: fnd_log.STRING (fnd_log.level_procedure,
4259: lc_api_name,
4260: 'Message count '||x_msg_count||' message '|| x_msg_data);
4261: End if;
4262: ROLLBACK TO create_new_ship_line;