562: END IF;
563:
564: IF (l_complex_flag = 'Y') THEN
565: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type || ' for complex work POs');
566: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
567: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
568: End if;
569:
570: l_parent_transaction_type := x_derive_returnrec.transaction_type;
563:
564: IF (l_complex_flag = 'Y') THEN
565: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type || ' for complex work POs');
566: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
567: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
568: End if;
569:
570: l_parent_transaction_type := x_derive_returnrec.transaction_type;
571: l_grand_parent_trx_id := x_derive_returnrec.parent_transaction_id;
865: x_cascaded_table(n).error_status := 'F';
866: /* Bug 3250532 : Changed the error message from 'TBD' to 'RCV_ENTER_QTY_GT_ZERO'.
867: */
868: x_cascaded_table(n).error_message := 'RCV_ENTER_QTY_GT_ZERO';
869: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
870: rcv_error_pkg.set_token('ITEM', x_cascaded_table(n).item_num);
871: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
872: WHEN no_parent_line_exception THEN
873: x_cascaded_table(n).error_status := 'E';
866: /* Bug 3250532 : Changed the error message from 'TBD' to 'RCV_ENTER_QTY_GT_ZERO'.
867: */
868: x_cascaded_table(n).error_message := 'RCV_ENTER_QTY_GT_ZERO';
869: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
870: rcv_error_pkg.set_token('ITEM', x_cascaded_table(n).item_num);
871: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
872: WHEN no_parent_line_exception THEN
873: x_cascaded_table(n).error_status := 'E';
874:
867: */
868: x_cascaded_table(n).error_message := 'RCV_ENTER_QTY_GT_ZERO';
869: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
870: rcv_error_pkg.set_token('ITEM', x_cascaded_table(n).item_num);
871: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
872: WHEN no_parent_line_exception THEN
873: x_cascaded_table(n).error_status := 'E';
874:
875: IF (x_cascaded_table(n).error_message IS NULL) THEN
877: */
878: x_cascaded_table(n).error_message := 'RCV_NO_PARENT_TRANSACTION';
879: END IF;
880:
881: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
882: rcv_error_pkg.set_token('DOCUMENT_NUM', x_cascaded_table(n).document_num);
883: rcv_error_pkg.log_interface_error('NUMBER', FALSE);
884: WHEN reject_exception THEN
885: x_cascaded_table(n).error_status := 'E';
878: x_cascaded_table(n).error_message := 'RCV_NO_PARENT_TRANSACTION';
879: END IF;
880:
881: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
882: rcv_error_pkg.set_token('DOCUMENT_NUM', x_cascaded_table(n).document_num);
883: rcv_error_pkg.log_interface_error('NUMBER', FALSE);
884: WHEN reject_exception THEN
885: x_cascaded_table(n).error_status := 'E';
886: /* Bug 3250532 : Changed the error message from 'TBD' to 'RCV_TRX_QTY_EXCEEDS_AVAILABLE'.
879: END IF;
880:
881: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
882: rcv_error_pkg.set_token('DOCUMENT_NUM', x_cascaded_table(n).document_num);
883: rcv_error_pkg.log_interface_error('NUMBER', FALSE);
884: WHEN reject_exception THEN
885: x_cascaded_table(n).error_status := 'E';
886: /* Bug 3250532 : Changed the error message from 'TBD' to 'RCV_TRX_QTY_EXCEEDS_AVAILABLE'.
887: */
885: x_cascaded_table(n).error_status := 'E';
886: /* Bug 3250532 : Changed the error message from 'TBD' to 'RCV_TRX_QTY_EXCEEDS_AVAILABLE'.
887: */
888: x_cascaded_table(n).error_message := 'RCV_TRX_QTY_EXCEEDS_AVAILABLE';
889: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
890: rcv_error_pkg.set_token('QTY_A', x_cascaded_table(n).quantity);
891: rcv_error_pkg.set_token('QTY_B', x_cascaded_table(n).quantity - x_remaining_quantity);
892: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
893: temp_cascaded_table.DELETE;
886: /* Bug 3250532 : Changed the error message from 'TBD' to 'RCV_TRX_QTY_EXCEEDS_AVAILABLE'.
887: */
888: x_cascaded_table(n).error_message := 'RCV_TRX_QTY_EXCEEDS_AVAILABLE';
889: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
890: rcv_error_pkg.set_token('QTY_A', x_cascaded_table(n).quantity);
891: rcv_error_pkg.set_token('QTY_B', x_cascaded_table(n).quantity - x_remaining_quantity);
892: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
893: temp_cascaded_table.DELETE;
894: WHEN OTHERS THEN
887: */
888: x_cascaded_table(n).error_message := 'RCV_TRX_QTY_EXCEEDS_AVAILABLE';
889: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
890: rcv_error_pkg.set_token('QTY_A', x_cascaded_table(n).quantity);
891: rcv_error_pkg.set_token('QTY_B', x_cascaded_table(n).quantity - x_remaining_quantity);
892: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
893: temp_cascaded_table.DELETE;
894: WHEN OTHERS THEN
895: IF derive_return%ISOPEN THEN
888: x_cascaded_table(n).error_message := 'RCV_TRX_QTY_EXCEEDS_AVAILABLE';
889: rcv_error_pkg.set_error_message(x_cascaded_table(n).error_message);
890: rcv_error_pkg.set_token('QTY_A', x_cascaded_table(n).quantity);
891: rcv_error_pkg.set_token('QTY_B', x_cascaded_table(n).quantity - x_remaining_quantity);
892: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
893: temp_cascaded_table.DELETE;
894: WHEN OTHERS THEN
895: IF derive_return%ISOPEN THEN
896: CLOSE derive_return;
1427:
1428: IF (l_primary_qty > NVL(l_att, 0)) THEN --{
1429: x_error_status := 'E';
1430: x_error_message := 'RCV_TRX_QTY_EXCEEDS_INV_AVAIL';
1431: rcv_error_pkg.set_error_message(x_error_message);
1432: rcv_error_pkg.set_token('PRIMARY', l_primary_qty);
1433: rcv_error_pkg.set_token('SUB', l_att);
1434: rcv_error_pkg.log_interface_error('PRIMARY_QUANTITY', FALSE);
1435: EXIT;
1428: IF (l_primary_qty > NVL(l_att, 0)) THEN --{
1429: x_error_status := 'E';
1430: x_error_message := 'RCV_TRX_QTY_EXCEEDS_INV_AVAIL';
1431: rcv_error_pkg.set_error_message(x_error_message);
1432: rcv_error_pkg.set_token('PRIMARY', l_primary_qty);
1433: rcv_error_pkg.set_token('SUB', l_att);
1434: rcv_error_pkg.log_interface_error('PRIMARY_QUANTITY', FALSE);
1435: EXIT;
1436: ELSE -- }{
1429: x_error_status := 'E';
1430: x_error_message := 'RCV_TRX_QTY_EXCEEDS_INV_AVAIL';
1431: rcv_error_pkg.set_error_message(x_error_message);
1432: rcv_error_pkg.set_token('PRIMARY', l_primary_qty);
1433: rcv_error_pkg.set_token('SUB', l_att);
1434: rcv_error_pkg.log_interface_error('PRIMARY_QUANTITY', FALSE);
1435: EXIT;
1436: ELSE -- }{
1437: x_error_status := 'S';
1430: x_error_message := 'RCV_TRX_QTY_EXCEEDS_INV_AVAIL';
1431: rcv_error_pkg.set_error_message(x_error_message);
1432: rcv_error_pkg.set_token('PRIMARY', l_primary_qty);
1433: rcv_error_pkg.set_token('SUB', l_att);
1434: rcv_error_pkg.log_interface_error('PRIMARY_QUANTITY', FALSE);
1435: EXIT;
1436: ELSE -- }{
1437: x_error_status := 'S';
1438: END IF; --}
1438: END IF; --}
1439: ELSE --}{
1440: x_error_status := 'E';
1441: x_error_message := 'RCV_TRX_QTY_EXCEEDS_INV_AVAIL';
1442: rcv_error_pkg.set_error_message(x_error_message);
1443: rcv_error_pkg.set_token('PRIMARY', l_primary_qty);
1444: rcv_error_pkg.set_token('SUB', l_att);
1445: rcv_error_pkg.log_interface_error('PRIMARY_QUANTITY', FALSE);
1446: EXIT;
1439: ELSE --}{
1440: x_error_status := 'E';
1441: x_error_message := 'RCV_TRX_QTY_EXCEEDS_INV_AVAIL';
1442: rcv_error_pkg.set_error_message(x_error_message);
1443: rcv_error_pkg.set_token('PRIMARY', l_primary_qty);
1444: rcv_error_pkg.set_token('SUB', l_att);
1445: rcv_error_pkg.log_interface_error('PRIMARY_QUANTITY', FALSE);
1446: EXIT;
1447: END IF; --}
1440: x_error_status := 'E';
1441: x_error_message := 'RCV_TRX_QTY_EXCEEDS_INV_AVAIL';
1442: rcv_error_pkg.set_error_message(x_error_message);
1443: rcv_error_pkg.set_token('PRIMARY', l_primary_qty);
1444: rcv_error_pkg.set_token('SUB', l_att);
1445: rcv_error_pkg.log_interface_error('PRIMARY_QUANTITY', FALSE);
1446: EXIT;
1447: END IF; --}
1448:
1441: x_error_message := 'RCV_TRX_QTY_EXCEEDS_INV_AVAIL';
1442: rcv_error_pkg.set_error_message(x_error_message);
1443: rcv_error_pkg.set_token('PRIMARY', l_primary_qty);
1444: rcv_error_pkg.set_token('SUB', l_att);
1445: rcv_error_pkg.log_interface_error('PRIMARY_QUANTITY', FALSE);
1446: EXIT;
1447: END IF; --}
1448:
1449: IF (p_transaction_type = 'CORRECT') THEN --{