[Home] [Help]
1: PACKAGE BODY rcv_roi_transaction
2: /* $Header: RCVPRETB.pls 120.83.12020000.7 2013/01/25 03:45:12 honwei ship $*/
3: AS
4: g_asn_debug VARCHAR2(1) := asn_debug.is_debug_on; -- Bug 9152790: rcv debug enhancement
5: x_progress VARCHAR2(3);
6: g_pkg_name CONSTANT VARCHAR2(30) := 'RCV_ROI_TRANSACTION';
7: x_drop_ship_flag VARCHAR2(1) := 'N';
8: x_auto_deliver VARCHAR2(1);
61: -- Gets the encoded cancatenated string
62: l_locator := fnd_flex_ext.concatenate_segments(n_segments => l_nseg,
63: segments => l_segmentarray,
64: delimiter => l_delim);
65: IF (g_asn_debug = 'Y') THEN
66: asn_debug.put_line('Locator is : ' || l_locator);
67: END IF;
68:
69: /*
62: l_locator := fnd_flex_ext.concatenate_segments(n_segments => l_nseg,
63: segments => l_segmentarray,
64: delimiter => l_delim);
65: IF (g_asn_debug = 'Y') THEN
66: asn_debug.put_line('Locator is : ' || l_locator);
67: END IF;
68:
69: /*
70: * If Locator control allows dynamic creation then create the combination
88: x_locid := fnd_flex_keyval.combination_id;
89: else
90: x_locid := NULL;
91: l_error_exp := substr(fnd_flex_key_api.message(),1,240);
92: IF (g_asn_debug = 'Y') THEN
93: asn_debug.put_line('Error in getloc : ' || l_error_exp);
94: asn_debug.put_line('Error in getloc : error_segment :' || FND_FLEX_KEYVAL.error_segment);
95: asn_debug.put_line('Error in getloc : error_message :' || FND_FLEX_KEYVAL.error_message);
96: asn_debug.put_line('Error in getloc : encoded_error_message :' || FND_FLEX_KEYVAL.encoded_error_message);
89: else
90: x_locid := NULL;
91: l_error_exp := substr(fnd_flex_key_api.message(),1,240);
92: IF (g_asn_debug = 'Y') THEN
93: asn_debug.put_line('Error in getloc : ' || l_error_exp);
94: asn_debug.put_line('Error in getloc : error_segment :' || FND_FLEX_KEYVAL.error_segment);
95: asn_debug.put_line('Error in getloc : error_message :' || FND_FLEX_KEYVAL.error_message);
96: asn_debug.put_line('Error in getloc : encoded_error_message :' || FND_FLEX_KEYVAL.encoded_error_message);
97: END IF;
90: x_locid := NULL;
91: l_error_exp := substr(fnd_flex_key_api.message(),1,240);
92: IF (g_asn_debug = 'Y') THEN
93: asn_debug.put_line('Error in getloc : ' || l_error_exp);
94: asn_debug.put_line('Error in getloc : error_segment :' || FND_FLEX_KEYVAL.error_segment);
95: asn_debug.put_line('Error in getloc : error_message :' || FND_FLEX_KEYVAL.error_message);
96: asn_debug.put_line('Error in getloc : encoded_error_message :' || FND_FLEX_KEYVAL.encoded_error_message);
97: END IF;
98: end if;
91: l_error_exp := substr(fnd_flex_key_api.message(),1,240);
92: IF (g_asn_debug = 'Y') THEN
93: asn_debug.put_line('Error in getloc : ' || l_error_exp);
94: asn_debug.put_line('Error in getloc : error_segment :' || FND_FLEX_KEYVAL.error_segment);
95: asn_debug.put_line('Error in getloc : error_message :' || FND_FLEX_KEYVAL.error_message);
96: asn_debug.put_line('Error in getloc : encoded_error_message :' || FND_FLEX_KEYVAL.encoded_error_message);
97: END IF;
98: end if;
99:
92: IF (g_asn_debug = 'Y') THEN
93: asn_debug.put_line('Error in getloc : ' || l_error_exp);
94: asn_debug.put_line('Error in getloc : error_segment :' || FND_FLEX_KEYVAL.error_segment);
95: asn_debug.put_line('Error in getloc : error_message :' || FND_FLEX_KEYVAL.error_message);
96: asn_debug.put_line('Error in getloc : encoded_error_message :' || FND_FLEX_KEYVAL.encoded_error_message);
97: END IF;
98: end if;
99:
100: return l_val;
103:
104: WHEN OTHERS THEN
105:
106: l_error_exp := substr(fnd_flex_key_api.message(),1,240);
107: IF (g_asn_debug = 'Y') THEN
108: asn_debug.put_line('Error in getloc : ' || l_error_exp);
109: asn_debug.put_line('Error:'||substr(sqlerrm,1,250));
110: END IF;
111: x_locid := NULL;
104: WHEN OTHERS THEN
105:
106: l_error_exp := substr(fnd_flex_key_api.message(),1,240);
107: IF (g_asn_debug = 'Y') THEN
108: asn_debug.put_line('Error in getloc : ' || l_error_exp);
109: asn_debug.put_line('Error:'||substr(sqlerrm,1,250));
110: END IF;
111: x_locid := NULL;
112: RETURN FALSE;
105:
106: l_error_exp := substr(fnd_flex_key_api.message(),1,240);
107: IF (g_asn_debug = 'Y') THEN
108: asn_debug.put_line('Error in getloc : ' || l_error_exp);
109: asn_debug.put_line('Error:'||substr(sqlerrm,1,250));
110: END IF;
111: x_locid := NULL;
112: RETURN FALSE;
113:
141: x_success BOOLEAN;
142: l_segmentarray fnd_flex_ext.segmentarray;
143: l_loc_id number;
144: BEGIN
145: IF (g_asn_debug = 'Y') THEN
146: asn_debug.put_line('inside default_for_pjm_dropship');
147: END IF;
148:
149: /* Get default subinventory from the setup if it is a direct delivery
142: l_segmentarray fnd_flex_ext.segmentarray;
143: l_loc_id number;
144: BEGIN
145: IF (g_asn_debug = 'Y') THEN
146: asn_debug.put_line('inside default_for_pjm_dropship');
147: END IF;
148:
149: /* Get default subinventory from the setup if it is a direct delivery
150: * or just a delivery and if subinventory is null.
169: x_cascaded_table(n).item_id,
170: x_cascaded_table(n).subinventory
171: );
172:
173: IF (g_asn_debug = 'Y') THEN
174: asn_debug.put_line('Defaulting subinventory from item: Sub = ' || x_cascaded_table(n).subinventory);
175: END IF;
176: END IF; --} (X_cascaded_table(n).subinventory IS NULL)
177: END IF; --}
170: x_cascaded_table(n).subinventory
171: );
172:
173: IF (g_asn_debug = 'Y') THEN
174: asn_debug.put_line('Defaulting subinventory from item: Sub = ' || x_cascaded_table(n).subinventory);
175: END IF;
176: END IF; --} (X_cascaded_table(n).subinventory IS NULL)
177: END IF; --}
178:
187: x_cascaded_table(n).item_id,
188: x_locator_control
189: );
190:
191: IF (g_asn_debug = 'Y') THEN
192: asn_debug.put_line('Locator Control = ' || TO_CHAR(x_locator_control));
193: END IF;
194:
195: /*
188: x_locator_control
189: );
190:
191: IF (g_asn_debug = 'Y') THEN
192: asn_debug.put_line('Locator Control = ' || TO_CHAR(x_locator_control));
193: END IF;
194:
195: /*
196: ** If locator control is 2 which means it is under predefined
221: EXCEPTION
222: WHEN NO_DATA_FOUND THEN
223:
224: IF (x_locator_control = 2) THEN
225: IF (g_asn_debug = 'Y') THEN
226: asn_debug.put_line('Cause: Receiving preprocessor could not default a locator for this trxn.');
227: END IF;
228:
229: -- Change the transaction back to ASN import
222: WHEN NO_DATA_FOUND THEN
223:
224: IF (x_locator_control = 2) THEN
225: IF (g_asn_debug = 'Y') THEN
226: asn_debug.put_line('Cause: Receiving preprocessor could not default a locator for this trxn.');
227: END IF;
228:
229: -- Change the transaction back to ASN import
230: x_cascaded_table(n).transaction_type := 'SHIP';
266: l_segmentarray(20) := x_cascaded_table(n).task_id;
267:
268: IF NOT (getloc(x_cascaded_table(n).locator_id , x_cascaded_table(n).to_organization_id, x_locator_control, l_segmentarray ) ) THEN
269:
270: IF (g_asn_debug = 'Y') THEN
271: asn_debug.put_line('Cause: Receiving preprocessor could not default/create a locator for this trxn.');
272: END IF;
273:
274: x_cascaded_table(n).locator_id := NULL;
267:
268: IF NOT (getloc(x_cascaded_table(n).locator_id , x_cascaded_table(n).to_organization_id, x_locator_control, l_segmentarray ) ) THEN
269:
270: IF (g_asn_debug = 'Y') THEN
271: asn_debug.put_line('Cause: Receiving preprocessor could not default/create a locator for this trxn.');
272: END IF;
273:
274: x_cascaded_table(n).locator_id := NULL;
275: -- Change the transaction back to ASN import
294: where inventory_location_id = x_cascaded_table(n).locator_id;
295:
296: EXCEPTION
297: WHEN NO_DATA_FOUND THEN
298: IF (g_asn_debug = 'Y') THEN
299: asn_debug.put_line('Cause: Receiving preprocessor could not default/create a locator for this trxn.');
300: END IF;
301:
302: x_cascaded_table(n).locator_id := NULL;
295:
296: EXCEPTION
297: WHEN NO_DATA_FOUND THEN
298: IF (g_asn_debug = 'Y') THEN
299: asn_debug.put_line('Cause: Receiving preprocessor could not default/create a locator for this trxn.');
300: END IF;
301:
302: x_cascaded_table(n).locator_id := NULL;
303: -- Change the transaction back to ASN import
322: po_message_s.sql_error('get_default_locator', x_progress, sqlcode);
323: RAISE;
324: END;
325:
326: IF (g_asn_debug = 'Y') THEN
327: asn_debug.put_line('Defaulting locator from Sub: Locator_id = ' || TO_CHAR(x_cascaded_table(n).locator_id));
328: END IF;
329: END IF; --}
330: END IF; --} matches subinventory not null
323: RAISE;
324: END;
325:
326: IF (g_asn_debug = 'Y') THEN
327: asn_debug.put_line('Defaulting locator from Sub: Locator_id = ' || TO_CHAR(x_cascaded_table(n).locator_id));
328: END IF;
329: END IF; --}
330: END IF; --} matches subinventory not null
331:
365: * been enabled and change the transaction back to ASN import*/
366: IF ( (x_auto_deliver = 'Y') AND
367: (x_cascaded_table(n).subinventory IS NULL)) THEN --{
368:
369: IF (g_asn_debug = 'Y') THEN
370: asn_debug.put_line('Warning: Changing the dropship ASN auto deliver back to ASN import.');
371: asn_debug.put_line('Cause: Receiving preprocessor could not default a subinventory for this trxn.');
372: END IF;
373:
366: IF ( (x_auto_deliver = 'Y') AND
367: (x_cascaded_table(n).subinventory IS NULL)) THEN --{
368:
369: IF (g_asn_debug = 'Y') THEN
370: asn_debug.put_line('Warning: Changing the dropship ASN auto deliver back to ASN import.');
371: asn_debug.put_line('Cause: Receiving preprocessor could not default a subinventory for this trxn.');
372: END IF;
373:
374: -- Change the transaction back to ASN import
367: (x_cascaded_table(n).subinventory IS NULL)) THEN --{
368:
369: IF (g_asn_debug = 'Y') THEN
370: asn_debug.put_line('Warning: Changing the dropship ASN auto deliver back to ASN import.');
371: asn_debug.put_line('Cause: Receiving preprocessor could not default a subinventory for this trxn.');
372: END IF;
373:
374: -- Change the transaction back to ASN import
375: x_cascaded_table(n).transaction_type := 'SHIP';
407: FROM rcv_transactions rt
408: WHERE rt.transaction_id = x_cascaded_table(n).parent_transaction_id;
409: END IF;
410:
411: IF (g_asn_debug = 'Y') THEN
412: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
413: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
414: END IF;
415:
408: WHERE rt.transaction_id = x_cascaded_table(n).parent_transaction_id;
409: END IF;
410:
411: IF (g_asn_debug = 'Y') THEN
412: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
413: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
414: END IF;
415:
416: x_cascaded_table(n).subinventory := l_from_subinventory;
409: END IF;
410:
411: IF (g_asn_debug = 'Y') THEN
412: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
413: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
414: END IF;
415:
416: x_cascaded_table(n).subinventory := l_from_subinventory;
417: x_cascaded_table(n).locator_id := l_from_locator_id;
460: -- 3) derive po line info
461: derive_po_line_info(x_cascaded_table, n);
462: x_progress := '002';
463:
464: IF (g_asn_debug = 'Y') THEN
465: asn_debug.put_line('X_progress ' || x_progress);
466: END IF;
467:
468: /* R12 Complex Work.
461: derive_po_line_info(x_cascaded_table, n);
462: x_progress := '002';
463:
464: IF (g_asn_debug = 'Y') THEN
465: asn_debug.put_line('X_progress ' || x_progress);
466: END IF;
467:
468: /* R12 Complex Work.
469: * We should be able to create Work Confirmations only through
478: l_return_status,
479: l_complex_flag);
480: IF (l_return_status IS NOT NULL AND
481: l_return_status = FND_API.g_ret_sts_success) THEN
482: IF( g_asn_debug = 'Y' ) THEN
483: asn_debug.put_line('l_return_status ' || l_return_status);
484: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
485: END IF;
486: ELSE
479: l_complex_flag);
480: IF (l_return_status IS NOT NULL AND
481: l_return_status = FND_API.g_ret_sts_success) THEN
482: IF( g_asn_debug = 'Y' ) THEN
483: asn_debug.put_line('l_return_status ' || l_return_status);
484: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
485: END IF;
486: ELSE
487: IF( g_asn_debug = 'Y') THEN
480: IF (l_return_status IS NOT NULL AND
481: l_return_status = FND_API.g_ret_sts_success) THEN
482: IF( g_asn_debug = 'Y' ) THEN
483: asn_debug.put_line('l_return_status ' || l_return_status);
484: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
485: END IF;
486: ELSE
487: IF( g_asn_debug = 'Y') THEN
488: asn_debug.put_line('l_return_status ' || l_return_status);
483: asn_debug.put_line('l_return_status ' || l_return_status);
484: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
485: END IF;
486: ELSE
487: IF( g_asn_debug = 'Y') THEN
488: asn_debug.put_line('l_return_status ' || l_return_status);
489: END IF;
490: END IF;
491:
484: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
485: END IF;
486: ELSE
487: IF( g_asn_debug = 'Y') THEN
488: asn_debug.put_line('l_return_status ' || l_return_status);
489: END IF;
490: END IF;
491:
492: IF (l_complex_flag = 'Y') THEN
495: x_cascaded_table(n).interface_source_code;
496:
497: if (x_cascaded_table(n).transaction_type = 'SHIP' and
498: l_interface_source_code <> 'ISP') then
499: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type || ' for complex work POs unless they come through the iSP UI');
500: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
501: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
502: end if;
503: /* Receipt for Work Confirmation does not come through
503: /* Receipt for Work Confirmation does not come through
504: * preprocessor. Hence error out.
505: */
506: if (x_cascaded_table(n).transaction_type = 'RECEIVE') then
507: asn_debug.put_line('You cannot process a receipt against this PO using the Open Interface. Please create a Work Confirmation request instead.');
508: rcv_error_pkg.set_error_message('RCV_WC_CREATE');
509: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
510:
511: end if;
515: -- 4) derive vendor information
516: derive_vendor_info(x_cascaded_table, n);
517: x_progress := '004';
518:
519: IF (g_asn_debug = 'Y') THEN
520: asn_debug.put_line('X_progress ' || x_progress);
521: END IF;
522:
523: -- 5) derive vendor site info
516: derive_vendor_info(x_cascaded_table, n);
517: x_progress := '004';
518:
519: IF (g_asn_debug = 'Y') THEN
520: asn_debug.put_line('X_progress ' || x_progress);
521: END IF;
522:
523: -- 5) derive vendor site info
524: /* Call derive vendor_site_procedure here */
526: UK2 -> vendor_site_code + vendor_id + org_id */
527: derive_vendor_site_info(x_cascaded_table, n);
528: x_progress := '005';
529:
530: IF (g_asn_debug = 'Y') THEN
531: asn_debug.put_line('X_progress ' || x_progress);
532: END IF;
533:
534: -- 6) derive item info
527: derive_vendor_site_info(x_cascaded_table, n);
528: x_progress := '005';
529:
530: IF (g_asn_debug = 'Y') THEN
531: asn_debug.put_line('X_progress ' || x_progress);
532: END IF;
533:
534: -- 6) derive item info
535: derive_item_info(x_cascaded_table, n);
579: * are going to get the matching_basis from
580: * po_line_locations and hence moved it from
581: * derive_po_line_info.
582: */
583: IF (g_asn_debug = 'Y') THEN
584: asn_debug.put_line('Before calling derive matching basis ');
585: END IF;
586: derive_matching_basis(x_cascaded_table,n);
587:
580: * po_line_locations and hence moved it from
581: * derive_po_line_info.
582: */
583: IF (g_asn_debug = 'Y') THEN
584: asn_debug.put_line('Before calling derive matching basis ');
585: END IF;
586: derive_matching_basis(x_cascaded_table,n);
587:
588: IF (x_cascaded_table(n).matching_basis = 'AMOUNT') THEN
602: * Add exception block.
603: */
604: exception
605: when others then
606: IF (g_asn_debug = 'Y') THEN
607: asn_debug.put_line('Exception in derive_vendor_rcv_line '||x_progress);
608: END IF;
609: raise;
610: END derive_vendor_rcv_line;
603: */
604: exception
605: when others then
606: IF (g_asn_debug = 'Y') THEN
607: asn_debug.put_line('Exception in derive_vendor_rcv_line '||x_progress);
608: END IF;
609: raise;
610: END derive_vendor_rcv_line;
611:
661: AND pll.shipment_type IN('STANDARD', 'BLANKET', 'SCHEDULED','PREPAYMENT');
662:
663: default_po_info shipments%ROWTYPE;
664: BEGIN
665: IF (g_asn_debug = 'Y') THEN
666: asn_debug.put_line('Enter default_shipment_line');
667: END IF;
668:
669: x_progress := '000';
662:
663: default_po_info shipments%ROWTYPE;
664: BEGIN
665: IF (g_asn_debug = 'Y') THEN
666: asn_debug.put_line('Enter default_shipment_line');
667: END IF;
668:
669: x_progress := '000';
670: -- set default_shipment_line values
674:
675: IF x_cascaded_table(n).source_document_code IS NULL THEN
676: x_cascaded_table(n).source_document_code := 'PO';
677:
678: IF (g_asn_debug = 'Y') THEN
679: asn_debug.put_line('Defaulting SOURCE_DOCUMENT_CODE ' || x_cascaded_table(n).source_document_code);
680: END IF;
681: END IF;
682:
675: IF x_cascaded_table(n).source_document_code IS NULL THEN
676: x_cascaded_table(n).source_document_code := 'PO';
677:
678: IF (g_asn_debug = 'Y') THEN
679: asn_debug.put_line('Defaulting SOURCE_DOCUMENT_CODE ' || x_cascaded_table(n).source_document_code);
680: END IF;
681: END IF;
682:
683: /* Fix for bug 2564646.
692: OR ( x_cascaded_table(n).destination_type_code = 'INVENTORY'
693: AND x_cascaded_table(n).auto_transact_code = 'RECEIVE') THEN
694: x_cascaded_table(n).destination_type_code := 'RECEIVING';
695:
696: IF (g_asn_debug = 'Y') THEN
697: asn_debug.put_line('Defaulting DESTINATION_TYPE_CODE ' || x_cascaded_table(n).destination_type_code);
698: END IF;
699: END IF;
700:
693: AND x_cascaded_table(n).auto_transact_code = 'RECEIVE') THEN
694: x_cascaded_table(n).destination_type_code := 'RECEIVING';
695:
696: IF (g_asn_debug = 'Y') THEN
697: asn_debug.put_line('Defaulting DESTINATION_TYPE_CODE ' || x_cascaded_table(n).destination_type_code);
698: END IF;
699: END IF;
700:
701: IF x_cascaded_table(n).transaction_type IS NULL THEN
700:
701: IF x_cascaded_table(n).transaction_type IS NULL THEN
702: x_cascaded_table(n).transaction_type := 'SHIP';
703:
704: IF (g_asn_debug = 'Y') THEN
705: asn_debug.put_line('Defaulting TRANSACTION_TYPE ' || x_cascaded_table(n).transaction_type);
706: END IF;
707: END IF;
708:
701: IF x_cascaded_table(n).transaction_type IS NULL THEN
702: x_cascaded_table(n).transaction_type := 'SHIP';
703:
704: IF (g_asn_debug = 'Y') THEN
705: asn_debug.put_line('Defaulting TRANSACTION_TYPE ' || x_cascaded_table(n).transaction_type);
706: END IF;
707: END IF;
708:
709: IF x_cascaded_table(n).processing_mode_code IS NULL THEN
708:
709: IF x_cascaded_table(n).processing_mode_code IS NULL THEN
710: x_cascaded_table(n).processing_mode_code := 'BATCH';
711:
712: IF (g_asn_debug = 'Y') THEN
713: asn_debug.put_line('Defaulting PROCESSING_MODE_CODE ' || x_cascaded_table(n).processing_mode_code);
714: END IF;
715: END IF;
716:
709: IF x_cascaded_table(n).processing_mode_code IS NULL THEN
710: x_cascaded_table(n).processing_mode_code := 'BATCH';
711:
712: IF (g_asn_debug = 'Y') THEN
713: asn_debug.put_line('Defaulting PROCESSING_MODE_CODE ' || x_cascaded_table(n).processing_mode_code);
714: END IF;
715: END IF;
716:
717: x_cascaded_table(n).processing_status_code := 'RUNNING';
720: -- This has to be set to running otherwise C code in rvtbm
721: -- will not pick it up
722: x_cascaded_table(n).processing_status_code := 'RUNNING';
723:
724: IF (g_asn_debug = 'Y') THEN
725: asn_debug.put_line('Defaulting PROCESSING_STATUS_CODE ' || x_cascaded_table(n).processing_status_code);
726: END IF;
727: END IF;
728:
721: -- will not pick it up
722: x_cascaded_table(n).processing_status_code := 'RUNNING';
723:
724: IF (g_asn_debug = 'Y') THEN
725: asn_debug.put_line('Defaulting PROCESSING_STATUS_CODE ' || x_cascaded_table(n).processing_status_code);
726: END IF;
727: END IF;
728:
729: IF x_cascaded_table(n).transaction_status_code IS NULL THEN
728:
729: IF x_cascaded_table(n).transaction_status_code IS NULL THEN
730: x_cascaded_table(n).transaction_status_code := 'PENDING';
731:
732: IF (g_asn_debug = 'Y') THEN
733: asn_debug.put_line('Defaulting TRANSACTION_STATUS_CODE ' || x_cascaded_table(n).transaction_status_code);
734: END IF;
735: END IF;
736:
729: IF x_cascaded_table(n).transaction_status_code IS NULL THEN
730: x_cascaded_table(n).transaction_status_code := 'PENDING';
731:
732: IF (g_asn_debug = 'Y') THEN
733: asn_debug.put_line('Defaulting TRANSACTION_STATUS_CODE ' || x_cascaded_table(n).transaction_status_code);
734: END IF;
735: END IF;
736:
737: -- Default auto_transact_code if it is null
735: END IF;
736:
737: -- Default auto_transact_code if it is null
738: IF x_cascaded_table(n).auto_transact_code IS NULL THEN
739: IF (g_asn_debug = 'Y') THEN
740: asn_debug.put_line('Setting auto_transact_code to transaction_type ' || x_cascaded_table(n).transaction_type);
741: END IF;
742:
743: x_cascaded_table(n).auto_transact_code := x_cascaded_table(n).transaction_type;
736:
737: -- Default auto_transact_code if it is null
738: IF x_cascaded_table(n).auto_transact_code IS NULL THEN
739: IF (g_asn_debug = 'Y') THEN
740: asn_debug.put_line('Setting auto_transact_code to transaction_type ' || x_cascaded_table(n).transaction_type);
741: END IF;
742:
743: x_cascaded_table(n).auto_transact_code := x_cascaded_table(n).transaction_type;
744: END IF;
750: x_cascaded_table(n).vendor_id := x_header_record.header_record.vendor_id;
751: x_cascaded_table(n).vendor_name := x_header_record.header_record.vendor_name;
752: x_cascaded_table(n).vendor_num := x_header_record.header_record.vendor_num;
753:
754: IF (g_asn_debug = 'Y') THEN
755: asn_debug.put_line('Defaulting from HEADER VENDOR_ID ' || TO_CHAR(x_cascaded_table(n).vendor_id));
756: asn_debug.put_line('Defaulting from HEADER VENDOR_NAME ' || x_cascaded_table(n).vendor_name);
757: asn_debug.put_line('Defaulting from HEADER VENDOR_NUM ' || x_cascaded_table(n).vendor_num);
758: END IF;
751: x_cascaded_table(n).vendor_name := x_header_record.header_record.vendor_name;
752: x_cascaded_table(n).vendor_num := x_header_record.header_record.vendor_num;
753:
754: IF (g_asn_debug = 'Y') THEN
755: asn_debug.put_line('Defaulting from HEADER VENDOR_ID ' || TO_CHAR(x_cascaded_table(n).vendor_id));
756: asn_debug.put_line('Defaulting from HEADER VENDOR_NAME ' || x_cascaded_table(n).vendor_name);
757: asn_debug.put_line('Defaulting from HEADER VENDOR_NUM ' || x_cascaded_table(n).vendor_num);
758: END IF;
759: END IF; --}
752: x_cascaded_table(n).vendor_num := x_header_record.header_record.vendor_num;
753:
754: IF (g_asn_debug = 'Y') THEN
755: asn_debug.put_line('Defaulting from HEADER VENDOR_ID ' || TO_CHAR(x_cascaded_table(n).vendor_id));
756: asn_debug.put_line('Defaulting from HEADER VENDOR_NAME ' || x_cascaded_table(n).vendor_name);
757: asn_debug.put_line('Defaulting from HEADER VENDOR_NUM ' || x_cascaded_table(n).vendor_num);
758: END IF;
759: END IF; --}
760:
753:
754: IF (g_asn_debug = 'Y') THEN
755: asn_debug.put_line('Defaulting from HEADER VENDOR_ID ' || TO_CHAR(x_cascaded_table(n).vendor_id));
756: asn_debug.put_line('Defaulting from HEADER VENDOR_NAME ' || x_cascaded_table(n).vendor_name);
757: asn_debug.put_line('Defaulting from HEADER VENDOR_NUM ' || x_cascaded_table(n).vendor_num);
758: END IF;
759: END IF; --}
760:
761: -- default only if all attributes are null
789: x_cascaded_table(n).vendor_site_id := x_vendor_site_id;
790: x_cascaded_table(n).vendor_site_code := x_vendor_site_code;
791: END IF; --}
792:
793: IF (g_asn_debug = 'Y') THEN
794: asn_debug.put_line('Defaulting from HEADER VENDOR_SITE_ID ' || TO_CHAR(x_cascaded_table(n).vendor_site_id));
795: asn_debug.put_line('Defaulting from HEADER VENDOR_SITE_CODE ' || x_cascaded_table(n).vendor_site_code);
796: END IF;
797: END IF; --}
790: x_cascaded_table(n).vendor_site_code := x_vendor_site_code;
791: END IF; --}
792:
793: IF (g_asn_debug = 'Y') THEN
794: asn_debug.put_line('Defaulting from HEADER VENDOR_SITE_ID ' || TO_CHAR(x_cascaded_table(n).vendor_site_id));
795: asn_debug.put_line('Defaulting from HEADER VENDOR_SITE_CODE ' || x_cascaded_table(n).vendor_site_code);
796: END IF;
797: END IF; --}
798:
791: END IF; --}
792:
793: IF (g_asn_debug = 'Y') THEN
794: asn_debug.put_line('Defaulting from HEADER VENDOR_SITE_ID ' || TO_CHAR(x_cascaded_table(n).vendor_site_id));
795: asn_debug.put_line('Defaulting from HEADER VENDOR_SITE_CODE ' || x_cascaded_table(n).vendor_site_code);
796: END IF;
797: END IF; --}
798:
799: -- default only if all attributes are null
802: AND x_cascaded_table(n).from_organization_code IS NULL THEN
803: x_cascaded_table(n).from_organization_id := x_header_record.header_record.from_organization_id;
804: x_cascaded_table(n).from_organization_code := x_header_record.header_record.from_organization_code;
805:
806: IF (g_asn_debug = 'Y') THEN
807: asn_debug.put_line('Defaulting from HEADER FROM_ORGANIZATION_ID ' || TO_CHAR(x_cascaded_table(n).from_organization_id));
808: asn_debug.put_line('Defaulting from HEADER FROM_ORGANIZATION_CODE ' || x_cascaded_table(n).from_organization_code);
809: END IF;
810: END IF;
803: x_cascaded_table(n).from_organization_id := x_header_record.header_record.from_organization_id;
804: x_cascaded_table(n).from_organization_code := x_header_record.header_record.from_organization_code;
805:
806: IF (g_asn_debug = 'Y') THEN
807: asn_debug.put_line('Defaulting from HEADER FROM_ORGANIZATION_ID ' || TO_CHAR(x_cascaded_table(n).from_organization_id));
808: asn_debug.put_line('Defaulting from HEADER FROM_ORGANIZATION_CODE ' || x_cascaded_table(n).from_organization_code);
809: END IF;
810: END IF;
811:
804: x_cascaded_table(n).from_organization_code := x_header_record.header_record.from_organization_code;
805:
806: IF (g_asn_debug = 'Y') THEN
807: asn_debug.put_line('Defaulting from HEADER FROM_ORGANIZATION_ID ' || TO_CHAR(x_cascaded_table(n).from_organization_id));
808: asn_debug.put_line('Defaulting from HEADER FROM_ORGANIZATION_CODE ' || x_cascaded_table(n).from_organization_code);
809: END IF;
810: END IF;
811:
812: -- default only if all attributes are null
814: AND x_cascaded_table(n).to_organization_code IS NULL THEN
815: x_cascaded_table(n).to_organization_id := x_header_record.header_record.ship_to_organization_id;
816: x_cascaded_table(n).to_organization_code := x_header_record.header_record.ship_to_organization_code;
817:
818: IF (g_asn_debug = 'Y') THEN
819: asn_debug.put_line('Defaulting from HEADER TO_ORGANIZATION_ID ' || TO_CHAR(x_cascaded_table(n).to_organization_id));
820: asn_debug.put_line('Defaulting from HEADER TO_ORGANIZATION_CODE ' || x_cascaded_table(n).to_organization_code);
821: END IF;
822: END IF;
815: x_cascaded_table(n).to_organization_id := x_header_record.header_record.ship_to_organization_id;
816: x_cascaded_table(n).to_organization_code := x_header_record.header_record.ship_to_organization_code;
817:
818: IF (g_asn_debug = 'Y') THEN
819: asn_debug.put_line('Defaulting from HEADER TO_ORGANIZATION_ID ' || TO_CHAR(x_cascaded_table(n).to_organization_id));
820: asn_debug.put_line('Defaulting from HEADER TO_ORGANIZATION_CODE ' || x_cascaded_table(n).to_organization_code);
821: END IF;
822: END IF;
823:
816: x_cascaded_table(n).to_organization_code := x_header_record.header_record.ship_to_organization_code;
817:
818: IF (g_asn_debug = 'Y') THEN
819: asn_debug.put_line('Defaulting from HEADER TO_ORGANIZATION_ID ' || TO_CHAR(x_cascaded_table(n).to_organization_id));
820: asn_debug.put_line('Defaulting from HEADER TO_ORGANIZATION_CODE ' || x_cascaded_table(n).to_organization_code);
821: END IF;
822: END IF;
823:
824: -- default only if all attributes are null
830: x_cascaded_table(n).currency_conversion_type := x_header_record.header_record.conversion_rate_type;
831: x_cascaded_table(n).currency_conversion_rate := x_header_record.header_record.conversion_rate;
832: x_cascaded_table(n).currency_conversion_date := x_header_record.header_record.conversion_rate_date;
833:
834: IF (g_asn_debug = 'Y') THEN
835: asn_debug.put_line('Defaulting from HEADER CURRENCY_CODE ' || x_cascaded_table(n).currency_code);
836: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_TYPE ' || x_cascaded_table(n).currency_conversion_type);
837: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_RATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_rate));
838: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_DATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_date, 'DD/MM/YYYY'));
831: x_cascaded_table(n).currency_conversion_rate := x_header_record.header_record.conversion_rate;
832: x_cascaded_table(n).currency_conversion_date := x_header_record.header_record.conversion_rate_date;
833:
834: IF (g_asn_debug = 'Y') THEN
835: asn_debug.put_line('Defaulting from HEADER CURRENCY_CODE ' || x_cascaded_table(n).currency_code);
836: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_TYPE ' || x_cascaded_table(n).currency_conversion_type);
837: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_RATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_rate));
838: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_DATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_date, 'DD/MM/YYYY'));
839: END IF;
832: x_cascaded_table(n).currency_conversion_date := x_header_record.header_record.conversion_rate_date;
833:
834: IF (g_asn_debug = 'Y') THEN
835: asn_debug.put_line('Defaulting from HEADER CURRENCY_CODE ' || x_cascaded_table(n).currency_code);
836: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_TYPE ' || x_cascaded_table(n).currency_conversion_type);
837: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_RATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_rate));
838: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_DATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_date, 'DD/MM/YYYY'));
839: END IF;
840: END IF; --}
833:
834: IF (g_asn_debug = 'Y') THEN
835: asn_debug.put_line('Defaulting from HEADER CURRENCY_CODE ' || x_cascaded_table(n).currency_code);
836: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_TYPE ' || x_cascaded_table(n).currency_conversion_type);
837: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_RATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_rate));
838: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_DATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_date, 'DD/MM/YYYY'));
839: END IF;
840: END IF; --}
841:
834: IF (g_asn_debug = 'Y') THEN
835: asn_debug.put_line('Defaulting from HEADER CURRENCY_CODE ' || x_cascaded_table(n).currency_code);
836: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_TYPE ' || x_cascaded_table(n).currency_conversion_type);
837: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_RATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_rate));
838: asn_debug.put_line('Defaulting from HEADER CURRENCY_CONVERSION_DATE ' || TO_CHAR(x_cascaded_table(n).currency_conversion_date, 'DD/MM/YYYY'));
839: END IF;
840: END IF; --}
841:
842: IF ( x_cascaded_table(n).ship_to_location_id IS NULL
843: AND x_cascaded_table(n).ship_to_location_code IS NULL) THEN -- Check this with George
844: x_cascaded_table(n).ship_to_location_code := x_header_record.header_record.location_code;
845: x_cascaded_table(n).ship_to_location_id := x_header_record.header_record.location_id;
846:
847: IF (g_asn_debug = 'Y') THEN
848: asn_debug.put_line('Defaulting from HEADER LOCATION_ID ' || TO_CHAR(x_cascaded_table(n).location_id));
849: END IF;
850: END IF;
851:
844: x_cascaded_table(n).ship_to_location_code := x_header_record.header_record.location_code;
845: x_cascaded_table(n).ship_to_location_id := x_header_record.header_record.location_id;
846:
847: IF (g_asn_debug = 'Y') THEN
848: asn_debug.put_line('Defaulting from HEADER LOCATION_ID ' || TO_CHAR(x_cascaded_table(n).location_id));
849: END IF;
850: END IF;
851:
852: IF x_cascaded_table(n).shipment_num IS NULL THEN
851:
852: IF x_cascaded_table(n).shipment_num IS NULL THEN
853: x_cascaded_table(n).shipment_num := x_header_record.header_record.shipment_num;
854:
855: IF (g_asn_debug = 'Y') THEN
856: asn_debug.put_line('Defaulting from HEADER SHIPMENT_NUM ' || x_cascaded_table(n).shipment_num);
857: END IF;
858: END IF;
859:
852: IF x_cascaded_table(n).shipment_num IS NULL THEN
853: x_cascaded_table(n).shipment_num := x_header_record.header_record.shipment_num;
854:
855: IF (g_asn_debug = 'Y') THEN
856: asn_debug.put_line('Defaulting from HEADER SHIPMENT_NUM ' || x_cascaded_table(n).shipment_num);
857: END IF;
858: END IF;
859:
860: IF x_cascaded_table(n).freight_carrier_code IS NULL THEN
859:
860: IF x_cascaded_table(n).freight_carrier_code IS NULL THEN
861: x_cascaded_table(n).freight_carrier_code := x_header_record.header_record.freight_carrier_code;
862:
863: IF (g_asn_debug = 'Y') THEN
864: asn_debug.put_line('Defaulting from HEADER FREIGHT_CARRIER_CODE ' || x_cascaded_table(n).freight_carrier_code);
865: END IF;
866: END IF;
867:
860: IF x_cascaded_table(n).freight_carrier_code IS NULL THEN
861: x_cascaded_table(n).freight_carrier_code := x_header_record.header_record.freight_carrier_code;
862:
863: IF (g_asn_debug = 'Y') THEN
864: asn_debug.put_line('Defaulting from HEADER FREIGHT_CARRIER_CODE ' || x_cascaded_table(n).freight_carrier_code);
865: END IF;
866: END IF;
867:
868: IF x_cascaded_table(n).bill_of_lading IS NULL THEN
867:
868: IF x_cascaded_table(n).bill_of_lading IS NULL THEN
869: x_cascaded_table(n).bill_of_lading := x_header_record.header_record.bill_of_lading;
870:
871: IF (g_asn_debug = 'Y') THEN
872: asn_debug.put_line('Defaulting from HEADER BILL_OF_LADING ' || x_cascaded_table(n).bill_of_lading);
873: END IF;
874: END IF;
875:
868: IF x_cascaded_table(n).bill_of_lading IS NULL THEN
869: x_cascaded_table(n).bill_of_lading := x_header_record.header_record.bill_of_lading;
870:
871: IF (g_asn_debug = 'Y') THEN
872: asn_debug.put_line('Defaulting from HEADER BILL_OF_LADING ' || x_cascaded_table(n).bill_of_lading);
873: END IF;
874: END IF;
875:
876: IF x_cascaded_table(n).packing_slip IS NULL THEN
875:
876: IF x_cascaded_table(n).packing_slip IS NULL THEN
877: x_cascaded_table(n).packing_slip := x_header_record.header_record.packing_slip;
878:
879: IF (g_asn_debug = 'Y') THEN
880: asn_debug.put_line('Defaulting from HEADER PACKING_SLIP ' || x_cascaded_table(n).packing_slip);
881: END IF;
882: END IF;
883:
876: IF x_cascaded_table(n).packing_slip IS NULL THEN
877: x_cascaded_table(n).packing_slip := x_header_record.header_record.packing_slip;
878:
879: IF (g_asn_debug = 'Y') THEN
880: asn_debug.put_line('Defaulting from HEADER PACKING_SLIP ' || x_cascaded_table(n).packing_slip);
881: END IF;
882: END IF;
883:
884: IF x_cascaded_table(n).shipped_date IS NULL THEN
883:
884: IF x_cascaded_table(n).shipped_date IS NULL THEN
885: x_cascaded_table(n).shipped_date := x_header_record.header_record.shipped_date;
886:
887: IF (g_asn_debug = 'Y') THEN
888: asn_debug.put_line('Defaulting from HEADER SHIPPED_DATE ' || TO_CHAR(x_cascaded_table(n).shipped_date, 'DD/MM/YYYY'));
889: END IF;
890: END IF;
891:
884: IF x_cascaded_table(n).shipped_date IS NULL THEN
885: x_cascaded_table(n).shipped_date := x_header_record.header_record.shipped_date;
886:
887: IF (g_asn_debug = 'Y') THEN
888: asn_debug.put_line('Defaulting from HEADER SHIPPED_DATE ' || TO_CHAR(x_cascaded_table(n).shipped_date, 'DD/MM/YYYY'));
889: END IF;
890: END IF;
891:
892: IF x_cascaded_table(n).expected_receipt_date IS NULL THEN
891:
892: IF x_cascaded_table(n).expected_receipt_date IS NULL THEN
893: x_cascaded_table(n).expected_receipt_date := x_header_record.header_record.expected_receipt_date;
894:
895: IF (g_asn_debug = 'Y') THEN
896: asn_debug.put_line('Defaulting from HEADER EXPECTED_RECEIPT_DATE ' || TO_CHAR(x_cascaded_table(n).expected_receipt_date, 'DD/MM/YYYY'));
897: END IF;
898: END IF;
899:
892: IF x_cascaded_table(n).expected_receipt_date IS NULL THEN
893: x_cascaded_table(n).expected_receipt_date := x_header_record.header_record.expected_receipt_date;
894:
895: IF (g_asn_debug = 'Y') THEN
896: asn_debug.put_line('Defaulting from HEADER EXPECTED_RECEIPT_DATE ' || TO_CHAR(x_cascaded_table(n).expected_receipt_date, 'DD/MM/YYYY'));
897: END IF;
898: END IF;
899:
900: IF x_cascaded_table(n).num_of_containers IS NULL
900: IF x_cascaded_table(n).num_of_containers IS NULL
901: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
902: x_cascaded_table(n).num_of_containers := x_header_record.header_record.num_of_containers;
903:
904: IF (g_asn_debug = 'Y') THEN
905: asn_debug.put_line('Defaulting from HEADER NUM_OF_CONTAINERS ' || TO_CHAR(x_cascaded_table(n).num_of_containers));
906: END IF;
907: END IF;
908:
901: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
902: x_cascaded_table(n).num_of_containers := x_header_record.header_record.num_of_containers;
903:
904: IF (g_asn_debug = 'Y') THEN
905: asn_debug.put_line('Defaulting from HEADER NUM_OF_CONTAINERS ' || TO_CHAR(x_cascaded_table(n).num_of_containers));
906: END IF;
907: END IF;
908:
909: IF x_cascaded_table(n).waybill_airbill_num IS NULL
909: IF x_cascaded_table(n).waybill_airbill_num IS NULL
910: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
911: x_cascaded_table(n).waybill_airbill_num := x_header_record.header_record.waybill_airbill_num;
912:
913: IF (g_asn_debug = 'Y') THEN
914: asn_debug.put_line('Defaulting from HEADER WAYBILL_AIRBILL_NUM ' || x_cascaded_table(n).waybill_airbill_num);
915: END IF;
916: END IF;
917:
910: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
911: x_cascaded_table(n).waybill_airbill_num := x_header_record.header_record.waybill_airbill_num;
912:
913: IF (g_asn_debug = 'Y') THEN
914: asn_debug.put_line('Defaulting from HEADER WAYBILL_AIRBILL_NUM ' || x_cascaded_table(n).waybill_airbill_num);
915: END IF;
916: END IF;
917:
918: IF x_cascaded_table(n).tax_name IS NULL THEN
917:
918: IF x_cascaded_table(n).tax_name IS NULL THEN
919: x_cascaded_table(n).tax_name := x_header_record.header_record.tax_name;
920:
921: IF (g_asn_debug = 'Y') THEN
922: asn_debug.put_line('Defaulting from HEADER TAX_NAME ' || x_cascaded_table(n).tax_name);
923: END IF;
924: END IF;
925:
918: IF x_cascaded_table(n).tax_name IS NULL THEN
919: x_cascaded_table(n).tax_name := x_header_record.header_record.tax_name;
920:
921: IF (g_asn_debug = 'Y') THEN
922: asn_debug.put_line('Defaulting from HEADER TAX_NAME ' || x_cascaded_table(n).tax_name);
923: END IF;
924: END IF;
925:
926: /* Bug 3299421 : WMS Mobile applications do not need the item_revision to
931: */
932: IF x_cascaded_table(n).item_revision IS NULL
933: AND (NVL(x_cascaded_table(n).mobile_txn, 'N') = 'N')
934: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN --{
935: IF (g_asn_debug = 'Y') THEN
936: asn_debug.put_line('Enter defaulting item revision');
937: END IF;
938:
939: item_id_record.item_id := x_cascaded_table(n).item_id;
932: IF x_cascaded_table(n).item_revision IS NULL
933: AND (NVL(x_cascaded_table(n).mobile_txn, 'N') = 'N')
934: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN --{
935: IF (g_asn_debug = 'Y') THEN
936: asn_debug.put_line('Enter defaulting item revision');
937: END IF;
938:
939: item_id_record.item_id := x_cascaded_table(n).item_id;
940: item_id_record.po_line_id := x_cascaded_table(n).po_line_id;
945: item_id_record.error_record.error_message := NULL;
946: rcv_transactions_interface_sv.default_item_revision(item_id_record);
947: x_cascaded_table(n).item_revision := item_id_record.item_revision;
948:
949: IF (g_asn_debug = 'Y') THEN
950: asn_debug.put_line(NVL(item_id_record.item_revision, 'Item Revision is null'));
951: END IF;
952:
953: x_cascaded_table(n).error_status := item_id_record.error_record.error_status;
946: rcv_transactions_interface_sv.default_item_revision(item_id_record);
947: x_cascaded_table(n).item_revision := item_id_record.item_revision;
948:
949: IF (g_asn_debug = 'Y') THEN
950: asn_debug.put_line(NVL(item_id_record.item_revision, 'Item Revision is null'));
951: END IF;
952:
953: x_cascaded_table(n).error_status := item_id_record.error_record.error_status;
954: x_cascaded_table(n).error_message := item_id_record.error_record.error_message;
971: AND x_cascaded_table(n).to_organization_code IS NULL)
972: OR x_cascaded_table(n).document_shipment_line_num IS NULL
973: OR ( x_cascaded_table(n).routing_header_id IS NULL
974: AND x_cascaded_table(n).routing_code IS NULL) THEN --{
975: IF (g_asn_debug = 'Y') THEN
976: asn_debug.put_line('Defaulting values from PO ');
977: END IF;
978:
979: OPEN shipments(x_cascaded_table(n).po_header_id,
972: OR x_cascaded_table(n).document_shipment_line_num IS NULL
973: OR ( x_cascaded_table(n).routing_header_id IS NULL
974: AND x_cascaded_table(n).routing_code IS NULL) THEN --{
975: IF (g_asn_debug = 'Y') THEN
976: asn_debug.put_line('Defaulting values from PO ');
977: END IF;
978:
979: OPEN shipments(x_cascaded_table(n).po_header_id,
980: x_cascaded_table(n).po_line_id,
983: FETCH shipments INTO default_po_info;
984:
985: IF shipments%FOUND THEN --{
986: IF x_cascaded_table(n).po_revision_num IS NULL THEN
987: IF (g_asn_debug = 'Y') THEN
988: asn_debug.put_line('Defaulting PO HEADER revision num ' || default_po_info.revision_num);
989: END IF;
990:
991: x_cascaded_table(n).po_revision_num := default_po_info.revision_num;
984:
985: IF shipments%FOUND THEN --{
986: IF x_cascaded_table(n).po_revision_num IS NULL THEN
987: IF (g_asn_debug = 'Y') THEN
988: asn_debug.put_line('Defaulting PO HEADER revision num ' || default_po_info.revision_num);
989: END IF;
990:
991: x_cascaded_table(n).po_revision_num := default_po_info.revision_num;
992: END IF;
991: x_cascaded_table(n).po_revision_num := default_po_info.revision_num;
992: END IF;
993:
994: IF x_cascaded_table(n).document_line_num IS NULL THEN
995: IF (g_asn_debug = 'Y') THEN
996: asn_debug.put_line('Defaulting po line num ' || TO_CHAR(default_po_info.line_num));
997: END IF;
998:
999: x_cascaded_table(n).document_line_num := default_po_info.line_num;
992: END IF;
993:
994: IF x_cascaded_table(n).document_line_num IS NULL THEN
995: IF (g_asn_debug = 'Y') THEN
996: asn_debug.put_line('Defaulting po line num ' || TO_CHAR(default_po_info.line_num));
997: END IF;
998:
999: x_cascaded_table(n).document_line_num := default_po_info.line_num;
1000: END IF;
1000: END IF;
1001:
1002: IF x_cascaded_table(n).item_description IS NULL
1003: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
1004: IF (g_asn_debug = 'Y') THEN
1005: asn_debug.put_line('Defaulting item description from PO ' || default_po_info.item_description);
1006: END IF;
1007:
1008: x_cascaded_table(n).item_description := default_po_info.item_description;
1001:
1002: IF x_cascaded_table(n).item_description IS NULL
1003: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
1004: IF (g_asn_debug = 'Y') THEN
1005: asn_debug.put_line('Defaulting item description from PO ' || default_po_info.item_description);
1006: END IF;
1007:
1008: x_cascaded_table(n).item_description := default_po_info.item_description;
1009: END IF;
1009: END IF;
1010:
1011: IF x_cascaded_table(n).tax_name IS NULL
1012: AND default_po_info.tax_code_id IS NOT NULL THEN --{
1013: IF (g_asn_debug = 'Y') THEN
1014: asn_debug.put_line('Defaulting tax name based on PO ' || TO_CHAR(default_po_info.tax_code_id));
1015: END IF;
1016:
1017: -- Need to join to ap_tax_codes to get tax_name
1010:
1011: IF x_cascaded_table(n).tax_name IS NULL
1012: AND default_po_info.tax_code_id IS NOT NULL THEN --{
1013: IF (g_asn_debug = 'Y') THEN
1014: asn_debug.put_line('Defaulting tax name based on PO ' || TO_CHAR(default_po_info.tax_code_id));
1015: END IF;
1016:
1017: -- Need to join to ap_tax_codes to get tax_name
1018: BEGIN
1023:
1024: x_cascaded_table(n).tax_name := x_tax_name;
1025: EXCEPTION
1026: WHEN OTHERS THEN
1027: IF (g_asn_debug = 'Y') THEN
1028: asn_debug.put_line('Some error occured in the tax name derivation');
1029: END IF;
1030: END;
1031: END IF; --}
1024: x_cascaded_table(n).tax_name := x_tax_name;
1025: EXCEPTION
1026: WHEN OTHERS THEN
1027: IF (g_asn_debug = 'Y') THEN
1028: asn_debug.put_line('Some error occured in the tax name derivation');
1029: END IF;
1030: END;
1031: END IF; --}
1032:
1032:
1033: --FRKHAN 12/18/98 default country of origin from PO
1034:
1035: IF x_cascaded_table(n).country_of_origin_code IS NULL THEN
1036: IF (g_asn_debug = 'Y') THEN
1037: asn_debug.put_line('Defaulting country of origin from PO ' || default_po_info.country_of_origin_code);
1038: END IF;
1039:
1040: x_cascaded_table(n).country_of_origin_code := default_po_info.country_of_origin_code;
1033: --FRKHAN 12/18/98 default country of origin from PO
1034:
1035: IF x_cascaded_table(n).country_of_origin_code IS NULL THEN
1036: IF (g_asn_debug = 'Y') THEN
1037: asn_debug.put_line('Defaulting country of origin from PO ' || default_po_info.country_of_origin_code);
1038: END IF;
1039:
1040: x_cascaded_table(n).country_of_origin_code := default_po_info.country_of_origin_code;
1041: END IF;
1040: x_cascaded_table(n).country_of_origin_code := default_po_info.country_of_origin_code;
1041: END IF;
1042:
1043: IF x_cascaded_table(n).po_release_id IS NULL THEN
1044: IF (g_asn_debug = 'Y') THEN
1045: asn_debug.put_line('Defaulting PO Release ID from PO ' || TO_CHAR(default_po_info.po_release_id));
1046: END IF;
1047:
1048: x_cascaded_table(n).po_release_id := default_po_info.po_release_id;
1041: END IF;
1042:
1043: IF x_cascaded_table(n).po_release_id IS NULL THEN
1044: IF (g_asn_debug = 'Y') THEN
1045: asn_debug.put_line('Defaulting PO Release ID from PO ' || TO_CHAR(default_po_info.po_release_id));
1046: END IF;
1047:
1048: x_cascaded_table(n).po_release_id := default_po_info.po_release_id;
1049: END IF;
1048: x_cascaded_table(n).po_release_id := default_po_info.po_release_id;
1049: END IF;
1050:
1051: IF x_cascaded_table(n).ship_to_location_id IS NULL THEN
1052: IF (g_asn_debug = 'Y') THEN
1053: asn_debug.put_line('Defaulting PO ship_to_location_id ' || TO_CHAR(default_po_info.ship_to_location_id));
1054: END IF;
1055:
1056: x_cascaded_table(n).ship_to_location_id := default_po_info.ship_to_location_id;
1049: END IF;
1050:
1051: IF x_cascaded_table(n).ship_to_location_id IS NULL THEN
1052: IF (g_asn_debug = 'Y') THEN
1053: asn_debug.put_line('Defaulting PO ship_to_location_id ' || TO_CHAR(default_po_info.ship_to_location_id));
1054: END IF;
1055:
1056: x_cascaded_table(n).ship_to_location_id := default_po_info.ship_to_location_id;
1057: END IF;
1056: x_cascaded_table(n).ship_to_location_id := default_po_info.ship_to_location_id;
1057: END IF;
1058:
1059: IF x_cascaded_table(n).to_organization_id IS NULL THEN
1060: IF (g_asn_debug = 'Y') THEN
1061: asn_debug.put_line('Defaulting PO to_organization_id ' || TO_CHAR(default_po_info.ship_to_organization_id));
1062: END IF;
1063:
1064: x_cascaded_table(n).to_organization_id := default_po_info.ship_to_organization_id;
1057: END IF;
1058:
1059: IF x_cascaded_table(n).to_organization_id IS NULL THEN
1060: IF (g_asn_debug = 'Y') THEN
1061: asn_debug.put_line('Defaulting PO to_organization_id ' || TO_CHAR(default_po_info.ship_to_organization_id));
1062: END IF;
1063:
1064: x_cascaded_table(n).to_organization_id := default_po_info.ship_to_organization_id;
1065: END IF;
1064: x_cascaded_table(n).to_organization_id := default_po_info.ship_to_organization_id;
1065: END IF;
1066:
1067: IF x_cascaded_table(n).document_shipment_line_num IS NULL THEN
1068: IF (g_asn_debug = 'Y') THEN
1069: asn_debug.put_line('Defaulting PO shipment_line_num ' || TO_CHAR(default_po_info.shipment_num));
1070: END IF;
1071:
1072: x_cascaded_table(n).document_shipment_line_num := default_po_info.shipment_num;
1065: END IF;
1066:
1067: IF x_cascaded_table(n).document_shipment_line_num IS NULL THEN
1068: IF (g_asn_debug = 'Y') THEN
1069: asn_debug.put_line('Defaulting PO shipment_line_num ' || TO_CHAR(default_po_info.shipment_num));
1070: END IF;
1071:
1072: x_cascaded_table(n).document_shipment_line_num := default_po_info.shipment_num;
1073: END IF;
1072: x_cascaded_table(n).document_shipment_line_num := default_po_info.shipment_num;
1073: END IF;
1074:
1075: IF x_cascaded_table(n).routing_header_id IS NULL THEN
1076: IF (g_asn_debug = 'Y') THEN
1077: asn_debug.put_line('Defaulting PO routing_header_id ' || TO_CHAR(default_po_info.receiving_routing_id));
1078: END IF;
1079:
1080: x_cascaded_table(n).routing_header_id := default_po_info.receiving_routing_id;
1073: END IF;
1074:
1075: IF x_cascaded_table(n).routing_header_id IS NULL THEN
1076: IF (g_asn_debug = 'Y') THEN
1077: asn_debug.put_line('Defaulting PO routing_header_id ' || TO_CHAR(default_po_info.receiving_routing_id));
1078: END IF;
1079:
1080: x_cascaded_table(n).routing_header_id := default_po_info.receiving_routing_id;
1081: END IF;
1081: END IF;
1082:
1083: IF x_cascaded_table(n).job_id IS NULL
1084: AND x_cascaded_table(n).purchase_basis = 'TEMP LABOR' THEN
1085: IF (g_asn_debug = 'Y') THEN
1086: asn_debug.put_line('Defaulting PO job_id ' ||(default_po_info.job_id));
1087: END IF;
1088:
1089: x_cascaded_table(n).job_id := default_po_info.job_id;
1082:
1083: IF x_cascaded_table(n).job_id IS NULL
1084: AND x_cascaded_table(n).purchase_basis = 'TEMP LABOR' THEN
1085: IF (g_asn_debug = 'Y') THEN
1086: asn_debug.put_line('Defaulting PO job_id ' ||(default_po_info.job_id));
1087: END IF;
1088:
1089: x_cascaded_table(n).job_id := default_po_info.job_id;
1090: END IF;
1090: END IF;
1091: END IF; --} matches if shipments found
1092: END IF; --}
1093:
1094: IF (g_asn_debug = 'Y') THEN
1095: asn_debug.put_line('Primary UOM = ' || x_cascaded_table(n).primary_unit_of_measure);
1096: END IF;
1097:
1098: /*
1091: END IF; --} matches if shipments found
1092: END IF; --}
1093:
1094: IF (g_asn_debug = 'Y') THEN
1095: asn_debug.put_line('Primary UOM = ' || x_cascaded_table(n).primary_unit_of_measure);
1096: END IF;
1097:
1098: /*
1099: ** Default the subinventory and locator if they have not been set either through the interface
1120: ELSE
1121: x_cascaded_table(n).location_id := x_cascaded_table(n).ship_to_location_id;
1122: END IF;
1123:
1124: IF (g_asn_debug = 'Y') THEN
1125: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
1126: END IF;
1127:
1128: IF x_cascaded_table(n).waybill_airbill_num IS NULL
1121: x_cascaded_table(n).location_id := x_cascaded_table(n).ship_to_location_id;
1122: END IF;
1123:
1124: IF (g_asn_debug = 'Y') THEN
1125: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
1126: END IF;
1127:
1128: IF x_cascaded_table(n).waybill_airbill_num IS NULL
1129: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
1128: IF x_cascaded_table(n).waybill_airbill_num IS NULL
1129: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
1130: x_cascaded_table(n).waybill_airbill_num := x_header_record.header_record.waybill_airbill_num;
1131:
1132: IF (g_asn_debug = 'Y') THEN
1133: asn_debug.put_line('Defaulting from HEADER WAYBILL_AIRBILL_NUM ' || x_cascaded_table(n).waybill_airbill_num);
1134: END IF;
1135: END IF;
1136:
1129: AND x_cascaded_table(n).matching_basis <> 'AMOUNT' THEN
1130: x_cascaded_table(n).waybill_airbill_num := x_header_record.header_record.waybill_airbill_num;
1131:
1132: IF (g_asn_debug = 'Y') THEN
1133: asn_debug.put_line('Defaulting from HEADER WAYBILL_AIRBILL_NUM ' || x_cascaded_table(n).waybill_airbill_num);
1134: END IF;
1135: END IF;
1136:
1137: x_progress := '010';
1135: END IF;
1136:
1137: x_progress := '010';
1138:
1139: IF (g_asn_debug = 'Y') THEN
1140: asn_debug.put_line('Exit default_shipment_line');
1141: END IF;
1142: EXCEPTION
1143: WHEN OTHERS THEN
1136:
1137: x_progress := '010';
1138:
1139: IF (g_asn_debug = 'Y') THEN
1140: asn_debug.put_line('Exit default_shipment_line');
1141: END IF;
1142: EXCEPTION
1143: WHEN OTHERS THEN
1144: IF (g_asn_debug = 'Y') THEN
1140: asn_debug.put_line('Exit default_shipment_line');
1141: END IF;
1142: EXCEPTION
1143: WHEN OTHERS THEN
1144: IF (g_asn_debug = 'Y') THEN
1145: asn_debug.put_line('Exception in default_vendor_rcv_line ');
1146: END IF;
1147: END default_vendor_rcv_line;
1148:
1141: END IF;
1142: EXCEPTION
1143: WHEN OTHERS THEN
1144: IF (g_asn_debug = 'Y') THEN
1145: asn_debug.put_line('Exception in default_vendor_rcv_line ');
1146: END IF;
1147: END default_vendor_rcv_line;
1148:
1149: PROCEDURE validate_vendor_rcv_line(
1154: ) IS
1155: l_parent_deliver_to_person_id NUMBER := null; --Bug#6375015
1156: l_skip_validation NUMBER := 0; --Bug#6375015
1157: BEGIN
1158: IF (g_asn_debug = 'Y') THEN
1159: asn_debug.put_line('Enter validate_shipment_line');
1160: END IF;
1161:
1162: x_progress := '000';
1155: l_parent_deliver_to_person_id NUMBER := null; --Bug#6375015
1156: l_skip_validation NUMBER := 0; --Bug#6375015
1157: BEGIN
1158: IF (g_asn_debug = 'Y') THEN
1159: asn_debug.put_line('Enter validate_shipment_line');
1160: END IF;
1161:
1162: x_progress := '000';
1163:
1175:
1176: /* lcm changes */
1177: validate_lcm_line (x_cascaded_table, n, x_asn_type,x_header_record);
1178:
1179: IF (g_asn_debug = 'Y') THEN
1180: asn_debug.put_line('After lcm line validation : ' || x_cascaded_table(n).error_status);
1181: END IF;
1182:
1183:
1176: /* lcm changes */
1177: validate_lcm_line (x_cascaded_table, n, x_asn_type,x_header_record);
1178:
1179: IF (g_asn_debug = 'Y') THEN
1180: asn_debug.put_line('After lcm line validation : ' || x_cascaded_table(n).error_status);
1181: END IF;
1182:
1183:
1184: /* FPJ SERVICES.
1187: */
1188: IF (x_cascaded_table(n).matching_basis <> 'AMOUNT') THEN
1189: validate_transaction_uom(x_cascaded_table, n);
1190:
1191: IF (g_asn_debug = 'Y') THEN
1192: asn_debug.put_line('After validate_transaction_uom: ' || x_cascaded_table(n).error_status);
1193: END IF;
1194:
1195: validate_item_info(x_cascaded_table, n);
1188: IF (x_cascaded_table(n).matching_basis <> 'AMOUNT') THEN
1189: validate_transaction_uom(x_cascaded_table, n);
1190:
1191: IF (g_asn_debug = 'Y') THEN
1192: asn_debug.put_line('After validate_transaction_uom: ' || x_cascaded_table(n).error_status);
1193: END IF;
1194:
1195: validate_item_info(x_cascaded_table, n);
1196:
1193: END IF;
1194:
1195: validate_item_info(x_cascaded_table, n);
1196:
1197: IF (g_asn_debug = 'Y') THEN
1198: asn_debug.put_line('After validate_item_info: ' || x_cascaded_table(n).error_status);
1199: END IF;
1200:
1201: validate_freight_carrier_code(x_cascaded_table, n);
1194:
1195: validate_item_info(x_cascaded_table, n);
1196:
1197: IF (g_asn_debug = 'Y') THEN
1198: asn_debug.put_line('After validate_item_info: ' || x_cascaded_table(n).error_status);
1199: END IF;
1200:
1201: validate_freight_carrier_code(x_cascaded_table, n);
1202:
1199: END IF;
1200:
1201: validate_freight_carrier_code(x_cascaded_table, n);
1202:
1203: IF (g_asn_debug = 'Y') THEN
1204: asn_debug.put_line('After validate_freight_carrier_code: ' || x_cascaded_table(n).error_status);
1205: END IF;
1206:
1207: validate_subinventory(x_cascaded_table, n);
1200:
1201: validate_freight_carrier_code(x_cascaded_table, n);
1202:
1203: IF (g_asn_debug = 'Y') THEN
1204: asn_debug.put_line('After validate_freight_carrier_code: ' || x_cascaded_table(n).error_status);
1205: END IF;
1206:
1207: validate_subinventory(x_cascaded_table, n);
1208:
1205: END IF;
1206:
1207: validate_subinventory(x_cascaded_table, n);
1208:
1209: IF (g_asn_debug = 'Y') THEN
1210: asn_debug.put_line('After validate_subinventory: ' || x_cascaded_table(n).error_status);
1211: END IF;
1212:
1213: validate_locator(x_cascaded_table, n);
1206:
1207: validate_subinventory(x_cascaded_table, n);
1208:
1209: IF (g_asn_debug = 'Y') THEN
1210: asn_debug.put_line('After validate_subinventory: ' || x_cascaded_table(n).error_status);
1211: END IF;
1212:
1213: validate_locator(x_cascaded_table, n);
1214:
1211: END IF;
1212:
1213: validate_locator(x_cascaded_table, n);
1214:
1215: IF (g_asn_debug = 'Y') THEN
1216: asn_debug.put_line('After validate_locator: ' || x_cascaded_table(n).error_status);
1217: END IF;
1218:
1219: validate_deliver_to_loc(x_cascaded_table, n);
1212:
1213: validate_locator(x_cascaded_table, n);
1214:
1215: IF (g_asn_debug = 'Y') THEN
1216: asn_debug.put_line('After validate_locator: ' || x_cascaded_table(n).error_status);
1217: END IF;
1218:
1219: validate_deliver_to_loc(x_cascaded_table, n);
1220:
1217: END IF;
1218:
1219: validate_deliver_to_loc(x_cascaded_table, n);
1220:
1221: IF (g_asn_debug = 'Y') THEN
1222: asn_debug.put_line('After validate_deliver_to_loc: ' || x_cascaded_table(n).error_status);
1223: END IF;
1224:
1225: validate_shipped_qty(x_cascaded_table, n);
1218:
1219: validate_deliver_to_loc(x_cascaded_table, n);
1220:
1221: IF (g_asn_debug = 'Y') THEN
1222: asn_debug.put_line('After validate_deliver_to_loc: ' || x_cascaded_table(n).error_status);
1223: END IF;
1224:
1225: validate_shipped_qty(x_cascaded_table, n);
1226:
1223: END IF;
1224:
1225: validate_shipped_qty(x_cascaded_table, n);
1226:
1227: IF (g_asn_debug = 'Y') THEN
1228: asn_debug.put_line('After validate_shipped_qty: ' || x_cascaded_table(n).error_status);
1229: END IF;
1230: END IF;
1231:
1224:
1225: validate_shipped_qty(x_cascaded_table, n);
1226:
1227: IF (g_asn_debug = 'Y') THEN
1228: asn_debug.put_line('After validate_shipped_qty: ' || x_cascaded_table(n).error_status);
1229: END IF;
1230: END IF;
1231:
1232: validate_dest_type(x_cascaded_table, n);
1230: END IF;
1231:
1232: validate_dest_type(x_cascaded_table, n);
1233:
1234: IF (g_asn_debug = 'Y') THEN
1235: asn_debug.put_line('After validate_dest_type: ' || x_cascaded_table(n).error_status);
1236: END IF;
1237:
1238: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN
1231:
1232: validate_dest_type(x_cascaded_table, n);
1233:
1234: IF (g_asn_debug = 'Y') THEN
1235: asn_debug.put_line('After validate_dest_type: ' || x_cascaded_table(n).error_status);
1236: END IF;
1237:
1238: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN
1239: validate_ship_to_loc(x_cascaded_table, n);
1237:
1238: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN
1239: validate_ship_to_loc(x_cascaded_table, n);
1240:
1241: IF (g_asn_debug = 'Y') THEN
1242: asn_debug.put_line('After validate_ship_to_loc: ' || x_cascaded_table(n).error_status);
1243: END IF;
1244: END IF;
1245:
1238: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN
1239: validate_ship_to_loc(x_cascaded_table, n);
1240:
1241: IF (g_asn_debug = 'Y') THEN
1242: asn_debug.put_line('After validate_ship_to_loc: ' || x_cascaded_table(n).error_status);
1243: END IF;
1244: END IF;
1245:
1246: /* Bug:6375015
1260: from the parent transaction.
1261: */
1262: /* code fix for the Bug:6375015 starts */
1263: IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1264: IF (g_asn_debug = 'Y') THEN
1265: asn_debug.put_line('Inside deliver_to_person_id is null...');
1266: END IF;
1267:
1268: IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1261: */
1262: /* code fix for the Bug:6375015 starts */
1263: IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1264: IF (g_asn_debug = 'Y') THEN
1265: asn_debug.put_line('Inside deliver_to_person_id is null...');
1266: END IF;
1267:
1268: IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1269: --In case of transaction_type DELIVER, we need parent transaction.
1269: --In case of transaction_type DELIVER, we need parent transaction.
1270: --If this condition is not added, it will try to defalut the deliver_to_person
1271: --of the parent transaction. But form is not behaving like that.
1272: --So added this condition to default the deliver_to_person of the source document.
1273: IF (g_asn_debug = 'Y') THEN
1274: asn_debug.put_line('Transaction type is DELIVER...');
1275: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1276: END IF;
1277: get_deliver_to_person_from_po(x_cascaded_table,n);
1270: --If this condition is not added, it will try to defalut the deliver_to_person
1271: --of the parent transaction. But form is not behaving like that.
1272: --So added this condition to default the deliver_to_person of the source document.
1273: IF (g_asn_debug = 'Y') THEN
1274: asn_debug.put_line('Transaction type is DELIVER...');
1275: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1276: END IF;
1277: get_deliver_to_person_from_po(x_cascaded_table,n);
1278: IF (g_asn_debug = 'Y') THEN
1271: --of the parent transaction. But form is not behaving like that.
1272: --So added this condition to default the deliver_to_person of the source document.
1273: IF (g_asn_debug = 'Y') THEN
1274: asn_debug.put_line('Transaction type is DELIVER...');
1275: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1276: END IF;
1277: get_deliver_to_person_from_po(x_cascaded_table,n);
1278: IF (g_asn_debug = 'Y') THEN
1279: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1274: asn_debug.put_line('Transaction type is DELIVER...');
1275: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1276: END IF;
1277: get_deliver_to_person_from_po(x_cascaded_table,n);
1278: IF (g_asn_debug = 'Y') THEN
1279: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1280: END IF;
1281: ELSIF (x_cascaded_table(n).parent_transaction_id is not null) THEN
1282: IF (g_asn_debug = 'Y') THEN
1275: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1276: END IF;
1277: get_deliver_to_person_from_po(x_cascaded_table,n);
1278: IF (g_asn_debug = 'Y') THEN
1279: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1280: END IF;
1281: ELSIF (x_cascaded_table(n).parent_transaction_id is not null) THEN
1282: IF (g_asn_debug = 'Y') THEN
1283: asn_debug.put_line('Inside parent_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_transaction_id);
1278: IF (g_asn_debug = 'Y') THEN
1279: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1280: END IF;
1281: ELSIF (x_cascaded_table(n).parent_transaction_id is not null) THEN
1282: IF (g_asn_debug = 'Y') THEN
1283: asn_debug.put_line('Inside parent_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_transaction_id);
1284: END IF;
1285: l_parent_deliver_to_person_id := get_deliver_to_person_from_rt(x_cascaded_table,n);
1286: --We can safely skip the validate_deliver_to_person call
1279: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1280: END IF;
1281: ELSIF (x_cascaded_table(n).parent_transaction_id is not null) THEN
1282: IF (g_asn_debug = 'Y') THEN
1283: asn_debug.put_line('Inside parent_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_transaction_id);
1284: END IF;
1285: l_parent_deliver_to_person_id := get_deliver_to_person_from_rt(x_cascaded_table,n);
1286: --We can safely skip the validate_deliver_to_person call
1287: l_skip_validation := 1;
1285: l_parent_deliver_to_person_id := get_deliver_to_person_from_rt(x_cascaded_table,n);
1286: --We can safely skip the validate_deliver_to_person call
1287: l_skip_validation := 1;
1288: x_cascaded_table(n).deliver_to_person_id := l_parent_deliver_to_person_id;
1289: IF (g_asn_debug = 'Y') THEN
1290: asn_debug.put_line('deliver_to_person_is is set to :'||l_parent_deliver_to_person_id);
1291: END IF;
1292: ELSIF (x_cascaded_table(n).parent_interface_txn_id is not null) THEN
1293: IF (g_asn_debug = 'Y') THEN
1286: --We can safely skip the validate_deliver_to_person call
1287: l_skip_validation := 1;
1288: x_cascaded_table(n).deliver_to_person_id := l_parent_deliver_to_person_id;
1289: IF (g_asn_debug = 'Y') THEN
1290: asn_debug.put_line('deliver_to_person_is is set to :'||l_parent_deliver_to_person_id);
1291: END IF;
1292: ELSIF (x_cascaded_table(n).parent_interface_txn_id is not null) THEN
1293: IF (g_asn_debug = 'Y') THEN
1294: asn_debug.put_line('Inside parent_interface_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_interface_txn_id);
1289: IF (g_asn_debug = 'Y') THEN
1290: asn_debug.put_line('deliver_to_person_is is set to :'||l_parent_deliver_to_person_id);
1291: END IF;
1292: ELSIF (x_cascaded_table(n).parent_interface_txn_id is not null) THEN
1293: IF (g_asn_debug = 'Y') THEN
1294: asn_debug.put_line('Inside parent_interface_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_interface_txn_id);
1295: END IF;
1296: l_parent_deliver_to_person_id := get_deliver_to_person_from_rti(x_cascaded_table,n);
1297: --We can safely skip the validate_deliver_to_person call
1290: asn_debug.put_line('deliver_to_person_is is set to :'||l_parent_deliver_to_person_id);
1291: END IF;
1292: ELSIF (x_cascaded_table(n).parent_interface_txn_id is not null) THEN
1293: IF (g_asn_debug = 'Y') THEN
1294: asn_debug.put_line('Inside parent_interface_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_interface_txn_id);
1295: END IF;
1296: l_parent_deliver_to_person_id := get_deliver_to_person_from_rti(x_cascaded_table,n);
1297: --We can safely skip the validate_deliver_to_person call
1298: l_skip_validation := 1;
1296: l_parent_deliver_to_person_id := get_deliver_to_person_from_rti(x_cascaded_table,n);
1297: --We can safely skip the validate_deliver_to_person call
1298: l_skip_validation := 1;
1299: x_cascaded_table(n).deliver_to_person_id := l_parent_deliver_to_person_id;
1300: IF (g_asn_debug = 'Y') THEN
1301: asn_debug.put_line('deliver_to_person_is is set to :'||l_parent_deliver_to_person_id);
1302: END IF;
1303: ELSE--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1304: IF (g_asn_debug = 'Y') THEN
1297: --We can safely skip the validate_deliver_to_person call
1298: l_skip_validation := 1;
1299: x_cascaded_table(n).deliver_to_person_id := l_parent_deliver_to_person_id;
1300: IF (g_asn_debug = 'Y') THEN
1301: asn_debug.put_line('deliver_to_person_is is set to :'||l_parent_deliver_to_person_id);
1302: END IF;
1303: ELSE--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1304: IF (g_asn_debug = 'Y') THEN
1305: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1300: IF (g_asn_debug = 'Y') THEN
1301: asn_debug.put_line('deliver_to_person_is is set to :'||l_parent_deliver_to_person_id);
1302: END IF;
1303: ELSE--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1304: IF (g_asn_debug = 'Y') THEN
1305: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1306: END IF;
1307: get_deliver_to_person_from_po(x_cascaded_table,n);
1308: IF (g_asn_debug = 'Y') THEN
1301: asn_debug.put_line('deliver_to_person_is is set to :'||l_parent_deliver_to_person_id);
1302: END IF;
1303: ELSE--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1304: IF (g_asn_debug = 'Y') THEN
1305: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1306: END IF;
1307: get_deliver_to_person_from_po(x_cascaded_table,n);
1308: IF (g_asn_debug = 'Y') THEN
1309: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1304: IF (g_asn_debug = 'Y') THEN
1305: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1306: END IF;
1307: get_deliver_to_person_from_po(x_cascaded_table,n);
1308: IF (g_asn_debug = 'Y') THEN
1309: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1310: END IF;
1311: END IF;--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1312: ELSE--IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1305: asn_debug.put_line('defaulting deliver_to_person_id from source document PO');
1306: END IF;
1307: get_deliver_to_person_from_po(x_cascaded_table,n);
1308: IF (g_asn_debug = 'Y') THEN
1309: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1310: END IF;
1311: END IF;--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1312: ELSE--IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1313: IF (g_asn_debug = 'Y') THEN
1309: asn_debug.put_line('After call to get_deliver_to_person_from_po...');
1310: END IF;
1311: END IF;--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1312: ELSE--IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1313: IF (g_asn_debug = 'Y') THEN
1314: asn_debug.put_line('Inside deliver_to_person_id is not null and the value is :'||x_cascaded_table(n).deliver_to_person_id);
1315: END IF;
1316:
1317: IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1310: END IF;
1311: END IF;--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1312: ELSE--IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1313: IF (g_asn_debug = 'Y') THEN
1314: asn_debug.put_line('Inside deliver_to_person_id is not null and the value is :'||x_cascaded_table(n).deliver_to_person_id);
1315: END IF;
1316:
1317: IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1318: --In forms user can select any active deliver_to_person for DELIVER transaction.
1319: --In case of transaction_type DELIVER, we need parent transaction.
1320: --If this condition is not added, it will validate against the deliver_to_person mentioned
1321: --the parent RECEIVE transaction. But form is not behaving like that.
1322: --So, added this condition to skip deliver_to_person validation against parent txn
1323: IF (g_asn_debug = 'Y') THEN
1324: asn_debug.put_line('Transaction type is DELIVER...');
1325: END IF;
1326: ELSIF (x_cascaded_table(n).parent_transaction_id is not null) THEN
1327: IF (g_asn_debug = 'Y') THEN
1320: --If this condition is not added, it will validate against the deliver_to_person mentioned
1321: --the parent RECEIVE transaction. But form is not behaving like that.
1322: --So, added this condition to skip deliver_to_person validation against parent txn
1323: IF (g_asn_debug = 'Y') THEN
1324: asn_debug.put_line('Transaction type is DELIVER...');
1325: END IF;
1326: ELSIF (x_cascaded_table(n).parent_transaction_id is not null) THEN
1327: IF (g_asn_debug = 'Y') THEN
1328: asn_debug.put_line('Inside parent_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_transaction_id);
1323: IF (g_asn_debug = 'Y') THEN
1324: asn_debug.put_line('Transaction type is DELIVER...');
1325: END IF;
1326: ELSIF (x_cascaded_table(n).parent_transaction_id is not null) THEN
1327: IF (g_asn_debug = 'Y') THEN
1328: asn_debug.put_line('Inside parent_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_transaction_id);
1329: END IF;
1330: l_parent_deliver_to_person_id := get_deliver_to_person_from_rt(x_cascaded_table,n);
1331: --We can safely skip the validate_deliver_to_person call, validation against
1324: asn_debug.put_line('Transaction type is DELIVER...');
1325: END IF;
1326: ELSIF (x_cascaded_table(n).parent_transaction_id is not null) THEN
1327: IF (g_asn_debug = 'Y') THEN
1328: asn_debug.put_line('Inside parent_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_transaction_id);
1329: END IF;
1330: l_parent_deliver_to_person_id := get_deliver_to_person_from_rt(x_cascaded_table,n);
1331: --We can safely skip the validate_deliver_to_person call, validation against
1332: --parent transaction is handled here itself.
1331: --We can safely skip the validate_deliver_to_person call, validation against
1332: --parent transaction is handled here itself.
1333: l_skip_validation := 1;
1334: IF nvl(l_parent_deliver_to_person_id,-99) <> x_cascaded_table(n).deliver_to_person_id THEN
1335: IF (g_asn_debug = 'Y') THEN
1336: asn_debug.put_line('RTI.deliver_to_person_id is different to that of parent txn...');
1337: END IF;
1338: --deliver_to_person_id mismatches with the parent txn's deliver_to_person, so clear it off
1339: x_cascaded_table(n).deliver_to_person_id := null;
1332: --parent transaction is handled here itself.
1333: l_skip_validation := 1;
1334: IF nvl(l_parent_deliver_to_person_id,-99) <> x_cascaded_table(n).deliver_to_person_id THEN
1335: IF (g_asn_debug = 'Y') THEN
1336: asn_debug.put_line('RTI.deliver_to_person_id is different to that of parent txn...');
1337: END IF;
1338: --deliver_to_person_id mismatches with the parent txn's deliver_to_person, so clear it off
1339: x_cascaded_table(n).deliver_to_person_id := null;
1340: x_cascaded_table(n).deliver_to_person_name := null;
1340: x_cascaded_table(n).deliver_to_person_name := null;
1341:
1342: --set the deliver_to_person_id to that of parent transaction
1343: x_cascaded_table(n).deliver_to_person_id := l_parent_deliver_to_person_id;
1344: IF (g_asn_debug = 'Y') THEN
1345: asn_debug.put_line('deliver_to_person_is is set to that of parent RT txn');
1346: END IF;
1347: END IF;
1348: ELSIF (x_cascaded_table(n).parent_interface_txn_id is not null) THEN
1341:
1342: --set the deliver_to_person_id to that of parent transaction
1343: x_cascaded_table(n).deliver_to_person_id := l_parent_deliver_to_person_id;
1344: IF (g_asn_debug = 'Y') THEN
1345: asn_debug.put_line('deliver_to_person_is is set to that of parent RT txn');
1346: END IF;
1347: END IF;
1348: ELSIF (x_cascaded_table(n).parent_interface_txn_id is not null) THEN
1349: IF (g_asn_debug = 'Y') THEN
1345: asn_debug.put_line('deliver_to_person_is is set to that of parent RT txn');
1346: END IF;
1347: END IF;
1348: ELSIF (x_cascaded_table(n).parent_interface_txn_id is not null) THEN
1349: IF (g_asn_debug = 'Y') THEN
1350: asn_debug.put_line('Inside parent_interface_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_interface_txn_id);
1351: END IF;
1352: l_parent_deliver_to_person_id := get_deliver_to_person_from_rti(x_cascaded_table,n);
1353: --We can safely skip the validate_deliver_to_person call, validation against
1346: END IF;
1347: END IF;
1348: ELSIF (x_cascaded_table(n).parent_interface_txn_id is not null) THEN
1349: IF (g_asn_debug = 'Y') THEN
1350: asn_debug.put_line('Inside parent_interface_transaction_id.is not null and the value is:'||x_cascaded_table(n).parent_interface_txn_id);
1351: END IF;
1352: l_parent_deliver_to_person_id := get_deliver_to_person_from_rti(x_cascaded_table,n);
1353: --We can safely skip the validate_deliver_to_person call, validation against
1354: --parent transaction is handled here itself.
1353: --We can safely skip the validate_deliver_to_person call, validation against
1354: --parent transaction is handled here itself.
1355: l_skip_validation := 1;
1356: IF nvl(l_parent_deliver_to_person_id,-99) <> x_cascaded_table(n).deliver_to_person_id THEN
1357: IF (g_asn_debug = 'Y') THEN
1358: asn_debug.put_line('RTI.deliver_to_person_id is different to that of parent txn...');
1359: END IF;
1360: --deliver_to_person_id mismatches with the parent txn's deliver_to_person, so clear it off
1361: x_cascaded_table(n).deliver_to_person_id := null;
1354: --parent transaction is handled here itself.
1355: l_skip_validation := 1;
1356: IF nvl(l_parent_deliver_to_person_id,-99) <> x_cascaded_table(n).deliver_to_person_id THEN
1357: IF (g_asn_debug = 'Y') THEN
1358: asn_debug.put_line('RTI.deliver_to_person_id is different to that of parent txn...');
1359: END IF;
1360: --deliver_to_person_id mismatches with the parent txn's deliver_to_person, so clear it off
1361: x_cascaded_table(n).deliver_to_person_id := null;
1362: x_cascaded_table(n).deliver_to_person_name := null;
1363:
1364: --set the deliver_to_person_id to that of parent transaction
1365: x_cascaded_table(n).deliver_to_person_id := l_parent_deliver_to_person_id;
1366:
1367: IF (g_asn_debug = 'Y') THEN
1368: asn_debug.put_line('deliver_to_person_is is set to that of parent RT txn');
1369: END IF;
1370: END IF;
1371: END IF;--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1364: --set the deliver_to_person_id to that of parent transaction
1365: x_cascaded_table(n).deliver_to_person_id := l_parent_deliver_to_person_id;
1366:
1367: IF (g_asn_debug = 'Y') THEN
1368: asn_debug.put_line('deliver_to_person_is is set to that of parent RT txn');
1369: END IF;
1370: END IF;
1371: END IF;--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1372: END IF;--IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1371: END IF;--IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
1372: END IF;--IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1373:
1374: IF l_skip_validation = 0 THEN
1375: IF (g_asn_debug = 'Y') THEN
1376: asn_debug.put_line('validate_deliver_to_person is called');
1377: END IF;
1378: validate_deliver_to_person(x_cascaded_table, n);
1379: IF (g_asn_debug = 'Y') THEN
1372: END IF;--IF (x_cascaded_table(n).deliver_to_person_id is null) THEN
1373:
1374: IF l_skip_validation = 0 THEN
1375: IF (g_asn_debug = 'Y') THEN
1376: asn_debug.put_line('validate_deliver_to_person is called');
1377: END IF;
1378: validate_deliver_to_person(x_cascaded_table, n);
1379: IF (g_asn_debug = 'Y') THEN
1380: asn_debug.put_line('After validate_deliver_to_person: ' || x_cascaded_table(n).error_status);
1375: IF (g_asn_debug = 'Y') THEN
1376: asn_debug.put_line('validate_deliver_to_person is called');
1377: END IF;
1378: validate_deliver_to_person(x_cascaded_table, n);
1379: IF (g_asn_debug = 'Y') THEN
1380: asn_debug.put_line('After validate_deliver_to_person: ' || x_cascaded_table(n).error_status);
1381: END IF;
1382: ELSE
1383: IF (g_asn_debug = 'Y') THEN
1376: asn_debug.put_line('validate_deliver_to_person is called');
1377: END IF;
1378: validate_deliver_to_person(x_cascaded_table, n);
1379: IF (g_asn_debug = 'Y') THEN
1380: asn_debug.put_line('After validate_deliver_to_person: ' || x_cascaded_table(n).error_status);
1381: END IF;
1382: ELSE
1383: IF (g_asn_debug = 'Y') THEN
1384: asn_debug.put_line('call to validate_deliver_to_person is skipped');
1379: IF (g_asn_debug = 'Y') THEN
1380: asn_debug.put_line('After validate_deliver_to_person: ' || x_cascaded_table(n).error_status);
1381: END IF;
1382: ELSE
1383: IF (g_asn_debug = 'Y') THEN
1384: asn_debug.put_line('call to validate_deliver_to_person is skipped');
1385: END IF;
1386: END IF;/* code fix for the Bug:6375015 ends */
1387:
1380: asn_debug.put_line('After validate_deliver_to_person: ' || x_cascaded_table(n).error_status);
1381: END IF;
1382: ELSE
1383: IF (g_asn_debug = 'Y') THEN
1384: asn_debug.put_line('call to validate_deliver_to_person is skipped');
1385: END IF;
1386: END IF;/* code fix for the Bug:6375015 ends */
1387:
1388: IF (g_asn_debug = 'Y') THEN
1384: asn_debug.put_line('call to validate_deliver_to_person is skipped');
1385: END IF;
1386: END IF;/* code fix for the Bug:6375015 ends */
1387:
1388: IF (g_asn_debug = 'Y') THEN
1389: asn_debug.put_line('After validate_deliver_to_person: ' || x_cascaded_table(n).error_status);
1390: END IF;
1391:
1392: validate_routing_record(x_cascaded_table, n);
1385: END IF;
1386: END IF;/* code fix for the Bug:6375015 ends */
1387:
1388: IF (g_asn_debug = 'Y') THEN
1389: asn_debug.put_line('After validate_deliver_to_person: ' || x_cascaded_table(n).error_status);
1390: END IF;
1391:
1392: validate_routing_record(x_cascaded_table, n);
1393:
1390: END IF;
1391:
1392: validate_routing_record(x_cascaded_table, n);
1393:
1394: IF (g_asn_debug = 'Y') THEN
1395: asn_debug.put_line('After validate_routing_record: ' || x_cascaded_table(n).error_status);
1396: END IF;
1397:
1398: validate_tax_code(x_cascaded_table,
1391:
1392: validate_routing_record(x_cascaded_table, n);
1393:
1394: IF (g_asn_debug = 'Y') THEN
1395: asn_debug.put_line('After validate_routing_record: ' || x_cascaded_table(n).error_status);
1396: END IF;
1397:
1398: validate_tax_code(x_cascaded_table,
1399: n,
1399: n,
1400: x_asn_type
1401: ); /* Bug3454491 (1) */
1402:
1403: IF (g_asn_debug = 'Y') THEN
1404: asn_debug.put_line('After validate_tax_code: ' || x_cascaded_table(n).error_status);
1405: END IF;
1406:
1407: validate_country_of_origin(x_cascaded_table, n);
1400: x_asn_type
1401: ); /* Bug3454491 (1) */
1402:
1403: IF (g_asn_debug = 'Y') THEN
1404: asn_debug.put_line('After validate_tax_code: ' || x_cascaded_table(n).error_status);
1405: END IF;
1406:
1407: validate_country_of_origin(x_cascaded_table, n);
1408:
1405: END IF;
1406:
1407: validate_country_of_origin(x_cascaded_table, n);
1408:
1409: IF (g_asn_debug = 'Y') THEN
1410: asn_debug.put_line('After validate_country_of_origin: ' || x_cascaded_table(n).error_status);
1411: END IF;
1412:
1413: /* 13703578 - ASL validation is not required while receiving */
1406:
1407: validate_country_of_origin(x_cascaded_table, n);
1408:
1409: IF (g_asn_debug = 'Y') THEN
1410: asn_debug.put_line('After validate_country_of_origin: ' || x_cascaded_table(n).error_status);
1411: END IF;
1412:
1413: /* 13703578 - ASL validation is not required while receiving */
1414: /* validate_asl(x_cascaded_table, n);
1412:
1413: /* 13703578 - ASL validation is not required while receiving */
1414: /* validate_asl(x_cascaded_table, n);
1415:
1416: IF (g_asn_debug = 'Y') THEN
1417: asn_debug.put_line('After validate_asl: ' || x_cascaded_table(n).error_status);
1418: END IF; */
1419:
1420: validate_ref_integrity(x_cascaded_table,
1413: /* 13703578 - ASL validation is not required while receiving */
1414: /* validate_asl(x_cascaded_table, n);
1415:
1416: IF (g_asn_debug = 'Y') THEN
1417: asn_debug.put_line('After validate_asl: ' || x_cascaded_table(n).error_status);
1418: END IF; */
1419:
1420: validate_ref_integrity(x_cascaded_table,
1421: n,
1421: n,
1422: x_header_record
1423: );
1424:
1425: IF (g_asn_debug = 'Y') THEN
1426: asn_debug.put_line('After validate_ref_integrity: ' || x_cascaded_table(n).error_status);
1427: END IF;
1428:
1429: exchange_sub_items(x_cascaded_table, n);
1422: x_header_record
1423: );
1424:
1425: IF (g_asn_debug = 'Y') THEN
1426: asn_debug.put_line('After validate_ref_integrity: ' || x_cascaded_table(n).error_status);
1427: END IF;
1428:
1429: exchange_sub_items(x_cascaded_table, n);
1430:
1427: END IF;
1428:
1429: exchange_sub_items(x_cascaded_table, n);
1430:
1431: IF (g_asn_debug = 'Y') THEN
1432: asn_debug.put_line('After exchange_sub_items: ' || x_cascaded_table(n).error_status);
1433: END IF;
1434:
1435: validate_consigned_inventory(x_cascaded_table,
1428:
1429: exchange_sub_items(x_cascaded_table, n);
1430:
1431: IF (g_asn_debug = 'Y') THEN
1432: asn_debug.put_line('After exchange_sub_items: ' || x_cascaded_table(n).error_status);
1433: END IF;
1434:
1435: validate_consigned_inventory(x_cascaded_table,
1436: n,
1436: n,
1437: x_asn_type
1438: ); /* Bug3454491 (2) */
1439:
1440: IF (g_asn_debug = 'Y') THEN
1441: asn_debug.put_line('After validate_consigned_inventory: ' || x_cascaded_table(n).error_status);
1442: END IF;
1443:
1444: validate_inspection_status(x_cascaded_table, n);
1437: x_asn_type
1438: ); /* Bug3454491 (2) */
1439:
1440: IF (g_asn_debug = 'Y') THEN
1441: asn_debug.put_line('After validate_consigned_inventory: ' || x_cascaded_table(n).error_status);
1442: END IF;
1443:
1444: validate_inspection_status(x_cascaded_table, n);
1445:
1442: END IF;
1443:
1444: validate_inspection_status(x_cascaded_table, n);
1445:
1446: IF (g_asn_debug = 'Y') THEN
1447: asn_debug.put_line('After validate_inspection_status: ' || x_cascaded_table(n).error_status);
1448: END IF;
1449:
1450: validate_transaction_type(x_cascaded_table, n);
1443:
1444: validate_inspection_status(x_cascaded_table, n);
1445:
1446: IF (g_asn_debug = 'Y') THEN
1447: asn_debug.put_line('After validate_inspection_status: ' || x_cascaded_table(n).error_status);
1448: END IF;
1449:
1450: validate_transaction_type(x_cascaded_table, n);
1451:
1448: END IF;
1449:
1450: validate_transaction_type(x_cascaded_table, n);
1451:
1452: IF (g_asn_debug = 'Y') THEN
1453: asn_debug.put_line('After validate_transaction_type: ' || x_cascaded_table(n).error_status);
1454: END IF;
1455:
1456: /** OPM change Bug# 3061052**/
1449:
1450: validate_transaction_type(x_cascaded_table, n);
1451:
1452: IF (g_asn_debug = 'Y') THEN
1453: asn_debug.put_line('After validate_transaction_type: ' || x_cascaded_table(n).error_status);
1454: END IF;
1455:
1456: /** OPM change Bug# 3061052**/
1457: validate_opm_attributes(x_cascaded_table, n);
1455:
1456: /** OPM change Bug# 3061052**/
1457: validate_opm_attributes(x_cascaded_table, n);
1458:
1459: IF (g_asn_debug = 'Y') THEN
1460: asn_debug.put_line('After validate_opm_attributes: ' || x_cascaded_table(n).error_status);
1461: END IF;
1462:
1463: /* If destination_type_code is inventory then we need to make
1456: /** OPM change Bug# 3061052**/
1457: validate_opm_attributes(x_cascaded_table, n);
1458:
1459: IF (g_asn_debug = 'Y') THEN
1460: asn_debug.put_line('After validate_opm_attributes: ' || x_cascaded_table(n).error_status);
1461: END IF;
1462:
1463: /* If destination_type_code is inventory then we need to make
1464: * sure that we can correct this qty since it might have been
1466: */
1467: IF (x_cascaded_table(n).destination_type_code = 'INVENTORY') THEN --{
1468: rcv_roi_return.derive_inv_qty(x_cascaded_table, n);
1469:
1470: IF (g_asn_debug = 'Y') THEN
1471: asn_debug.put_line('After derive_inv_qty: ' || x_cascaded_table(n).error_status);
1472: END IF;
1473: END IF; --}
1474:
1467: IF (x_cascaded_table(n).destination_type_code = 'INVENTORY') THEN --{
1468: rcv_roi_return.derive_inv_qty(x_cascaded_table, n);
1469:
1470: IF (g_asn_debug = 'Y') THEN
1471: asn_debug.put_line('After derive_inv_qty: ' || x_cascaded_table(n).error_status);
1472: END IF;
1473: END IF; --}
1474:
1475: validate_parent_rtv (x_cascaded_table, n); -- rtv project
1473: END IF; --}
1474:
1475: validate_parent_rtv (x_cascaded_table, n); -- rtv project
1476:
1477: IF (g_asn_debug = 'Y') THEN
1478: asn_debug.put_line('Leave validate_vendor_rcv_line: ' || x_cascaded_table(n).error_status || ' ' || x_cascaded_table(n).error_message);
1479: END IF;
1480: EXCEPTION
1481: WHEN OTHERS THEN
1474:
1475: validate_parent_rtv (x_cascaded_table, n); -- rtv project
1476:
1477: IF (g_asn_debug = 'Y') THEN
1478: asn_debug.put_line('Leave validate_vendor_rcv_line: ' || x_cascaded_table(n).error_status || ' ' || x_cascaded_table(n).error_message);
1479: END IF;
1480: EXCEPTION
1481: WHEN OTHERS THEN
1482: IF (g_asn_debug = 'Y') THEN
1478: asn_debug.put_line('Leave validate_vendor_rcv_line: ' || x_cascaded_table(n).error_status || ' ' || x_cascaded_table(n).error_message);
1479: END IF;
1480: EXCEPTION
1481: WHEN OTHERS THEN
1482: IF (g_asn_debug = 'Y') THEN
1483: asn_debug.put_line('Unexpected exception in validate_vendor_rcv_line: ' || SQLERRM);
1484: END IF;
1485: END validate_vendor_rcv_line;
1486:
1479: END IF;
1480: EXCEPTION
1481: WHEN OTHERS THEN
1482: IF (g_asn_debug = 'Y') THEN
1483: asn_debug.put_line('Unexpected exception in validate_vendor_rcv_line: ' || SQLERRM);
1484: END IF;
1485: END validate_vendor_rcv_line;
1486:
1487: PROCEDURE validate_amt_based_rcv_line(
1490: x_asn_type IN rcv_headers_interface.asn_type%TYPE,
1491: x_header_record IN rcv_roi_preprocessor.header_rec_type
1492: ) IS
1493: BEGIN
1494: IF (g_asn_debug = 'Y') THEN
1495: asn_debug.put_line('Enter validate_amt_based_rcv_line');
1496: END IF;
1497:
1498: x_progress := '000';
1491: x_header_record IN rcv_roi_preprocessor.header_rec_type
1492: ) IS
1493: BEGIN
1494: IF (g_asn_debug = 'Y') THEN
1495: asn_debug.put_line('Enter validate_amt_based_rcv_line');
1496: END IF;
1497:
1498: x_progress := '000';
1499: validate_transaction_date(x_cascaded_table, n);
1517: n,
1518: x_header_record
1519: );
1520:
1521: IF (g_asn_debug = 'Y') THEN
1522: asn_debug.put_line('After validate_ref_integrity');
1523: END IF;
1524:
1525: x_progress := '060';
1518: x_header_record
1519: );
1520:
1521: IF (g_asn_debug = 'Y') THEN
1522: asn_debug.put_line('After validate_ref_integrity');
1523: END IF;
1524:
1525: x_progress := '060';
1526: validate_transaction_type(x_cascaded_table, n);
1524:
1525: x_progress := '060';
1526: validate_transaction_type(x_cascaded_table, n);
1527:
1528: IF (g_asn_debug = 'Y') THEN
1529: asn_debug.put_line('After validate_transaction_type');
1530: END IF;
1531:
1532: x_progress := '070';
1525: x_progress := '060';
1526: validate_transaction_type(x_cascaded_table, n);
1527:
1528: IF (g_asn_debug = 'Y') THEN
1529: asn_debug.put_line('After validate_transaction_type');
1530: END IF;
1531:
1532: x_progress := '070';
1533: validate_temp_labor_info(x_cascaded_table,
1534: n,
1535: x_header_record
1536: );
1537:
1538: IF (g_asn_debug = 'Y') THEN
1539: asn_debug.put_line('After validate_temp_labour_info');
1540: END IF;
1541:
1542: x_progress := '080';
1535: x_header_record
1536: );
1537:
1538: IF (g_asn_debug = 'Y') THEN
1539: asn_debug.put_line('After validate_temp_labour_info');
1540: END IF;
1541:
1542: x_progress := '080';
1543: validate_amount(x_cascaded_table,
1544: n,
1545: x_header_record
1546: );
1547:
1548: IF (g_asn_debug = 'Y') THEN
1549: asn_debug.put_line('After validate_amount');
1550: END IF;
1551: EXCEPTION
1552: WHEN OTHERS THEN
1545: x_header_record
1546: );
1547:
1548: IF (g_asn_debug = 'Y') THEN
1549: asn_debug.put_line('After validate_amount');
1550: END IF;
1551: EXCEPTION
1552: WHEN OTHERS THEN
1553: IF (g_asn_debug = 'Y') THEN
1549: asn_debug.put_line('After validate_amount');
1550: END IF;
1551: EXCEPTION
1552: WHEN OTHERS THEN
1553: IF (g_asn_debug = 'Y') THEN
1554: asn_debug.put_line('Exception at ' || x_progress);
1555: asn_debug.put_line(SQLERRM);
1556: asn_debug.put_line('Exit validate_amt_based_rcv_line');
1557: END IF;
1550: END IF;
1551: EXCEPTION
1552: WHEN OTHERS THEN
1553: IF (g_asn_debug = 'Y') THEN
1554: asn_debug.put_line('Exception at ' || x_progress);
1555: asn_debug.put_line(SQLERRM);
1556: asn_debug.put_line('Exit validate_amt_based_rcv_line');
1557: END IF;
1558: END validate_amt_based_rcv_line;
1551: EXCEPTION
1552: WHEN OTHERS THEN
1553: IF (g_asn_debug = 'Y') THEN
1554: asn_debug.put_line('Exception at ' || x_progress);
1555: asn_debug.put_line(SQLERRM);
1556: asn_debug.put_line('Exit validate_amt_based_rcv_line');
1557: END IF;
1558: END validate_amt_based_rcv_line;
1559:
1552: WHEN OTHERS THEN
1553: IF (g_asn_debug = 'Y') THEN
1554: asn_debug.put_line('Exception at ' || x_progress);
1555: asn_debug.put_line(SQLERRM);
1556: asn_debug.put_line('Exit validate_amt_based_rcv_line');
1557: END IF;
1558: END validate_amt_based_rcv_line;
1559:
1560: PROCEDURE derive_ship_to_org_info(
1565: ship_to_org_record rcv_shipment_object_sv.organization_id_record_type;
1566: x_to_organization_code VARCHAR2(5);
1567: BEGIN
1568: -- default org from header in case it is null at the line level
1569: asn_debug.put_line('error derive_ship_to_org_info' || x_cascaded_table(n).error_status);
1570: x_cascaded_table(n).error_status := 'S';
1571: asn_debug.put_line('the to_org_code = ' || x_cascaded_table(n).to_organization_code);
1572:
1573: IF x_cascaded_table(n).to_organization_code IS NULL
1567: BEGIN
1568: -- default org from header in case it is null at the line level
1569: asn_debug.put_line('error derive_ship_to_org_info' || x_cascaded_table(n).error_status);
1570: x_cascaded_table(n).error_status := 'S';
1571: asn_debug.put_line('the to_org_code = ' || x_cascaded_table(n).to_organization_code);
1572:
1573: IF x_cascaded_table(n).to_organization_code IS NULL
1574: AND x_cascaded_table(n).error_status IN('S', 'W') THEN
1575: asn_debug.put_line('Attempting to default the org from the ship to location');
1571: asn_debug.put_line('the to_org_code = ' || x_cascaded_table(n).to_organization_code);
1572:
1573: IF x_cascaded_table(n).to_organization_code IS NULL
1574: AND x_cascaded_table(n).error_status IN('S', 'W') THEN
1575: asn_debug.put_line('Attempting to default the org from the ship to location');
1576:
1577: IF (g_asn_debug = 'Y') THEN
1578: asn_debug.put_line('Attempting to default the org from the ship to location');
1579: END IF;
1573: IF x_cascaded_table(n).to_organization_code IS NULL
1574: AND x_cascaded_table(n).error_status IN('S', 'W') THEN
1575: asn_debug.put_line('Attempting to default the org from the ship to location');
1576:
1577: IF (g_asn_debug = 'Y') THEN
1578: asn_debug.put_line('Attempting to default the org from the ship to location');
1579: END IF;
1580:
1581: IF (x_cascaded_table(n).ship_to_location_code IS NOT NULL) THEN
1574: AND x_cascaded_table(n).error_status IN('S', 'W') THEN
1575: asn_debug.put_line('Attempting to default the org from the ship to location');
1576:
1577: IF (g_asn_debug = 'Y') THEN
1578: asn_debug.put_line('Attempting to default the org from the ship to location');
1579: END IF;
1580:
1581: IF (x_cascaded_table(n).ship_to_location_code IS NOT NULL) THEN
1582: SELECT MAX(org.organization_code)
1587: AND hl.inventory_organization_id = org.organization_id;
1588:
1589: x_cascaded_table(n).to_organization_code := x_to_organization_code;
1590:
1591: IF (g_asn_debug = 'Y') THEN
1592: asn_debug.put_line('Set Org Code using location code = ' || x_cascaded_table(n).to_organization_code);
1593: END IF;
1594: END IF;
1595:
1588:
1589: x_cascaded_table(n).to_organization_code := x_to_organization_code;
1590:
1591: IF (g_asn_debug = 'Y') THEN
1592: asn_debug.put_line('Set Org Code using location code = ' || x_cascaded_table(n).to_organization_code);
1593: END IF;
1594: END IF;
1595:
1596: IF ( x_cascaded_table(n).to_organization_code IS NULL
1594: END IF;
1595:
1596: IF ( x_cascaded_table(n).to_organization_code IS NULL
1597: AND x_header_record.header_record.ship_to_organization_code IS NOT NULL) THEN
1598: IF (g_asn_debug = 'Y') THEN
1599: asn_debug.put_line('Will default org change DUH to ' || x_header_record.header_record.ship_to_organization_code);
1600: END IF;
1601:
1602: x_cascaded_table(n).to_organization_code := x_header_record.header_record.ship_to_organization_code;
1595:
1596: IF ( x_cascaded_table(n).to_organization_code IS NULL
1597: AND x_header_record.header_record.ship_to_organization_code IS NOT NULL) THEN
1598: IF (g_asn_debug = 'Y') THEN
1599: asn_debug.put_line('Will default org change DUH to ' || x_header_record.header_record.ship_to_organization_code);
1600: END IF;
1601:
1602: x_cascaded_table(n).to_organization_code := x_header_record.header_record.ship_to_organization_code;
1603: END IF;
1604: END IF;
1605:
1606: -- call derivation procedures if conditions are met
1607:
1608: asn_debug.put_line('to_organization_id ' || x_cascaded_table(n).to_organization_id);
1609: asn_debug.put_line('to_organization_code ' || x_cascaded_table(n).to_organization_code);
1610:
1611: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1612: AND ( x_cascaded_table(n).to_organization_id IS NULL
1605:
1606: -- call derivation procedures if conditions are met
1607:
1608: asn_debug.put_line('to_organization_id ' || x_cascaded_table(n).to_organization_id);
1609: asn_debug.put_line('to_organization_code ' || x_cascaded_table(n).to_organization_code);
1610:
1611: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1612: AND ( x_cascaded_table(n).to_organization_id IS NULL
1613: AND x_cascaded_table(n).to_organization_code IS NOT NULL) THEN
1610:
1611: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1612: AND ( x_cascaded_table(n).to_organization_id IS NULL
1613: AND x_cascaded_table(n).to_organization_code IS NOT NULL) THEN
1614: IF (g_asn_debug = 'Y') THEN
1615: asn_debug.put_line('X_Progress ' || x_progress);
1616: END IF;
1617:
1618: ship_to_org_record.organization_code := x_cascaded_table(n).to_organization_code;
1611: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1612: AND ( x_cascaded_table(n).to_organization_id IS NULL
1613: AND x_cascaded_table(n).to_organization_code IS NOT NULL) THEN
1614: IF (g_asn_debug = 'Y') THEN
1615: asn_debug.put_line('X_Progress ' || x_progress);
1616: END IF;
1617:
1618: ship_to_org_record.organization_code := x_cascaded_table(n).to_organization_code;
1619: ship_to_org_record.organization_id := x_cascaded_table(n).to_organization_id;
1619: ship_to_org_record.organization_id := x_cascaded_table(n).to_organization_id;
1620: ship_to_org_record.error_record.error_status := 'S';
1621: ship_to_org_record.error_record.error_message := NULL;
1622:
1623: IF (g_asn_debug = 'Y') THEN
1624: asn_debug.put_line('Into Derive Organization Record Procedure');
1625: END IF;
1626:
1627: po_orgs_sv.derive_org_info(ship_to_org_record);
1620: ship_to_org_record.error_record.error_status := 'S';
1621: ship_to_org_record.error_record.error_message := NULL;
1622:
1623: IF (g_asn_debug = 'Y') THEN
1624: asn_debug.put_line('Into Derive Organization Record Procedure');
1625: END IF;
1626:
1627: po_orgs_sv.derive_org_info(ship_to_org_record);
1628:
1625: END IF;
1626:
1627: po_orgs_sv.derive_org_info(ship_to_org_record);
1628:
1629: IF (g_asn_debug = 'Y') THEN
1630: asn_debug.put_line('Debug Output after organization procedure');
1631: asn_debug.put_line(ship_to_org_record.organization_code);
1632: asn_debug.put_line(TO_CHAR(ship_to_org_record.organization_id));
1633: asn_debug.put_line(ship_to_org_record.error_record.error_status);
1626:
1627: po_orgs_sv.derive_org_info(ship_to_org_record);
1628:
1629: IF (g_asn_debug = 'Y') THEN
1630: asn_debug.put_line('Debug Output after organization procedure');
1631: asn_debug.put_line(ship_to_org_record.organization_code);
1632: asn_debug.put_line(TO_CHAR(ship_to_org_record.organization_id));
1633: asn_debug.put_line(ship_to_org_record.error_record.error_status);
1634: asn_debug.put_line('Debug organization output over');
1627: po_orgs_sv.derive_org_info(ship_to_org_record);
1628:
1629: IF (g_asn_debug = 'Y') THEN
1630: asn_debug.put_line('Debug Output after organization procedure');
1631: asn_debug.put_line(ship_to_org_record.organization_code);
1632: asn_debug.put_line(TO_CHAR(ship_to_org_record.organization_id));
1633: asn_debug.put_line(ship_to_org_record.error_record.error_status);
1634: asn_debug.put_line('Debug organization output over');
1635: END IF;
1628:
1629: IF (g_asn_debug = 'Y') THEN
1630: asn_debug.put_line('Debug Output after organization procedure');
1631: asn_debug.put_line(ship_to_org_record.organization_code);
1632: asn_debug.put_line(TO_CHAR(ship_to_org_record.organization_id));
1633: asn_debug.put_line(ship_to_org_record.error_record.error_status);
1634: asn_debug.put_line('Debug organization output over');
1635: END IF;
1636:
1629: IF (g_asn_debug = 'Y') THEN
1630: asn_debug.put_line('Debug Output after organization procedure');
1631: asn_debug.put_line(ship_to_org_record.organization_code);
1632: asn_debug.put_line(TO_CHAR(ship_to_org_record.organization_id));
1633: asn_debug.put_line(ship_to_org_record.error_record.error_status);
1634: asn_debug.put_line('Debug organization output over');
1635: END IF;
1636:
1637: x_cascaded_table(n).to_organization_code := ship_to_org_record.organization_code;
1630: asn_debug.put_line('Debug Output after organization procedure');
1631: asn_debug.put_line(ship_to_org_record.organization_code);
1632: asn_debug.put_line(TO_CHAR(ship_to_org_record.organization_id));
1633: asn_debug.put_line(ship_to_org_record.error_record.error_status);
1634: asn_debug.put_line('Debug organization output over');
1635: END IF;
1636:
1637: x_cascaded_table(n).to_organization_code := ship_to_org_record.organization_code;
1638: x_cascaded_table(n).to_organization_id := ship_to_org_record.organization_id;
1646: n IN OUT NOCOPY BINARY_INTEGER
1647: ) IS
1648: vendor_record rcv_shipment_header_sv.vendorrectype;
1649: BEGIN
1650: asn_debug.put_line('i am inside the derive_vendor_info method');
1651:
1652: IF (x_cascaded_table(n).error_status IN('S', 'W')) THEN
1653: IF ( x_cascaded_table(n).vendor_name IS NOT NULL
1654: OR x_cascaded_table(n).vendor_num IS NOT NULL
1658: vendor_record.vendor_id := x_cascaded_table(n).vendor_id;
1659: vendor_record.error_record.error_message := x_cascaded_table(n).error_message;
1660: vendor_record.error_record.error_status := x_cascaded_table(n).error_status;
1661:
1662: IF (g_asn_debug = 'Y') THEN
1663: asn_debug.put_line('In Vendor Procedure');
1664: END IF;
1665:
1666: po_vendors_sv.derive_vendor_info(vendor_record);
1659: vendor_record.error_record.error_message := x_cascaded_table(n).error_message;
1660: vendor_record.error_record.error_status := x_cascaded_table(n).error_status;
1661:
1662: IF (g_asn_debug = 'Y') THEN
1663: asn_debug.put_line('In Vendor Procedure');
1664: END IF;
1665:
1666: po_vendors_sv.derive_vendor_info(vendor_record);
1667:
1664: END IF;
1665:
1666: po_vendors_sv.derive_vendor_info(vendor_record);
1667:
1668: IF (g_asn_debug = 'Y') THEN
1669: asn_debug.put_line(TO_CHAR(vendor_record.vendor_id));
1670: asn_debug.put_line(vendor_record.vendor_name);
1671: asn_debug.put_line(vendor_record.vendor_num);
1672: asn_debug.put_line(vendor_record.error_record.error_status);
1665:
1666: po_vendors_sv.derive_vendor_info(vendor_record);
1667:
1668: IF (g_asn_debug = 'Y') THEN
1669: asn_debug.put_line(TO_CHAR(vendor_record.vendor_id));
1670: asn_debug.put_line(vendor_record.vendor_name);
1671: asn_debug.put_line(vendor_record.vendor_num);
1672: asn_debug.put_line(vendor_record.error_record.error_status);
1673: asn_debug.put_line(vendor_record.error_record.error_message);
1666: po_vendors_sv.derive_vendor_info(vendor_record);
1667:
1668: IF (g_asn_debug = 'Y') THEN
1669: asn_debug.put_line(TO_CHAR(vendor_record.vendor_id));
1670: asn_debug.put_line(vendor_record.vendor_name);
1671: asn_debug.put_line(vendor_record.vendor_num);
1672: asn_debug.put_line(vendor_record.error_record.error_status);
1673: asn_debug.put_line(vendor_record.error_record.error_message);
1674: END IF;
1667:
1668: IF (g_asn_debug = 'Y') THEN
1669: asn_debug.put_line(TO_CHAR(vendor_record.vendor_id));
1670: asn_debug.put_line(vendor_record.vendor_name);
1671: asn_debug.put_line(vendor_record.vendor_num);
1672: asn_debug.put_line(vendor_record.error_record.error_status);
1673: asn_debug.put_line(vendor_record.error_record.error_message);
1674: END IF;
1675:
1668: IF (g_asn_debug = 'Y') THEN
1669: asn_debug.put_line(TO_CHAR(vendor_record.vendor_id));
1670: asn_debug.put_line(vendor_record.vendor_name);
1671: asn_debug.put_line(vendor_record.vendor_num);
1672: asn_debug.put_line(vendor_record.error_record.error_status);
1673: asn_debug.put_line(vendor_record.error_record.error_message);
1674: END IF;
1675:
1676: x_cascaded_table(n).vendor_name := vendor_record.vendor_name;
1669: asn_debug.put_line(TO_CHAR(vendor_record.vendor_id));
1670: asn_debug.put_line(vendor_record.vendor_name);
1671: asn_debug.put_line(vendor_record.vendor_num);
1672: asn_debug.put_line(vendor_record.error_record.error_status);
1673: asn_debug.put_line(vendor_record.error_record.error_message);
1674: END IF;
1675:
1676: x_cascaded_table(n).vendor_name := vendor_record.vendor_name;
1677: x_cascaded_table(n).vendor_num := vendor_record.vendor_num;
1697: vendor_site_record.organization_id := x_cascaded_table(n).to_organization_id;
1698: vendor_site_record.error_record.error_message := x_cascaded_table(n).error_message;
1699: vendor_site_record.error_record.error_status := x_cascaded_table(n).error_status;
1700:
1701: IF (g_asn_debug = 'Y') THEN
1702: asn_debug.put_line('In Vendor Site Procedure');
1703: END IF;
1704:
1705: po_vendor_sites_sv.derive_vendor_site_info(vendor_site_record);
1698: vendor_site_record.error_record.error_message := x_cascaded_table(n).error_message;
1699: vendor_site_record.error_record.error_status := x_cascaded_table(n).error_status;
1700:
1701: IF (g_asn_debug = 'Y') THEN
1702: asn_debug.put_line('In Vendor Site Procedure');
1703: END IF;
1704:
1705: po_vendor_sites_sv.derive_vendor_site_info(vendor_site_record);
1706:
1703: END IF;
1704:
1705: po_vendor_sites_sv.derive_vendor_site_info(vendor_site_record);
1706:
1707: IF (g_asn_debug = 'Y') THEN
1708: asn_debug.put_line(vendor_site_record.vendor_site_code);
1709: asn_debug.put_line(vendor_site_record.vendor_site_id);
1710: END IF;
1711:
1704:
1705: po_vendor_sites_sv.derive_vendor_site_info(vendor_site_record);
1706:
1707: IF (g_asn_debug = 'Y') THEN
1708: asn_debug.put_line(vendor_site_record.vendor_site_code);
1709: asn_debug.put_line(vendor_site_record.vendor_site_id);
1710: END IF;
1711:
1712: x_cascaded_table(n).vendor_site_code := vendor_site_record.vendor_site_code;
1705: po_vendor_sites_sv.derive_vendor_site_info(vendor_site_record);
1706:
1707: IF (g_asn_debug = 'Y') THEN
1708: asn_debug.put_line(vendor_site_record.vendor_site_code);
1709: asn_debug.put_line(vendor_site_record.vendor_site_id);
1710: END IF;
1711:
1712: x_cascaded_table(n).vendor_site_code := vendor_site_record.vendor_site_code;
1713: x_cascaded_table(n).vendor_id := vendor_site_record.vendor_id;
1727: BEGIN
1728: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1729: AND ( x_cascaded_table(n).po_header_id IS NULL
1730: AND x_cascaded_table(n).document_num IS NOT NULL) THEN
1731: IF (g_asn_debug = 'Y') THEN
1732: asn_debug.put_line('X_progress ' || x_progress);
1733: asn_debug.put_line('shipment_header_id ' || x_cascaded_table(n).shipment_header_id);
1734: END IF;
1735:
1728: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1729: AND ( x_cascaded_table(n).po_header_id IS NULL
1730: AND x_cascaded_table(n).document_num IS NOT NULL) THEN
1731: IF (g_asn_debug = 'Y') THEN
1732: asn_debug.put_line('X_progress ' || x_progress);
1733: asn_debug.put_line('shipment_header_id ' || x_cascaded_table(n).shipment_header_id);
1734: END IF;
1735:
1736: document_num_record.document_num := x_cascaded_table(n).document_num;
1729: AND ( x_cascaded_table(n).po_header_id IS NULL
1730: AND x_cascaded_table(n).document_num IS NOT NULL) THEN
1731: IF (g_asn_debug = 'Y') THEN
1732: asn_debug.put_line('X_progress ' || x_progress);
1733: asn_debug.put_line('shipment_header_id ' || x_cascaded_table(n).shipment_header_id);
1734: END IF;
1735:
1736: document_num_record.document_num := x_cascaded_table(n).document_num;
1737: document_num_record.error_record.error_status := 'S';
1736: document_num_record.document_num := x_cascaded_table(n).document_num;
1737: document_num_record.error_record.error_status := 'S';
1738: document_num_record.error_record.error_message := NULL;
1739:
1740: IF (g_asn_debug = 'Y') THEN
1741: asn_debug.put_line('Derive po_header_id');
1742: END IF;
1743:
1744: rcv_transactions_interface_sv.get_po_header_id(document_num_record);
1737: document_num_record.error_record.error_status := 'S';
1738: document_num_record.error_record.error_message := NULL;
1739:
1740: IF (g_asn_debug = 'Y') THEN
1741: asn_debug.put_line('Derive po_header_id');
1742: END IF;
1743:
1744: rcv_transactions_interface_sv.get_po_header_id(document_num_record);
1745: x_cascaded_table(n).po_header_id := document_num_record.po_header_id;
1749: 'DOCUMENT_NUM',
1750: FALSE
1751: );
1752:
1753: IF (g_asn_debug = 'Y') THEN
1754: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).po_header_id));
1755: END IF;
1756: END IF;
1757: END derive_po_header_info;
1750: FALSE
1751: );
1752:
1753: IF (g_asn_debug = 'Y') THEN
1754: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).po_header_id));
1755: END IF;
1756: END IF;
1757: END derive_po_header_info;
1758:
1774: AND (rcv_roi_header.g_txn_against_asn = 'Y')) THEN --{ /* Bug4523892 */
1775:
1776: x_cascaded_table(n).shipment_header_id := x_header_record.header_record.receipt_header_id;
1777:
1778: IF (g_asn_debug = 'Y') THEN
1779: asn_debug.put_line('shipment_header_id in derive_asn_header_info ' || x_cascaded_table(n).shipment_header_id);
1780: END IF;
1781:
1782: IF (x_cascaded_table(n).shipment_header_id IS NULL) THEN --{
1775:
1776: x_cascaded_table(n).shipment_header_id := x_header_record.header_record.receipt_header_id;
1777:
1778: IF (g_asn_debug = 'Y') THEN
1779: asn_debug.put_line('shipment_header_id in derive_asn_header_info ' || x_cascaded_table(n).shipment_header_id);
1780: END IF;
1781:
1782: IF (x_cascaded_table(n).shipment_header_id IS NULL) THEN --{
1783: IF (g_asn_debug = 'Y') THEN
1779: asn_debug.put_line('shipment_header_id in derive_asn_header_info ' || x_cascaded_table(n).shipment_header_id);
1780: END IF;
1781:
1782: IF (x_cascaded_table(n).shipment_header_id IS NULL) THEN --{
1783: IF (g_asn_debug = 'Y') THEN
1784: asn_debug.put_line('Cannot derive shipment_header_id');
1785: END IF;
1786:
1787: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
1780: END IF;
1781:
1782: IF (x_cascaded_table(n).shipment_header_id IS NULL) THEN --{
1783: IF (g_asn_debug = 'Y') THEN
1784: asn_debug.put_line('Cannot derive shipment_header_id');
1785: END IF;
1786:
1787: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
1788: rcv_error_pkg.set_error_message('RCV_NO_SHIP_ID', x_cascaded_table(n).error_message);
1807: BEGIN
1808: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1809: AND ( x_cascaded_table(n).item_id IS NULL
1810: AND (x_cascaded_table(n).item_num IS NOT NULL)) THEN
1811: IF (g_asn_debug = 'Y') THEN
1812: asn_debug.put_line('X_progress ' || x_progress);
1813: END IF;
1814:
1815: item_id_record.item_num := x_cascaded_table(n).item_num;
1808: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1809: AND ( x_cascaded_table(n).item_id IS NULL
1810: AND (x_cascaded_table(n).item_num IS NOT NULL)) THEN
1811: IF (g_asn_debug = 'Y') THEN
1812: asn_debug.put_line('X_progress ' || x_progress);
1813: END IF;
1814:
1815: item_id_record.item_num := x_cascaded_table(n).item_num;
1816: item_id_record.vendor_item_num := NULL; -- x_cascaded_table(n).vendor_item_num;
1817: item_id_record.to_organization_id := x_cascaded_table(n).to_organization_id;
1818: item_id_record.error_record.error_status := 'S';
1819: item_id_record.error_record.error_message := NULL;
1820:
1821: IF (g_asn_debug = 'Y') THEN
1822: asn_debug.put_line('Derive item_id');
1823: END IF;
1824:
1825: rcv_transactions_interface_sv.get_item_id(item_id_record);
1818: item_id_record.error_record.error_status := 'S';
1819: item_id_record.error_record.error_message := NULL;
1820:
1821: IF (g_asn_debug = 'Y') THEN
1822: asn_debug.put_line('Derive item_id');
1823: END IF;
1824:
1825: rcv_transactions_interface_sv.get_item_id(item_id_record);
1826: x_cascaded_table(n).item_id := item_id_record.item_id;
1851:
1852: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1853: AND ( x_cascaded_table(n).substitute_item_id IS NULL
1854: AND (x_cascaded_table(n).substitute_item_num IS NOT NULL)) THEN
1855: IF (g_asn_debug = 'Y') THEN
1856: asn_debug.put_line('X_progress ' || x_progress);
1857: END IF;
1858:
1859: sub_item_id_record.substitute_item_num := x_cascaded_table(n).substitute_item_num;
1852: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1853: AND ( x_cascaded_table(n).substitute_item_id IS NULL
1854: AND (x_cascaded_table(n).substitute_item_num IS NOT NULL)) THEN
1855: IF (g_asn_debug = 'Y') THEN
1856: asn_debug.put_line('X_progress ' || x_progress);
1857: END IF;
1858:
1859: sub_item_id_record.substitute_item_num := x_cascaded_table(n).substitute_item_num;
1860: sub_item_id_record.vendor_item_num := NULL; -- x_cascaded_table(n).vendor_item_num;
1860: sub_item_id_record.vendor_item_num := NULL; -- x_cascaded_table(n).vendor_item_num;
1861: sub_item_id_record.error_record.error_status := 'S';
1862: sub_item_id_record.error_record.error_message := NULL;
1863:
1864: IF (g_asn_debug = 'Y') THEN
1865: asn_debug.put_line('Derive Substitute Item Id');
1866: END IF;
1867:
1868: rcv_transactions_interface_sv.get_sub_item_id(sub_item_id_record);
1861: sub_item_id_record.error_record.error_status := 'S';
1862: sub_item_id_record.error_record.error_message := NULL;
1863:
1864: IF (g_asn_debug = 'Y') THEN
1865: asn_debug.put_line('Derive Substitute Item Id');
1866: END IF;
1867:
1868: rcv_transactions_interface_sv.get_sub_item_id(sub_item_id_record);
1869: x_cascaded_table(n).substitute_item_id := sub_item_id_record.substitute_item_id;
1869: x_cascaded_table(n).substitute_item_id := sub_item_id_record.substitute_item_id;
1870: x_cascaded_table(n).error_status := sub_item_id_record.error_record.error_status;
1871: x_cascaded_table(n).error_message := sub_item_id_record.error_record.error_message;
1872:
1873: IF (g_asn_debug = 'Y') THEN
1874: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).substitute_item_id));
1875: END IF;
1876:
1877: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,
1870: x_cascaded_table(n).error_status := sub_item_id_record.error_record.error_status;
1871: x_cascaded_table(n).error_message := sub_item_id_record.error_record.error_message;
1872:
1873: IF (g_asn_debug = 'Y') THEN
1874: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).substitute_item_id));
1875: END IF;
1876:
1877: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,
1878: 'SUBSTITUTE_ITEM_NUM',
1890: l_asn_type rcv_shipment_headers.asn_type%type;
1891: l_error_column VARCHAR2(30); --Bugfix 4881909
1892: l_is_clm_po VARCHAR2(5) := 'N'; --
1893: BEGIN
1894: IF (g_asn_debug = 'Y') THEN
1895: asn_debug.put_line('In derive_po_line_info');
1896: END IF;
1897:
1898: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1891: l_error_column VARCHAR2(30); --Bugfix 4881909
1892: l_is_clm_po VARCHAR2(5) := 'N'; --
1893: BEGIN
1894: IF (g_asn_debug = 'Y') THEN
1895: asn_debug.put_line('In derive_po_line_info');
1896: END IF;
1897:
1898: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1899: AND ( x_cascaded_table(n).po_line_id IS NULL
1898: IF (x_cascaded_table(n).error_status IN('S', 'W'))
1899: AND ( x_cascaded_table(n).po_line_id IS NULL
1900: AND x_cascaded_table(n).po_header_id IS NOT NULL
1901: AND x_cascaded_table(n).document_line_num IS NOT NULL) THEN
1902: IF (g_asn_debug = 'Y') THEN
1903: asn_debug.put_line('X_progress ' || x_progress);
1904: END IF;
1905:
1906: po_line_id_record.po_header_id := x_cascaded_table(n).po_header_id;
1899: AND ( x_cascaded_table(n).po_line_id IS NULL
1900: AND x_cascaded_table(n).po_header_id IS NOT NULL
1901: AND x_cascaded_table(n).document_line_num IS NOT NULL) THEN
1902: IF (g_asn_debug = 'Y') THEN
1903: asn_debug.put_line('X_progress ' || x_progress);
1904: END IF;
1905:
1906: po_line_id_record.po_header_id := x_cascaded_table(n).po_header_id;
1907: po_line_id_record.document_line_num := x_cascaded_table(n).document_line_num;
1909: po_line_id_record.item_id := x_cascaded_table(n).item_id;
1910: po_line_id_record.error_record.error_status := 'S';
1911: po_line_id_record.error_record.error_message := NULL;
1912:
1913: IF (g_asn_debug = 'Y') THEN
1914: asn_debug.put_line('Derive po_line_id');
1915: END IF;
1916:
1917: rcv_transactions_interface_sv.get_po_line_id(po_line_id_record);
1910: po_line_id_record.error_record.error_status := 'S';
1911: po_line_id_record.error_record.error_message := NULL;
1912:
1913: IF (g_asn_debug = 'Y') THEN
1914: asn_debug.put_line('Derive po_line_id');
1915: END IF;
1916:
1917: rcv_transactions_interface_sv.get_po_line_id(po_line_id_record);
1918:
1923: x_cascaded_table(n).po_line_id := po_line_id_record.po_line_id;
1924: x_cascaded_table(n).error_status := po_line_id_record.error_record.error_status;
1925: x_cascaded_table(n).error_message := po_line_id_record.error_record.error_message;
1926:
1927: IF (g_asn_debug = 'Y') THEN
1928: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).po_line_id));
1929: END IF;
1930:
1931: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,
1924: x_cascaded_table(n).error_status := po_line_id_record.error_record.error_status;
1925: x_cascaded_table(n).error_message := po_line_id_record.error_record.error_message;
1926:
1927: IF (g_asn_debug = 'Y') THEN
1928: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).po_line_id));
1929: END IF;
1930:
1931: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,
1932: 'DOCUMENT_LINE_NUM',
1933: FALSE
1934: );
1935: END IF; -- set line id
1936:
1937: IF (g_asn_debug = 'Y') THEN
1938: asn_debug.put_line('po_line_id to get matching_basis ' || TO_CHAR(x_cascaded_table(n).po_line_id));
1939: END IF;
1940:
1941: --
1934: );
1935: END IF; -- set line id
1936:
1937: IF (g_asn_debug = 'Y') THEN
1938: asn_debug.put_line('po_line_id to get matching_basis ' || TO_CHAR(x_cascaded_table(n).po_line_id));
1939: END IF;
1940:
1941: --
1942: l_is_clm_po := po_clm_intg_grp.is_clm_po(p_po_header_id => NULL,
1984: x_cascaded_table(n).matching_basis := 'QUANTITY';
1985: x_cascaded_table(n).purchase_basis := 'GOODS';
1986: END IF;
1987:
1988: IF (g_asn_debug = 'Y') THEN
1989: asn_debug.put_line('matching_basis ' || x_cascaded_table(n).matching_basis);
1990: END IF;
1991:
1992: Complex Work End*/
1985: x_cascaded_table(n).purchase_basis := 'GOODS';
1986: END IF;
1987:
1988: IF (g_asn_debug = 'Y') THEN
1989: asn_debug.put_line('matching_basis ' || x_cascaded_table(n).matching_basis);
1990: END IF;
1991:
1992: Complex Work End*/
1993: -- Get the primary uom in case item_id was determined on the basis of the po_line_id
2009: INTO l_primary_unit_of_measure
2010: FROM mtl_system_items
2011: WHERE mtl_system_items.inventory_item_id = x_cascaded_table(n).item_id
2012: AND mtl_system_items.organization_id = x_cascaded_table(n).to_organization_id;
2013: IF (g_asn_debug = 'Y') THEN
2014: asn_debug.put_line('Primary UOM from RTI :' || x_cascaded_table(n).primary_unit_of_measure);
2015: asn_debug.put_line('Derived PRIMARY UOM from MSI:' || l_primary_unit_of_measure);
2016: END IF;
2017: IF (NVL(x_cascaded_table(n).primary_unit_of_measure, l_primary_unit_of_measure) <> l_primary_unit_of_measure) THEN
2010: FROM mtl_system_items
2011: WHERE mtl_system_items.inventory_item_id = x_cascaded_table(n).item_id
2012: AND mtl_system_items.organization_id = x_cascaded_table(n).to_organization_id;
2013: IF (g_asn_debug = 'Y') THEN
2014: asn_debug.put_line('Primary UOM from RTI :' || x_cascaded_table(n).primary_unit_of_measure);
2015: asn_debug.put_line('Derived PRIMARY UOM from MSI:' || l_primary_unit_of_measure);
2016: END IF;
2017: IF (NVL(x_cascaded_table(n).primary_unit_of_measure, l_primary_unit_of_measure) <> l_primary_unit_of_measure) THEN
2018: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
2011: WHERE mtl_system_items.inventory_item_id = x_cascaded_table(n).item_id
2012: AND mtl_system_items.organization_id = x_cascaded_table(n).to_organization_id;
2013: IF (g_asn_debug = 'Y') THEN
2014: asn_debug.put_line('Primary UOM from RTI :' || x_cascaded_table(n).primary_unit_of_measure);
2015: asn_debug.put_line('Derived PRIMARY UOM from MSI:' || l_primary_unit_of_measure);
2016: END IF;
2017: IF (NVL(x_cascaded_table(n).primary_unit_of_measure, l_primary_unit_of_measure) <> l_primary_unit_of_measure) THEN
2018: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
2019: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE');
2023: rcv_error_pkg.log_interface_error('PRIMARY_UNIT_OF_MEASURE');
2024: ELSE
2025: x_cascaded_table(n).primary_unit_of_measure := l_primary_unit_of_measure;
2026: END IF;
2027: IF (g_asn_debug = 'Y') THEN
2028: asn_debug.put_line('Primary UOM: ' || x_cascaded_table(n).primary_unit_of_measure);
2029: END IF;
2030: EXCEPTION
2031: WHEN NO_DATA_FOUND THEN
2024: ELSE
2025: x_cascaded_table(n).primary_unit_of_measure := l_primary_unit_of_measure;
2026: END IF;
2027: IF (g_asn_debug = 'Y') THEN
2028: asn_debug.put_line('Primary UOM: ' || x_cascaded_table(n).primary_unit_of_measure);
2029: END IF;
2030: EXCEPTION
2031: WHEN NO_DATA_FOUND THEN
2032: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
2055: FROM mtl_system_items
2056: WHERE mtl_system_items.inventory_item_id = x_cascaded_table(n).item_id
2057: AND mtl_system_items.organization_id = x_cascaded_table(n).to_organization_id;
2058:
2059: IF (g_asn_debug = 'Y') THEN
2060: asn_debug.put_line('use_mtl_lot: ' || x_cascaded_table(n).use_mtl_lot);
2061: asn_debug.put_line('use_mtl_serial: ' || x_cascaded_table(n).use_mtl_serial);
2062: END IF;
2063: EXCEPTION
2056: WHERE mtl_system_items.inventory_item_id = x_cascaded_table(n).item_id
2057: AND mtl_system_items.organization_id = x_cascaded_table(n).to_organization_id;
2058:
2059: IF (g_asn_debug = 'Y') THEN
2060: asn_debug.put_line('use_mtl_lot: ' || x_cascaded_table(n).use_mtl_lot);
2061: asn_debug.put_line('use_mtl_serial: ' || x_cascaded_table(n).use_mtl_serial);
2062: END IF;
2063: EXCEPTION
2064: WHEN NO_DATA_FOUND THEN
2057: AND mtl_system_items.organization_id = x_cascaded_table(n).to_organization_id;
2058:
2059: IF (g_asn_debug = 'Y') THEN
2060: asn_debug.put_line('use_mtl_lot: ' || x_cascaded_table(n).use_mtl_lot);
2061: asn_debug.put_line('use_mtl_serial: ' || x_cascaded_table(n).use_mtl_serial);
2062: END IF;
2063: EXCEPTION
2064: WHEN NO_DATA_FOUND THEN
2065: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
2072: /* Bug 2020269 : uom_code needs to be derived from unit_of_measure
2073: entered in rcv_transactions_interface.
2074: */
2075: IF (x_cascaded_table(n).unit_of_measure IS NOT NULL) THEN
2076: IF (g_asn_debug = 'Y') THEN
2077: asn_debug.put_line('X_progress ' || x_progress);
2078: END IF;
2079:
2080: SELECT muom.uom_code
2073: entered in rcv_transactions_interface.
2074: */
2075: IF (x_cascaded_table(n).unit_of_measure IS NOT NULL) THEN
2076: IF (g_asn_debug = 'Y') THEN
2077: asn_debug.put_line('X_progress ' || x_progress);
2078: END IF;
2079:
2080: SELECT muom.uom_code
2081: INTO x_cascaded_table(n).uom_code
2081: INTO x_cascaded_table(n).uom_code
2082: FROM mtl_units_of_measure muom
2083: WHERE muom.unit_of_measure = x_cascaded_table(n).unit_of_measure;
2084: ELSE
2085: IF (g_asn_debug = 'Y') THEN
2086: asn_debug.put_line('uom_code not dereived as unit_of_measure is null');
2087: END IF;
2088: END IF; -- set uom_code
2089:
2082: FROM mtl_units_of_measure muom
2083: WHERE muom.unit_of_measure = x_cascaded_table(n).unit_of_measure;
2084: ELSE
2085: IF (g_asn_debug = 'Y') THEN
2086: asn_debug.put_line('uom_code not dereived as unit_of_measure is null');
2087: END IF;
2088: END IF; -- set uom_code
2089:
2090: x_progress := '026';
2115: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2116: /* AND x_cascaded_table(n).po_release_id IS NULL -- Bug 8758194 */
2117: AND -- Maybe we need an or with shipnum,relnum
2118: x_cascaded_table(n).po_header_id IS NOT NULL THEN --{
2119: IF (g_asn_debug = 'Y') THEN
2120: asn_debug.put_line('X_progress ' || x_progress);
2121: END IF;
2122:
2123: IF (x_cascaded_table(n).po_release_id IS NOT NULL AND x_cascaded_table(n).release_num IS NULL) THEN
2116: /* AND x_cascaded_table(n).po_release_id IS NULL -- Bug 8758194 */
2117: AND -- Maybe we need an or with shipnum,relnum
2118: x_cascaded_table(n).po_header_id IS NOT NULL THEN --{
2119: IF (g_asn_debug = 'Y') THEN
2120: asn_debug.put_line('X_progress ' || x_progress);
2121: END IF;
2122:
2123: IF (x_cascaded_table(n).po_release_id IS NOT NULL AND x_cascaded_table(n).release_num IS NULL) THEN
2124: IF (g_asn_debug = 'Y') THEN
2120: asn_debug.put_line('X_progress ' || x_progress);
2121: END IF;
2122:
2123: IF (x_cascaded_table(n).po_release_id IS NOT NULL AND x_cascaded_table(n).release_num IS NULL) THEN
2124: IF (g_asn_debug = 'Y') THEN
2125: asn_debug.put_line('Deriving Release Number based on PO Release ID '||x_cascaded_table(n).po_release_id);
2126: END IF;
2127:
2128: SELECT release_num
2121: END IF;
2122:
2123: IF (x_cascaded_table(n).po_release_id IS NOT NULL AND x_cascaded_table(n).release_num IS NULL) THEN
2124: IF (g_asn_debug = 'Y') THEN
2125: asn_debug.put_line('Deriving Release Number based on PO Release ID '||x_cascaded_table(n).po_release_id);
2126: END IF;
2127:
2128: SELECT release_num
2129: INTO x_cascaded_table(n).release_num
2130: FROM po_releases_all
2131: WHERE po_header_id = x_cascaded_table(n).po_header_id
2132: AND po_release_id = x_cascaded_table(n).po_release_id;
2133:
2134: IF (g_asn_debug = 'Y') THEN
2135: asn_debug.put_line('x_cascaded_table(n).release_num : ' || x_cascaded_table(n).release_num);
2136: END IF;
2137: END IF;
2138:
2131: WHERE po_header_id = x_cascaded_table(n).po_header_id
2132: AND po_release_id = x_cascaded_table(n).po_release_id;
2133:
2134: IF (g_asn_debug = 'Y') THEN
2135: asn_debug.put_line('x_cascaded_table(n).release_num : ' || x_cascaded_table(n).release_num);
2136: END IF;
2137: END IF;
2138:
2139: release_id_record.po_header_id := x_cascaded_table(n).po_header_id;
2142: release_id_record.shipment_num := x_cascaded_table(n).document_shipment_line_num;
2143: release_id_record.error_record.error_status := 'S';
2144: release_id_record.error_record.error_message := NULL;
2145:
2146: IF (g_asn_debug = 'Y') THEN
2147: asn_debug.put_line('Derive po_line_location_id, shipment_num, po_release_id');
2148: END IF;
2149:
2150: IF (g_asn_debug = 'Y') THEN
2143: release_id_record.error_record.error_status := 'S';
2144: release_id_record.error_record.error_message := NULL;
2145:
2146: IF (g_asn_debug = 'Y') THEN
2147: asn_debug.put_line('Derive po_line_location_id, shipment_num, po_release_id');
2148: END IF;
2149:
2150: IF (g_asn_debug = 'Y') THEN
2151: asn_debug.put_line('### po_header_id : ' || release_id_record.po_header_id);
2146: IF (g_asn_debug = 'Y') THEN
2147: asn_debug.put_line('Derive po_line_location_id, shipment_num, po_release_id');
2148: END IF;
2149:
2150: IF (g_asn_debug = 'Y') THEN
2151: asn_debug.put_line('### po_header_id : ' || release_id_record.po_header_id);
2152: asn_debug.put_line('### release_num : ' || release_id_record.release_num);
2153: asn_debug.put_line('### po_line_id : ' || release_id_record.po_line_id);
2154: asn_debug.put_line('### po_line_location_id : ' || release_id_record.po_line_location_id);
2147: asn_debug.put_line('Derive po_line_location_id, shipment_num, po_release_id');
2148: END IF;
2149:
2150: IF (g_asn_debug = 'Y') THEN
2151: asn_debug.put_line('### po_header_id : ' || release_id_record.po_header_id);
2152: asn_debug.put_line('### release_num : ' || release_id_record.release_num);
2153: asn_debug.put_line('### po_line_id : ' || release_id_record.po_line_id);
2154: asn_debug.put_line('### po_line_location_id : ' || release_id_record.po_line_location_id);
2155: asn_debug.put_line('### shipment_num : ' || release_id_record.shipment_num);
2148: END IF;
2149:
2150: IF (g_asn_debug = 'Y') THEN
2151: asn_debug.put_line('### po_header_id : ' || release_id_record.po_header_id);
2152: asn_debug.put_line('### release_num : ' || release_id_record.release_num);
2153: asn_debug.put_line('### po_line_id : ' || release_id_record.po_line_id);
2154: asn_debug.put_line('### po_line_location_id : ' || release_id_record.po_line_location_id);
2155: asn_debug.put_line('### shipment_num : ' || release_id_record.shipment_num);
2156: asn_debug.put_line('### po_release_id : ' || release_id_record.po_release_id);
2149:
2150: IF (g_asn_debug = 'Y') THEN
2151: asn_debug.put_line('### po_header_id : ' || release_id_record.po_header_id);
2152: asn_debug.put_line('### release_num : ' || release_id_record.release_num);
2153: asn_debug.put_line('### po_line_id : ' || release_id_record.po_line_id);
2154: asn_debug.put_line('### po_line_location_id : ' || release_id_record.po_line_location_id);
2155: asn_debug.put_line('### shipment_num : ' || release_id_record.shipment_num);
2156: asn_debug.put_line('### po_release_id : ' || release_id_record.po_release_id);
2157: END IF;
2150: IF (g_asn_debug = 'Y') THEN
2151: asn_debug.put_line('### po_header_id : ' || release_id_record.po_header_id);
2152: asn_debug.put_line('### release_num : ' || release_id_record.release_num);
2153: asn_debug.put_line('### po_line_id : ' || release_id_record.po_line_id);
2154: asn_debug.put_line('### po_line_location_id : ' || release_id_record.po_line_location_id);
2155: asn_debug.put_line('### shipment_num : ' || release_id_record.shipment_num);
2156: asn_debug.put_line('### po_release_id : ' || release_id_record.po_release_id);
2157: END IF;
2158:
2151: asn_debug.put_line('### po_header_id : ' || release_id_record.po_header_id);
2152: asn_debug.put_line('### release_num : ' || release_id_record.release_num);
2153: asn_debug.put_line('### po_line_id : ' || release_id_record.po_line_id);
2154: asn_debug.put_line('### po_line_location_id : ' || release_id_record.po_line_location_id);
2155: asn_debug.put_line('### shipment_num : ' || release_id_record.shipment_num);
2156: asn_debug.put_line('### po_release_id : ' || release_id_record.po_release_id);
2157: END IF;
2158:
2159: po_releases_sv4.get_po_release_id(release_id_record);
2152: asn_debug.put_line('### release_num : ' || release_id_record.release_num);
2153: asn_debug.put_line('### po_line_id : ' || release_id_record.po_line_id);
2154: asn_debug.put_line('### po_line_location_id : ' || release_id_record.po_line_location_id);
2155: asn_debug.put_line('### shipment_num : ' || release_id_record.shipment_num);
2156: asn_debug.put_line('### po_release_id : ' || release_id_record.po_release_id);
2157: END IF;
2158:
2159: po_releases_sv4.get_po_release_id(release_id_record);
2160:
2157: END IF;
2158:
2159: po_releases_sv4.get_po_release_id(release_id_record);
2160:
2161: IF (g_asn_debug = 'Y') THEN
2162: asn_debug.put_line('^^^ po_header_id : ' || release_id_record.po_header_id);
2163: asn_debug.put_line('^^^ release_num : ' || release_id_record.release_num);
2164: asn_debug.put_line('^^^ po_line_id : ' || release_id_record.po_line_id);
2165: asn_debug.put_line('^^^ po_line_location_id : ' || release_id_record.po_line_location_id);
2158:
2159: po_releases_sv4.get_po_release_id(release_id_record);
2160:
2161: IF (g_asn_debug = 'Y') THEN
2162: asn_debug.put_line('^^^ po_header_id : ' || release_id_record.po_header_id);
2163: asn_debug.put_line('^^^ release_num : ' || release_id_record.release_num);
2164: asn_debug.put_line('^^^ po_line_id : ' || release_id_record.po_line_id);
2165: asn_debug.put_line('^^^ po_line_location_id : ' || release_id_record.po_line_location_id);
2166: asn_debug.put_line('^^^ shipment_num : ' || release_id_record.shipment_num);
2159: po_releases_sv4.get_po_release_id(release_id_record);
2160:
2161: IF (g_asn_debug = 'Y') THEN
2162: asn_debug.put_line('^^^ po_header_id : ' || release_id_record.po_header_id);
2163: asn_debug.put_line('^^^ release_num : ' || release_id_record.release_num);
2164: asn_debug.put_line('^^^ po_line_id : ' || release_id_record.po_line_id);
2165: asn_debug.put_line('^^^ po_line_location_id : ' || release_id_record.po_line_location_id);
2166: asn_debug.put_line('^^^ shipment_num : ' || release_id_record.shipment_num);
2167: asn_debug.put_line('^^^ po_release_id : ' || release_id_record.po_release_id);
2160:
2161: IF (g_asn_debug = 'Y') THEN
2162: asn_debug.put_line('^^^ po_header_id : ' || release_id_record.po_header_id);
2163: asn_debug.put_line('^^^ release_num : ' || release_id_record.release_num);
2164: asn_debug.put_line('^^^ po_line_id : ' || release_id_record.po_line_id);
2165: asn_debug.put_line('^^^ po_line_location_id : ' || release_id_record.po_line_location_id);
2166: asn_debug.put_line('^^^ shipment_num : ' || release_id_record.shipment_num);
2167: asn_debug.put_line('^^^ po_release_id : ' || release_id_record.po_release_id);
2168: END IF;
2161: IF (g_asn_debug = 'Y') THEN
2162: asn_debug.put_line('^^^ po_header_id : ' || release_id_record.po_header_id);
2163: asn_debug.put_line('^^^ release_num : ' || release_id_record.release_num);
2164: asn_debug.put_line('^^^ po_line_id : ' || release_id_record.po_line_id);
2165: asn_debug.put_line('^^^ po_line_location_id : ' || release_id_record.po_line_location_id);
2166: asn_debug.put_line('^^^ shipment_num : ' || release_id_record.shipment_num);
2167: asn_debug.put_line('^^^ po_release_id : ' || release_id_record.po_release_id);
2168: END IF;
2169: /* End of fix for Bug 8758194 */
2162: asn_debug.put_line('^^^ po_header_id : ' || release_id_record.po_header_id);
2163: asn_debug.put_line('^^^ release_num : ' || release_id_record.release_num);
2164: asn_debug.put_line('^^^ po_line_id : ' || release_id_record.po_line_id);
2165: asn_debug.put_line('^^^ po_line_location_id : ' || release_id_record.po_line_location_id);
2166: asn_debug.put_line('^^^ shipment_num : ' || release_id_record.shipment_num);
2167: asn_debug.put_line('^^^ po_release_id : ' || release_id_record.po_release_id);
2168: END IF;
2169: /* End of fix for Bug 8758194 */
2170:
2163: asn_debug.put_line('^^^ release_num : ' || release_id_record.release_num);
2164: asn_debug.put_line('^^^ po_line_id : ' || release_id_record.po_line_id);
2165: asn_debug.put_line('^^^ po_line_location_id : ' || release_id_record.po_line_location_id);
2166: asn_debug.put_line('^^^ shipment_num : ' || release_id_record.shipment_num);
2167: asn_debug.put_line('^^^ po_release_id : ' || release_id_record.po_release_id);
2168: END IF;
2169: /* End of fix for Bug 8758194 */
2170:
2171: x_cascaded_table(n).error_status := release_id_record.error_record.error_status;
2209:
2210: IF x_cascaded_table(n).po_line_location_id IS NULL THEN
2211: x_cascaded_table(n).po_line_location_id := release_id_record.po_line_location_id;
2212:
2213: IF (g_asn_debug = 'Y') THEN
2214: asn_debug.put_line('PO_LINE_LOCATION_ID ' || TO_CHAR(x_cascaded_table(n).po_line_location_id));
2215: END IF;
2216: END IF;
2217:
2210: IF x_cascaded_table(n).po_line_location_id IS NULL THEN
2211: x_cascaded_table(n).po_line_location_id := release_id_record.po_line_location_id;
2212:
2213: IF (g_asn_debug = 'Y') THEN
2214: asn_debug.put_line('PO_LINE_LOCATION_ID ' || TO_CHAR(x_cascaded_table(n).po_line_location_id));
2215: END IF;
2216: END IF;
2217:
2218: IF x_cascaded_table(n).document_shipment_line_num IS NULL THEN
2217:
2218: IF x_cascaded_table(n).document_shipment_line_num IS NULL THEN
2219: x_cascaded_table(n).document_shipment_line_num := release_id_record.shipment_num;
2220:
2221: IF (g_asn_debug = 'Y') THEN
2222: asn_debug.put_line('DOCUMENT_SHIPMENT_NUM ' || TO_CHAR(x_cascaded_table(n).document_shipment_line_num));
2223: END IF;
2224: END IF;
2225:
2218: IF x_cascaded_table(n).document_shipment_line_num IS NULL THEN
2219: x_cascaded_table(n).document_shipment_line_num := release_id_record.shipment_num;
2220:
2221: IF (g_asn_debug = 'Y') THEN
2222: asn_debug.put_line('DOCUMENT_SHIPMENT_NUM ' || TO_CHAR(x_cascaded_table(n).document_shipment_line_num));
2223: END IF;
2224: END IF;
2225:
2226: x_cascaded_table(n).po_release_id := release_id_record.po_release_id;
2224: END IF;
2225:
2226: x_cascaded_table(n).po_release_id := release_id_record.po_release_id;
2227:
2228: IF (g_asn_debug = 'Y') THEN
2229: asn_debug.put_line('PO_RELEASE_ID ' || TO_CHAR(x_cascaded_table(n).po_release_id));
2230: END IF;
2231: END IF; -- }set release info
2232: End if; --}-- <> 'WC'
2225:
2226: x_cascaded_table(n).po_release_id := release_id_record.po_release_id;
2227:
2228: IF (g_asn_debug = 'Y') THEN
2229: asn_debug.put_line('PO_RELEASE_ID ' || TO_CHAR(x_cascaded_table(n).po_release_id));
2230: END IF;
2231: END IF; -- }set release info
2232: End if; --}-- <> 'WC'
2233: /* Complex Work.
2234: * Add exception block.
2235: */
2236: exception
2237: when others then
2238: IF (g_asn_debug = 'Y') THEN
2239: asn_debug.put_line('Exception in derive_po_line_info'||x_progress);
2240: END IF;
2241: raise;
2242: END derive_po_line_info;
2235: */
2236: exception
2237: when others then
2238: IF (g_asn_debug = 'Y') THEN
2239: asn_debug.put_line('Exception in derive_po_line_info'||x_progress);
2240: END IF;
2241: raise;
2242: END derive_po_line_info;
2243:
2249: BEGIN
2250: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2251: AND ( x_cascaded_table(n).from_organization_id IS NULL
2252: AND x_cascaded_table(n).from_organization_code IS NOT NULL) THEN
2253: IF (g_asn_debug = 'Y') THEN
2254: asn_debug.put_line('X_progress ' || x_progress);
2255: END IF;
2256:
2257: ship_to_org_record.organization_code := x_cascaded_table(n).from_organization_code;
2250: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2251: AND ( x_cascaded_table(n).from_organization_id IS NULL
2252: AND x_cascaded_table(n).from_organization_code IS NOT NULL) THEN
2253: IF (g_asn_debug = 'Y') THEN
2254: asn_debug.put_line('X_progress ' || x_progress);
2255: END IF;
2256:
2257: ship_to_org_record.organization_code := x_cascaded_table(n).from_organization_code;
2258: ship_to_org_record.organization_id := x_cascaded_table(n).from_organization_id;
2258: ship_to_org_record.organization_id := x_cascaded_table(n).from_organization_id;
2259: ship_to_org_record.error_record.error_status := 'S';
2260: ship_to_org_record.error_record.error_message := NULL;
2261:
2262: IF (g_asn_debug = 'Y') THEN
2263: asn_debug.put_line('In From Organization Procedure');
2264: END IF;
2265:
2266: po_orgs_sv.derive_org_info(ship_to_org_record);
2259: ship_to_org_record.error_record.error_status := 'S';
2260: ship_to_org_record.error_record.error_message := NULL;
2261:
2262: IF (g_asn_debug = 'Y') THEN
2263: asn_debug.put_line('In From Organization Procedure');
2264: END IF;
2265:
2266: po_orgs_sv.derive_org_info(ship_to_org_record);
2267:
2264: END IF;
2265:
2266: po_orgs_sv.derive_org_info(ship_to_org_record);
2267:
2268: IF (g_asn_debug = 'Y') THEN
2269: asn_debug.put_line('From organization code ' || ship_to_org_record.organization_code);
2270: asn_debug.put_line('From organization id ' || TO_CHAR(ship_to_org_record.organization_id));
2271: asn_debug.put_line('From organization error status ' || ship_to_org_record.error_record.error_status);
2272: END IF;
2265:
2266: po_orgs_sv.derive_org_info(ship_to_org_record);
2267:
2268: IF (g_asn_debug = 'Y') THEN
2269: asn_debug.put_line('From organization code ' || ship_to_org_record.organization_code);
2270: asn_debug.put_line('From organization id ' || TO_CHAR(ship_to_org_record.organization_id));
2271: asn_debug.put_line('From organization error status ' || ship_to_org_record.error_record.error_status);
2272: END IF;
2273:
2266: po_orgs_sv.derive_org_info(ship_to_org_record);
2267:
2268: IF (g_asn_debug = 'Y') THEN
2269: asn_debug.put_line('From organization code ' || ship_to_org_record.organization_code);
2270: asn_debug.put_line('From organization id ' || TO_CHAR(ship_to_org_record.organization_id));
2271: asn_debug.put_line('From organization error status ' || ship_to_org_record.error_record.error_status);
2272: END IF;
2273:
2274: x_cascaded_table(n).from_organization_code := ship_to_org_record.organization_code;
2267:
2268: IF (g_asn_debug = 'Y') THEN
2269: asn_debug.put_line('From organization code ' || ship_to_org_record.organization_code);
2270: asn_debug.put_line('From organization id ' || TO_CHAR(ship_to_org_record.organization_id));
2271: asn_debug.put_line('From organization error status ' || ship_to_org_record.error_record.error_status);
2272: END IF;
2273:
2274: x_cascaded_table(n).from_organization_code := ship_to_org_record.organization_code;
2275: x_cascaded_table(n).from_organization_id := ship_to_org_record.organization_id;
2293: BEGIN
2294: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2295: AND ( x_cascaded_table(n).intransit_owning_org_id IS NULL
2296: AND x_cascaded_table(n).intransit_owning_org_code IS NOT NULL) THEN
2297: IF (g_asn_debug = 'Y') THEN
2298: asn_debug.put_line('X_progress ' || x_progress);
2299: END IF;
2300:
2301: ship_to_org_record.organization_code := x_cascaded_table(n).intransit_owning_org_code;
2294: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2295: AND ( x_cascaded_table(n).intransit_owning_org_id IS NULL
2296: AND x_cascaded_table(n).intransit_owning_org_code IS NOT NULL) THEN
2297: IF (g_asn_debug = 'Y') THEN
2298: asn_debug.put_line('X_progress ' || x_progress);
2299: END IF;
2300:
2301: ship_to_org_record.organization_code := x_cascaded_table(n).intransit_owning_org_code;
2302: ship_to_org_record.organization_id := x_cascaded_table(n).intransit_owning_org_id;
2302: ship_to_org_record.organization_id := x_cascaded_table(n).intransit_owning_org_id;
2303: ship_to_org_record.error_record.error_status := 'S';
2304: ship_to_org_record.error_record.error_message := NULL;
2305:
2306: IF (g_asn_debug = 'Y') THEN
2307: asn_debug.put_line('In Intransit Owning Org Record Procedure');
2308: END IF;
2309:
2310: po_orgs_sv.derive_org_info(ship_to_org_record);
2303: ship_to_org_record.error_record.error_status := 'S';
2304: ship_to_org_record.error_record.error_message := NULL;
2305:
2306: IF (g_asn_debug = 'Y') THEN
2307: asn_debug.put_line('In Intransit Owning Org Record Procedure');
2308: END IF;
2309:
2310: po_orgs_sv.derive_org_info(ship_to_org_record);
2311:
2308: END IF;
2309:
2310: po_orgs_sv.derive_org_info(ship_to_org_record);
2311:
2312: IF (g_asn_debug = 'Y') THEN
2313: asn_debug.put_line('Intransit organization code ' || ship_to_org_record.organization_code);
2314: asn_debug.put_line('Intransit organization id ' || TO_CHAR(ship_to_org_record.organization_id));
2315: asn_debug.put_line('Intransit error status ' || ship_to_org_record.error_record.error_status);
2316: END IF;
2309:
2310: po_orgs_sv.derive_org_info(ship_to_org_record);
2311:
2312: IF (g_asn_debug = 'Y') THEN
2313: asn_debug.put_line('Intransit organization code ' || ship_to_org_record.organization_code);
2314: asn_debug.put_line('Intransit organization id ' || TO_CHAR(ship_to_org_record.organization_id));
2315: asn_debug.put_line('Intransit error status ' || ship_to_org_record.error_record.error_status);
2316: END IF;
2317:
2310: po_orgs_sv.derive_org_info(ship_to_org_record);
2311:
2312: IF (g_asn_debug = 'Y') THEN
2313: asn_debug.put_line('Intransit organization code ' || ship_to_org_record.organization_code);
2314: asn_debug.put_line('Intransit organization id ' || TO_CHAR(ship_to_org_record.organization_id));
2315: asn_debug.put_line('Intransit error status ' || ship_to_org_record.error_record.error_status);
2316: END IF;
2317:
2318: x_cascaded_table(n).intransit_owning_org_code := ship_to_org_record.organization_code;
2311:
2312: IF (g_asn_debug = 'Y') THEN
2313: asn_debug.put_line('Intransit organization code ' || ship_to_org_record.organization_code);
2314: asn_debug.put_line('Intransit organization id ' || TO_CHAR(ship_to_org_record.organization_id));
2315: asn_debug.put_line('Intransit error status ' || ship_to_org_record.error_record.error_status);
2316: END IF;
2317:
2318: x_cascaded_table(n).intransit_owning_org_code := ship_to_org_record.organization_code;
2319: x_cascaded_table(n).intransit_owning_org_id := ship_to_org_record.organization_id;
2337: BEGIN
2338: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2339: AND ( x_cascaded_table(n).location_id IS NULL
2340: AND x_cascaded_table(n).location_code IS NOT NULL) THEN
2341: IF (g_asn_debug = 'Y') THEN
2342: asn_debug.put_line('X_progress ' || x_progress);
2343: END IF;
2344:
2345: location_id_record.location_code := x_cascaded_table(n).location_code;
2338: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2339: AND ( x_cascaded_table(n).location_id IS NULL
2340: AND x_cascaded_table(n).location_code IS NOT NULL) THEN
2341: IF (g_asn_debug = 'Y') THEN
2342: asn_debug.put_line('X_progress ' || x_progress);
2343: END IF;
2344:
2345: location_id_record.location_code := x_cascaded_table(n).location_code;
2346: location_id_record.error_record.error_status := 'S';
2345: location_id_record.location_code := x_cascaded_table(n).location_code;
2346: location_id_record.error_record.error_status := 'S';
2347: location_id_record.error_record.error_message := NULL;
2348:
2349: IF (g_asn_debug = 'Y') THEN
2350: asn_debug.put_line('Derive location_id');
2351: END IF;
2352:
2353: rcv_transactions_interface_sv.get_location_id(location_id_record);
2346: location_id_record.error_record.error_status := 'S';
2347: location_id_record.error_record.error_message := NULL;
2348:
2349: IF (g_asn_debug = 'Y') THEN
2350: asn_debug.put_line('Derive location_id');
2351: END IF;
2352:
2353: rcv_transactions_interface_sv.get_location_id(location_id_record);
2354: x_cascaded_table(n).location_id := location_id_record.location_id;
2365: BEGIN
2366: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2367: AND ( x_cascaded_table(n).ship_to_location_id IS NULL
2368: AND x_cascaded_table(n).ship_to_location_code IS NOT NULL) THEN
2369: IF (g_asn_debug = 'Y') THEN
2370: asn_debug.put_line('X_progress ' || x_progress);
2371: END IF;
2372:
2373: location_id_record.location_code := x_cascaded_table(n).ship_to_location_code;
2366: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2367: AND ( x_cascaded_table(n).ship_to_location_id IS NULL
2368: AND x_cascaded_table(n).ship_to_location_code IS NOT NULL) THEN
2369: IF (g_asn_debug = 'Y') THEN
2370: asn_debug.put_line('X_progress ' || x_progress);
2371: END IF;
2372:
2373: location_id_record.location_code := x_cascaded_table(n).ship_to_location_code;
2374: location_id_record.error_record.error_status := 'S';
2373: location_id_record.location_code := x_cascaded_table(n).ship_to_location_code;
2374: location_id_record.error_record.error_status := 'S';
2375: location_id_record.error_record.error_message := NULL;
2376:
2377: IF (g_asn_debug = 'Y') THEN
2378: asn_debug.put_line('Derive ship to location_id');
2379: END IF;
2380:
2381: rcv_transactions_interface_sv.get_location_id(location_id_record);
2374: location_id_record.error_record.error_status := 'S';
2375: location_id_record.error_record.error_message := NULL;
2376:
2377: IF (g_asn_debug = 'Y') THEN
2378: asn_debug.put_line('Derive ship to location_id');
2379: END IF;
2380:
2381: rcv_transactions_interface_sv.get_location_id(location_id_record);
2382: x_cascaded_table(n).ship_to_location_id := location_id_record.location_id;
2393: BEGIN
2394: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2395: AND ( x_cascaded_table(n).routing_header_id IS NULL
2396: AND x_cascaded_table(n).routing_code IS NOT NULL) THEN
2397: IF (g_asn_debug = 'Y') THEN
2398: asn_debug.put_line('X_progress ' || x_progress);
2399: END IF;
2400:
2401: routing_header_id_record.routing_code := x_cascaded_table(n).routing_code;
2394: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2395: AND ( x_cascaded_table(n).routing_header_id IS NULL
2396: AND x_cascaded_table(n).routing_code IS NOT NULL) THEN
2397: IF (g_asn_debug = 'Y') THEN
2398: asn_debug.put_line('X_progress ' || x_progress);
2399: END IF;
2400:
2401: routing_header_id_record.routing_code := x_cascaded_table(n).routing_code;
2402: routing_header_id_record.error_record.error_status := 'S';
2401: routing_header_id_record.routing_code := x_cascaded_table(n).routing_code;
2402: routing_header_id_record.error_record.error_status := 'S';
2403: routing_header_id_record.error_record.error_message := NULL;
2404:
2405: IF (g_asn_debug = 'Y') THEN
2406: asn_debug.put_line('Derive routing_header_id');
2407: END IF;
2408:
2409: rcv_transactions_interface_sv.get_routing_header_id(routing_header_id_record);
2402: routing_header_id_record.error_record.error_status := 'S';
2403: routing_header_id_record.error_record.error_message := NULL;
2404:
2405: IF (g_asn_debug = 'Y') THEN
2406: asn_debug.put_line('Derive routing_header_id');
2407: END IF;
2408:
2409: rcv_transactions_interface_sv.get_routing_header_id(routing_header_id_record);
2410: x_cascaded_table(n).routing_header_id := routing_header_id_record.routing_header_id;
2421: BEGIN
2422: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2423: AND ( x_cascaded_table(n).routing_step_id IS NULL
2424: AND x_cascaded_table(n).routing_step IS NOT NULL) THEN
2425: IF (g_asn_debug = 'Y') THEN
2426: asn_debug.put_line('X_progress ' || x_progress);
2427: END IF;
2428:
2429: routing_step_id_record.routing_step := x_cascaded_table(n).routing_step;
2422: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2423: AND ( x_cascaded_table(n).routing_step_id IS NULL
2424: AND x_cascaded_table(n).routing_step IS NOT NULL) THEN
2425: IF (g_asn_debug = 'Y') THEN
2426: asn_debug.put_line('X_progress ' || x_progress);
2427: END IF;
2428:
2429: routing_step_id_record.routing_step := x_cascaded_table(n).routing_step;
2430: routing_step_id_record.error_record.error_status := 'S';
2429: routing_step_id_record.routing_step := x_cascaded_table(n).routing_step;
2430: routing_step_id_record.error_record.error_status := 'S';
2431: routing_step_id_record.error_record.error_message := NULL;
2432:
2433: IF (g_asn_debug = 'Y') THEN
2434: asn_debug.put_line('Derive routing Step Id');
2435: END IF;
2436:
2437: rcv_transactions_interface_sv.get_routing_step_id(routing_step_id_record);
2430: routing_step_id_record.error_record.error_status := 'S';
2431: routing_step_id_record.error_record.error_message := NULL;
2432:
2433: IF (g_asn_debug = 'Y') THEN
2434: asn_debug.put_line('Derive routing Step Id');
2435: END IF;
2436:
2437: rcv_transactions_interface_sv.get_routing_step_id(routing_step_id_record);
2438: x_cascaded_table(n).routing_step_id := routing_step_id_record.routing_step_id;
2449: BEGIN
2450: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2451: AND ( x_cascaded_table(n).deliver_to_person_id IS NULL
2452: AND x_cascaded_table(n).deliver_to_person_name IS NOT NULL) THEN
2453: IF (g_asn_debug = 'Y') THEN
2454: asn_debug.put_line('X_progress ' || x_progress);
2455: END IF;
2456:
2457: employee_id_record.employee_name := x_cascaded_table(n).deliver_to_person_name;
2450: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2451: AND ( x_cascaded_table(n).deliver_to_person_id IS NULL
2452: AND x_cascaded_table(n).deliver_to_person_name IS NOT NULL) THEN
2453: IF (g_asn_debug = 'Y') THEN
2454: asn_debug.put_line('X_progress ' || x_progress);
2455: END IF;
2456:
2457: employee_id_record.employee_name := x_cascaded_table(n).deliver_to_person_name;
2458: employee_id_record.employee_id := x_cascaded_table(n).deliver_to_person_id;
2458: employee_id_record.employee_id := x_cascaded_table(n).deliver_to_person_id;
2459: employee_id_record.error_record.error_status := 'S';
2460: employee_id_record.error_record.error_message := NULL;
2461:
2462: IF (g_asn_debug = 'Y') THEN
2463: asn_debug.put_line('In Derive deliver_to_person_id Information');
2464: END IF;
2465:
2466: po_employees_sv.derive_employee_info(employee_id_record);
2459: employee_id_record.error_record.error_status := 'S';
2460: employee_id_record.error_record.error_message := NULL;
2461:
2462: IF (g_asn_debug = 'Y') THEN
2463: asn_debug.put_line('In Derive deliver_to_person_id Information');
2464: END IF;
2465:
2466: po_employees_sv.derive_employee_info(employee_id_record);
2467:
2464: END IF;
2465:
2466: po_employees_sv.derive_employee_info(employee_id_record);
2467:
2468: IF (g_asn_debug = 'Y') THEN
2469: asn_debug.put_line('Employee name ' || employee_id_record.employee_name);
2470: asn_debug.put_line('Employee id ' || TO_CHAR(employee_id_record.employee_id));
2471: asn_debug.put_line('Employee error status ' || employee_id_record.error_record.error_status);
2472: END IF;
2465:
2466: po_employees_sv.derive_employee_info(employee_id_record);
2467:
2468: IF (g_asn_debug = 'Y') THEN
2469: asn_debug.put_line('Employee name ' || employee_id_record.employee_name);
2470: asn_debug.put_line('Employee id ' || TO_CHAR(employee_id_record.employee_id));
2471: asn_debug.put_line('Employee error status ' || employee_id_record.error_record.error_status);
2472: END IF;
2473:
2466: po_employees_sv.derive_employee_info(employee_id_record);
2467:
2468: IF (g_asn_debug = 'Y') THEN
2469: asn_debug.put_line('Employee name ' || employee_id_record.employee_name);
2470: asn_debug.put_line('Employee id ' || TO_CHAR(employee_id_record.employee_id));
2471: asn_debug.put_line('Employee error status ' || employee_id_record.error_record.error_status);
2472: END IF;
2473:
2474: x_cascaded_table(n).deliver_to_person_name := employee_id_record.employee_name;
2467:
2468: IF (g_asn_debug = 'Y') THEN
2469: asn_debug.put_line('Employee name ' || employee_id_record.employee_name);
2470: asn_debug.put_line('Employee id ' || TO_CHAR(employee_id_record.employee_id));
2471: asn_debug.put_line('Employee error status ' || employee_id_record.error_record.error_status);
2472: END IF;
2473:
2474: x_cascaded_table(n).deliver_to_person_name := employee_id_record.employee_name;
2475: x_cascaded_table(n).deliver_to_person_id := employee_id_record.employee_id;
2493: BEGIN
2494: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2495: AND ( x_cascaded_table(n).deliver_to_location_id IS NULL
2496: AND x_cascaded_table(n).deliver_to_location_code IS NOT NULL) THEN
2497: IF (g_asn_debug = 'Y') THEN
2498: asn_debug.put_line('X_progress ' || x_progress);
2499: END IF;
2500:
2501: location_id_record.location_code := x_cascaded_table(n).deliver_to_location_code;
2494: IF (x_cascaded_table(n).error_status IN('S', 'W'))
2495: AND ( x_cascaded_table(n).deliver_to_location_id IS NULL
2496: AND x_cascaded_table(n).deliver_to_location_code IS NOT NULL) THEN
2497: IF (g_asn_debug = 'Y') THEN
2498: asn_debug.put_line('X_progress ' || x_progress);
2499: END IF;
2500:
2501: location_id_record.location_code := x_cascaded_table(n).deliver_to_location_code;
2502: location_id_record.error_record.error_status := 'S';
2501: location_id_record.location_code := x_cascaded_table(n).deliver_to_location_code;
2502: location_id_record.error_record.error_status := 'S';
2503: location_id_record.error_record.error_message := NULL;
2504:
2505: IF (g_asn_debug = 'Y') THEN
2506: asn_debug.put_line('Derive deliver_to_location_id');
2507: END IF;
2508:
2509: rcv_transactions_interface_sv.get_location_id(location_id_record);
2502: location_id_record.error_record.error_status := 'S';
2503: location_id_record.error_record.error_message := NULL;
2504:
2505: IF (g_asn_debug = 'Y') THEN
2506: asn_debug.put_line('Derive deliver_to_location_id');
2507: END IF;
2508:
2509: rcv_transactions_interface_sv.get_location_id(location_id_record);
2510: x_cascaded_table(n).deliver_to_location_id := location_id_record.location_id;
2520: ) IS
2521: BEGIN
2522: IF ( x_cascaded_table(n).from_locator_id IS NULL
2523: AND x_cascaded_table(n).from_locator IS NOT NULL) THEN
2524: IF (g_asn_debug = 'Y') THEN
2525: asn_debug.put_line('inside derive_from_locator_id');
2526: END IF;
2527:
2528: SELECT MAX(ml.inventory_location_id)
2521: BEGIN
2522: IF ( x_cascaded_table(n).from_locator_id IS NULL
2523: AND x_cascaded_table(n).from_locator IS NOT NULL) THEN
2524: IF (g_asn_debug = 'Y') THEN
2525: asn_debug.put_line('inside derive_from_locator_id');
2526: END IF;
2527:
2528: SELECT MAX(ml.inventory_location_id)
2529: INTO x_cascaded_table(n).from_locator_id
2554: IF ( x_cascaded_table(n).locator_id IS NULL
2555: AND x_cascaded_table(n).LOCATOR IS NOT NULL
2556: AND x_cascaded_table(n).subinventory IS NOT NULL) THEN /* Bug3993867 */
2557:
2558: IF (g_asn_debug = 'Y') THEN
2559: asn_debug.put_line('inside derive_to_locator_id');
2560: END IF;
2561:
2562: SELECT MAX(ml.inventory_location_id)
2555: AND x_cascaded_table(n).LOCATOR IS NOT NULL
2556: AND x_cascaded_table(n).subinventory IS NOT NULL) THEN /* Bug3993867 */
2557:
2558: IF (g_asn_debug = 'Y') THEN
2559: asn_debug.put_line('inside derive_to_locator_id');
2560: END IF;
2561:
2562: SELECT MAX(ml.inventory_location_id)
2563: INTO x_cascaded_table(n).locator_id
2584: x_cascaded_table IN OUT NOCOPY rcv_roi_preprocessor.cascaded_trans_tab_type,
2585: n IN BINARY_INTEGER
2586: ) IS
2587: BEGIN
2588: IF (g_asn_debug = 'Y') THEN
2589: asn_debug.put_line('In validate_non_services_fields');
2590: END IF;
2591:
2592: IF x_cascaded_table(n).matching_basis = 'AMOUNT' THEN --{
2585: n IN BINARY_INTEGER
2586: ) IS
2587: BEGIN
2588: IF (g_asn_debug = 'Y') THEN
2589: asn_debug.put_line('In validate_non_services_fields');
2590: END IF;
2591:
2592: IF x_cascaded_table(n).matching_basis = 'AMOUNT' THEN --{
2593: IF (g_asn_debug = 'Y') THEN
2589: asn_debug.put_line('In validate_non_services_fields');
2590: END IF;
2591:
2592: IF x_cascaded_table(n).matching_basis = 'AMOUNT' THEN --{
2593: IF (g_asn_debug = 'Y') THEN
2594: asn_debug.put_line('In first part validate_non_services_fields');
2595: END IF;
2596:
2597: /* Bug 5186378: Added the following condtions,
2590: END IF;
2591:
2592: IF x_cascaded_table(n).matching_basis = 'AMOUNT' THEN --{
2593: IF (g_asn_debug = 'Y') THEN
2594: asn_debug.put_line('In first part validate_non_services_fields');
2595: END IF;
2596:
2597: /* Bug 5186378: Added the following condtions,
2598: * 1) source_doc_quantity <> 0 and
2621:
2622: IF x_cascaded_table(n).error_status IN('S', 'W') THEN --{
2623: IF ( x_cascaded_table(n).value_basis = 'RATE'
2624: AND x_cascaded_table(n).purchase_basis = 'TEMP LABOR') THEN
2625: IF (g_asn_debug = 'Y') THEN
2626: asn_debug.put_line('RATE/TEMP LABOR. They can have the foll values. Hence return.');
2627: END IF;
2628:
2629: RETURN;
2622: IF x_cascaded_table(n).error_status IN('S', 'W') THEN --{
2623: IF ( x_cascaded_table(n).value_basis = 'RATE'
2624: AND x_cascaded_table(n).purchase_basis = 'TEMP LABOR') THEN
2625: IF (g_asn_debug = 'Y') THEN
2626: asn_debug.put_line('RATE/TEMP LABOR. They can have the foll values. Hence return.');
2627: END IF;
2628:
2629: RETURN;
2630: END IF;
2638: OR x_cascaded_table(n).po_unit_price IS NOT NULL
2639: OR x_cascaded_table(n).timecard_id IS NOT NULL
2640: OR x_cascaded_table(n).timecard_ovn IS NOT NULL
2641: ) THEN --{
2642: IF (g_asn_debug = 'Y') THEN
2643: asn_debug.put_line('Not RATE/TEMP LABOR');
2644: END IF;
2645:
2646: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
2639: OR x_cascaded_table(n).timecard_id IS NOT NULL
2640: OR x_cascaded_table(n).timecard_ovn IS NOT NULL
2641: ) THEN --{
2642: IF (g_asn_debug = 'Y') THEN
2643: asn_debug.put_line('Not RATE/TEMP LABOR');
2644: END IF;
2645:
2646: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
2647: rcv_error_pkg.set_error_message('RCV_IRRELEVANT_VALUES', x_cascaded_table(n).error_message);
2649: END IF; --}
2650: END IF; --}
2651: END IF; --}
2652:
2653: IF (g_asn_debug = 'Y') THEN
2654: asn_debug.put_line('Leave validate_non_services_fields');
2655: END IF;
2656: EXCEPTION
2657: WHEN OTHERS THEN
2650: END IF; --}
2651: END IF; --}
2652:
2653: IF (g_asn_debug = 'Y') THEN
2654: asn_debug.put_line('Leave validate_non_services_fields');
2655: END IF;
2656: EXCEPTION
2657: WHEN OTHERS THEN
2658: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_unexp_error;
2674: l_from_locator_id rcv_transactions.from_locator_id%TYPE;
2675: l_to_subinventory rcv_transactions.subinventory%TYPE;
2676: l_to_locator_id rcv_transactions.locator_id%TYPE;
2677: BEGIN
2678: IF (g_asn_debug = 'Y') THEN
2679: asn_debug.put_line('inside default_from_subloc_info');
2680: END IF;
2681:
2682: /* If parent_interface_id is not null then it means it is a parent
2675: l_to_subinventory rcv_transactions.subinventory%TYPE;
2676: l_to_locator_id rcv_transactions.locator_id%TYPE;
2677: BEGIN
2678: IF (g_asn_debug = 'Y') THEN
2679: asn_debug.put_line('inside default_from_subloc_info');
2680: END IF;
2681:
2682: /* If parent_interface_id is not null then it means it is a parent
2683: * child relation ship. So look in rti. If parent_transaction_id
2706: FROM rcv_transactions rt
2707: WHERE rt.transaction_id = x_cascaded_table(n).parent_transaction_id;
2708: END IF;
2709:
2710: IF (g_asn_debug = 'Y') THEN
2711: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2712: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2713: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2714: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2707: WHERE rt.transaction_id = x_cascaded_table(n).parent_transaction_id;
2708: END IF;
2709:
2710: IF (g_asn_debug = 'Y') THEN
2711: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2712: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2713: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2714: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2715: END IF;
2708: END IF;
2709:
2710: IF (g_asn_debug = 'Y') THEN
2711: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2712: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2713: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2714: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2715: END IF;
2716:
2709:
2710: IF (g_asn_debug = 'Y') THEN
2711: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2712: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2713: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2714: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2715: END IF;
2716:
2717: /* For Accept, Reject and +ve corrections, from_subinventory and
2710: IF (g_asn_debug = 'Y') THEN
2711: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2712: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2713: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2714: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2715: END IF;
2716:
2717: /* For Accept, Reject and +ve corrections, from_subinventory and
2718: * from_locator is same as that of the parent. For RTV, this will come here only
2733: x_cascaded_table(n).from_subinventory := l_to_subinventory;
2734: x_cascaded_table(n).from_locator_id := l_to_locator_id;
2735: END IF;
2736:
2737: IF (g_asn_debug = 'Y') THEN
2738: asn_debug.put_line('x_cascaded_table(n).from_subinventory ' || x_cascaded_table(n).from_subinventory);
2739: asn_debug.put_line('x_cascaded_table(n).from_locator_id ' || x_cascaded_table(n).from_locator_id);
2740: END IF;
2741: EXCEPTION
2734: x_cascaded_table(n).from_locator_id := l_to_locator_id;
2735: END IF;
2736:
2737: IF (g_asn_debug = 'Y') THEN
2738: asn_debug.put_line('x_cascaded_table(n).from_subinventory ' || x_cascaded_table(n).from_subinventory);
2739: asn_debug.put_line('x_cascaded_table(n).from_locator_id ' || x_cascaded_table(n).from_locator_id);
2740: END IF;
2741: EXCEPTION
2742: WHEN OTHERS THEN
2735: END IF;
2736:
2737: IF (g_asn_debug = 'Y') THEN
2738: asn_debug.put_line('x_cascaded_table(n).from_subinventory ' || x_cascaded_table(n).from_subinventory);
2739: asn_debug.put_line('x_cascaded_table(n).from_locator_id ' || x_cascaded_table(n).from_locator_id);
2740: END IF;
2741: EXCEPTION
2742: WHEN OTHERS THEN
2743: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_unexp_error;
2757: x_default_subinventory VARCHAR2(10);
2758: x_default_locator_id NUMBER;
2759: x_success BOOLEAN;
2760: BEGIN
2761: IF (g_asn_debug = 'Y') THEN
2762: asn_debug.put_line('inside default_to_subloc_info');
2763: END IF;
2764:
2765: /* Get default subinventory from the setup if it is a direct delivery
2758: x_default_locator_id NUMBER;
2759: x_success BOOLEAN;
2760: BEGIN
2761: IF (g_asn_debug = 'Y') THEN
2762: asn_debug.put_line('inside default_to_subloc_info');
2763: END IF;
2764:
2765: /* Get default subinventory from the setup if it is a direct delivery
2766: * or just a delivery and if subinventory is null.
2785: x_cascaded_table(n).item_id,
2786: x_cascaded_table(n).subinventory
2787: );
2788:
2789: IF (g_asn_debug = 'Y') THEN
2790: asn_debug.put_line('Defaulting subinventory from item: Sub = ' || x_cascaded_table(n).subinventory);
2791: END IF;
2792: END IF; --} (X_cascaded_table(n).subinventory IS NULL)
2793: END IF; --}
2786: x_cascaded_table(n).subinventory
2787: );
2788:
2789: IF (g_asn_debug = 'Y') THEN
2790: asn_debug.put_line('Defaulting subinventory from item: Sub = ' || x_cascaded_table(n).subinventory);
2791: END IF;
2792: END IF; --} (X_cascaded_table(n).subinventory IS NULL)
2793: END IF; --}
2794:
2803: x_cascaded_table(n).item_id,
2804: x_locator_control
2805: );
2806:
2807: IF (g_asn_debug = 'Y') THEN
2808: asn_debug.put_line('Locator Control = ' || TO_CHAR(x_locator_control));
2809: END IF;
2810:
2811: /*
2804: x_locator_control
2805: );
2806:
2807: IF (g_asn_debug = 'Y') THEN
2808: asn_debug.put_line('Locator Control = ' || TO_CHAR(x_locator_control));
2809: END IF;
2810:
2811: /*
2812: ** If locator control is 2 which means it is under predefined
2822: x_cascaded_table(n).subinventory,
2823: x_cascaded_table(n).locator_id
2824: );
2825:
2826: IF (g_asn_debug = 'Y') THEN
2827: asn_debug.put_line('Defaulting locator from Sub: Locator_id = ' || TO_CHAR(x_cascaded_table(n).locator_id));
2828: END IF;
2829: END IF; --}
2830: END IF; --} matches subinventory not null
2823: x_cascaded_table(n).locator_id
2824: );
2825:
2826: IF (g_asn_debug = 'Y') THEN
2827: asn_debug.put_line('Defaulting locator from Sub: Locator_id = ' || TO_CHAR(x_cascaded_table(n).locator_id));
2828: END IF;
2829: END IF; --}
2830: END IF; --} matches subinventory not null
2831:
2865: * been enabled and change the transaction back to ASN import*/
2866: IF ( (x_auto_deliver = 'Y') AND
2867: (x_cascaded_table(n).subinventory IS NULL)) THEN --{
2868:
2869: IF (g_asn_debug = 'Y') THEN
2870: asn_debug.put_line('Warning: Changing the dropship ASN auto deliver back to ASN import.');
2871: asn_debug.put_line('Cause: Receiving preprocessor could not default a subinventory for this trxn.');
2872: END IF;
2873:
2866: IF ( (x_auto_deliver = 'Y') AND
2867: (x_cascaded_table(n).subinventory IS NULL)) THEN --{
2868:
2869: IF (g_asn_debug = 'Y') THEN
2870: asn_debug.put_line('Warning: Changing the dropship ASN auto deliver back to ASN import.');
2871: asn_debug.put_line('Cause: Receiving preprocessor could not default a subinventory for this trxn.');
2872: END IF;
2873:
2874: -- Change the transaction back to ASN import
2867: (x_cascaded_table(n).subinventory IS NULL)) THEN --{
2868:
2869: IF (g_asn_debug = 'Y') THEN
2870: asn_debug.put_line('Warning: Changing the dropship ASN auto deliver back to ASN import.');
2871: asn_debug.put_line('Cause: Receiving preprocessor could not default a subinventory for this trxn.');
2872: END IF;
2873:
2874: -- Change the transaction back to ASN import
2875: x_cascaded_table(n).transaction_type := 'SHIP';
2897: IF ( ( ( x_cascaded_table(n).transaction_type = 'CORRECT'
2898: AND SIGN(x_cascaded_table(n).quantity) = 1)
2899: OR (x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING'))
2900: AND (x_cascaded_table(n).transfer_lpn_id IS NOT NULL)) THEN
2901: IF (g_asn_debug = 'Y') THEN
2902: asn_debug.put_line('+Ve correct or RTR with transfer_lpn_id not null');
2903: END IF;
2904:
2905: SELECT subinventory_code,
2898: AND SIGN(x_cascaded_table(n).quantity) = 1)
2899: OR (x_cascaded_table(n).transaction_type = 'RETURN TO RECEIVING'))
2900: AND (x_cascaded_table(n).transfer_lpn_id IS NOT NULL)) THEN
2901: IF (g_asn_debug = 'Y') THEN
2902: asn_debug.put_line('+Ve correct or RTR with transfer_lpn_id not null');
2903: END IF;
2904:
2905: SELECT subinventory_code,
2906: locator_id
2908: x_cascaded_table(n).locator_id
2909: FROM wms_license_plate_numbers
2910: WHERE lpn_id = x_cascaded_table(n).transfer_lpn_id;
2911:
2912: IF (g_asn_debug = 'Y') THEN
2913: asn_debug.put_line('Sub is ' || x_cascaded_table(n).subinventory);
2914: asn_debug.put_line('Loc is ' || x_cascaded_table(n).locator_id);
2915: asn_debug.put_line('Return ');
2916: END IF;
2909: FROM wms_license_plate_numbers
2910: WHERE lpn_id = x_cascaded_table(n).transfer_lpn_id;
2911:
2912: IF (g_asn_debug = 'Y') THEN
2913: asn_debug.put_line('Sub is ' || x_cascaded_table(n).subinventory);
2914: asn_debug.put_line('Loc is ' || x_cascaded_table(n).locator_id);
2915: asn_debug.put_line('Return ');
2916: END IF;
2917:
2910: WHERE lpn_id = x_cascaded_table(n).transfer_lpn_id;
2911:
2912: IF (g_asn_debug = 'Y') THEN
2913: asn_debug.put_line('Sub is ' || x_cascaded_table(n).subinventory);
2914: asn_debug.put_line('Loc is ' || x_cascaded_table(n).locator_id);
2915: asn_debug.put_line('Return ');
2916: END IF;
2917:
2918: RETURN;
2911:
2912: IF (g_asn_debug = 'Y') THEN
2913: asn_debug.put_line('Sub is ' || x_cascaded_table(n).subinventory);
2914: asn_debug.put_line('Loc is ' || x_cascaded_table(n).locator_id);
2915: asn_debug.put_line('Return ');
2916: END IF;
2917:
2918: RETURN;
2919: END IF;
2920:
2921: IF ( ( x_cascaded_table(n).transaction_type = 'CORRECT'
2922: AND SIGN(x_cascaded_table(n).quantity) = -1)
2923: AND (x_cascaded_table(n).lpn_id IS NOT NULL)) THEN
2924: IF (g_asn_debug = 'Y') THEN
2925: asn_debug.put_line('-Ve correct with lpn_id not null');
2926: END IF;
2927:
2928: SELECT subinventory_code,
2921: IF ( ( x_cascaded_table(n).transaction_type = 'CORRECT'
2922: AND SIGN(x_cascaded_table(n).quantity) = -1)
2923: AND (x_cascaded_table(n).lpn_id IS NOT NULL)) THEN
2924: IF (g_asn_debug = 'Y') THEN
2925: asn_debug.put_line('-Ve correct with lpn_id not null');
2926: END IF;
2927:
2928: SELECT subinventory_code,
2929: locator_id
2931: x_cascaded_table(n).locator_id
2932: FROM wms_license_plate_numbers
2933: WHERE lpn_id = x_cascaded_table(n).lpn_id;
2934:
2935: IF (g_asn_debug = 'Y') THEN
2936: asn_debug.put_line('Sub is ' || x_cascaded_table(n).subinventory);
2937: asn_debug.put_line('Loc is ' || x_cascaded_table(n).locator_id);
2938: asn_debug.put_line('Return ');
2939: END IF;
2932: FROM wms_license_plate_numbers
2933: WHERE lpn_id = x_cascaded_table(n).lpn_id;
2934:
2935: IF (g_asn_debug = 'Y') THEN
2936: asn_debug.put_line('Sub is ' || x_cascaded_table(n).subinventory);
2937: asn_debug.put_line('Loc is ' || x_cascaded_table(n).locator_id);
2938: asn_debug.put_line('Return ');
2939: END IF;
2940:
2933: WHERE lpn_id = x_cascaded_table(n).lpn_id;
2934:
2935: IF (g_asn_debug = 'Y') THEN
2936: asn_debug.put_line('Sub is ' || x_cascaded_table(n).subinventory);
2937: asn_debug.put_line('Loc is ' || x_cascaded_table(n).locator_id);
2938: asn_debug.put_line('Return ');
2939: END IF;
2940:
2941: RETURN;
2934:
2935: IF (g_asn_debug = 'Y') THEN
2936: asn_debug.put_line('Sub is ' || x_cascaded_table(n).subinventory);
2937: asn_debug.put_line('Loc is ' || x_cascaded_table(n).locator_id);
2938: asn_debug.put_line('Return ');
2939: END IF;
2940:
2941: RETURN;
2942: END IF;
2970: FROM rcv_transactions rt
2971: WHERE rt.transaction_id = x_cascaded_table(n).parent_transaction_id;
2972: END IF;
2973:
2974: IF (g_asn_debug = 'Y') THEN
2975: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2976: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2977: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2978: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2971: WHERE rt.transaction_id = x_cascaded_table(n).parent_transaction_id;
2972: END IF;
2973:
2974: IF (g_asn_debug = 'Y') THEN
2975: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2976: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2977: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2978: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2979: END IF;
2972: END IF;
2973:
2974: IF (g_asn_debug = 'Y') THEN
2975: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2976: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2977: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2978: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2979: END IF;
2980:
2973:
2974: IF (g_asn_debug = 'Y') THEN
2975: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2976: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2977: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2978: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2979: END IF;
2980:
2981: /* For Accept, Reject and +ve corrections, to_subinventory and
2974: IF (g_asn_debug = 'Y') THEN
2975: asn_debug.put_line('l_to_subinventory ' || l_to_subinventory);
2976: asn_debug.put_line('l_to_locator_id ' || l_to_locator_id);
2977: asn_debug.put_line('l_from_subinventory, ' || l_from_subinventory);
2978: asn_debug.put_line('l_from_locator_id ' || l_from_locator_id);
2979: END IF;
2980:
2981: /* For Accept, Reject and +ve corrections, to_subinventory and
2982: * to_locator is same as that of the parent.
2990: x_cascaded_table(n).subinventory := l_from_subinventory;
2991: x_cascaded_table(n).locator_id := l_from_locator_id;
2992: END IF;
2993:
2994: IF (g_asn_debug = 'Y') THEN
2995: asn_debug.put_line('x_cascaded_table(n).subinventory ' || x_cascaded_table(n).subinventory);
2996: asn_debug.put_line('x_cascaded_table(n).locator_id ' || x_cascaded_table(n).locator_id);
2997: END IF;
2998:
2991: x_cascaded_table(n).locator_id := l_from_locator_id;
2992: END IF;
2993:
2994: IF (g_asn_debug = 'Y') THEN
2995: asn_debug.put_line('x_cascaded_table(n).subinventory ' || x_cascaded_table(n).subinventory);
2996: asn_debug.put_line('x_cascaded_table(n).locator_id ' || x_cascaded_table(n).locator_id);
2997: END IF;
2998:
2999: EXCEPTION
2992: END IF;
2993:
2994: IF (g_asn_debug = 'Y') THEN
2995: asn_debug.put_line('x_cascaded_table(n).subinventory ' || x_cascaded_table(n).subinventory);
2996: asn_debug.put_line('x_cascaded_table(n).locator_id ' || x_cascaded_table(n).locator_id);
2997: END IF;
2998:
2999: EXCEPTION
3000: WHEN OTHERS THEN
3012: BEGIN
3013: IF (x_cascaded_table(n).error_status IN('S', 'W'))
3014: AND ( x_cascaded_table(n).reason_id IS NULL
3015: AND x_cascaded_table(n).reason_name IS NOT NULL) THEN
3016: IF (g_asn_debug = 'Y') THEN
3017: asn_debug.put_line('X_progress ' || x_progress);
3018: END IF;
3019:
3020: reason_id_record.reason_name := x_cascaded_table(n).reason_name;
3013: IF (x_cascaded_table(n).error_status IN('S', 'W'))
3014: AND ( x_cascaded_table(n).reason_id IS NULL
3015: AND x_cascaded_table(n).reason_name IS NOT NULL) THEN
3016: IF (g_asn_debug = 'Y') THEN
3017: asn_debug.put_line('X_progress ' || x_progress);
3018: END IF;
3019:
3020: reason_id_record.reason_name := x_cascaded_table(n).reason_name;
3021: reason_id_record.error_record.error_status := 'S';
3020: reason_id_record.reason_name := x_cascaded_table(n).reason_name;
3021: reason_id_record.error_record.error_status := 'S';
3022: reason_id_record.error_record.error_message := NULL;
3023:
3024: IF (g_asn_debug = 'Y') THEN
3025: asn_debug.put_line('Derive Reason_id');
3026: END IF;
3027:
3028: rcv_transactions_interface_sv.get_reason_id(reason_id_record);
3021: reason_id_record.error_record.error_status := 'S';
3022: reason_id_record.error_record.error_message := NULL;
3023:
3024: IF (g_asn_debug = 'Y') THEN
3025: asn_debug.put_line('Derive Reason_id');
3026: END IF;
3027:
3028: rcv_transactions_interface_sv.get_reason_id(reason_id_record);
3029: x_cascaded_table(n).reason_id := reason_id_record.reason_id;
3047: WHERE line_location_id = x_cascaded_table(n).po_line_location_id;
3048: -- if no data found, do nothing
3049: EXCEPTION
3050: WHEN NO_DATA_FOUND THEN
3051: IF (g_asn_debug = 'Y') THEN
3052: asn_debug.put_line('No data found for dropship flag');
3053: END IF;
3054: END;
3055:
3048: -- if no data found, do nothing
3049: EXCEPTION
3050: WHEN NO_DATA_FOUND THEN
3051: IF (g_asn_debug = 'Y') THEN
3052: asn_debug.put_line('No data found for dropship flag');
3053: END IF;
3054: END;
3055:
3056: /* FPJ Services. If matching_basis is AMOUNT, then this is a service
3067: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
3068: rcv_error_pkg.set_error_message('RCV_DIRECT_DEL_REQ', x_cascaded_table(n).error_message);
3069: rcv_error_pkg.log_interface_warning('DOCUMENT_NUM');
3070:
3071: IF (g_asn_debug = 'Y') THEN
3072: asn_debug.put_line('AFter Warning insert into po_interface_errors ' || x_cascaded_table(n).error_message);
3073: END IF;
3074: END IF; --}
3075:
3068: rcv_error_pkg.set_error_message('RCV_DIRECT_DEL_REQ', x_cascaded_table(n).error_message);
3069: rcv_error_pkg.log_interface_warning('DOCUMENT_NUM');
3070:
3071: IF (g_asn_debug = 'Y') THEN
3072: asn_debug.put_line('AFter Warning insert into po_interface_errors ' || x_cascaded_table(n).error_message);
3073: END IF;
3074: END IF; --}
3075:
3076: IF (g_asn_debug = 'Y') THEN
3072: asn_debug.put_line('AFter Warning insert into po_interface_errors ' || x_cascaded_table(n).error_message);
3073: END IF;
3074: END IF; --}
3075:
3076: IF (g_asn_debug = 'Y') THEN
3077: asn_debug.put_line('Matching Basis is Amount:Setting RCV Routing to Direct Deliver');
3078: END IF;
3079:
3080: x_cascaded_table(n).routing_header_id := 3;
3073: END IF;
3074: END IF; --}
3075:
3076: IF (g_asn_debug = 'Y') THEN
3077: asn_debug.put_line('Matching Basis is Amount:Setting RCV Routing to Direct Deliver');
3078: END IF;
3079:
3080: x_cascaded_table(n).routing_header_id := 3;
3081: x_cascaded_table(n).auto_transact_code := 'DELIVER';
3091: *
3092: * FPJ International Drop Shipment project - pjiang
3093: */
3094: IF x_drop_ship_flag = 'Y' THEN
3095: IF (g_asn_debug = 'Y') THEN
3096: asn_debug.put_line('Dropship: Setting RCV Routing to Direct Deliver');
3097: END IF;
3098:
3099: x_cascaded_table(n).routing_header_id := 3;
3092: * FPJ International Drop Shipment project - pjiang
3093: */
3094: IF x_drop_ship_flag = 'Y' THEN
3095: IF (g_asn_debug = 'Y') THEN
3096: asn_debug.put_line('Dropship: Setting RCV Routing to Direct Deliver');
3097: END IF;
3098:
3099: x_cascaded_table(n).routing_header_id := 3;
3100: fnd_profile.get('PO_AUTO_DELIVER_DROPSHIP_ASN', x_auto_deliver);
3099: x_cascaded_table(n).routing_header_id := 3;
3100: fnd_profile.get('PO_AUTO_DELIVER_DROPSHIP_ASN', x_auto_deliver);
3101:
3102: IF x_auto_deliver = 'Y' THEN
3103: IF (g_asn_debug = 'Y') THEN
3104: asn_debug.put_line('Dropship: Auto deliver feature enabled, ' || 'set auto_transact_code to DELIVER for drop ship ASNs');
3105: END IF;
3106:
3107: x_cascaded_table(n).auto_transact_code := 'DELIVER';
3100: fnd_profile.get('PO_AUTO_DELIVER_DROPSHIP_ASN', x_auto_deliver);
3101:
3102: IF x_auto_deliver = 'Y' THEN
3103: IF (g_asn_debug = 'Y') THEN
3104: asn_debug.put_line('Dropship: Auto deliver feature enabled, ' || 'set auto_transact_code to DELIVER for drop ship ASNs');
3105: END IF;
3106:
3107: x_cascaded_table(n).auto_transact_code := 'DELIVER';
3108: END IF; -- end auto deliver
3110: END IF; -- end transaction_type = 'SHIP' (ASN)
3111:
3112: IF ( x_cascaded_table(n).auto_transact_code IS NULL
3113: AND x_cascaded_table(n).transaction_type IN('SHIP', 'RECEIVE')) THEN
3114: IF (g_asn_debug = 'Y') THEN
3115: asn_debug.put_line('X_progress ' || x_progress);
3116: asn_debug.put_line('Setting auto_transact_code to transaction_type ' || x_cascaded_table(n).transaction_type);
3117: END IF;
3118:
3111:
3112: IF ( x_cascaded_table(n).auto_transact_code IS NULL
3113: AND x_cascaded_table(n).transaction_type IN('SHIP', 'RECEIVE')) THEN
3114: IF (g_asn_debug = 'Y') THEN
3115: asn_debug.put_line('X_progress ' || x_progress);
3116: asn_debug.put_line('Setting auto_transact_code to transaction_type ' || x_cascaded_table(n).transaction_type);
3117: END IF;
3118:
3119: x_cascaded_table(n).auto_transact_code := x_cascaded_table(n).transaction_type;
3112: IF ( x_cascaded_table(n).auto_transact_code IS NULL
3113: AND x_cascaded_table(n).transaction_type IN('SHIP', 'RECEIVE')) THEN
3114: IF (g_asn_debug = 'Y') THEN
3115: asn_debug.put_line('X_progress ' || x_progress);
3116: asn_debug.put_line('Setting auto_transact_code to transaction_type ' || x_cascaded_table(n).transaction_type);
3117: END IF;
3118:
3119: x_cascaded_table(n).auto_transact_code := x_cascaded_table(n).transaction_type;
3120: END IF;
3125: -- Change transaction type based on combination of
3126: -- transaction_type and auto_transact_code
3127:
3128: IF (x_cascaded_table(n).error_status IN('S', 'W')) THEN
3129: IF (g_asn_debug = 'Y') THEN
3130: asn_debug.put_line('X_progress ' || x_progress);
3131: END IF;
3132:
3133: IF x_cascaded_table(n).transaction_type = 'SHIP'
3126: -- transaction_type and auto_transact_code
3127:
3128: IF (x_cascaded_table(n).error_status IN('S', 'W')) THEN
3129: IF (g_asn_debug = 'Y') THEN
3130: asn_debug.put_line('X_progress ' || x_progress);
3131: END IF;
3132:
3133: IF x_cascaded_table(n).transaction_type = 'SHIP'
3134: AND x_cascaded_table(n).auto_transact_code = 'DELIVER' THEN
3131: END IF;
3132:
3133: IF x_cascaded_table(n).transaction_type = 'SHIP'
3134: AND x_cascaded_table(n).auto_transact_code = 'DELIVER' THEN
3135: IF (g_asn_debug = 'Y') THEN
3136: asn_debug.put_line('Changing the transaction_type to RECEIVE FROM SHIP');
3137: END IF;
3138:
3139: x_cascaded_table(n).transaction_type := 'RECEIVE';
3132:
3133: IF x_cascaded_table(n).transaction_type = 'SHIP'
3134: AND x_cascaded_table(n).auto_transact_code = 'DELIVER' THEN
3135: IF (g_asn_debug = 'Y') THEN
3136: asn_debug.put_line('Changing the transaction_type to RECEIVE FROM SHIP');
3137: END IF;
3138:
3139: x_cascaded_table(n).transaction_type := 'RECEIVE';
3140: END IF;
3478: x_include_closed_po,
3479: defined
3480: );
3481:
3482: IF (g_asn_debug = 'Y') THEN
3483: asn_debug.put_line('Include closed PO profile value ' || x_include_closed_po);
3484: END IF;
3485:
3486: IF (g_asn_debug = 'Y') THEN
3479: defined
3480: );
3481:
3482: IF (g_asn_debug = 'Y') THEN
3483: asn_debug.put_line('Include closed PO profile value ' || x_include_closed_po);
3484: END IF;
3485:
3486: IF (g_asn_debug = 'Y') THEN
3487: asn_debug.put_line('X_progress ' || x_progress);
3482: IF (g_asn_debug = 'Y') THEN
3483: asn_debug.put_line('Include closed PO profile value ' || x_include_closed_po);
3484: END IF;
3485:
3486: IF (g_asn_debug = 'Y') THEN
3487: asn_debug.put_line('X_progress ' || x_progress);
3488: END IF;
3489:
3490: IF x_cascaded_table(n).error_status IN('S', 'W')
3483: asn_debug.put_line('Include closed PO profile value ' || x_include_closed_po);
3484: END IF;
3485:
3486: IF (g_asn_debug = 'Y') THEN
3487: asn_debug.put_line('X_progress ' || x_progress);
3488: END IF;
3489:
3490: IF x_cascaded_table(n).error_status IN('S', 'W')
3491: AND x_cascaded_table(n).quantity <= 0 THEN --{
3488: END IF;
3489:
3490: IF x_cascaded_table(n).error_status IN('S', 'W')
3491: AND x_cascaded_table(n).quantity <= 0 THEN --{
3492: IF (g_asn_debug = 'Y') THEN
3493: asn_debug.put_line('Quantity is <= zero. Cascade will fail');
3494: END IF;
3495:
3496: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
3489:
3490: IF x_cascaded_table(n).error_status IN('S', 'W')
3491: AND x_cascaded_table(n).quantity <= 0 THEN --{
3492: IF (g_asn_debug = 'Y') THEN
3493: asn_debug.put_line('Quantity is <= zero. Cascade will fail');
3494: END IF;
3495:
3496: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
3497: rcv_error_pkg.set_error_message('RCV_ITEM_NO_SHIP_QTY', x_cascaded_table(n).error_message);
3510: such a way that the ROI validation does'nt error out when
3511: po_line_id is populated for one time items. */
3512: x_progress := '098';
3513:
3514: IF (g_asn_debug = 'Y') THEN
3515: asn_debug.put_line('X_progress ' || x_progress);
3516: END IF;
3517:
3518: IF ( ( x_cascaded_table(n).po_header_id IS NOT NULL
3511: po_line_id is populated for one time items. */
3512: x_progress := '098';
3513:
3514: IF (g_asn_debug = 'Y') THEN
3515: asn_debug.put_line('X_progress ' || x_progress);
3516: END IF;
3517:
3518: IF ( ( x_cascaded_table(n).po_header_id IS NOT NULL
3519: AND ( x_cascaded_table(n).item_id IS NOT NULL
3524: AND x_cascaded_table(n).error_status IN('S', 'W')
3525: ) THEN --{
3526:
3527: -- Copy record from main table to temp table
3528: IF (g_asn_debug = 'Y') THEN
3529: asn_debug.put_line('Copy record from main table to temp table');
3530: END IF;
3531:
3532: current_n := 1;
3525: ) THEN --{
3526:
3527: -- Copy record from main table to temp table
3528: IF (g_asn_debug = 'Y') THEN
3529: asn_debug.put_line('Copy record from main table to temp table');
3530: END IF;
3531:
3532: current_n := 1;
3533: temp_cascaded_table(current_n) := x_cascaded_table(n);
3538: x_is_asn := FALSE;
3539: END IF;
3540:
3541: -- Get all rows which meet this condition
3542: IF (g_asn_debug = 'Y') THEN
3543: asn_debug.put_line('Get all rows which meet this condition');
3544: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
3545: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
3546:
3539: END IF;
3540:
3541: -- Get all rows which meet this condition
3542: IF (g_asn_debug = 'Y') THEN
3543: asn_debug.put_line('Get all rows which meet this condition');
3544: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
3545: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
3546:
3547: IF (x_is_asn = TRUE) THEN
3540:
3541: -- Get all rows which meet this condition
3542: IF (g_asn_debug = 'Y') THEN
3543: asn_debug.put_line('Get all rows which meet this condition');
3544: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
3545: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
3546:
3547: IF (x_is_asn = TRUE) THEN
3548: asn_debug.put_line('This is a Receive against an ASN');
3541: -- Get all rows which meet this condition
3542: IF (g_asn_debug = 'Y') THEN
3543: asn_debug.put_line('Get all rows which meet this condition');
3544: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
3545: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
3546:
3547: IF (x_is_asn = TRUE) THEN
3548: asn_debug.put_line('This is a Receive against an ASN');
3549: ELSE
3544: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
3545: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
3546:
3547: IF (x_is_asn = TRUE) THEN
3548: asn_debug.put_line('This is a Receive against an ASN');
3549: ELSE
3550: asn_debug.put_line('This is a Receive against a PO');
3551: END IF;
3552: END IF;
3546:
3547: IF (x_is_asn = TRUE) THEN
3548: asn_debug.put_line('This is a Receive against an ASN');
3549: ELSE
3550: asn_debug.put_line('This is a Receive against a PO');
3551: END IF;
3552: END IF;
3553:
3554: -- bug 1362237 Deriving the document_line_num
3563: FROM po_lines
3564: WHERE po_line_id = temp_cascaded_table(current_n).po_line_id;
3565: EXCEPTION
3566: WHEN OTHERS THEN
3567: IF (g_asn_debug = 'Y') THEN
3568: asn_debug.put_line('wrong po_line_id entered in rcv_transactions_interface');
3569: END IF;
3570: END;
3571: END IF; --}
3564: WHERE po_line_id = temp_cascaded_table(current_n).po_line_id;
3565: EXCEPTION
3566: WHEN OTHERS THEN
3567: IF (g_asn_debug = 'Y') THEN
3568: asn_debug.put_line('wrong po_line_id entered in rcv_transactions_interface');
3569: END IF;
3570: END;
3571: END IF; --}
3572:
3578: FROM po_line_locations
3579: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
3580: EXCEPTION
3581: WHEN OTHERS THEN
3582: IF (g_asn_debug = 'Y') THEN
3583: asn_debug.put_line('wrong po_line_location_id entered in rcv_transactions_interface');
3584: END IF;
3585: END;
3586: END IF; --}
3579: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
3580: EXCEPTION
3581: WHEN OTHERS THEN
3582: IF (g_asn_debug = 'Y') THEN
3583: asn_debug.put_line('wrong po_line_location_id entered in rcv_transactions_interface');
3584: END IF;
3585: END;
3586: END IF; --}
3587:
3593: FROM po_distributions
3594: WHERE po_distribution_id = temp_cascaded_table(current_n).po_distribution_id;
3595: EXCEPTION
3596: WHEN OTHERS THEN
3597: IF (g_asn_debug = 'Y') THEN
3598: asn_debug.put_line('wrong po_distribution_id entered in rcv_transactions_interface');
3599: END IF;
3600: END;
3601: END IF; --}
3594: WHERE po_distribution_id = temp_cascaded_table(current_n).po_distribution_id;
3595: EXCEPTION
3596: WHEN OTHERS THEN
3597: IF (g_asn_debug = 'Y') THEN
3598: asn_debug.put_line('wrong po_distribution_id entered in rcv_transactions_interface');
3599: END IF;
3600: END;
3601: END IF; --}
3602:
3615: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
3616: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
3617:
3618: -- if txn != deliver
3619: IF (g_asn_debug = 'Y') THEN
3620: asn_debug.put_line('Open Shipment records');
3621: asn_debug.put_line('Shipment Header Id if this is an ASN receive ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3622: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3616: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
3617:
3618: -- if txn != deliver
3619: IF (g_asn_debug = 'Y') THEN
3620: asn_debug.put_line('Open Shipment records');
3621: asn_debug.put_line('Shipment Header Id if this is an ASN receive ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3622: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3617:
3618: -- if txn != deliver
3619: IF (g_asn_debug = 'Y') THEN
3620: asn_debug.put_line('Open Shipment records');
3621: asn_debug.put_line('Shipment Header Id if this is an ASN receive ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3622: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3618: -- if txn != deliver
3619: IF (g_asn_debug = 'Y') THEN
3620: asn_debug.put_line('Open Shipment records');
3621: asn_debug.put_line('Shipment Header Id if this is an ASN receive ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3622: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3619: IF (g_asn_debug = 'Y') THEN
3620: asn_debug.put_line('Open Shipment records');
3621: asn_debug.put_line('Shipment Header Id if this is an ASN receive ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3622: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3620: asn_debug.put_line('Open Shipment records');
3621: asn_debug.put_line('Shipment Header Id if this is an ASN receive ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3622: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3628: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3621: asn_debug.put_line('Shipment Header Id if this is an ASN receive ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3622: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3628: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3629: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3622: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3628: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3629: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3630: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3623: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3628: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3629: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3630: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3631: asn_debug.put_line('Proceed to open cursor');
3624: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3628: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3629: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3630: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3631: asn_debug.put_line('Proceed to open cursor');
3632: END IF;
3625: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3628: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3629: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3630: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3631: asn_debug.put_line('Proceed to open cursor');
3632: END IF;
3633:
3626: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3628: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3629: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3630: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3631: asn_debug.put_line('Proceed to open cursor');
3632: END IF;
3633:
3634: /* Bug 2208664 : Nullified the ship_to_location_id when calling
3627: asn_debug.put_line('Document distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3628: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3629: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3630: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3631: asn_debug.put_line('Proceed to open cursor');
3632: END IF;
3633:
3634: /* Bug 2208664 : Nullified the ship_to_location_id when calling
3635: the cursors shipments, count_shipments, distributions and
3641: /* Forward port for Bug 4523892 , the use of x_is_asn is commented to make it consistent
3642: with the previous code line
3643: */
3644: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3645: IF (g_asn_debug = 'Y') THEN
3646: asn_debug.put_line('Open ASN Shipment records');
3647: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3648: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3642: with the previous code line
3643: */
3644: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3645: IF (g_asn_debug = 'Y') THEN
3646: asn_debug.put_line('Open ASN Shipment records');
3647: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3648: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3643: */
3644: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3645: IF (g_asn_debug = 'Y') THEN
3646: asn_debug.put_line('Open ASN Shipment records');
3647: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3648: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3644: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3645: IF (g_asn_debug = 'Y') THEN
3646: asn_debug.put_line('Open ASN Shipment records');
3647: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3648: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3645: IF (g_asn_debug = 'Y') THEN
3646: asn_debug.put_line('Open ASN Shipment records');
3647: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3648: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3653: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3646: asn_debug.put_line('Open ASN Shipment records');
3647: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3648: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3653: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3654: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3647: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3648: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3653: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3654: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3655: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3648: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3653: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3654: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3655: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3656: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3649: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3653: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3654: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3655: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3656: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3657: END IF;
3650: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3653: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3654: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3655: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3656: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3657: END IF;
3658:
3651: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3653: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3654: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3655: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3656: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3657: END IF;
3658:
3659: OPEN asn_shipments(temp_cascaded_table(current_n).shipment_header_id,
3652: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3653: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3654: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3655: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3656: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3657: END IF;
3658:
3659: OPEN asn_shipments(temp_cascaded_table(current_n).shipment_header_id,
3660: temp_cascaded_table(current_n).shipment_line_id,
3669: x_include_closed_po
3670: );
3671:
3672: -- count_shipments just gets the count of rows found in shipments
3673: IF (g_asn_debug = 'Y') THEN
3674: asn_debug.put_line('After Open ASN Shipment records');
3675: END IF;
3676:
3677: OPEN count_asn_shipments(temp_cascaded_table(current_n).shipment_header_id,
3670: );
3671:
3672: -- count_shipments just gets the count of rows found in shipments
3673: IF (g_asn_debug = 'Y') THEN
3674: asn_debug.put_line('After Open ASN Shipment records');
3675: END IF;
3676:
3677: OPEN count_asn_shipments(temp_cascaded_table(current_n).shipment_header_id,
3678: temp_cascaded_table(current_n).shipment_line_id,
3686: temp_cascaded_table(current_n).vendor_item_num,
3687: x_include_closed_po
3688: );
3689:
3690: IF (g_asn_debug = 'Y') THEN
3691: asn_debug.put_line('After Open Count ASN Shipment records');
3692: END IF;
3693: ELSE --}{
3694: IF (g_asn_debug = 'Y') THEN
3687: x_include_closed_po
3688: );
3689:
3690: IF (g_asn_debug = 'Y') THEN
3691: asn_debug.put_line('After Open Count ASN Shipment records');
3692: END IF;
3693: ELSE --}{
3694: IF (g_asn_debug = 'Y') THEN
3695: asn_debug.put_line('Open PO Shipment records');
3690: IF (g_asn_debug = 'Y') THEN
3691: asn_debug.put_line('After Open Count ASN Shipment records');
3692: END IF;
3693: ELSE --}{
3694: IF (g_asn_debug = 'Y') THEN
3695: asn_debug.put_line('Open PO Shipment records');
3696: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3697: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3691: asn_debug.put_line('After Open Count ASN Shipment records');
3692: END IF;
3693: ELSE --}{
3694: IF (g_asn_debug = 'Y') THEN
3695: asn_debug.put_line('Open PO Shipment records');
3696: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3697: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3699: asn_debug.put_line('line_location_id ' || temp_cascaded_table(current_n).po_line_location_id);
3692: END IF;
3693: ELSE --}{
3694: IF (g_asn_debug = 'Y') THEN
3695: asn_debug.put_line('Open PO Shipment records');
3696: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3697: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3699: asn_debug.put_line('line_location_id ' || temp_cascaded_table(current_n).po_line_location_id);
3700: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3693: ELSE --}{
3694: IF (g_asn_debug = 'Y') THEN
3695: asn_debug.put_line('Open PO Shipment records');
3696: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3697: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3699: asn_debug.put_line('line_location_id ' || temp_cascaded_table(current_n).po_line_location_id);
3700: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3701: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3694: IF (g_asn_debug = 'Y') THEN
3695: asn_debug.put_line('Open PO Shipment records');
3696: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3697: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3699: asn_debug.put_line('line_location_id ' || temp_cascaded_table(current_n).po_line_location_id);
3700: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3701: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3702: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3695: asn_debug.put_line('Open PO Shipment records');
3696: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3697: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3699: asn_debug.put_line('line_location_id ' || temp_cascaded_table(current_n).po_line_location_id);
3700: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3701: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3702: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3703: END IF;
3696: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3697: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3699: asn_debug.put_line('line_location_id ' || temp_cascaded_table(current_n).po_line_location_id);
3700: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3701: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3702: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3703: END IF;
3704:
3697: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3699: asn_debug.put_line('line_location_id ' || temp_cascaded_table(current_n).po_line_location_id);
3700: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3701: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3702: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3703: END IF;
3704:
3705: OPEN shipments(temp_cascaded_table(current_n).po_header_id,
3698: asn_debug.put_line('document_line_num ' || temp_cascaded_table(current_n).document_line_num);
3699: asn_debug.put_line('line_location_id ' || temp_cascaded_table(current_n).po_line_location_id);
3700: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3701: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3702: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3703: END IF;
3704:
3705: OPEN shipments(temp_cascaded_table(current_n).po_header_id,
3706: temp_cascaded_table(current_n).item_id,
3723: temp_cascaded_table(current_n).vendor_item_num
3724: );
3725: END IF; --}
3726:
3727: IF (g_asn_debug = 'Y') THEN
3728: asn_debug.put_line('After opening relavant records for Receive');
3729: END IF;
3730: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
3731: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --}{
3724: );
3725: END IF; --}
3726:
3727: IF (g_asn_debug = 'Y') THEN
3728: asn_debug.put_line('After opening relavant records for Receive');
3729: END IF;
3730: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
3731: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --}{
3732: IF (g_asn_debug = 'Y') THEN
3728: asn_debug.put_line('After opening relavant records for Receive');
3729: END IF;
3730: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
3731: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --}{
3732: IF (g_asn_debug = 'Y') THEN
3733: asn_debug.put_line('Open Distribution records');
3734: asn_debug.put_line('Ship Header id ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3735: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3729: END IF;
3730: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
3731: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --}{
3732: IF (g_asn_debug = 'Y') THEN
3733: asn_debug.put_line('Open Distribution records');
3734: asn_debug.put_line('Ship Header id ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3735: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3730: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
3731: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --}{
3732: IF (g_asn_debug = 'Y') THEN
3733: asn_debug.put_line('Open Distribution records');
3734: asn_debug.put_line('Ship Header id ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3735: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3731: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --}{
3732: IF (g_asn_debug = 'Y') THEN
3733: asn_debug.put_line('Open Distribution records');
3734: asn_debug.put_line('Ship Header id ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3735: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3732: IF (g_asn_debug = 'Y') THEN
3733: asn_debug.put_line('Open Distribution records');
3734: asn_debug.put_line('Ship Header id ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3735: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3733: asn_debug.put_line('Open Distribution records');
3734: asn_debug.put_line('Ship Header id ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3735: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3741: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3734: asn_debug.put_line('Ship Header id ' || TO_CHAR(temp_cascaded_table(current_n).shipment_header_id));
3735: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3741: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3742: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3735: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_header_id));
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3741: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3742: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3743: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3736: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3741: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3742: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3743: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3744: asn_debug.put_line('Proceed to open cursor');
3737: asn_debug.put_line('PO Line Num ' || TO_CHAR(temp_cascaded_table(current_n).document_line_num));
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3741: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3742: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3743: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3744: asn_debug.put_line('Proceed to open cursor');
3745: END IF;
3738: asn_debug.put_line('PO Release Id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3741: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3742: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3743: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3744: asn_debug.put_line('Proceed to open cursor');
3745: END IF;
3746:
3739: asn_debug.put_line('Shipment Line num ' || TO_CHAR(temp_cascaded_table(current_n).document_shipment_line_num));
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3741: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3742: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3743: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3744: asn_debug.put_line('Proceed to open cursor');
3745: END IF;
3746:
3747: /* IF (x_is_asn = TRUE) THEN --{ This call is replaced by forward port of 4523892 */
3740: asn_debug.put_line('Distribution num ' || TO_CHAR(temp_cascaded_table(current_n).document_distribution_num));
3741: asn_debug.put_line('Ship To Organization ID ' || TO_CHAR(temp_cascaded_table(current_n).to_organization_id));
3742: asn_debug.put_line('Ship To Location Id ' || TO_CHAR(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id)));
3743: asn_debug.put_line('Vendor Item Num ' || temp_cascaded_table(current_n).vendor_item_num);
3744: asn_debug.put_line('Proceed to open cursor');
3745: END IF;
3746:
3747: /* IF (x_is_asn = TRUE) THEN --{ This call is replaced by forward port of 4523892 */
3748: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3745: END IF;
3746:
3747: /* IF (x_is_asn = TRUE) THEN --{ This call is replaced by forward port of 4523892 */
3748: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3749: IF (g_asn_debug = 'Y') THEN
3750: asn_debug.put_line('Open ASN Distribution records');
3751: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3752: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3746:
3747: /* IF (x_is_asn = TRUE) THEN --{ This call is replaced by forward port of 4523892 */
3748: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3749: IF (g_asn_debug = 'Y') THEN
3750: asn_debug.put_line('Open ASN Distribution records');
3751: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3752: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3747: /* IF (x_is_asn = TRUE) THEN --{ This call is replaced by forward port of 4523892 */
3748: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3749: IF (g_asn_debug = 'Y') THEN
3750: asn_debug.put_line('Open ASN Distribution records');
3751: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3752: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3748: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3749: IF (g_asn_debug = 'Y') THEN
3750: asn_debug.put_line('Open ASN Distribution records');
3751: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3752: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3749: IF (g_asn_debug = 'Y') THEN
3750: asn_debug.put_line('Open ASN Distribution records');
3751: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3752: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3757: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3750: asn_debug.put_line('Open ASN Distribution records');
3751: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3752: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3757: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3758: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3751: asn_debug.put_line('shipment_header_id ' || temp_cascaded_table(current_n).shipment_header_id);
3752: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3757: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3758: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3759: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3752: asn_debug.put_line('shipment_line_id ' || temp_cascaded_table(current_n).shipment_line_id);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3757: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3758: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3759: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3760: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3753: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3757: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3758: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3759: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3760: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3761: END IF;
3754: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3757: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3758: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3759: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3760: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3761: END IF;
3762:
3755: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3757: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3758: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3759: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3760: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3761: END IF;
3762:
3763: OPEN asn_distributions(temp_cascaded_table(current_n).shipment_header_id,
3756: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3757: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3758: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3759: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3760: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
3761: END IF;
3762:
3763: OPEN asn_distributions(temp_cascaded_table(current_n).shipment_header_id,
3764: temp_cascaded_table(current_n).shipment_line_id,
3773: temp_cascaded_table(current_n).vendor_item_num,
3774: x_include_closed_po
3775: );
3776:
3777: IF (g_asn_debug = 'Y') THEN
3778: asn_debug.put_line('After Open ASN distribution records');
3779: END IF;
3780:
3781: OPEN count_asn_distributions(temp_cascaded_table(current_n).shipment_header_id,
3774: x_include_closed_po
3775: );
3776:
3777: IF (g_asn_debug = 'Y') THEN
3778: asn_debug.put_line('After Open ASN distribution records');
3779: END IF;
3780:
3781: OPEN count_asn_distributions(temp_cascaded_table(current_n).shipment_header_id,
3782: temp_cascaded_table(current_n).shipment_line_id,
3791: temp_cascaded_table(current_n).vendor_item_num,
3792: x_include_closed_po
3793: );
3794:
3795: IF (g_asn_debug = 'Y') THEN
3796: asn_debug.put_line('After Open count ASN distribution records');
3797: END IF;
3798: ELSE --}{
3799: IF (g_asn_debug = 'Y') THEN
3792: x_include_closed_po
3793: );
3794:
3795: IF (g_asn_debug = 'Y') THEN
3796: asn_debug.put_line('After Open count ASN distribution records');
3797: END IF;
3798: ELSE --}{
3799: IF (g_asn_debug = 'Y') THEN
3800: asn_debug.put_line('Open PO Distribution records');
3795: IF (g_asn_debug = 'Y') THEN
3796: asn_debug.put_line('After Open count ASN distribution records');
3797: END IF;
3798: ELSE --}{
3799: IF (g_asn_debug = 'Y') THEN
3800: asn_debug.put_line('Open PO Distribution records');
3801: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3802: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3796: asn_debug.put_line('After Open count ASN distribution records');
3797: END IF;
3798: ELSE --}{
3799: IF (g_asn_debug = 'Y') THEN
3800: asn_debug.put_line('Open PO Distribution records');
3801: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3802: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3804: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3797: END IF;
3798: ELSE --}{
3799: IF (g_asn_debug = 'Y') THEN
3800: asn_debug.put_line('Open PO Distribution records');
3801: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3802: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3804: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3805: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3798: ELSE --}{
3799: IF (g_asn_debug = 'Y') THEN
3800: asn_debug.put_line('Open PO Distribution records');
3801: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3802: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3804: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3805: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3806: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3799: IF (g_asn_debug = 'Y') THEN
3800: asn_debug.put_line('Open PO Distribution records');
3801: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3802: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3804: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3805: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3806: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3807: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3800: asn_debug.put_line('Open PO Distribution records');
3801: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3802: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3804: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3805: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3806: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3807: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3808: END IF;
3801: asn_debug.put_line('po_header_id ' || temp_cascaded_table(current_n).po_header_id);
3802: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3804: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3805: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3806: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3807: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3808: END IF;
3809:
3802: asn_debug.put_line('item_id ' || temp_cascaded_table(current_n).item_id);
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3804: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3805: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3806: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3807: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3808: END IF;
3809:
3810: OPEN distributions(temp_cascaded_table(current_n).po_header_id,
3803: asn_debug.put_line('document_num ' || temp_cascaded_table(current_n).document_line_num);
3804: asn_debug.put_line('document_shipment_line_num ' || temp_cascaded_table(current_n).document_shipment_line_num);
3805: asn_debug.put_line('po_release_id ' || temp_cascaded_table(current_n).po_release_id);
3806: asn_debug.put_line('to_organization_id ' || temp_cascaded_table(current_n).to_organization_id);
3807: asn_debug.put_line('vendor_item_num ' || temp_cascaded_table(current_n).vendor_item_num);
3808: END IF;
3809:
3810: OPEN distributions(temp_cascaded_table(current_n).po_header_id,
3811: temp_cascaded_table(current_n).item_id,
3830: temp_cascaded_table(current_n).vendor_item_num
3831: );
3832: END IF; --}
3833:
3834: IF (g_asn_debug = 'Y') THEN
3835: asn_debug.put_line('After opening relavant records for Direct delivery');
3836: END IF;
3837: END IF; -- for txn = deliver --}
3838:
3831: );
3832: END IF; --}
3833:
3834: IF (g_asn_debug = 'Y') THEN
3835: asn_debug.put_line('After opening relavant records for Direct delivery');
3836: END IF;
3837: END IF; -- for txn = deliver --}
3838:
3839:
3838:
3839:
3840: -- Assign shipped quantity to remaining quantity
3841:
3842: IF (g_asn_debug = 'Y') THEN
3843: asn_debug.put_line('Assign shipped quantity to remaining quantity');
3844: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
3845: END IF;
3846:
3839:
3840: -- Assign shipped quantity to remaining quantity
3841:
3842: IF (g_asn_debug = 'Y') THEN
3843: asn_debug.put_line('Assign shipped quantity to remaining quantity');
3844: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
3845: END IF;
3846:
3847: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
3840: -- Assign shipped quantity to remaining quantity
3841:
3842: IF (g_asn_debug = 'Y') THEN
3843: asn_debug.put_line('Assign shipped quantity to remaining quantity');
3844: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
3845: END IF;
3846:
3847: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
3848: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
3847: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
3848: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
3849: x_remaining_qty_po_uom := 0;
3850:
3851: IF (g_asn_debug = 'Y') THEN
3852: asn_debug.put_line('Have assigned the quantity');
3853: END IF;
3854:
3855: -- Calculate tax_amount_factor for calculating tax_amount for
3848: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
3849: x_remaining_qty_po_uom := 0;
3850:
3851: IF (g_asn_debug = 'Y') THEN
3852: asn_debug.put_line('Have assigned the quantity');
3853: END IF;
3854:
3855: -- Calculate tax_amount_factor for calculating tax_amount for
3856: -- each cascaded line
3860: ELSE
3861: tax_amount_factor := 0;
3862: END IF;
3863:
3864: IF (g_asn_debug = 'Y') THEN
3865: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
3866: asn_debug.put_line('Shipped Quantity : ' || TO_CHAR(x_remaining_quantity));
3867: END IF;
3868:
3861: tax_amount_factor := 0;
3862: END IF;
3863:
3864: IF (g_asn_debug = 'Y') THEN
3865: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
3866: asn_debug.put_line('Shipped Quantity : ' || TO_CHAR(x_remaining_quantity));
3867: END IF;
3868:
3869: x_first_trans := TRUE;
3862: END IF;
3863:
3864: IF (g_asn_debug = 'Y') THEN
3865: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
3866: asn_debug.put_line('Shipped Quantity : ' || TO_CHAR(x_remaining_quantity));
3867: END IF;
3868:
3869: x_first_trans := TRUE;
3870: transaction_ok := FALSE;
3876: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
3877: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
3878: /* IF (x_is_asn = TRUE) THEN --{ This is replaced by forward port for bug 4523892 */
3879: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3880: IF (g_asn_debug = 'Y') THEN
3881: asn_debug.put_line('Count of asn shipments');
3882: END IF;
3883:
3884: FETCH count_asn_shipments INTO x_record_count;
3877: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
3878: /* IF (x_is_asn = TRUE) THEN --{ This is replaced by forward port for bug 4523892 */
3879: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3880: IF (g_asn_debug = 'Y') THEN
3881: asn_debug.put_line('Count of asn shipments');
3882: END IF;
3883:
3884: FETCH count_asn_shipments INTO x_record_count;
3885: ELSE --}{
3882: END IF;
3883:
3884: FETCH count_asn_shipments INTO x_record_count;
3885: ELSE --}{
3886: IF (g_asn_debug = 'Y') THEN
3887: asn_debug.put_line('Count of PO shipments');
3888: END IF;
3889:
3890: FETCH count_shipments INTO x_record_count;
3883:
3884: FETCH count_asn_shipments INTO x_record_count;
3885: ELSE --}{
3886: IF (g_asn_debug = 'Y') THEN
3887: asn_debug.put_line('Count of PO shipments');
3888: END IF;
3889:
3890: FETCH count_shipments INTO x_record_count;
3891: END IF; --}
3891: END IF; --}
3892: ELSE --}{
3893: /* IF (x_is_asn = TRUE) THEN --{ This is replaced by forward port for Bug 4523892 */
3894: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3895: IF (g_asn_debug = 'Y') THEN
3896: asn_debug.put_line('Count of asn distributions');
3897: END IF;
3898:
3899: FETCH count_asn_distributions INTO x_record_count;
3892: ELSE --}{
3893: /* IF (x_is_asn = TRUE) THEN --{ This is replaced by forward port for Bug 4523892 */
3894: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
3895: IF (g_asn_debug = 'Y') THEN
3896: asn_debug.put_line('Count of asn distributions');
3897: END IF;
3898:
3899: FETCH count_asn_distributions INTO x_record_count;
3900: ELSE --}{
3897: END IF;
3898:
3899: FETCH count_asn_distributions INTO x_record_count;
3900: ELSE --}{
3901: IF (g_asn_debug = 'Y') THEN
3902: asn_debug.put_line('Count of PO distributions');
3903: END IF;
3904:
3905: FETCH count_distributions INTO x_record_count;
3898:
3899: FETCH count_asn_distributions INTO x_record_count;
3900: ELSE --}{
3901: IF (g_asn_debug = 'Y') THEN
3902: asn_debug.put_line('Count of PO distributions');
3903: END IF;
3904:
3905: FETCH count_distributions INTO x_record_count;
3906: END IF; --}
3905: FETCH count_distributions INTO x_record_count;
3906: END IF; --}
3907: END IF; --}
3908:
3909: IF (g_asn_debug = 'Y') THEN
3910: asn_debug.put_line('Before starting Cascade');
3911: END IF;
3912:
3913: IF (g_asn_debug = 'Y') THEN
3906: END IF; --}
3907: END IF; --}
3908:
3909: IF (g_asn_debug = 'Y') THEN
3910: asn_debug.put_line('Before starting Cascade');
3911: END IF;
3912:
3913: IF (g_asn_debug = 'Y') THEN
3914: asn_debug.put_line('Record Count = ' || x_record_count);
3909: IF (g_asn_debug = 'Y') THEN
3910: asn_debug.put_line('Before starting Cascade');
3911: END IF;
3912:
3913: IF (g_asn_debug = 'Y') THEN
3914: asn_debug.put_line('Record Count = ' || x_record_count);
3915: END IF;
3916:
3917: LOOP --{
3910: asn_debug.put_line('Before starting Cascade');
3911: END IF;
3912:
3913: IF (g_asn_debug = 'Y') THEN
3914: asn_debug.put_line('Record Count = ' || x_record_count);
3915: END IF;
3916:
3917: LOOP --{
3918: IF (g_asn_debug = 'Y') THEN
3914: asn_debug.put_line('Record Count = ' || x_record_count);
3915: END IF;
3916:
3917: LOOP --{
3918: IF (g_asn_debug = 'Y') THEN
3919: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
3920: asn_debug.put_line('Remaining Quantity ASN UOM ' || TO_CHAR(x_remaining_quantity));
3921: END IF;
3922:
3915: END IF;
3916:
3917: LOOP --{
3918: IF (g_asn_debug = 'Y') THEN
3919: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
3920: asn_debug.put_line('Remaining Quantity ASN UOM ' || TO_CHAR(x_remaining_quantity));
3921: END IF;
3922:
3923: IF (g_asn_debug = 'Y') THEN
3916:
3917: LOOP --{
3918: IF (g_asn_debug = 'Y') THEN
3919: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
3920: asn_debug.put_line('Remaining Quantity ASN UOM ' || TO_CHAR(x_remaining_quantity));
3921: END IF;
3922:
3923: IF (g_asn_debug = 'Y') THEN
3924: asn_debug.put_line('open shipments and fetch');
3919: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
3920: asn_debug.put_line('Remaining Quantity ASN UOM ' || TO_CHAR(x_remaining_quantity));
3921: END IF;
3922:
3923: IF (g_asn_debug = 'Y') THEN
3924: asn_debug.put_line('open shipments and fetch');
3925: END IF;
3926:
3927: /*
3920: asn_debug.put_line('Remaining Quantity ASN UOM ' || TO_CHAR(x_remaining_quantity));
3921: END IF;
3922:
3923: IF (g_asn_debug = 'Y') THEN
3924: asn_debug.put_line('open shipments and fetch');
3925: END IF;
3926:
3927: /*
3928: ** Fetch the appropriate record
3926:
3927: /*
3928: ** Fetch the appropriate record
3929: */
3930: IF (g_asn_debug = 'Y') THEN
3931: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
3932: END IF;
3933:
3934: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
3927: /*
3928: ** Fetch the appropriate record
3929: */
3930: IF (g_asn_debug = 'Y') THEN
3931: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
3932: END IF;
3933:
3934: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
3935: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
3932: END IF;
3933:
3934: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
3935: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
3936: IF (g_asn_debug = 'Y') THEN
3937: asn_debug.put_line('Fetching Shipments Cursor');
3938: END IF;
3939:
3940: IF (shipments%ISOPEN) THEN
3933:
3934: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
3935: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
3936: IF (g_asn_debug = 'Y') THEN
3937: asn_debug.put_line('Fetching Shipments Cursor');
3938: END IF;
3939:
3940: IF (shipments%ISOPEN) THEN
3941: FETCH shipments INTO x_shipmentdistributionrec;
3957:
3958: /*
3959: ** Check if this is the last record
3960: */
3961: IF (g_asn_debug = 'Y') THEN
3962: asn_debug.put_line('Shipment Rows fetched ' || TO_CHAR(rows_fetched));
3963: END IF;
3964: -- }
3965: ELSE -- txn = deliver and other cases --{
3958: /*
3959: ** Check if this is the last record
3960: */
3961: IF (g_asn_debug = 'Y') THEN
3962: asn_debug.put_line('Shipment Rows fetched ' || TO_CHAR(rows_fetched));
3963: END IF;
3964: -- }
3965: ELSE -- txn = deliver and other cases --{
3966: IF (g_asn_debug = 'Y') THEN
3962: asn_debug.put_line('Shipment Rows fetched ' || TO_CHAR(rows_fetched));
3963: END IF;
3964: -- }
3965: ELSE -- txn = deliver and other cases --{
3966: IF (g_asn_debug = 'Y') THEN
3967: asn_debug.put_line('Fetching Distributions Cursor');
3968: END IF;
3969:
3970: IF (distributions%ISOPEN) THEN
3963: END IF;
3964: -- }
3965: ELSE -- txn = deliver and other cases --{
3966: IF (g_asn_debug = 'Y') THEN
3967: asn_debug.put_line('Fetching Distributions Cursor');
3968: END IF;
3969:
3970: IF (distributions%ISOPEN) THEN
3971: FETCH distributions INTO x_shipmentdistributionrec;
3987:
3988: /*
3989: ** Check if this is the last record
3990: */
3991: IF (g_asn_debug = 'Y') THEN
3992: asn_debug.put_line('Distribution Rows fetched ' || TO_CHAR(rows_fetched));
3993: END IF;
3994: END IF; -- matches if condition of txn ! deliver --}
3995:
3988: /*
3989: ** Check if this is the last record
3990: */
3991: IF (g_asn_debug = 'Y') THEN
3992: asn_debug.put_line('Distribution Rows fetched ' || TO_CHAR(rows_fetched));
3993: END IF;
3994: END IF; -- matches if condition of txn ! deliver --}
3995:
3996: IF ( lastrecord
3994: END IF; -- matches if condition of txn ! deliver --}
3995:
3996: IF ( lastrecord
3997: OR x_remaining_quantity <= 0) THEN --{
3998: IF (g_asn_debug = 'Y') THEN
3999: asn_debug.put_line('Hit exit condition');
4000: END IF;
4001:
4002: IF NOT x_first_trans THEN
3995:
3996: IF ( lastrecord
3997: OR x_remaining_quantity <= 0) THEN --{
3998: IF (g_asn_debug = 'Y') THEN
3999: asn_debug.put_line('Hit exit condition');
4000: END IF;
4001:
4002: IF NOT x_first_trans THEN
4003: -- x_first_trans has been reset which means some cascade has
4005: current_n := current_n - 1;
4006: END IF;
4007:
4008: -- do the tolerance act here
4009: IF (g_asn_debug = 'Y') THEN
4010: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
4011: asn_debug.put_line('Check which condition has occured');
4012: END IF;
4013:
4006: END IF;
4007:
4008: -- do the tolerance act here
4009: IF (g_asn_debug = 'Y') THEN
4010: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
4011: asn_debug.put_line('Check which condition has occured');
4012: END IF;
4013:
4014: -- lastrecord...we have run out of rows and we still have quantity to allocate
4007:
4008: -- do the tolerance act here
4009: IF (g_asn_debug = 'Y') THEN
4010: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
4011: asn_debug.put_line('Check which condition has occured');
4012: END IF;
4013:
4014: -- lastrecord...we have run out of rows and we still have quantity to allocate
4015: IF (round(x_remaining_quantity,6) > 0) THEN --{ Bug 13703497
4012: END IF;
4013:
4014: -- lastrecord...we have run out of rows and we still have quantity to allocate
4015: IF (round(x_remaining_quantity,6) > 0) THEN --{ Bug 13703497
4016: IF (g_asn_debug = 'Y') THEN
4017: asn_debug.put_line('There is quantity remaining');
4018: asn_debug.put_line('Need to check qty tolerances');
4019: END IF;
4020:
4013:
4014: -- lastrecord...we have run out of rows and we still have quantity to allocate
4015: IF (round(x_remaining_quantity,6) > 0) THEN --{ Bug 13703497
4016: IF (g_asn_debug = 'Y') THEN
4017: asn_debug.put_line('There is quantity remaining');
4018: asn_debug.put_line('Need to check qty tolerances');
4019: END IF;
4020:
4021: IF rows_fetched > 0
4014: -- lastrecord...we have run out of rows and we still have quantity to allocate
4015: IF (round(x_remaining_quantity,6) > 0) THEN --{ Bug 13703497
4016: IF (g_asn_debug = 'Y') THEN
4017: asn_debug.put_line('There is quantity remaining');
4018: asn_debug.put_line('Need to check qty tolerances');
4019: END IF;
4020:
4021: IF rows_fetched > 0
4022: AND NOT x_first_trans THEN --{
4026: INTO x_qty_rcv_exception_code
4027: FROM po_line_locations
4028: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
4029:
4030: IF (g_asn_debug = 'Y') THEN
4031: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
4032: asn_debug.put_line('quantity ' || temp_cascaded_table(current_n).quantity);
4033: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
4034: END IF;
4027: FROM po_line_locations
4028: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
4029:
4030: IF (g_asn_debug = 'Y') THEN
4031: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
4032: asn_debug.put_line('quantity ' || temp_cascaded_table(current_n).quantity);
4033: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
4034: END IF;
4035:
4028: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
4029:
4030: IF (g_asn_debug = 'Y') THEN
4031: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
4032: asn_debug.put_line('quantity ' || temp_cascaded_table(current_n).quantity);
4033: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
4034: END IF;
4035:
4036: -- Bug 6796920 Start
4029:
4030: IF (g_asn_debug = 'Y') THEN
4031: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
4032: asn_debug.put_line('quantity ' || temp_cascaded_table(current_n).quantity);
4033: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
4034: END IF;
4035:
4036: -- Bug 6796920 Start
4037: BEGIN
4043: when others THEN
4044: NULL;
4045: END;
4046:
4047: IF (g_asn_debug = 'Y') THEN
4048: asn_debug.put_line('Current Organization id = '|| temp_cascaded_table(current_n).to_organization_id);
4049: asn_debug.put_line('Blind Receiving Flag = '|| l_blind_receiving_flag);
4050: END IF;
4051: -- Bug 6796920 End
4044: NULL;
4045: END;
4046:
4047: IF (g_asn_debug = 'Y') THEN
4048: asn_debug.put_line('Current Organization id = '|| temp_cascaded_table(current_n).to_organization_id);
4049: asn_debug.put_line('Blind Receiving Flag = '|| l_blind_receiving_flag);
4050: END IF;
4051: -- Bug 6796920 End
4052:
4045: END;
4046:
4047: IF (g_asn_debug = 'Y') THEN
4048: asn_debug.put_line('Current Organization id = '|| temp_cascaded_table(current_n).to_organization_id);
4049: asn_debug.put_line('Blind Receiving Flag = '|| l_blind_receiving_flag);
4050: END IF;
4051: -- Bug 6796920 End
4052:
4053: -- The following if condition is commented out as part of bug 6796920
4064: temp_cascaded_table(current_n).quantity <=
4065: x_converted_trx_qty
4066: ) THEN --{
4067: */
4068: IF (g_asn_debug = 'Y') THEN
4069: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_qty));
4070: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4071: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4072: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
4065: x_converted_trx_qty
4066: ) THEN --{
4067: */
4068: IF (g_asn_debug = 'Y') THEN
4069: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_qty));
4070: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4071: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4072: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
4073: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
4066: ) THEN --{
4067: */
4068: IF (g_asn_debug = 'Y') THEN
4069: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_qty));
4070: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4071: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4072: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
4073: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
4074: END IF;
4067: */
4068: IF (g_asn_debug = 'Y') THEN
4069: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_qty));
4070: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4071: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4072: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
4073: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
4074: END IF;
4075: /* Bug 4907269.
4068: IF (g_asn_debug = 'Y') THEN
4069: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_qty));
4070: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4071: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4072: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
4073: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
4074: END IF;
4075: /* Bug 4907269.
4076: x_remaining_quantity is the unused transaction qty, it has to be rounded to 6 decimals
4069: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_qty));
4070: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4071: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4072: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
4073: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
4074: END IF;
4075: /* Bug 4907269.
4076: x_remaining_quantity is the unused transaction qty, it has to be rounded to 6 decimals
4077: so that quantity and primary quantity will computed correctly rounded to 6 decimals.
4088: temp_cascaded_table(1).item_id,
4089: temp_cascaded_table(1).primary_unit_of_measure
4090: );
4091:
4092: IF (g_asn_debug = 'Y') THEN
4093: asn_debug.put_line('primary_qty for the last row ' || temp_cascaded_table(current_n).primary_quantity);
4094: asn_debug.put_line('quantity for the last row ' || temp_cascaded_table(current_n).quantity);
4095: END IF;
4096:
4089: temp_cascaded_table(1).primary_unit_of_measure
4090: );
4091:
4092: IF (g_asn_debug = 'Y') THEN
4093: asn_debug.put_line('primary_qty for the last row ' || temp_cascaded_table(current_n).primary_quantity);
4094: asn_debug.put_line('quantity for the last row ' || temp_cascaded_table(current_n).quantity);
4095: END IF;
4096:
4097: /* Bug 3506964.
4090: );
4091:
4092: IF (g_asn_debug = 'Y') THEN
4093: asn_debug.put_line('primary_qty for the last row ' || temp_cascaded_table(current_n).primary_quantity);
4094: asn_debug.put_line('quantity for the last row ' || temp_cascaded_table(current_n).quantity);
4095: END IF;
4096:
4097: /* Bug 3506964.
4098: END IF; Bug# 1807842 --}
4105: END IF;
4106:
4107: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).quantity * tax_amount_factor, 6);
4108:
4109: IF (g_asn_debug = 'Y') THEN
4110: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4111: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4112: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4113: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4106:
4107: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).quantity * tax_amount_factor, 6);
4108:
4109: IF (g_asn_debug = 'Y') THEN
4110: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4111: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4112: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4113: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4114: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4107: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).quantity * tax_amount_factor, 6);
4108:
4109: IF (g_asn_debug = 'Y') THEN
4110: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4111: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4112: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4113: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4114: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4115: END IF;
4108:
4109: IF (g_asn_debug = 'Y') THEN
4110: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4111: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4112: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4113: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4114: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4115: END IF;
4116:
4109: IF (g_asn_debug = 'Y') THEN
4110: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4111: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4112: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4113: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4114: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4115: END IF;
4116:
4117: --
4110: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4111: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4112: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4113: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4114: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4115: END IF;
4116:
4117: --
4118: get_clm_info( 'QUANTITY',
4129: --
4130:
4131: -- Bug 6796920 - Modified the following if condition to check for blind receiving flag
4132: IF (x_qty_rcv_exception_code = 'WARNING' AND NVL(l_blind_receiving_flag,'N') <> 'Y') THEN --{
4133: IF (g_asn_debug = 'Y') THEN
4134: asn_debug.put_line('IN WARNING');
4135: END IF;
4136:
4137: IF (g_asn_debug = 'Y') THEN
4130:
4131: -- Bug 6796920 - Modified the following if condition to check for blind receiving flag
4132: IF (x_qty_rcv_exception_code = 'WARNING' AND NVL(l_blind_receiving_flag,'N') <> 'Y') THEN --{
4133: IF (g_asn_debug = 'Y') THEN
4134: asn_debug.put_line('IN WARNING');
4135: END IF;
4136:
4137: IF (g_asn_debug = 'Y') THEN
4138: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
4133: IF (g_asn_debug = 'Y') THEN
4134: asn_debug.put_line('IN WARNING');
4135: END IF;
4136:
4137: IF (g_asn_debug = 'Y') THEN
4138: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
4139: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
4140: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
4141: END IF;
4134: asn_debug.put_line('IN WARNING');
4135: END IF;
4136:
4137: IF (g_asn_debug = 'Y') THEN
4138: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
4139: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
4140: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
4141: END IF;
4142:
4135: END IF;
4136:
4137: IF (g_asn_debug = 'Y') THEN
4138: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
4139: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
4140: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
4141: END IF;
4142:
4143: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
4136:
4137: IF (g_asn_debug = 'Y') THEN
4138: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
4139: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
4140: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
4141: END IF;
4142:
4143: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
4144: rcv_error_pkg.set_error_message('RCV_SHIP_QTY_OVER_TOLERANCE', x_cascaded_table(n).error_message);
4145: rcv_error_pkg.set_token('QTY_A', temp_cascaded_table(current_n).quantity);
4146: rcv_error_pkg.set_token('QTY_B', temp_cascaded_table(current_n).quantity - x_remaining_quantity);
4147: rcv_error_pkg.log_interface_warning('QUANTITY');
4148:
4149: IF (g_asn_debug = 'Y') THEN
4150: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
4151: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
4152: asn_debug.put_line('Need to insert into po_interface_errors');
4153: END IF;
4146: rcv_error_pkg.set_token('QTY_B', temp_cascaded_table(current_n).quantity - x_remaining_quantity);
4147: rcv_error_pkg.log_interface_warning('QUANTITY');
4148:
4149: IF (g_asn_debug = 'Y') THEN
4150: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
4151: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
4152: asn_debug.put_line('Need to insert into po_interface_errors');
4153: END IF;
4154: -- Commented out the following END IF as part of bug 6796920
4147: rcv_error_pkg.log_interface_warning('QUANTITY');
4148:
4149: IF (g_asn_debug = 'Y') THEN
4150: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
4151: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
4152: asn_debug.put_line('Need to insert into po_interface_errors');
4153: END IF;
4154: -- Commented out the following END IF as part of bug 6796920
4155: -- END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
4148:
4149: IF (g_asn_debug = 'Y') THEN
4150: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
4151: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
4152: asn_debug.put_line('Need to insert into po_interface_errors');
4153: END IF;
4154: -- Commented out the following END IF as part of bug 6796920
4155: -- END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
4156:
4153: END IF;
4154: -- Commented out the following END IF as part of bug 6796920
4155: -- END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
4156:
4157: IF (g_asn_debug = 'Y') THEN
4158: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4159: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4160: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4161: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4154: -- Commented out the following END IF as part of bug 6796920
4155: -- END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
4156:
4157: IF (g_asn_debug = 'Y') THEN
4158: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4159: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4160: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4161: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4162: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4155: -- END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
4156:
4157: IF (g_asn_debug = 'Y') THEN
4158: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4159: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4160: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4161: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4162: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4163: END IF;
4156:
4157: IF (g_asn_debug = 'Y') THEN
4158: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4159: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4160: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4161: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4162: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4163: END IF;
4164: -- }
4157: IF (g_asn_debug = 'Y') THEN
4158: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4159: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4160: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4161: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4162: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4163: END IF;
4164: -- }
4165: -- ELSIF x_qty_rcv_exception_code = 'REJECT' THEN -- elseif for NONE/WARNING --{
4158: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
4159: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
4160: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
4161: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
4162: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
4163: END IF;
4164: -- }
4165: -- ELSIF x_qty_rcv_exception_code = 'REJECT' THEN -- elseif for NONE/WARNING --{
4166: -- Bug 6796920 - Modified the following elsif condition to check for blind receiving flag
4166: -- Bug 6796920 - Modified the following elsif condition to check for blind receiving flag
4167:
4168: ELSIF (x_qty_rcv_exception_code = 'REJECT' AND NVL(l_blind_receiving_flag,'N') <> 'Y') THEN
4169:
4170: IF (g_asn_debug = 'Y') THEN
4171: asn_debug.put_line('Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
4172: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
4173: END IF;
4174:
4167:
4168: ELSIF (x_qty_rcv_exception_code = 'REJECT' AND NVL(l_blind_receiving_flag,'N') <> 'Y') THEN
4169:
4170: IF (g_asn_debug = 'Y') THEN
4171: asn_debug.put_line('Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
4172: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
4173: END IF;
4174:
4175: IF (g_asn_debug = 'Y') THEN
4168: ELSIF (x_qty_rcv_exception_code = 'REJECT' AND NVL(l_blind_receiving_flag,'N') <> 'Y') THEN
4169:
4170: IF (g_asn_debug = 'Y') THEN
4171: asn_debug.put_line('Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
4172: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
4173: END IF;
4174:
4175: IF (g_asn_debug = 'Y') THEN
4176: asn_debug.put_line('delete the temp table ');
4171: asn_debug.put_line('Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
4172: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
4173: END IF;
4174:
4175: IF (g_asn_debug = 'Y') THEN
4176: asn_debug.put_line('delete the temp table ');
4177: END IF;
4178:
4179: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4172: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
4173: END IF;
4174:
4175: IF (g_asn_debug = 'Y') THEN
4176: asn_debug.put_line('delete the temp table ');
4177: END IF;
4178:
4179: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4180:
4202: temp_cascaded_table.DELETE(i);
4203: END LOOP;
4204: END IF;
4205:
4206: IF (g_asn_debug = 'Y') THEN
4207: asn_debug.put_line('mark the actual table with error status');
4208: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
4209: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
4210: END IF;
4203: END LOOP;
4204: END IF;
4205:
4206: IF (g_asn_debug = 'Y') THEN
4207: asn_debug.put_line('mark the actual table with error status');
4208: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
4209: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
4210: END IF;
4211:
4204: END IF;
4205:
4206: IF (g_asn_debug = 'Y') THEN
4207: asn_debug.put_line('mark the actual table with error status');
4208: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
4209: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
4210: END IF;
4211:
4212: IF (g_asn_debug = 'Y') THEN
4205:
4206: IF (g_asn_debug = 'Y') THEN
4207: asn_debug.put_line('mark the actual table with error status');
4208: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
4209: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
4210: END IF;
4211:
4212: IF (g_asn_debug = 'Y') THEN
4213: asn_debug.put_line('Need to insert a row into po_interface_errors');
4208: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
4209: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
4210: END IF;
4211:
4212: IF (g_asn_debug = 'Y') THEN
4213: asn_debug.put_line('Need to insert a row into po_interface_errors');
4214: END IF;
4215: END IF; --} matches if(none/warning) and elseif(reject)
4216: --}
4209: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
4210: END IF;
4211:
4212: IF (g_asn_debug = 'Y') THEN
4213: asn_debug.put_line('Need to insert a row into po_interface_errors');
4214: END IF;
4215: END IF; --} matches if(none/warning) and elseif(reject)
4216: --}
4217: ELSE --{ else for rows fetched = 0 OR x_first_trans = true
4215: END IF; --} matches if(none/warning) and elseif(reject)
4216: --}
4217: ELSE --{ else for rows fetched = 0 OR x_first_trans = true
4218: IF rows_fetched = 0 THEN
4219: IF (g_asn_debug = 'Y') THEN
4220: asn_debug.put_line('No rows were retrieved from cursor.');
4221: END IF;
4222: ELSIF x_first_trans THEN
4223: IF (g_asn_debug = 'Y') THEN
4216: --}
4217: ELSE --{ else for rows fetched = 0 OR x_first_trans = true
4218: IF rows_fetched = 0 THEN
4219: IF (g_asn_debug = 'Y') THEN
4220: asn_debug.put_line('No rows were retrieved from cursor.');
4221: END IF;
4222: ELSIF x_first_trans THEN
4223: IF (g_asn_debug = 'Y') THEN
4224: asn_debug.put_line('No rows were cascaded');
4219: IF (g_asn_debug = 'Y') THEN
4220: asn_debug.put_line('No rows were retrieved from cursor.');
4221: END IF;
4222: ELSIF x_first_trans THEN
4223: IF (g_asn_debug = 'Y') THEN
4224: asn_debug.put_line('No rows were cascaded');
4225: END IF;
4226: END IF;
4227:
4220: asn_debug.put_line('No rows were retrieved from cursor.');
4221: END IF;
4222: ELSIF x_first_trans THEN
4223: IF (g_asn_debug = 'Y') THEN
4224: asn_debug.put_line('No rows were cascaded');
4225: END IF;
4226: END IF;
4227:
4228: x_temp_count := 1;
4233: */
4234: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
4235: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
4236: -- Bug 2551443 Removed po_distributions from the FROM clause
4237: IF (g_asn_debug = 'Y') THEN
4238: asn_debug.put_line('This is receive');
4239: END IF;
4240:
4241: IF (x_is_asn = FALSE) THEN --{
4234: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
4235: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
4236: -- Bug 2551443 Removed po_distributions from the FROM clause
4237: IF (g_asn_debug = 'Y') THEN
4238: asn_debug.put_line('This is receive');
4239: END IF;
4240:
4241: IF (x_is_asn = FALSE) THEN --{
4242: SELECT COUNT(*)
4251: AND pll.line_location_id = NVL(temp_cascaded_table(current_n).po_line_location_id, pll.line_location_id)
4252: AND pll.po_line_id = pl.po_line_id;
4253: END IF; --}
4254:
4255: IF (g_asn_debug = 'Y') THEN
4256: asn_debug.put_line('x_temp_count ' || x_temp_count);
4257: END IF;
4258:
4259: IF x_temp_count = 0 THEN --{
4252: AND pll.po_line_id = pl.po_line_id;
4253: END IF; --}
4254:
4255: IF (g_asn_debug = 'Y') THEN
4256: asn_debug.put_line('x_temp_count ' || x_temp_count);
4257: END IF;
4258:
4259: IF x_temp_count = 0 THEN --{
4260: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4262: rcv_error_pkg.set_token('PONUM', temp_cascaded_table(current_n).document_num);
4263: rcv_error_pkg.log_interface_error('DOCUMENT_NUM', FALSE);
4264: ELSE -- x_item_count != 0 --}{
4265: IF (x_is_asn = FALSE) THEN --{
4266: IF (g_asn_debug = 'Y') THEN
4267: asn_debug.put_line('Get the flag values');
4268: END IF;
4269:
4270: SELECT NVL(pl.item_id, 0),
4263: rcv_error_pkg.log_interface_error('DOCUMENT_NUM', FALSE);
4264: ELSE -- x_item_count != 0 --}{
4265: IF (x_is_asn = FALSE) THEN --{
4266: IF (g_asn_debug = 'Y') THEN
4267: asn_debug.put_line('Get the flag values');
4268: END IF;
4269:
4270: SELECT NVL(pl.item_id, 0),
4271: NVL(pll.approved_flag, 'N'),
4292: AND NVL(pll.po_release_id, 0) = NVL(temp_cascaded_table(current_n).po_release_id, NVL(pll.po_release_id, 0))
4293: AND pll.line_location_id = NVL(temp_cascaded_table(current_n).po_line_location_id, pll.line_location_id)
4294: AND pll.po_line_id = pl.po_line_id;
4295:
4296: IF (g_asn_debug = 'Y') THEN
4297: asn_debug.put_line('x_item_id ' || x_item_id);
4298: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4299: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4293: AND pll.line_location_id = NVL(temp_cascaded_table(current_n).po_line_location_id, pll.line_location_id)
4294: AND pll.po_line_id = pl.po_line_id;
4295:
4296: IF (g_asn_debug = 'Y') THEN
4297: asn_debug.put_line('x_item_id ' || x_item_id);
4298: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4299: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4294: AND pll.po_line_id = pl.po_line_id;
4295:
4296: IF (g_asn_debug = 'Y') THEN
4297: asn_debug.put_line('x_item_id ' || x_item_id);
4298: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4299: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4302: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4295:
4296: IF (g_asn_debug = 'Y') THEN
4297: asn_debug.put_line('x_item_id ' || x_item_id);
4298: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4299: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4302: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4303: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4296: IF (g_asn_debug = 'Y') THEN
4297: asn_debug.put_line('x_item_id ' || x_item_id);
4298: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4299: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4302: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4303: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4304: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4297: asn_debug.put_line('x_item_id ' || x_item_id);
4298: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4299: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4302: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4303: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4304: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4305: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4298: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4299: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4302: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4303: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4304: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4305: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4306: END IF;
4299: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4302: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4303: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4304: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4305: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4306: END IF;
4307: END IF; --}
4300: asn_debug.put_line('x_closed_code ' || x_closed_code);
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4302: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4303: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4304: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4305: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4306: END IF;
4307: END IF; --}
4308: END IF; --} -- x_temp_count = 0
4301: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4302: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4303: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4304: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4305: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4306: END IF;
4307: END IF; --}
4308: END IF; --} -- x_temp_count = 0
4309: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
4307: END IF; --}
4308: END IF; --} -- x_temp_count = 0
4309: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
4310: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --}{
4311: IF (g_asn_debug = 'Y') THEN
4312: asn_debug.put_line('This is deliver');
4313: END IF;
4314:
4315: IF (x_is_asn = FALSE) THEN --{
4308: END IF; --} -- x_temp_count = 0
4309: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
4310: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --}{
4311: IF (g_asn_debug = 'Y') THEN
4312: asn_debug.put_line('This is deliver');
4313: END IF;
4314:
4315: IF (x_is_asn = FALSE) THEN --{
4316: SELECT COUNT(*)
4328: AND pll.po_line_id = pl.po_line_id
4329: AND pod.distribution_num = NVL(temp_cascaded_table(current_n).document_distribution_num, pod.distribution_num);
4330: END IF; --}
4331:
4332: IF (g_asn_debug = 'Y') THEN
4333: asn_debug.put_line('x_temp_count ' || x_temp_count);
4334: END IF;
4335:
4336: IF x_temp_count = 0 THEN --{
4329: AND pod.distribution_num = NVL(temp_cascaded_table(current_n).document_distribution_num, pod.distribution_num);
4330: END IF; --}
4331:
4332: IF (g_asn_debug = 'Y') THEN
4333: asn_debug.put_line('x_temp_count ' || x_temp_count);
4334: END IF;
4335:
4336: IF x_temp_count = 0 THEN --{
4337: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4339: rcv_error_pkg.set_token('NUMBER', temp_cascaded_table(current_n).document_distribution_num);
4340: rcv_error_pkg.log_interface_error('DOCUMENT_DISTRIBUTION_NUM', FALSE);
4341: ELSE -- x_temp_count != 0 --}{
4342: IF (x_is_asn = FALSE) THEN --{
4343: IF (g_asn_debug = 'Y') THEN
4344: asn_debug.put_line('Get flag values ');
4345: END IF;
4346:
4347: SELECT NVL(pl.item_id, 0),
4340: rcv_error_pkg.log_interface_error('DOCUMENT_DISTRIBUTION_NUM', FALSE);
4341: ELSE -- x_temp_count != 0 --}{
4342: IF (x_is_asn = FALSE) THEN --{
4343: IF (g_asn_debug = 'Y') THEN
4344: asn_debug.put_line('Get flag values ');
4345: END IF;
4346:
4347: SELECT NVL(pl.item_id, 0),
4348: NVL(pll.approved_flag, 'N'),
4372: AND pll.line_location_id = NVL(temp_cascaded_table(current_n).po_line_location_id, pll.line_location_id)
4373: AND pll.po_line_id = pl.po_line_id
4374: AND pod.distribution_num = NVL(temp_cascaded_table(current_n).document_distribution_num, pod.distribution_num);
4375:
4376: IF (g_asn_debug = 'Y') THEN
4377: asn_debug.put_line('x_item_id ' || x_item_id);
4378: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4379: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4373: AND pll.po_line_id = pl.po_line_id
4374: AND pod.distribution_num = NVL(temp_cascaded_table(current_n).document_distribution_num, pod.distribution_num);
4375:
4376: IF (g_asn_debug = 'Y') THEN
4377: asn_debug.put_line('x_item_id ' || x_item_id);
4378: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4379: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4374: AND pod.distribution_num = NVL(temp_cascaded_table(current_n).document_distribution_num, pod.distribution_num);
4375:
4376: IF (g_asn_debug = 'Y') THEN
4377: asn_debug.put_line('x_item_id ' || x_item_id);
4378: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4379: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4382: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4375:
4376: IF (g_asn_debug = 'Y') THEN
4377: asn_debug.put_line('x_item_id ' || x_item_id);
4378: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4379: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4382: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4383: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4376: IF (g_asn_debug = 'Y') THEN
4377: asn_debug.put_line('x_item_id ' || x_item_id);
4378: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4379: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4382: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4383: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4384: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4377: asn_debug.put_line('x_item_id ' || x_item_id);
4378: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4379: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4382: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4383: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4384: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4385: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4378: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4379: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4382: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4383: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4384: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4385: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4386: END IF;
4379: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4382: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4383: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4384: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4385: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4386: END IF;
4387: END IF; --}
4380: asn_debug.put_line('x_closed_code ' || x_closed_code);
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4382: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4383: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4384: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4385: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4386: END IF;
4387: END IF; --}
4388: END IF; -- x_temp_count = 0; --}
4381: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4382: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4383: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4384: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4385: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4386: END IF;
4387: END IF; --}
4388: END IF; -- x_temp_count = 0; --}
4389: END IF; -- transaction_type <> 'DELIVER' --}
4388: END IF; -- x_temp_count = 0; --}
4389: END IF; -- transaction_type <> 'DELIVER' --}
4390:
4391: IF (x_is_asn = TRUE) THEN --{
4392: IF (g_asn_debug = 'Y') THEN
4393: asn_debug.put_line('Shipment header_id not null ');
4394: END IF;
4395:
4396: SELECT NVL(rsl.item_id, 0),
4389: END IF; -- transaction_type <> 'DELIVER' --}
4390:
4391: IF (x_is_asn = TRUE) THEN --{
4392: IF (g_asn_debug = 'Y') THEN
4393: asn_debug.put_line('Shipment header_id not null ');
4394: END IF;
4395:
4396: SELECT NVL(rsl.item_id, 0),
4397: NVL(pll.approved_flag, 'N'),
4434: AND NVL(pll.po_release_id, 0) = NVL(temp_cascaded_table(current_n).po_release_id,0)
4435: AND pll.line_location_id = temp_cascaded_table(current_n).po_line_location_id
4436: AND pll.po_line_id = pl.po_line_id;
4437:
4438: IF (g_asn_debug = 'Y') THEN
4439: asn_debug.put_line('x_item_id ' || x_item_id);
4440: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4441: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4435: AND pll.line_location_id = temp_cascaded_table(current_n).po_line_location_id
4436: AND pll.po_line_id = pl.po_line_id;
4437:
4438: IF (g_asn_debug = 'Y') THEN
4439: asn_debug.put_line('x_item_id ' || x_item_id);
4440: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4441: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4436: AND pll.po_line_id = pl.po_line_id;
4437:
4438: IF (g_asn_debug = 'Y') THEN
4439: asn_debug.put_line('x_item_id ' || x_item_id);
4440: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4441: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4437:
4438: IF (g_asn_debug = 'Y') THEN
4439: asn_debug.put_line('x_item_id ' || x_item_id);
4440: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4441: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4438: IF (g_asn_debug = 'Y') THEN
4439: asn_debug.put_line('x_item_id ' || x_item_id);
4440: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4441: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4439: asn_debug.put_line('x_item_id ' || x_item_id);
4440: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4441: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4447: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4440: asn_debug.put_line('x_approved_flag ' || x_approved_flag);
4441: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4447: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4448: asn_debug.put_line('l_receipt_source_code ' || l_receipt_source_code);
4441: asn_debug.put_line('x_cancel_flag ' || x_cancel_flag);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4447: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4448: asn_debug.put_line('l_receipt_source_code ' || l_receipt_source_code);
4449: asn_debug.put_line('l_shipment_line_status_code ' || l_shipment_line_status_code);
4442: asn_debug.put_line('x_closed_code ' || x_closed_code);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4447: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4448: asn_debug.put_line('l_receipt_source_code ' || l_receipt_source_code);
4449: asn_debug.put_line('l_shipment_line_status_code ' || l_shipment_line_status_code);
4450: asn_debug.put_line('l_asn_line_flag ' || l_asn_line_flag);
4443: asn_debug.put_line('x_include_closed_po ' || x_include_closed_po);
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4447: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4448: asn_debug.put_line('l_receipt_source_code ' || l_receipt_source_code);
4449: asn_debug.put_line('l_shipment_line_status_code ' || l_shipment_line_status_code);
4450: asn_debug.put_line('l_asn_line_flag ' || l_asn_line_flag);
4451: END IF;
4444: asn_debug.put_line('x_shipment_type ' || x_shipment_type);
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4447: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4448: asn_debug.put_line('l_receipt_source_code ' || l_receipt_source_code);
4449: asn_debug.put_line('l_shipment_line_status_code ' || l_shipment_line_status_code);
4450: asn_debug.put_line('l_asn_line_flag ' || l_asn_line_flag);
4451: END IF;
4452: END IF; --}
4445: asn_debug.put_line('x_ship_to_organization_id ' || x_ship_to_organization_id);
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4447: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4448: asn_debug.put_line('l_receipt_source_code ' || l_receipt_source_code);
4449: asn_debug.put_line('l_shipment_line_status_code ' || l_shipment_line_status_code);
4450: asn_debug.put_line('l_asn_line_flag ' || l_asn_line_flag);
4451: END IF;
4452: END IF; --}
4453:
4446: asn_debug.put_line('x_ship_to_location_id ' || x_ship_to_location_id);
4447: asn_debug.put_line('x_vendor_product_num ' || x_vendor_product_num);
4448: asn_debug.put_line('l_receipt_source_code ' || l_receipt_source_code);
4449: asn_debug.put_line('l_shipment_line_status_code ' || l_shipment_line_status_code);
4450: asn_debug.put_line('l_asn_line_flag ' || l_asn_line_flag);
4451: END IF;
4452: END IF; --}
4453:
4454: IF (x_temp_count <> 0) THEN --{
4453:
4454: IF (x_temp_count <> 0) THEN --{
4455: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4456:
4457: IF (g_asn_debug = 'Y') THEN
4458: asn_debug.put_line('Should give us the exact error ');
4459: END IF;
4460:
4461: IF x_item_id <> NVL(temp_cascaded_table(current_n).item_id, x_item_id) THEN
4454: IF (x_temp_count <> 0) THEN --{
4455: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4456:
4457: IF (g_asn_debug = 'Y') THEN
4458: asn_debug.put_line('Should give us the exact error ');
4459: END IF;
4460:
4461: IF x_item_id <> NVL(temp_cascaded_table(current_n).item_id, x_item_id) THEN
4462: IF (g_asn_debug = 'Y') THEN
4458: asn_debug.put_line('Should give us the exact error ');
4459: END IF;
4460:
4461: IF x_item_id <> NVL(temp_cascaded_table(current_n).item_id, x_item_id) THEN
4462: IF (g_asn_debug = 'Y') THEN
4463: asn_debug.put_line('This item is not allowed ');
4464: END IF;
4465:
4466: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4459: END IF;
4460:
4461: IF x_item_id <> NVL(temp_cascaded_table(current_n).item_id, x_item_id) THEN
4462: IF (g_asn_debug = 'Y') THEN
4463: asn_debug.put_line('This item is not allowed ');
4464: END IF;
4465:
4466: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4467: rcv_error_pkg.set_error_message('RCV_ASN_ITEM_NOT_ALLOWED', x_cascaded_table(n).error_message);
4469: rcv_error_pkg.log_interface_error('ITEM_NUM', FALSE);
4470: END IF;
4471:
4472: IF x_approved_flag <> 'Y' THEN
4473: IF (g_asn_debug = 'Y') THEN
4474: asn_debug.put_line('This PO is not approved');
4475: END IF;
4476:
4477: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4470: END IF;
4471:
4472: IF x_approved_flag <> 'Y' THEN
4473: IF (g_asn_debug = 'Y') THEN
4474: asn_debug.put_line('This PO is not approved');
4475: END IF;
4476:
4477: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4478: rcv_error_pkg.set_error_message('RCV_ASN_SHIPMT_NOT_APPROVED', x_cascaded_table(n).error_message);
4481: rcv_error_pkg.log_interface_error('DOCUMENT_SHIPMENT_LINE_NUM', FALSE);
4482: END IF;
4483:
4484: IF x_cancel_flag <> 'N' THEN
4485: IF (g_asn_debug = 'Y') THEN
4486: asn_debug.put_line('This PO is cancelled');
4487: END IF;
4488:
4489: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4482: END IF;
4483:
4484: IF x_cancel_flag <> 'N' THEN
4485: IF (g_asn_debug = 'Y') THEN
4486: asn_debug.put_line('This PO is cancelled');
4487: END IF;
4488:
4489: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4490: rcv_error_pkg.set_error_message('RCV_ASN_SHIPMT_CANCELLED', x_cascaded_table(n).error_message);
4505: * po profile option is set to No.
4506: */
4507: IF ( NVL(x_include_closed_po, 'N') = 'Y'
4508: AND x_closed_code = 'FINALLY CLOSED') THEN
4509: IF (g_asn_debug = 'Y') THEN
4510: asn_debug.put_line('This PO is finally closed and the profile option to include closed POs is Y');
4511: END IF;
4512:
4513: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4506: */
4507: IF ( NVL(x_include_closed_po, 'N') = 'Y'
4508: AND x_closed_code = 'FINALLY CLOSED') THEN
4509: IF (g_asn_debug = 'Y') THEN
4510: asn_debug.put_line('This PO is finally closed and the profile option to include closed POs is Y');
4511: END IF;
4512:
4513: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4514: rcv_error_pkg.set_error_message('RCV_ASN_SHIPMT_FINALLY_CLOSED', x_cascaded_table(n).error_message); --Bug 10020071
4517: END IF;
4518:
4519: IF ( NVL(x_include_closed_po, 'N') = 'N'
4520: AND x_closed_code IN('FINALLY CLOSED', 'CLOSED', 'CLOSED FOR RECEIVING')) THEN
4521: IF (g_asn_debug = 'Y') THEN
4522: asn_debug.put_line('This PO is not open and the profile option to include closed POs is N');
4523: END IF;
4524:
4525: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4518:
4519: IF ( NVL(x_include_closed_po, 'N') = 'N'
4520: AND x_closed_code IN('FINALLY CLOSED', 'CLOSED', 'CLOSED FOR RECEIVING')) THEN
4521: IF (g_asn_debug = 'Y') THEN
4522: asn_debug.put_line('This PO is not open and the profile option to include closed POs is N');
4523: END IF;
4524:
4525: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4526: rcv_error_pkg.set_error_message('RCV_ASN_SHIPMT_NOT_OPEN', x_cascaded_table(n).error_message);
4528: rcv_error_pkg.log_interface_error('DOCUMENT_SHIPMENT_LINE_NUM', FALSE);
4529: END IF;
4530:
4531: IF x_shipment_type NOT IN('STANDARD', 'BLANKET', 'SCHEDULED','PREPAYMENT') THEN
4532: IF (g_asn_debug = 'Y') THEN
4533: asn_debug.put_line('This PO shipment type cannot be received');
4534: END IF;
4535:
4536: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4529: END IF;
4530:
4531: IF x_shipment_type NOT IN('STANDARD', 'BLANKET', 'SCHEDULED','PREPAYMENT') THEN
4532: IF (g_asn_debug = 'Y') THEN
4533: asn_debug.put_line('This PO shipment type cannot be received');
4534: END IF;
4535:
4536: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4537: rcv_error_pkg.set_error_message('RCV_ASN_INVAL_SHIPMT_TYPE', x_cascaded_table(n).error_message);
4539: rcv_error_pkg.log_interface_error('DOCUMENT_SHIPMENT_LINE_NUM', FALSE);
4540: END IF;
4541:
4542: IF x_ship_to_organization_id <> NVL(temp_cascaded_table(current_n).to_organization_id, x_ship_to_organization_id) THEN
4543: IF (g_asn_debug = 'Y') THEN
4544: asn_debug.put_line('Ship_to_org in PO does not match the user entered value');
4545: END IF;
4546:
4547: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4540: END IF;
4541:
4542: IF x_ship_to_organization_id <> NVL(temp_cascaded_table(current_n).to_organization_id, x_ship_to_organization_id) THEN
4543: IF (g_asn_debug = 'Y') THEN
4544: asn_debug.put_line('Ship_to_org in PO does not match the user entered value');
4545: END IF;
4546:
4547: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4548: rcv_error_pkg.set_error_message('RCV_ASN_INVAL_SHIP_TO_ORG', x_cascaded_table(n).error_message);
4550: rcv_error_pkg.log_interface_error('TO_ORGANIZATION_CODE', FALSE);
4551: END IF;
4552:
4553: IF x_ship_to_location_id <> NVL(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id), x_ship_to_location_id) THEN
4554: IF (g_asn_debug = 'Y') THEN
4555: asn_debug.put_line('Ship_to_loc in PO does not match the user entered value');
4556: END IF;
4557:
4558: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4551: END IF;
4552:
4553: IF x_ship_to_location_id <> NVL(NVL(temp_cascaded_table(current_n).ship_to_location_id, x_header_record.header_record.location_id), x_ship_to_location_id) THEN
4554: IF (g_asn_debug = 'Y') THEN
4555: asn_debug.put_line('Ship_to_loc in PO does not match the user entered value');
4556: END IF;
4557:
4558: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4559: rcv_error_pkg.set_error_message('RCV_ASN_INVAL_SHIP_TO_LOC', x_cascaded_table(n).error_message);
4561: rcv_error_pkg.log_interface_error('SHIP_TO_LOCATION_CODE', FALSE);
4562: END IF;
4563:
4564: IF x_vendor_product_num <> NVL(temp_cascaded_table(current_n).vendor_item_num, x_vendor_product_num) THEN
4565: IF (g_asn_debug = 'Y') THEN
4566: asn_debug.put_line('Vendor_prod_num in PO does not match the user entered value');
4567: END IF;
4568:
4569: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4562: END IF;
4563:
4564: IF x_vendor_product_num <> NVL(temp_cascaded_table(current_n).vendor_item_num, x_vendor_product_num) THEN
4565: IF (g_asn_debug = 'Y') THEN
4566: asn_debug.put_line('Vendor_prod_num in PO does not match the user entered value');
4567: END IF;
4568:
4569: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4570: rcv_error_pkg.set_error_message('RCV_ASN_INVAL_VENDOR_PROD_NUM', x_cascaded_table(n).error_message);
4571: rcv_error_pkg.set_token('NUMBER', temp_cascaded_table(current_n).vendor_item_num);
4572: rcv_error_pkg.log_interface_error('VENDOR_ITEM_NUM', FALSE);
4573: END IF;
4574:
4575: IF (g_asn_debug = 'Y') THEN
4576: asn_debug.put_line('Should have give us the exact error ');
4577: END IF;
4578:
4579: /* IF (x_is_asn = TRUE) THEN --{ This is replaced by forward port for Bug 4523892 */
4572: rcv_error_pkg.log_interface_error('VENDOR_ITEM_NUM', FALSE);
4573: END IF;
4574:
4575: IF (g_asn_debug = 'Y') THEN
4576: asn_debug.put_line('Should have give us the exact error ');
4577: END IF;
4578:
4579: /* IF (x_is_asn = TRUE) THEN --{ This is replaced by forward port for Bug 4523892 */
4580: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
4578:
4579: /* IF (x_is_asn = TRUE) THEN --{ This is replaced by forward port for Bug 4523892 */
4580: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
4581: /* Error messages specific to asns. */
4582: IF (g_asn_debug = 'Y') THEN
4583: asn_debug.put_line('Error messages specific to asn');
4584: END IF;
4585:
4586: IF l_receipt_source_code <> 'VENDOR' THEN
4579: /* IF (x_is_asn = TRUE) THEN --{ This is replaced by forward port for Bug 4523892 */
4580: IF (rcv_roi_header.g_txn_against_asn = 'Y') THEN --{ Bug#4523892
4581: /* Error messages specific to asns. */
4582: IF (g_asn_debug = 'Y') THEN
4583: asn_debug.put_line('Error messages specific to asn');
4584: END IF;
4585:
4586: IF l_receipt_source_code <> 'VENDOR' THEN
4587: IF (g_asn_debug = 'Y') THEN
4583: asn_debug.put_line('Error messages specific to asn');
4584: END IF;
4585:
4586: IF l_receipt_source_code <> 'VENDOR' THEN
4587: IF (g_asn_debug = 'Y') THEN
4588: asn_debug.put_line('Receipt source code not VENDOR');
4589: END IF;
4590:
4591: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4584: END IF;
4585:
4586: IF l_receipt_source_code <> 'VENDOR' THEN
4587: IF (g_asn_debug = 'Y') THEN
4588: asn_debug.put_line('Receipt source code not VENDOR');
4589: END IF;
4590:
4591: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4592: rcv_error_pkg.set_error_message('RCV_ASN_INVAL_RECEIPT_SRC_CODE', x_cascaded_table(n).error_message); -- Bug 7593902
4595: END IF;
4596:
4597: IF ( l_shipment_line_status_code = 'FULLY RECEIVED'
4598: OR l_asn_line_flag <> 'Y') THEN
4599: IF (g_asn_debug = 'Y') THEN
4600: asn_debug.put_line('ASN line flag is not Y and status code is Fully closed');
4601: END IF;
4602:
4603: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4596:
4597: IF ( l_shipment_line_status_code = 'FULLY RECEIVED'
4598: OR l_asn_line_flag <> 'Y') THEN
4599: IF (g_asn_debug = 'Y') THEN
4600: asn_debug.put_line('ASN line flag is not Y and status code is Fully closed');
4601: END IF;
4602:
4603: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
4604: rcv_error_pkg.set_error_message('RCV_ASN_NO_EXPECTED_RECEIPTS', x_cascaded_table(n).error_message);
4604: rcv_error_pkg.set_error_message('RCV_ASN_NO_EXPECTED_RECEIPTS', x_cascaded_table(n).error_message);
4605: rcv_error_pkg.log_interface_error('SHIPMENT_NUMBER', FALSE);
4606: END IF;
4607:
4608: IF (g_asn_debug = 'Y') THEN
4609: asn_debug.put_line('Should have give us the exact error for ASN ');
4610: END IF;
4611: END IF; --}
4612: END IF; -- x_temp_count = 0;}
4605: rcv_error_pkg.log_interface_error('SHIPMENT_NUMBER', FALSE);
4606: END IF;
4607:
4608: IF (g_asn_debug = 'Y') THEN
4609: asn_debug.put_line('Should have give us the exact error for ASN ');
4610: END IF;
4611: END IF; --}
4612: END IF; -- x_temp_count = 0;}
4613:
4624: -- Bug 13703497
4625: x_remaining_quantity := 0;
4626: x_remaining_qty_po_uom := 0;
4627:
4628: IF (g_asn_debug = 'Y') THEN
4629: asn_debug.put_line('Remaining ASN UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
4630: asn_debug.put_line('Remaining PO UOM quantity is zero ' || TO_CHAR(x_remaining_qty_po_uom));
4631: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
4632: END IF;
4625: x_remaining_quantity := 0;
4626: x_remaining_qty_po_uom := 0;
4627:
4628: IF (g_asn_debug = 'Y') THEN
4629: asn_debug.put_line('Remaining ASN UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
4630: asn_debug.put_line('Remaining PO UOM quantity is zero ' || TO_CHAR(x_remaining_qty_po_uom));
4631: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
4632: END IF;
4633: END IF; --} ends the check for whether last record has been reached
4626: x_remaining_qty_po_uom := 0;
4627:
4628: IF (g_asn_debug = 'Y') THEN
4629: asn_debug.put_line('Remaining ASN UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
4630: asn_debug.put_line('Remaining PO UOM quantity is zero ' || TO_CHAR(x_remaining_qty_po_uom));
4631: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
4632: END IF;
4633: END IF; --} ends the check for whether last record has been reached
4634:
4627:
4628: IF (g_asn_debug = 'Y') THEN
4629: asn_debug.put_line('Remaining ASN UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
4630: asn_debug.put_line('Remaining PO UOM quantity is zero ' || TO_CHAR(x_remaining_qty_po_uom));
4631: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
4632: END IF;
4633: END IF; --} ends the check for whether last record has been reached
4634:
4635: -- close cursors
4633: END IF; --} ends the check for whether last record has been reached
4634:
4635: -- close cursors
4636:
4637: IF (g_asn_debug = 'Y') THEN
4638: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions');
4639: END IF;
4640:
4641: IF shipments%ISOPEN THEN
4634:
4635: -- close cursors
4636:
4637: IF (g_asn_debug = 'Y') THEN
4638: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions');
4639: END IF;
4640:
4641: IF shipments%ISOPEN THEN
4642: CLOSE shipments;
4674: END IF; --} matches lastrecord or x_remaining_quantity <= 0
4675:
4676: -- eliminate the row if it fails the date check
4677:
4678: IF (g_asn_debug = 'Y') THEN
4679: asn_debug.put_line('Count in temp_cascade_table : ' || TO_CHAR(temp_cascaded_table.COUNT));
4680: asn_debug.put_line('Cursor record ' || TO_CHAR(rows_fetched));
4681: asn_debug.put_line('Check date tolerance');
4682: END IF;
4675:
4676: -- eliminate the row if it fails the date check
4677:
4678: IF (g_asn_debug = 'Y') THEN
4679: asn_debug.put_line('Count in temp_cascade_table : ' || TO_CHAR(temp_cascaded_table.COUNT));
4680: asn_debug.put_line('Cursor record ' || TO_CHAR(rows_fetched));
4681: asn_debug.put_line('Check date tolerance');
4682: END IF;
4683:
4676: -- eliminate the row if it fails the date check
4677:
4678: IF (g_asn_debug = 'Y') THEN
4679: asn_debug.put_line('Count in temp_cascade_table : ' || TO_CHAR(temp_cascaded_table.COUNT));
4680: asn_debug.put_line('Cursor record ' || TO_CHAR(rows_fetched));
4681: asn_debug.put_line('Check date tolerance');
4682: END IF;
4683:
4684: rcv_transactions_interface_sv.check_date_tolerance(NVL(temp_cascaded_table(1).expected_receipt_date, x_header_record.header_record.expected_receipt_date), -- Bug 487222
4677:
4678: IF (g_asn_debug = 'Y') THEN
4679: asn_debug.put_line('Count in temp_cascade_table : ' || TO_CHAR(temp_cascaded_table.COUNT));
4680: asn_debug.put_line('Cursor record ' || TO_CHAR(rows_fetched));
4681: asn_debug.put_line('Check date tolerance');
4682: END IF;
4683:
4684: rcv_transactions_interface_sv.check_date_tolerance(NVL(temp_cascaded_table(1).expected_receipt_date, x_header_record.header_record.expected_receipt_date), -- Bug 487222
4685: x_shipmentdistributionrec.promised_date,
4708: into l_asn_exists_code
4709: from mtl_client_parameters
4710: where client_code = l_client_code;
4711:
4712: if (g_asn_debug = 'y') then
4713: asn_debug.put_line('asn code in mtl_client_parameters'|| l_asn_exists_code);
4714: end if;
4715: else
4716: select nvl(max(receipt_asn_exists_code),'none')
4709: from mtl_client_parameters
4710: where client_code = l_client_code;
4711:
4712: if (g_asn_debug = 'y') then
4713: asn_debug.put_line('asn code in mtl_client_parameters'|| l_asn_exists_code);
4714: end if;
4715: else
4716: select nvl(max(receipt_asn_exists_code),'none')
4717: into l_asn_exists_code
4717: into l_asn_exists_code
4718: from rcv_parameters
4719: where organization_id = x_cascaded_table(n).to_organization_id;
4720:
4721: if (g_asn_debug = 'y') then
4722: asn_debug.put_line('asn code in rcv_parameters'|| l_asn_exists_code);
4723: end if;
4724: end if;
4725: else
4718: from rcv_parameters
4719: where organization_id = x_cascaded_table(n).to_organization_id;
4720:
4721: if (g_asn_debug = 'y') then
4722: asn_debug.put_line('asn code in rcv_parameters'|| l_asn_exists_code);
4723: end if;
4724: end if;
4725: else
4726: select nvl(max(receipt_asn_exists_code),'none')
4727: into l_asn_exists_code
4728: from rcv_parameters
4729: where organization_id = x_cascaded_table(n).to_organization_id ;
4730:
4731: if (g_asn_debug = 'y') then
4732: asn_debug.put_line('asn code in rcv_parameters '|| l_asn_exists_code);
4733: end if;
4734: end if;
4735: exception
4728: from rcv_parameters
4729: where organization_id = x_cascaded_table(n).to_organization_id ;
4730:
4731: if (g_asn_debug = 'y') then
4732: asn_debug.put_line('asn code in rcv_parameters '|| l_asn_exists_code);
4733: end if;
4734: end if;
4735: exception
4736: when others then
4746: IF ( (x_cascaded_table(n).transaction_type = 'RECEIVE')
4747: AND l_asn_exists_code IN('WARNING', 'REJECT')
4748: AND (rcv_roi_header.g_txn_against_asn = 'N')) THEN --{ Bug#4523892
4749: /* AND (x_is_asn = FALSE)) THEN --{ This is replaced by forward port for 4523892 */
4750: IF (g_asn_debug = 'Y') THEN
4751: asn_debug.put_line('ASN CODE IN Warning or Reject ');
4752: END IF;
4753:
4754: /* Bug 4287932 In case of ASBN the ASN control action was
4747: AND l_asn_exists_code IN('WARNING', 'REJECT')
4748: AND (rcv_roi_header.g_txn_against_asn = 'N')) THEN --{ Bug#4523892
4749: /* AND (x_is_asn = FALSE)) THEN --{ This is replaced by forward port for 4523892 */
4750: IF (g_asn_debug = 'Y') THEN
4751: asn_debug.put_line('ASN CODE IN Warning or Reject ');
4752: END IF;
4753:
4754: /* Bug 4287932 In case of ASBN the ASN control action was
4755: * not getting applied. Added ASBN in the asn_type in
4764: AND NVL(rsh.asn_type, 'STD') IN ('ASN','ASBN') --4287932
4765: AND NVL(rsl.shipment_line_status_code, 'EXPECTED') NOT IN('CANCELLED', 'FULLY RECEIVED')
4766: AND rsl.po_line_location_id = x_shipmentdistributionrec.line_location_id;
4767:
4768: IF (g_asn_debug = 'Y') THEN
4769: asn_debug.put_line('l_asn_count ' || l_asn_count);
4770: END IF;
4771:
4772: IF (l_asn_count <> 0) THEN --{
4765: AND NVL(rsl.shipment_line_status_code, 'EXPECTED') NOT IN('CANCELLED', 'FULLY RECEIVED')
4766: AND rsl.po_line_location_id = x_shipmentdistributionrec.line_location_id;
4767:
4768: IF (g_asn_debug = 'Y') THEN
4769: asn_debug.put_line('l_asn_count ' || l_asn_count);
4770: END IF;
4771:
4772: IF (l_asn_count <> 0) THEN --{
4773: IF (l_asn_exists_code = 'WARNING') THEN --{
4774: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
4775: rcv_error_pkg.set_error_message('RCV_ASN_EXISTS_FOR_POLINE', x_cascaded_table(n).error_message);
4776: rcv_error_pkg.log_interface_warning('DOCUMENT_NUM');
4777:
4778: IF (g_asn_debug = 'Y') THEN
4779: asn_debug.put_line('AFter Warning insert into po_interface_errors ' || x_cascaded_table(n).error_message);
4780: END IF;
4781: END IF; --}
4782:
4775: rcv_error_pkg.set_error_message('RCV_ASN_EXISTS_FOR_POLINE', x_cascaded_table(n).error_message);
4776: rcv_error_pkg.log_interface_warning('DOCUMENT_NUM');
4777:
4778: IF (g_asn_debug = 'Y') THEN
4779: asn_debug.put_line('AFter Warning insert into po_interface_errors ' || x_cascaded_table(n).error_message);
4780: END IF;
4781: END IF; --}
4782:
4783: IF (l_asn_exists_code = 'REJECT') THEN --{
4785: rcv_error_pkg.set_error_message('RCV_ASN_EXISTS_FOR_POLINE', x_cascaded_table(n).error_message);
4786: rcv_error_pkg.set_token('NUMBER', temp_cascaded_table(current_n).document_num);
4787: rcv_error_pkg.log_interface_error('DOCUMENT_NUM', FALSE);
4788:
4789: IF (g_asn_debug = 'Y') THEN
4790: asn_debug.put_line('AFter Reject insert into po_interface_errors ' || x_cascaded_table(n).error_message);
4791: END IF;
4792: END IF; --}
4793: ELSE --}{
4786: rcv_error_pkg.set_token('NUMBER', temp_cascaded_table(current_n).document_num);
4787: rcv_error_pkg.log_interface_error('DOCUMENT_NUM', FALSE);
4788:
4789: IF (g_asn_debug = 'Y') THEN
4790: asn_debug.put_line('AFter Reject insert into po_interface_errors ' || x_cascaded_table(n).error_message);
4791: END IF;
4792: END IF; --}
4793: ELSE --}{
4794: /* This is a receipt against a PO but there is no ASN.
4809: rcv_error_pkg.set_token('DELIVERY DATE', NVL(temp_cascaded_table(1).expected_receipt_date, x_header_record.header_record.expected_receipt_date));
4810: rcv_error_pkg.log_interface_error('EXPECTED_RECEIPT_DATE', FALSE);
4811: END IF; --}
4812:
4813: IF (g_asn_debug = 'Y') THEN
4814: asn_debug.put_line('Days exception Code ' || NVL(x_shipmentdistributionrec.receipt_days_exception_code, 'XXX'));
4815: END IF;
4816:
4817: -- Check shipto_location enforcement
4810: rcv_error_pkg.log_interface_error('EXPECTED_RECEIPT_DATE', FALSE);
4811: END IF; --}
4812:
4813: IF (g_asn_debug = 'Y') THEN
4814: asn_debug.put_line('Days exception Code ' || NVL(x_shipmentdistributionrec.receipt_days_exception_code, 'XXX'));
4815: END IF;
4816:
4817: -- Check shipto_location enforcement
4818:
4820: NVL(temp_cascaded_table(1).ship_to_location_id, x_header_record.header_record.location_id),
4821: x_shipmentdistributionrec.enforce_ship_to_location_code
4822: );
4823:
4824: IF (g_asn_debug = 'Y') THEN
4825: asn_debug.put_line('Enforce ShipToLocation ' || NVL(x_shipmentdistributionrec.enforce_ship_to_location_code, 'XXX'));
4826: END IF;
4827:
4828: /* Bug 2208664 : Enter error message in po_interface_errors if enforce_ship_to_location_code is 'WARNING', and
4821: x_shipmentdistributionrec.enforce_ship_to_location_code
4822: );
4823:
4824: IF (g_asn_debug = 'Y') THEN
4825: asn_debug.put_line('Enforce ShipToLocation ' || NVL(x_shipmentdistributionrec.enforce_ship_to_location_code, 'XXX'));
4826: END IF;
4827:
4828: /* Bug 2208664 : Enter error message in po_interface_errors if enforce_ship_to_location_code is 'WARNING', and
4829: Enter error message in po_interface_errors if enforce_ship_to_location_code is 'REJECT' and error out
4863: IF (x_first_trans)
4864: AND temp_cascaded_table(current_n).item_id IS NULL THEN --{
4865: temp_cascaded_table(current_n).item_id := x_shipmentdistributionrec.item_id;
4866:
4867: IF (g_asn_debug = 'Y') THEN
4868: asn_debug.put_line('Cursor Item Id is ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
4869: END IF;
4870:
4871: -- Bug 4881909 : For one-time items item_id would be null. Added check
4864: AND temp_cascaded_table(current_n).item_id IS NULL THEN --{
4865: temp_cascaded_table(current_n).item_id := x_shipmentdistributionrec.item_id;
4866:
4867: IF (g_asn_debug = 'Y') THEN
4868: asn_debug.put_line('Cursor Item Id is ' || TO_CHAR(temp_cascaded_table(current_n).item_id));
4869: END IF;
4870:
4871: -- Bug 4881909 : For one-time items item_id would be null. Added check
4872: -- for item_id in the following IF statement
4878: FROM mtl_system_items
4879: WHERE mtl_system_items.inventory_item_id = temp_cascaded_table(current_n).item_id
4880: AND mtl_system_items.organization_id = temp_cascaded_table(current_n).to_organization_id;
4881:
4882: IF (g_asn_debug = 'Y') THEN
4883: asn_debug.put_line('Primary UOM: ' || temp_cascaded_table(current_n).primary_unit_of_measure);
4884: END IF;
4885: EXCEPTION
4886: WHEN NO_DATA_FOUND THEN
4879: WHERE mtl_system_items.inventory_item_id = temp_cascaded_table(current_n).item_id
4880: AND mtl_system_items.organization_id = temp_cascaded_table(current_n).to_organization_id;
4881:
4882: IF (g_asn_debug = 'Y') THEN
4883: asn_debug.put_line('Primary UOM: ' || temp_cascaded_table(current_n).primary_unit_of_measure);
4884: END IF;
4885: EXCEPTION
4886: WHEN NO_DATA_FOUND THEN
4887: temp_cascaded_table(current_n).error_status := rcv_error_pkg.g_ret_sts_warning;
4889: rcv_error_pkg.set_token('PRIMARY_UNIT', '');
4890: rcv_error_pkg.set_token('SHIPMENT_UNIT', '');
4891: rcv_error_pkg.log_interface_warning('ITEM_ID');
4892:
4893: IF (g_asn_debug = 'Y') THEN
4894: asn_debug.put_line('Primary UOM error');
4895: END IF;
4896: END;
4897: END IF; --}
4890: rcv_error_pkg.set_token('SHIPMENT_UNIT', '');
4891: rcv_error_pkg.log_interface_warning('ITEM_ID');
4892:
4893: IF (g_asn_debug = 'Y') THEN
4894: asn_debug.put_line('Primary UOM error');
4895: END IF;
4896: END;
4897: END IF; --}
4898: END IF; --}
4910:
4911: /*Bug# 1548597 */
4912: /* IF (x_is_asn = FALSE) THEN --{ Replaced by forward port 4523892 */
4913: IF (rcv_roi_header.g_txn_against_asn = 'N') THEN --{ Bug#4523892
4914: IF (g_asn_debug = 'Y') THEN
4915: asn_debug.put_line('Receiving against a Po');
4916: END IF;
4917:
4918: rcv_quantities_s.get_available_quantity('RECEIVE',
4911: /*Bug# 1548597 */
4912: /* IF (x_is_asn = FALSE) THEN --{ Replaced by forward port 4523892 */
4913: IF (rcv_roi_header.g_txn_against_asn = 'N') THEN --{ Bug#4523892
4914: IF (g_asn_debug = 'Y') THEN
4915: asn_debug.put_line('Receiving against a Po');
4916: END IF;
4917:
4918: rcv_quantities_s.get_available_quantity('RECEIVE',
4919: x_shipmentdistributionrec.line_location_id,
4926: x_shipmentdistributionrec.unit_meas_lookup_code,
4927: x_secondary_available_qty
4928: );
4929: ELSE --}{
4930: IF (g_asn_debug = 'Y') THEN
4931: asn_debug.put_line('Receiving an ASN');
4932: END IF;
4933:
4934: rcv_quantities_s.get_available_asn_quantity('RECEIVE',
4927: x_secondary_available_qty
4928: );
4929: ELSE --}{
4930: IF (g_asn_debug = 'Y') THEN
4931: asn_debug.put_line('Receiving an ASN');
4932: END IF;
4933:
4934: rcv_quantities_s.get_available_asn_quantity('RECEIVE',
4935: x_shipmentdistributionrec.shipment_line_id,
4940: x_tolerable_qty,
4941: x_secondary_available_qty
4942: );
4943:
4944: IF (g_asn_debug = 'Y') THEN
4945: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
4946: asn_debug.put_line('x_tolerable_qty ' || x_tolerable_qty);
4947: asn_debug.put_line('x_secondary_available_qty ' || x_secondary_available_qty);
4948: END IF;
4941: x_secondary_available_qty
4942: );
4943:
4944: IF (g_asn_debug = 'Y') THEN
4945: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
4946: asn_debug.put_line('x_tolerable_qty ' || x_tolerable_qty);
4947: asn_debug.put_line('x_secondary_available_qty ' || x_secondary_available_qty);
4948: END IF;
4949: END IF; --}
4942: );
4943:
4944: IF (g_asn_debug = 'Y') THEN
4945: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
4946: asn_debug.put_line('x_tolerable_qty ' || x_tolerable_qty);
4947: asn_debug.put_line('x_secondary_available_qty ' || x_secondary_available_qty);
4948: END IF;
4949: END IF; --}
4950:
4943:
4944: IF (g_asn_debug = 'Y') THEN
4945: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
4946: asn_debug.put_line('x_tolerable_qty ' || x_tolerable_qty);
4947: asn_debug.put_line('x_secondary_available_qty ' || x_secondary_available_qty);
4948: END IF;
4949: END IF; --}
4950:
4951:
4965: ELSE --} { for txn != deliver
4966: /* Bug# 1548597*/
4967: /* IF (x_is_asn = FALSE) THEN --{ Replaced by forward port 4523892 */
4968: IF (rcv_roi_header.g_txn_against_asn = 'N') THEN --{ Bug#4523892
4969: IF (g_asn_debug = 'Y') THEN
4970: asn_debug.put_line('Direct delivery against a Po');
4971: END IF;
4972:
4973: rcv_quantities_s.get_available_quantity('DIRECT RECEIPT',
4966: /* Bug# 1548597*/
4967: /* IF (x_is_asn = FALSE) THEN --{ Replaced by forward port 4523892 */
4968: IF (rcv_roi_header.g_txn_against_asn = 'N') THEN --{ Bug#4523892
4969: IF (g_asn_debug = 'Y') THEN
4970: asn_debug.put_line('Direct delivery against a Po');
4971: END IF;
4972:
4973: rcv_quantities_s.get_available_quantity('DIRECT RECEIPT',
4974: x_shipmentdistributionrec.po_distribution_id,
4981: x_shipmentdistributionrec.unit_meas_lookup_code,
4982: x_secondary_available_qty
4983: );
4984: ELSE --}{
4985: IF (g_asn_debug = 'Y') THEN
4986: asn_debug.put_line('Direct delivery for an ASN');
4987: END IF;
4988:
4989: rcv_quantities_s.get_available_asn_quantity('DIRECT RECEIPT',
4982: x_secondary_available_qty
4983: );
4984: ELSE --}{
4985: IF (g_asn_debug = 'Y') THEN
4986: asn_debug.put_line('Direct delivery for an ASN');
4987: END IF;
4988:
4989: rcv_quantities_s.get_available_asn_quantity('DIRECT RECEIPT',
4990: x_shipmentdistributionrec.shipment_line_id,
4995: x_tolerable_qty,
4996: x_secondary_available_qty
4997: );
4998:
4999: IF (g_asn_debug = 'Y') THEN
5000: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
5001: asn_debug.put_line('x_tolerable_qty ' || x_tolerable_qty);
5002: asn_debug.put_line('x_secondary_available_qty ' || x_secondary_available_qty);
5003: END IF;
4996: x_secondary_available_qty
4997: );
4998:
4999: IF (g_asn_debug = 'Y') THEN
5000: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
5001: asn_debug.put_line('x_tolerable_qty ' || x_tolerable_qty);
5002: asn_debug.put_line('x_secondary_available_qty ' || x_secondary_available_qty);
5003: END IF;
5004: END IF; --}
4997: );
4998:
4999: IF (g_asn_debug = 'Y') THEN
5000: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
5001: asn_debug.put_line('x_tolerable_qty ' || x_tolerable_qty);
5002: asn_debug.put_line('x_secondary_available_qty ' || x_secondary_available_qty);
5003: END IF;
5004: END IF; --}
5005:
4998:
4999: IF (g_asn_debug = 'Y') THEN
5000: asn_debug.put_line('x_converted_trx_qty ' || x_converted_trx_qty);
5001: asn_debug.put_line('x_tolerable_qty ' || x_tolerable_qty);
5002: asn_debug.put_line('x_secondary_available_qty ' || x_secondary_available_qty);
5003: END IF;
5004: END IF; --}
5005:
5006: /* Bug# 1337787 - Calculated the x_tolerable_qty in
5021: END LOOP;
5022: END IF;
5023: END IF; --} for txn =deliver
5024:
5025: IF (g_asn_debug = 'Y') THEN
5026: asn_debug.put_line('After call to get_available quantity');
5027: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5028: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5029: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5022: END IF;
5023: END IF; --} for txn =deliver
5024:
5025: IF (g_asn_debug = 'Y') THEN
5026: asn_debug.put_line('After call to get_available quantity');
5027: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5028: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5029: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5030: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5023: END IF; --} for txn =deliver
5024:
5025: IF (g_asn_debug = 'Y') THEN
5026: asn_debug.put_line('After call to get_available quantity');
5027: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5028: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5029: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5030: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5031: END IF;
5024:
5025: IF (g_asn_debug = 'Y') THEN
5026: asn_debug.put_line('After call to get_available quantity');
5027: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5028: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5029: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5030: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5031: END IF;
5032:
5025: IF (g_asn_debug = 'Y') THEN
5026: asn_debug.put_line('After call to get_available quantity');
5027: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5028: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5029: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5030: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5031: END IF;
5032:
5033: -- if qty has already been allocated then reduce available and tolerable
5026: asn_debug.put_line('After call to get_available quantity');
5027: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5028: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5029: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5030: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5031: END IF;
5032:
5033: -- if qty has already been allocated then reduce available and tolerable
5034: -- qty by the allocated amount
5044: IF x_tolerable_qty < 0 THEN
5045: x_tolerable_qty := 0;
5046: END IF;
5047:
5048: IF (g_asn_debug = 'Y') THEN
5049: asn_debug.put_line('Have some allocated quantity. Will reduce qty');
5050: asn_debug.put_line('Allocated Qty ' || TO_CHAR(already_allocated_qty));
5051: asn_debug.put_line('After reducing by allocated qty');
5052: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5045: x_tolerable_qty := 0;
5046: END IF;
5047:
5048: IF (g_asn_debug = 'Y') THEN
5049: asn_debug.put_line('Have some allocated quantity. Will reduce qty');
5050: asn_debug.put_line('Allocated Qty ' || TO_CHAR(already_allocated_qty));
5051: asn_debug.put_line('After reducing by allocated qty');
5052: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5053: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5046: END IF;
5047:
5048: IF (g_asn_debug = 'Y') THEN
5049: asn_debug.put_line('Have some allocated quantity. Will reduce qty');
5050: asn_debug.put_line('Allocated Qty ' || TO_CHAR(already_allocated_qty));
5051: asn_debug.put_line('After reducing by allocated qty');
5052: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5053: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5054: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5047:
5048: IF (g_asn_debug = 'Y') THEN
5049: asn_debug.put_line('Have some allocated quantity. Will reduce qty');
5050: asn_debug.put_line('Allocated Qty ' || TO_CHAR(already_allocated_qty));
5051: asn_debug.put_line('After reducing by allocated qty');
5052: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5053: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5054: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5055: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5048: IF (g_asn_debug = 'Y') THEN
5049: asn_debug.put_line('Have some allocated quantity. Will reduce qty');
5050: asn_debug.put_line('Allocated Qty ' || TO_CHAR(already_allocated_qty));
5051: asn_debug.put_line('After reducing by allocated qty');
5052: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5053: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5054: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5055: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5056: END IF;
5049: asn_debug.put_line('Have some allocated quantity. Will reduce qty');
5050: asn_debug.put_line('Allocated Qty ' || TO_CHAR(already_allocated_qty));
5051: asn_debug.put_line('After reducing by allocated qty');
5052: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5053: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5054: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5055: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5056: END IF;
5057: END IF; --}
5050: asn_debug.put_line('Allocated Qty ' || TO_CHAR(already_allocated_qty));
5051: asn_debug.put_line('After reducing by allocated qty');
5052: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5053: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5054: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5055: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5056: END IF;
5057: END IF; --}
5058:
5051: asn_debug.put_line('After reducing by allocated qty');
5052: asn_debug.put_line('Available Quantity ' || TO_CHAR(x_converted_trx_qty));
5053: asn_debug.put_line('Tolerable Quantity ' || TO_CHAR(x_tolerable_qty));
5054: asn_debug.put_line('Already Shipped Quantity ' || TO_CHAR(NVL(x_shipmentdistributionrec.quantity_shipped, 0)));
5055: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
5056: END IF;
5057: END IF; --}
5058:
5059: -- We can use the first record since the item_id and uom are not going to change
5081: l_complex_flag);
5082:
5083: IF (l_return_status IS NOT NULL AND
5084: l_return_status = FND_API.g_ret_sts_success) THEN
5085: IF( g_asn_debug = 'Y' ) THEN
5086: asn_debug.put_line('l_return_status ' || l_return_status);
5087: asn_debug.put_line('l_po_header_id ' || temp_cascaded_table(1).po_header_id);
5088: END IF;
5089: ELSE
5082:
5083: IF (l_return_status IS NOT NULL AND
5084: l_return_status = FND_API.g_ret_sts_success) THEN
5085: IF( g_asn_debug = 'Y' ) THEN
5086: asn_debug.put_line('l_return_status ' || l_return_status);
5087: asn_debug.put_line('l_po_header_id ' || temp_cascaded_table(1).po_header_id);
5088: END IF;
5089: ELSE
5090: IF( g_asn_debug = 'Y') THEN
5083: IF (l_return_status IS NOT NULL AND
5084: l_return_status = FND_API.g_ret_sts_success) THEN
5085: IF( g_asn_debug = 'Y' ) THEN
5086: asn_debug.put_line('l_return_status ' || l_return_status);
5087: asn_debug.put_line('l_po_header_id ' || temp_cascaded_table(1).po_header_id);
5088: END IF;
5089: ELSE
5090: IF( g_asn_debug = 'Y') THEN
5091: asn_debug.put_line('l_return_status ' || l_return_status);
5086: asn_debug.put_line('l_return_status ' || l_return_status);
5087: asn_debug.put_line('l_po_header_id ' || temp_cascaded_table(1).po_header_id);
5088: END IF;
5089: ELSE
5090: IF( g_asn_debug = 'Y') THEN
5091: asn_debug.put_line('l_return_status ' || l_return_status);
5092: END IF;
5093: END IF;
5094:
5087: asn_debug.put_line('l_po_header_id ' || temp_cascaded_table(1).po_header_id);
5088: END IF;
5089: ELSE
5090: IF( g_asn_debug = 'Y') THEN
5091: asn_debug.put_line('l_return_status ' || l_return_status);
5092: END IF;
5093: END IF;
5094:
5095: if ( l_complex_flag = 'Y' ) then --{
5148: temp_cascaded_table(1).item_id
5149: );
5150: EXCEPTION
5151: when OTHERS THEN
5152: IF (g_asn_debug = 'Y') THEN
5153: asn_debug.put_line('Error: fail to calculate the x_remaining_qty_po_uom');
5154: END IF;
5155: x_remaining_qty_po_uom := 0;
5156: END;
5149: );
5150: EXCEPTION
5151: when OTHERS THEN
5152: IF (g_asn_debug = 'Y') THEN
5153: asn_debug.put_line('Error: fail to calculate the x_remaining_qty_po_uom');
5154: END IF;
5155: x_remaining_qty_po_uom := 0;
5156: END;
5157:
5163: temp_cascaded_table(1).item_id
5164: );
5165: EXCEPTION
5166: when OTHERS THEN
5167: IF (g_asn_debug = 'Y') THEN
5168: asn_debug.put_line('Error: fail to calculate the po_asn_uom_qty');
5169: END IF;
5170: po_asn_uom_qty := 0;
5171: END;
5164: );
5165: EXCEPTION
5166: when OTHERS THEN
5167: IF (g_asn_debug = 'Y') THEN
5168: asn_debug.put_line('Error: fail to calculate the po_asn_uom_qty');
5169: END IF;
5170: po_asn_uom_qty := 0;
5171: END;
5172:
5177: );
5178: -- Bug 4898703 - END }
5179: EXCEPTION
5180: when OTHERS THEN
5181: IF (g_asn_debug = 'Y') THEN
5182: asn_debug.put_line('Error: fail to calculate the po_primary_uom_qty');
5183: END IF;
5184: po_primary_uom_qty := 0;
5185: END;
5178: -- Bug 4898703 - END }
5179: EXCEPTION
5180: when OTHERS THEN
5181: IF (g_asn_debug = 'Y') THEN
5182: asn_debug.put_line('Error: fail to calculate the po_primary_uom_qty');
5183: END IF;
5184: po_primary_uom_qty := 0;
5185: END;
5186: -- end for bug 8625167
5191: OR -- no point in going further for this record
5192: po_asn_uom_qty = 0
5193: OR -- as we cannot convert between the ASN -> PO uoms
5194: po_primary_uom_qty = 0 THEN --{ -- PO -> ASN uom, PO -> PRIMARY UOM
5195: IF (g_asn_debug = 'Y') THEN
5196: asn_debug.put_line('Populating an error message in the interface tables');
5197: asn_debug.put_line('Cannot interconvert between diff UOMs');
5198: asn_debug.put_line('This po_line cannot be used as the uoms ');
5199: asn_debug.put_line(temp_cascaded_table(1).unit_of_measure || ' ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5192: po_asn_uom_qty = 0
5193: OR -- as we cannot convert between the ASN -> PO uoms
5194: po_primary_uom_qty = 0 THEN --{ -- PO -> ASN uom, PO -> PRIMARY UOM
5195: IF (g_asn_debug = 'Y') THEN
5196: asn_debug.put_line('Populating an error message in the interface tables');
5197: asn_debug.put_line('Cannot interconvert between diff UOMs');
5198: asn_debug.put_line('This po_line cannot be used as the uoms ');
5199: asn_debug.put_line(temp_cascaded_table(1).unit_of_measure || ' ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5200: asn_debug.put_line('cannot be converted for item ' || TO_CHAR(temp_cascaded_table(1).item_id));
5193: OR -- as we cannot convert between the ASN -> PO uoms
5194: po_primary_uom_qty = 0 THEN --{ -- PO -> ASN uom, PO -> PRIMARY UOM
5195: IF (g_asn_debug = 'Y') THEN
5196: asn_debug.put_line('Populating an error message in the interface tables');
5197: asn_debug.put_line('Cannot interconvert between diff UOMs');
5198: asn_debug.put_line('This po_line cannot be used as the uoms ');
5199: asn_debug.put_line(temp_cascaded_table(1).unit_of_measure || ' ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5200: asn_debug.put_line('cannot be converted for item ' || TO_CHAR(temp_cascaded_table(1).item_id));
5201: END IF; -- bug 8625167, correct the existing logic to throw exception if g_asn_debug is set to 'N'.
5194: po_primary_uom_qty = 0 THEN --{ -- PO -> ASN uom, PO -> PRIMARY UOM
5195: IF (g_asn_debug = 'Y') THEN
5196: asn_debug.put_line('Populating an error message in the interface tables');
5197: asn_debug.put_line('Cannot interconvert between diff UOMs');
5198: asn_debug.put_line('This po_line cannot be used as the uoms ');
5199: asn_debug.put_line(temp_cascaded_table(1).unit_of_measure || ' ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5200: asn_debug.put_line('cannot be converted for item ' || TO_CHAR(temp_cascaded_table(1).item_id));
5201: END IF; -- bug 8625167, correct the existing logic to throw exception if g_asn_debug is set to 'N'.
5202: /* Start Bug 3654053 : Need to populate the po_interface_errors
5195: IF (g_asn_debug = 'Y') THEN
5196: asn_debug.put_line('Populating an error message in the interface tables');
5197: asn_debug.put_line('Cannot interconvert between diff UOMs');
5198: asn_debug.put_line('This po_line cannot be used as the uoms ');
5199: asn_debug.put_line(temp_cascaded_table(1).unit_of_measure || ' ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5200: asn_debug.put_line('cannot be converted for item ' || TO_CHAR(temp_cascaded_table(1).item_id));
5201: END IF; -- bug 8625167, correct the existing logic to throw exception if g_asn_debug is set to 'N'.
5202: /* Start Bug 3654053 : Need to populate the po_interface_errors
5203: table if the UOM conversion errors out.
5196: asn_debug.put_line('Populating an error message in the interface tables');
5197: asn_debug.put_line('Cannot interconvert between diff UOMs');
5198: asn_debug.put_line('This po_line cannot be used as the uoms ');
5199: asn_debug.put_line(temp_cascaded_table(1).unit_of_measure || ' ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5200: asn_debug.put_line('cannot be converted for item ' || TO_CHAR(temp_cascaded_table(1).item_id));
5201: END IF; -- bug 8625167, correct the existing logic to throw exception if g_asn_debug is set to 'N'.
5202: /* Start Bug 3654053 : Need to populate the po_interface_errors
5203: table if the UOM conversion errors out.
5204: */
5197: asn_debug.put_line('Cannot interconvert between diff UOMs');
5198: asn_debug.put_line('This po_line cannot be used as the uoms ');
5199: asn_debug.put_line(temp_cascaded_table(1).unit_of_measure || ' ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5200: asn_debug.put_line('cannot be converted for item ' || TO_CHAR(temp_cascaded_table(1).item_id));
5201: END IF; -- bug 8625167, correct the existing logic to throw exception if g_asn_debug is set to 'N'.
5202: /* Start Bug 3654053 : Need to populate the po_interface_errors
5203: table if the UOM conversion errors out.
5204: */
5205: IF po_primary_uom_qty = 0 THEN
5220:
5221: rcv_error_pkg.log_interface_error('UNIT_OF_MEASURE', FALSE);
5222: END IF;
5223: /* End Bug 3654053 */
5224: -- For bug 8625167, correct the existing logic to throw exception if g_asn_debug is set to 'N'.
5225: --END IF;
5226: -- End for bug 8625167
5227: ELSE -- we have converted the qty between uoms succesfully } {
5228: IF (g_asn_debug = 'Y') THEN
5224: -- For bug 8625167, correct the existing logic to throw exception if g_asn_debug is set to 'N'.
5225: --END IF;
5226: -- End for bug 8625167
5227: ELSE -- we have converted the qty between uoms succesfully } {
5228: IF (g_asn_debug = 'Y') THEN
5229: asn_debug.put_line('Current Item Id ' || TO_CHAR(temp_cascaded_table(1).item_id));
5230: asn_debug.put_line('Current ASN Quantity ' || TO_CHAR(x_remaining_quantity));
5231: asn_debug.put_line('Current ASN UOM ' || temp_cascaded_table(1).unit_of_measure);
5232: asn_debug.put_line('Converted PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
5225: --END IF;
5226: -- End for bug 8625167
5227: ELSE -- we have converted the qty between uoms succesfully } {
5228: IF (g_asn_debug = 'Y') THEN
5229: asn_debug.put_line('Current Item Id ' || TO_CHAR(temp_cascaded_table(1).item_id));
5230: asn_debug.put_line('Current ASN Quantity ' || TO_CHAR(x_remaining_quantity));
5231: asn_debug.put_line('Current ASN UOM ' || temp_cascaded_table(1).unit_of_measure);
5232: asn_debug.put_line('Converted PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
5233: asn_debug.put_line('PO UOM ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5226: -- End for bug 8625167
5227: ELSE -- we have converted the qty between uoms succesfully } {
5228: IF (g_asn_debug = 'Y') THEN
5229: asn_debug.put_line('Current Item Id ' || TO_CHAR(temp_cascaded_table(1).item_id));
5230: asn_debug.put_line('Current ASN Quantity ' || TO_CHAR(x_remaining_quantity));
5231: asn_debug.put_line('Current ASN UOM ' || temp_cascaded_table(1).unit_of_measure);
5232: asn_debug.put_line('Converted PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
5233: asn_debug.put_line('PO UOM ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5234: END IF;
5227: ELSE -- we have converted the qty between uoms succesfully } {
5228: IF (g_asn_debug = 'Y') THEN
5229: asn_debug.put_line('Current Item Id ' || TO_CHAR(temp_cascaded_table(1).item_id));
5230: asn_debug.put_line('Current ASN Quantity ' || TO_CHAR(x_remaining_quantity));
5231: asn_debug.put_line('Current ASN UOM ' || temp_cascaded_table(1).unit_of_measure);
5232: asn_debug.put_line('Converted PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
5233: asn_debug.put_line('PO UOM ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5234: END IF;
5235:
5228: IF (g_asn_debug = 'Y') THEN
5229: asn_debug.put_line('Current Item Id ' || TO_CHAR(temp_cascaded_table(1).item_id));
5230: asn_debug.put_line('Current ASN Quantity ' || TO_CHAR(x_remaining_quantity));
5231: asn_debug.put_line('Current ASN UOM ' || temp_cascaded_table(1).unit_of_measure);
5232: asn_debug.put_line('Converted PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
5233: asn_debug.put_line('PO UOM ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5234: END IF;
5235:
5236: -- If last row set available = tolerable - shipped
5229: asn_debug.put_line('Current Item Id ' || TO_CHAR(temp_cascaded_table(1).item_id));
5230: asn_debug.put_line('Current ASN Quantity ' || TO_CHAR(x_remaining_quantity));
5231: asn_debug.put_line('Current ASN UOM ' || temp_cascaded_table(1).unit_of_measure);
5232: asn_debug.put_line('Converted PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
5233: asn_debug.put_line('PO UOM ' || x_shipmentdistributionrec.unit_meas_lookup_code);
5234: END IF;
5235:
5236: -- If last row set available = tolerable - shipped
5237: -- else = available - shipped
5241: */
5242: IF rows_fetched = x_record_count THEN --{
5243: x_converted_trx_qty := x_tolerable_qty - NVL(x_shipmentdistributionrec.quantity_shipped, 0);
5244:
5245: IF (g_asn_debug = 'Y') THEN
5246: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_trx_qty));
5247: END IF;
5248: ELSE --} {
5249: x_converted_trx_qty := x_converted_trx_qty - NVL(x_shipmentdistributionrec.quantity_shipped, 0);
5242: IF rows_fetched = x_record_count THEN --{
5243: x_converted_trx_qty := x_tolerable_qty - NVL(x_shipmentdistributionrec.quantity_shipped, 0);
5244:
5245: IF (g_asn_debug = 'Y') THEN
5246: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_trx_qty));
5247: END IF;
5248: ELSE --} {
5249: x_converted_trx_qty := x_converted_trx_qty - NVL(x_shipmentdistributionrec.quantity_shipped, 0);
5250:
5247: END IF;
5248: ELSE --} {
5249: x_converted_trx_qty := x_converted_trx_qty - NVL(x_shipmentdistributionrec.quantity_shipped, 0);
5250:
5251: IF (g_asn_debug = 'Y') THEN
5252: asn_debug.put_line('Not Last Row : ' || TO_CHAR(x_converted_trx_qty));
5253: END IF;
5254: END IF; --}
5255:
5248: ELSE --} {
5249: x_converted_trx_qty := x_converted_trx_qty - NVL(x_shipmentdistributionrec.quantity_shipped, 0);
5250:
5251: IF (g_asn_debug = 'Y') THEN
5252: asn_debug.put_line('Not Last Row : ' || TO_CHAR(x_converted_trx_qty));
5253: END IF;
5254: END IF; --}
5255:
5256: IF x_converted_trx_qty > 0 THEN --{
5254: END IF; --}
5255:
5256: IF x_converted_trx_qty > 0 THEN --{
5257: IF (x_converted_trx_qty < x_remaining_qty_po_uom) THEN -- compare like uoms {
5258: IF (g_asn_debug = 'Y') THEN
5259: asn_debug.put_line('We are in > Qty branch');
5260: END IF;
5261:
5262: x_remaining_qty_po_uom := x_remaining_qty_po_uom - x_converted_trx_qty;
5255:
5256: IF x_converted_trx_qty > 0 THEN --{
5257: IF (x_converted_trx_qty < x_remaining_qty_po_uom) THEN -- compare like uoms {
5258: IF (g_asn_debug = 'Y') THEN
5259: asn_debug.put_line('We are in > Qty branch');
5260: END IF;
5261:
5262: x_remaining_qty_po_uom := x_remaining_qty_po_uom - x_converted_trx_qty;
5263: -- change asn uom qty so both qtys are in sync
5285: temp_cascaded_table(1).item_id );
5286: end if; -- 5203841 }
5287: insert_into_table := TRUE;
5288: ELSE --} {
5289: IF (g_asn_debug = 'Y') THEN
5290: asn_debug.put_line('We are in <= Qty branch ');
5291: END IF;
5292:
5293: x_converted_trx_qty := x_remaining_qty_po_uom;
5286: end if; -- 5203841 }
5287: insert_into_table := TRUE;
5288: ELSE --} {
5289: IF (g_asn_debug = 'Y') THEN
5290: asn_debug.put_line('We are in <= Qty branch ');
5291: END IF;
5292:
5293: x_converted_trx_qty := x_remaining_qty_po_uom;
5294: insert_into_table := TRUE;
5297: END IF; --}
5298: ELSE -- no qty for this record but if last row we need it } {
5299: IF rows_fetched = x_record_count THEN --{ last row needs to be inserted anyway
5300: -- so that the row can be used based on qty tolerance checks
5301: IF (g_asn_debug = 'Y') THEN
5302: asn_debug.put_line('Quantity is less then 0 but last record');
5303: END IF;
5304:
5305: insert_into_table := TRUE;
5298: ELSE -- no qty for this record but if last row we need it } {
5299: IF rows_fetched = x_record_count THEN --{ last row needs to be inserted anyway
5300: -- so that the row can be used based on qty tolerance checks
5301: IF (g_asn_debug = 'Y') THEN
5302: asn_debug.put_line('Quantity is less then 0 but last record');
5303: END IF;
5304:
5305: insert_into_table := TRUE;
5306: x_converted_trx_qty := 0;
5304:
5305: insert_into_table := TRUE;
5306: x_converted_trx_qty := 0;
5307: ELSE --} {
5308: IF (g_asn_debug = 'Y') THEN
5309: asn_debug.put_line('<= 0 Quantity but more records in cursor');
5310: END IF;
5311:
5312: x_remaining_qty_po_uom := 0; -- we may have a diff uom on the next iteration
5305: insert_into_table := TRUE;
5306: x_converted_trx_qty := 0;
5307: ELSE --} {
5308: IF (g_asn_debug = 'Y') THEN
5309: asn_debug.put_line('<= 0 Quantity but more records in cursor');
5310: END IF;
5311:
5312: x_remaining_qty_po_uom := 0; -- we may have a diff uom on the next iteration
5313:
5310: END IF;
5311:
5312: x_remaining_qty_po_uom := 0; -- we may have a diff uom on the next iteration
5313:
5314: IF (g_asn_debug = 'Y') THEN
5315: asn_debug.put_line('We have to deal with remaining_qty > 0 and x_converted_trx_qty -ve');
5316: END IF;
5317:
5318: insert_into_table := FALSE;
5311:
5312: x_remaining_qty_po_uom := 0; -- we may have a diff uom on the next iteration
5313:
5314: IF (g_asn_debug = 'Y') THEN
5315: asn_debug.put_line('We have to deal with remaining_qty > 0 and x_converted_trx_qty -ve');
5316: END IF;
5317:
5318: insert_into_table := FALSE;
5319: END IF; --}
5321: END IF; --} remaining_qty_po_uom <> 0
5322:
5323: IF insert_into_table THEN --{
5324: IF (x_first_trans) THEN --{
5325: IF (g_asn_debug = 'Y') THEN
5326: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
5327: END IF;
5328:
5329: x_first_trans := FALSE;
5322:
5323: IF insert_into_table THEN --{
5324: IF (x_first_trans) THEN --{
5325: IF (g_asn_debug = 'Y') THEN
5326: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
5327: END IF;
5328:
5329: x_first_trans := FALSE;
5330:
5328:
5329: x_first_trans := FALSE;
5330:
5331: IF NVL(temp_cascaded_table(current_n).vendor_cum_shipped_qty, 0) <> 0 THEN --{
5332: IF (g_asn_debug = 'Y') THEN
5333: asn_debug.put_line('The cum qty from vendor is ' || TO_CHAR(temp_cascaded_table(current_n).vendor_cum_shipped_qty));
5334: END IF;
5335:
5336: /* The vendor sends us cum_qty which also includes the current shipment ???.
5329: x_first_trans := FALSE;
5330:
5331: IF NVL(temp_cascaded_table(current_n).vendor_cum_shipped_qty, 0) <> 0 THEN --{
5332: IF (g_asn_debug = 'Y') THEN
5333: asn_debug.put_line('The cum qty from vendor is ' || TO_CHAR(temp_cascaded_table(current_n).vendor_cum_shipped_qty));
5334: END IF;
5335:
5336: /* The vendor sends us cum_qty which also includes the current shipment ???.
5337: We need to allocate the correct cum_qty to each row as the cascade happens
5365: temp_cascaded_table(current_n).item_id
5366: ));
5367: end if; -- 5203841 }
5368:
5369: IF (g_asn_debug = 'Y') THEN
5370: asn_debug.put_line('Cum qty - current shipment ' || TO_CHAR(temp_cascaded_table(current_n).vendor_cum_shipped_qty));
5371: END IF;
5372: END IF; --}
5373: ELSE --} { ! x_first_trans
5366: ));
5367: end if; -- 5203841 }
5368:
5369: IF (g_asn_debug = 'Y') THEN
5370: asn_debug.put_line('Cum qty - current shipment ' || TO_CHAR(temp_cascaded_table(current_n).vendor_cum_shipped_qty));
5371: END IF;
5372: END IF; --}
5373: ELSE --} { ! x_first_trans
5374: IF (g_asn_debug = 'Y') THEN
5370: asn_debug.put_line('Cum qty - current shipment ' || TO_CHAR(temp_cascaded_table(current_n).vendor_cum_shipped_qty));
5371: END IF;
5372: END IF; --}
5373: ELSE --} { ! x_first_trans
5374: IF (g_asn_debug = 'Y') THEN
5375: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
5376: END IF;
5377:
5378: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
5371: END IF;
5372: END IF; --}
5373: ELSE --} { ! x_first_trans
5374: IF (g_asn_debug = 'Y') THEN
5375: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
5376: END IF;
5377:
5378: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
5379: END IF; --} matches x_first_transfer
5455:
5456: end if; -- 5203841 }
5457: -- Bug 4898703 - END }
5458:
5459: IF (g_asn_debug = 'Y') THEN
5460: asn_debug.put_line('primary_qty ' || temp_cascaded_table(current_n).primary_quantity);
5461: asn_debug.put_line('quantity ' || temp_cascaded_table(current_n).quantity);
5462: END IF;
5463:
5456: end if; -- 5203841 }
5457: -- Bug 4898703 - END }
5458:
5459: IF (g_asn_debug = 'Y') THEN
5460: asn_debug.put_line('primary_qty ' || temp_cascaded_table(current_n).primary_quantity);
5461: asn_debug.put_line('quantity ' || temp_cascaded_table(current_n).quantity);
5462: END IF;
5463:
5464: -- Assuming vendor_cum_shipped_qty is in PRIMARY UOM
5457: -- Bug 4898703 - END }
5458:
5459: IF (g_asn_debug = 'Y') THEN
5460: asn_debug.put_line('primary_qty ' || temp_cascaded_table(current_n).primary_quantity);
5461: asn_debug.put_line('quantity ' || temp_cascaded_table(current_n).quantity);
5462: END IF;
5463:
5464: -- Assuming vendor_cum_shipped_qty is in PRIMARY UOM
5465: IF NVL(temp_cascaded_table(current_n).vendor_cum_shipped_qty, 0) <> 0 THEN --{
5471: temp_cascaded_table(current_n).currency_code := x_shipmentdistributionrec.currency_code;
5472: temp_cascaded_table(current_n).po_unit_price := x_shipmentdistributionrec.unit_price;
5473: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).quantity * tax_amount_factor, 4);
5474:
5475: IF (g_asn_debug = 'Y') THEN
5476: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
5477: END IF;
5478:
5479: temp_cascaded_table(current_n).category_id := x_shipmentdistributionrec.category_id;
5472: temp_cascaded_table(current_n).po_unit_price := x_shipmentdistributionrec.unit_price;
5473: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).quantity * tax_amount_factor, 4);
5474:
5475: IF (g_asn_debug = 'Y') THEN
5476: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
5477: END IF;
5478:
5479: temp_cascaded_table(current_n).category_id := x_shipmentdistributionrec.category_id;
5480: temp_cascaded_table(current_n).item_description := x_shipmentdistributionrec.item_description;
5488: temp_cascaded_table(current_n).po_line_location_id := x_shipmentdistributionrec.line_location_id;
5489: temp_cascaded_table(current_n).shipment_line_id := x_shipmentdistributionrec.shipment_line_id;
5490:
5491: IF x_shipmentdistributionrec.enforce_ship_to_location_code = 'WARNING' THEN --{
5492: IF (g_asn_debug = 'Y') THEN
5493: asn_debug.put_line('Message to warn about different shiptolocations');
5494: END IF;
5495: END IF; --}
5496:
5489: temp_cascaded_table(current_n).shipment_line_id := x_shipmentdistributionrec.shipment_line_id;
5490:
5491: IF x_shipmentdistributionrec.enforce_ship_to_location_code = 'WARNING' THEN --{
5492: IF (g_asn_debug = 'Y') THEN
5493: asn_debug.put_line('Message to warn about different shiptolocations');
5494: END IF;
5495: END IF; --}
5496:
5497: /* ksareddy - 2329928 Ported changes by bao in branch to cache set_of_books_id */
5515: IF (x_ShipmentDistributionRec.match_option = 'R') THEN
5516: x_allow_rate_override := NVL(fnd_profile.value('ALLOW_RATE_OVERRIDE_FOR_USER_RATE_TYPE'), 'N');
5517: END IF;
5518:
5519: IF (g_asn_debug = 'Y') THEN
5520: asn_debug.put_line('Match Option:' || x_ShipmentDistributionRec.match_option ||
5521: 'Profile value ALLOW_RATE_OVERRIDE_FOR_USER_RATE_TYPE:' ||
5522: x_allow_rate_override);
5523: END IF;
5516: x_allow_rate_override := NVL(fnd_profile.value('ALLOW_RATE_OVERRIDE_FOR_USER_RATE_TYPE'), 'N');
5517: END IF;
5518:
5519: IF (g_asn_debug = 'Y') THEN
5520: asn_debug.put_line('Match Option:' || x_ShipmentDistributionRec.match_option ||
5521: 'Profile value ALLOW_RATE_OVERRIDE_FOR_USER_RATE_TYPE:' ||
5522: x_allow_rate_override);
5523: END IF;
5524:
5541: WHEN NO_DATA_FOUND THEN
5542: l_dist_count := 2;
5543: END;
5544:
5545: IF (g_asn_debug = 'Y') THEN
5546: asn_debug.put_line('No of Distributions:' || l_dist_count ||
5547: ':: Rate and Rate_date in po distributions' || x_rate ||
5548: '::' || l_rate_date);
5549: END IF;
5542: l_dist_count := 2;
5543: END;
5544:
5545: IF (g_asn_debug = 'Y') THEN
5546: asn_debug.put_line('No of Distributions:' || l_dist_count ||
5547: ':: Rate and Rate_date in po distributions' || x_rate ||
5548: '::' || l_rate_date);
5549: END IF;
5550:
5605: x_rate := round(x_rate,28);
5606: temp_cascaded_table(current_n).currency_conversion_rate := x_rate;
5607: EXCEPTION
5608: WHEN OTHERS THEN
5609: IF (g_asn_debug = 'Y') THEN
5610: asn_debug.put_line('Exception 1 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
5611: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
5612: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
5613: END IF;
5606: temp_cascaded_table(current_n).currency_conversion_rate := x_rate;
5607: EXCEPTION
5608: WHEN OTHERS THEN
5609: IF (g_asn_debug = 'Y') THEN
5610: asn_debug.put_line('Exception 1 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
5611: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
5612: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
5613: END IF;
5614: RAISE;
5608: WHEN OTHERS THEN
5609: IF (g_asn_debug = 'Y') THEN
5610: asn_debug.put_line('Exception 1 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
5611: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
5612: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
5613: END IF;
5614: RAISE;
5615: END;
5616: ELSE
5625: x_rate := round(x_rate,28);
5626: temp_cascaded_table(current_n).currency_conversion_rate := x_rate;
5627: EXCEPTION
5628: WHEN OTHERS THEN
5629: IF (g_asn_debug = 'Y') THEN
5630: asn_debug.put_line('Exception 2 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
5631: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
5632: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
5633: END IF;
5626: temp_cascaded_table(current_n).currency_conversion_rate := x_rate;
5627: EXCEPTION
5628: WHEN OTHERS THEN
5629: IF (g_asn_debug = 'Y') THEN
5630: asn_debug.put_line('Exception 2 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
5631: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
5632: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
5633: END IF;
5634: RAISE;
5628: WHEN OTHERS THEN
5629: IF (g_asn_debug = 'Y') THEN
5630: asn_debug.put_line('Exception 2 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
5631: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
5632: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
5633: END IF;
5634: RAISE;
5635: END;
5636: END IF; --}
5641: /* End of fix for Bug 13013727 */
5642:
5643: temp_cascaded_table(current_n).currency_conversion_type := x_ShipmentDistributionRec.rate_type;
5644:
5645: IF (g_asn_debug = 'Y') THEN
5646: asn_debug.put_line('Rate, Rate type and Rate_date ::' ||
5647: temp_cascaded_table(current_n).currency_conversion_rate ||
5648: '::' || temp_cascaded_table(current_n).currency_conversion_type ||
5649: '::' || temp_cascaded_table(current_n).currency_conversion_date);
5642:
5643: temp_cascaded_table(current_n).currency_conversion_type := x_ShipmentDistributionRec.rate_type;
5644:
5645: IF (g_asn_debug = 'Y') THEN
5646: asn_debug.put_line('Rate, Rate type and Rate_date ::' ||
5647: temp_cascaded_table(current_n).currency_conversion_rate ||
5648: '::' || temp_cascaded_table(current_n).currency_conversion_type ||
5649: '::' || temp_cascaded_table(current_n).currency_conversion_date);
5650: END IF;
5688: EXCEPTION
5689: WHEN NO_DATA_FOUND THEN
5690: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
5691:
5692: IF (g_asn_debug = 'Y') THEN
5693: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
5694: asn_debug.put_line(' So it is cleared off');
5695: END IF;
5696: WHEN OTHERS THEN
5689: WHEN NO_DATA_FOUND THEN
5690: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
5691:
5692: IF (g_asn_debug = 'Y') THEN
5693: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
5694: asn_debug.put_line(' So it is cleared off');
5695: END IF;
5696: WHEN OTHERS THEN
5697: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
5690: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
5691:
5692: IF (g_asn_debug = 'Y') THEN
5693: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
5694: asn_debug.put_line(' So it is cleared off');
5695: END IF;
5696: WHEN OTHERS THEN
5697: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
5698:
5695: END IF;
5696: WHEN OTHERS THEN
5697: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
5698:
5699: IF (g_asn_debug = 'Y') THEN
5700: asn_debug.put_line('Some exception has occured');
5701: asn_debug.put_line('This exception is due to the PO deliver to person');
5702: asn_debug.put_line('The deliver to person is optional');
5703: asn_debug.put_line('So cleared off the deliver to person');
5696: WHEN OTHERS THEN
5697: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
5698:
5699: IF (g_asn_debug = 'Y') THEN
5700: asn_debug.put_line('Some exception has occured');
5701: asn_debug.put_line('This exception is due to the PO deliver to person');
5702: asn_debug.put_line('The deliver to person is optional');
5703: asn_debug.put_line('So cleared off the deliver to person');
5704: END IF;
5697: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
5698:
5699: IF (g_asn_debug = 'Y') THEN
5700: asn_debug.put_line('Some exception has occured');
5701: asn_debug.put_line('This exception is due to the PO deliver to person');
5702: asn_debug.put_line('The deliver to person is optional');
5703: asn_debug.put_line('So cleared off the deliver to person');
5704: END IF;
5705: END;
5698:
5699: IF (g_asn_debug = 'Y') THEN
5700: asn_debug.put_line('Some exception has occured');
5701: asn_debug.put_line('This exception is due to the PO deliver to person');
5702: asn_debug.put_line('The deliver to person is optional');
5703: asn_debug.put_line('So cleared off the deliver to person');
5704: END IF;
5705: END;
5706: END IF; --}
5699: IF (g_asn_debug = 'Y') THEN
5700: asn_debug.put_line('Some exception has occured');
5701: asn_debug.put_line('This exception is due to the PO deliver to person');
5702: asn_debug.put_line('The deliver to person is optional');
5703: asn_debug.put_line('So cleared off the deliver to person');
5704: END IF;
5705: END;
5706: END IF; --}
5707: END IF; --}
5714: ** so that incases where subinventory and
5715: ** locator_id are not populated into RTI, locator_id could be
5716: ** derived at this point as the subinventory is known now.
5717: */
5718: IF (g_asn_debug = 'Y') THEN
5719: asn_debug.put_line('Derived Subinventory from PO Distribution:' || temp_cascaded_table(current_n).subinventory);
5720: END IF;
5721:
5722: derive_to_locator_id(temp_cascaded_table, current_n);
5715: ** locator_id are not populated into RTI, locator_id could be
5716: ** derived at this point as the subinventory is known now.
5717: */
5718: IF (g_asn_debug = 'Y') THEN
5719: asn_debug.put_line('Derived Subinventory from PO Distribution:' || temp_cascaded_table(current_n).subinventory);
5720: END IF;
5721:
5722: derive_to_locator_id(temp_cascaded_table, current_n);
5723:
5720: END IF;
5721:
5722: derive_to_locator_id(temp_cascaded_table, current_n);
5723:
5724: IF (g_asn_debug = 'Y') THEN
5725: asn_debug.put_line('Derived Locator_ID:' || temp_cascaded_table(current_n).locator_id);
5726: END IF;
5727:
5728: /* Bug3993867 - END */
5721:
5722: derive_to_locator_id(temp_cascaded_table, current_n);
5723:
5724: IF (g_asn_debug = 'Y') THEN
5725: asn_debug.put_line('Derived Locator_ID:' || temp_cascaded_table(current_n).locator_id);
5726: END IF;
5727:
5728: /* Bug3993867 - END */
5729:
5744: END IF; --} matches txn != deliver
5745:
5746: current_n := current_n + 1;
5747:
5748: IF (g_asn_debug = 'Y') THEN
5749: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
5750: END IF;
5751: END IF; --} matches if insert into table
5752: END IF; --} matches shipmentdistributionrec.receipt_days_exception_code = none
5745:
5746: current_n := current_n + 1;
5747:
5748: IF (g_asn_debug = 'Y') THEN
5749: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
5750: END IF;
5751: END IF; --} matches if insert into table
5752: END IF; --} matches shipmentdistributionrec.receipt_days_exception_code = none
5753: END LOOP; --}
5752: END IF; --} matches shipmentdistributionrec.receipt_days_exception_code = none
5753: END LOOP; --}
5754: ELSE --} {
5755: -- error_status and error_message are set after validate_quantity_shipped
5756: IF (g_asn_debug = 'Y') THEN
5757: asn_debug.put_line('No shipment_header_id/po_header_id/item_id ');
5758: END IF;
5759:
5760: IF (g_asn_debug = 'Y') THEN
5753: END LOOP; --}
5754: ELSE --} {
5755: -- error_status and error_message are set after validate_quantity_shipped
5756: IF (g_asn_debug = 'Y') THEN
5757: asn_debug.put_line('No shipment_header_id/po_header_id/item_id ');
5758: END IF;
5759:
5760: IF (g_asn_debug = 'Y') THEN
5761: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
5756: IF (g_asn_debug = 'Y') THEN
5757: asn_debug.put_line('No shipment_header_id/po_header_id/item_id ');
5758: END IF;
5759:
5760: IF (g_asn_debug = 'Y') THEN
5761: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
5762: END IF;
5763:
5764: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
5757: asn_debug.put_line('No shipment_header_id/po_header_id/item_id ');
5758: END IF;
5759:
5760: IF (g_asn_debug = 'Y') THEN
5761: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
5762: END IF;
5763:
5764: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
5765: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
5817: IF count_asn_distributions%ISOPEN THEN
5818: CLOSE count_asn_distributions;
5819: END IF;
5820:
5821: IF (g_asn_debug = 'Y') THEN
5822: asn_debug.put_line('Exit explode_line_quantity');
5823: END IF;
5824: EXCEPTION
5825: WHEN OTHERS THEN
5818: CLOSE count_asn_distributions;
5819: END IF;
5820:
5821: IF (g_asn_debug = 'Y') THEN
5822: asn_debug.put_line('Exit explode_line_quantity');
5823: END IF;
5824: EXCEPTION
5825: WHEN OTHERS THEN
5826: IF (g_asn_debug = 'Y') THEN
5822: asn_debug.put_line('Exit explode_line_quantity');
5823: END IF;
5824: EXCEPTION
5825: WHEN OTHERS THEN
5826: IF (g_asn_debug = 'Y') THEN
5827: asn_debug.put_line('Exception in derive_vendor_rcv_line_qty');
5828: END IF;
5829:
5830: IF shipments%ISOPEN THEN
5823: END IF;
5824: EXCEPTION
5825: WHEN OTHERS THEN
5826: IF (g_asn_debug = 'Y') THEN
5827: asn_debug.put_line('Exception in derive_vendor_rcv_line_qty');
5828: END IF;
5829:
5830: IF shipments%ISOPEN THEN
5831: CLOSE shipments;
5862: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_unexp_error;
5863: rcv_error_pkg.set_sql_error_message('derive_vendor_rcv_line_qty', x_progress);
5864: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
5865:
5866: IF (g_asn_debug = 'Y') THEN
5867: asn_debug.put_line(TO_CHAR(n));
5868: asn_debug.put_line(SQLERRM);
5869: asn_debug.put_line('error ' || x_progress);
5870: END IF;
5863: rcv_error_pkg.set_sql_error_message('derive_vendor_rcv_line_qty', x_progress);
5864: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
5865:
5866: IF (g_asn_debug = 'Y') THEN
5867: asn_debug.put_line(TO_CHAR(n));
5868: asn_debug.put_line(SQLERRM);
5869: asn_debug.put_line('error ' || x_progress);
5870: END IF;
5871: END derive_vendor_rcv_line_qty;
5864: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
5865:
5866: IF (g_asn_debug = 'Y') THEN
5867: asn_debug.put_line(TO_CHAR(n));
5868: asn_debug.put_line(SQLERRM);
5869: asn_debug.put_line('error ' || x_progress);
5870: END IF;
5871: END derive_vendor_rcv_line_qty;
5872:
5865:
5866: IF (g_asn_debug = 'Y') THEN
5867: asn_debug.put_line(TO_CHAR(n));
5868: asn_debug.put_line(SQLERRM);
5869: asn_debug.put_line('error ' || x_progress);
5870: END IF;
5871: END derive_vendor_rcv_line_qty;
5872:
5873: PROCEDURE derive_vendor_rcv_line_amt(
6093: BEGIN
6094: --check line quanity > 0
6095: x_progress := '097';
6096:
6097: IF (g_asn_debug = 'Y') THEN
6098: asn_debug.put_line('derive_vendor_rcv_line_amt ' || x_progress);
6099: END IF;
6100:
6101: profile_user_id := fnd_profile.VALUE('USER_ID');
6094: --check line quanity > 0
6095: x_progress := '097';
6096:
6097: IF (g_asn_debug = 'Y') THEN
6098: asn_debug.put_line('derive_vendor_rcv_line_amt ' || x_progress);
6099: END IF;
6100:
6101: profile_user_id := fnd_profile.VALUE('USER_ID');
6102: profile_resp_id := fnd_profile.VALUE('RESPONSIBILITY_ID');
6108: x_include_closed_po,
6109: defined
6110: );
6111:
6112: IF (g_asn_debug = 'Y') THEN
6113: asn_debug.put_line('Include closed PO profile value ' || x_include_closed_po);
6114: END IF;
6115:
6116: /* We do not support ASN/ASBN for Serive based PO shipments. So
6109: defined
6110: );
6111:
6112: IF (g_asn_debug = 'Y') THEN
6113: asn_debug.put_line('Include closed PO profile value ' || x_include_closed_po);
6114: END IF;
6115:
6116: /* We do not support ASN/ASBN for Serive based PO shipments. So
6117: * error out in that case.
6127:
6128: /* Support for RATE based from OTL */
6129: IF ( x_cascaded_table(n).value_basis = 'RATE'
6130: AND x_cascaded_table(n).purchase_basis = 'TEMP LABOR') THEN --{
6131: IF (g_asn_debug = 'Y') THEN
6132: asn_debug.put_line('Rate/Temp Labor');
6133: END IF;
6134:
6135: /* Bug 3648861.
6128: /* Support for RATE based from OTL */
6129: IF ( x_cascaded_table(n).value_basis = 'RATE'
6130: AND x_cascaded_table(n).purchase_basis = 'TEMP LABOR') THEN --{
6131: IF (g_asn_debug = 'Y') THEN
6132: asn_debug.put_line('Rate/Temp Labor');
6133: END IF;
6134:
6135: /* Bug 3648861.
6136: * The where condition has
6153: AND pol.po_line_id = x_cascaded_table(n).po_line_id
6154: AND pol.order_type_lookup_code = 'RATE'
6155: AND pol.purchase_basis = 'TEMP LABOR';
6156:
6157: IF (g_asn_debug = 'Y') THEN
6158: asn_debug.put_line('count ' || l_time_count);
6159: END IF;
6160:
6161: IF (l_time_count = 0) THEN --{
6154: AND pol.order_type_lookup_code = 'RATE'
6155: AND pol.purchase_basis = 'TEMP LABOR';
6156:
6157: IF (g_asn_debug = 'Y') THEN
6158: asn_debug.put_line('count ' || l_time_count);
6159: END IF;
6160:
6161: IF (l_time_count = 0) THEN --{
6162: IF (g_asn_debug = 'Y') THEN
6158: asn_debug.put_line('count ' || l_time_count);
6159: END IF;
6160:
6161: IF (l_time_count = 0) THEN --{
6162: IF (g_asn_debug = 'Y') THEN
6163: asn_debug.put_line('We do not support RATE/TEMP LABOR through ROI unless it comes through OTL');
6164: END IF;
6165:
6166: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6159: END IF;
6160:
6161: IF (l_time_count = 0) THEN --{
6162: IF (g_asn_debug = 'Y') THEN
6163: asn_debug.put_line('We do not support RATE/TEMP LABOR through ROI unless it comes through OTL');
6164: END IF;
6165:
6166: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6167: rcv_error_pkg.set_error_message('RCV_NO_RATE_UNLESS_OTL', x_cascaded_table(n).error_message);
6178:
6179:
6180: /* IF x_cascaded_table(n).error_status IN('S', 'W')
6181: AND x_cascaded_table(n).amount <= 0 THEN --{
6182: IF (g_asn_debug = 'Y') THEN
6183: asn_debug.put_line('Amount is <= zero. Cascade will fail');
6184: END IF;
6185:
6186: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6179:
6180: /* IF x_cascaded_table(n).error_status IN('S', 'W')
6181: AND x_cascaded_table(n).amount <= 0 THEN --{
6182: IF (g_asn_debug = 'Y') THEN
6183: asn_debug.put_line('Amount is <= zero. Cascade will fail');
6184: END IF;
6185:
6186: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6187: rcv_error_pkg.set_error_message('RCV_ITEM_NO_SHIP_QTY', x_cascaded_table(n).error_message);
6200: such a way that the ROI validation does'nt error out when
6201: po_line_id is populated for one time items. */
6202: x_progress := '098';
6203:
6204: IF (g_asn_debug = 'Y') THEN
6205: asn_debug.put_line('X_progress ' || x_progress);
6206: END IF;
6207:
6208: IF ( x_cascaded_table(n).po_line_id IS NOT NULL
6201: po_line_id is populated for one time items. */
6202: x_progress := '098';
6203:
6204: IF (g_asn_debug = 'Y') THEN
6205: asn_debug.put_line('X_progress ' || x_progress);
6206: END IF;
6207:
6208: IF ( x_cascaded_table(n).po_line_id IS NOT NULL
6209: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
6208: IF ( x_cascaded_table(n).po_line_id IS NOT NULL
6209: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
6210:
6211: -- Copy record from main table to temp table
6212: IF (g_asn_debug = 'Y') THEN
6213: asn_debug.put_line('Copy record from main table to temp table');
6214: END IF;
6215:
6216: current_n := 1;
6209: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
6210:
6211: -- Copy record from main table to temp table
6212: IF (g_asn_debug = 'Y') THEN
6213: asn_debug.put_line('Copy record from main table to temp table');
6214: END IF;
6215:
6216: current_n := 1;
6217: temp_cascaded_table(current_n) := x_cascaded_table(n);
6216: current_n := 1;
6217: temp_cascaded_table(current_n) := x_cascaded_table(n);
6218:
6219: -- Get all rows which meet this condition
6220: IF (g_asn_debug = 'Y') THEN
6221: asn_debug.put_line('Get all rows which meet this condition');
6222: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
6223: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
6224: END IF;
6217: temp_cascaded_table(current_n) := x_cascaded_table(n);
6218:
6219: -- Get all rows which meet this condition
6220: IF (g_asn_debug = 'Y') THEN
6221: asn_debug.put_line('Get all rows which meet this condition');
6222: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
6223: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
6224: END IF;
6225:
6218:
6219: -- Get all rows which meet this condition
6220: IF (g_asn_debug = 'Y') THEN
6221: asn_debug.put_line('Get all rows which meet this condition');
6222: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
6223: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
6224: END IF;
6225:
6226: -- bug 1362237 Deriving the document_line_num
6219: -- Get all rows which meet this condition
6220: IF (g_asn_debug = 'Y') THEN
6221: asn_debug.put_line('Get all rows which meet this condition');
6222: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
6223: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
6224: END IF;
6225:
6226: -- bug 1362237 Deriving the document_line_num
6227: -- and document_shipment_line_num when line_id and/or line_location_id
6235: FROM po_lines
6236: WHERE po_line_id = temp_cascaded_table(current_n).po_line_id;
6237: EXCEPTION
6238: WHEN OTHERS THEN
6239: IF (g_asn_debug = 'Y') THEN
6240: asn_debug.put_line('wrong po_line_id entered in rcv_transactions_interface');
6241: END IF;
6242: END;
6243: END IF; --}
6236: WHERE po_line_id = temp_cascaded_table(current_n).po_line_id;
6237: EXCEPTION
6238: WHEN OTHERS THEN
6239: IF (g_asn_debug = 'Y') THEN
6240: asn_debug.put_line('wrong po_line_id entered in rcv_transactions_interface');
6241: END IF;
6242: END;
6243: END IF; --}
6244:
6250: FROM po_line_locations
6251: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
6252: EXCEPTION
6253: WHEN OTHERS THEN
6254: IF (g_asn_debug = 'Y') THEN
6255: asn_debug.put_line('wrong po_line_location_id entered in rcv_transactions_interface');
6256: END IF;
6257: END;
6258: END IF; --}
6251: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
6252: EXCEPTION
6253: WHEN OTHERS THEN
6254: IF (g_asn_debug = 'Y') THEN
6255: asn_debug.put_line('wrong po_line_location_id entered in rcv_transactions_interface');
6256: END IF;
6257: END;
6258: END IF; --}
6259:
6265: FROM po_distributions
6266: WHERE po_distribution_id = temp_cascaded_table(current_n).po_distribution_id;
6267: EXCEPTION
6268: WHEN OTHERS THEN
6269: IF (g_asn_debug = 'Y') THEN
6270: asn_debug.put_line('wrong po_distribution_id entered in rcv_transactions_interface');
6271: END IF;
6272: END;
6273: END IF; --}
6266: WHERE po_distribution_id = temp_cascaded_table(current_n).po_distribution_id;
6267: EXCEPTION
6268: WHEN OTHERS THEN
6269: IF (g_asn_debug = 'Y') THEN
6270: asn_debug.put_line('wrong po_distribution_id entered in rcv_transactions_interface');
6271: END IF;
6272: END;
6273: END IF; --}
6274:
6287: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
6288: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
6289:
6290: -- if txn != deliver
6291: IF (g_asn_debug = 'Y') THEN
6292: asn_debug.put_line('Open Shipment records');
6293: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6294: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6295: asn_debug.put_line('Proceed to open cursor');
6288: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
6289:
6290: -- if txn != deliver
6291: IF (g_asn_debug = 'Y') THEN
6292: asn_debug.put_line('Open Shipment records');
6293: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6294: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6295: asn_debug.put_line('Proceed to open cursor');
6296: END IF;
6289:
6290: -- if txn != deliver
6291: IF (g_asn_debug = 'Y') THEN
6292: asn_debug.put_line('Open Shipment records');
6293: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6294: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6295: asn_debug.put_line('Proceed to open cursor');
6296: END IF;
6297:
6290: -- if txn != deliver
6291: IF (g_asn_debug = 'Y') THEN
6292: asn_debug.put_line('Open Shipment records');
6293: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6294: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6295: asn_debug.put_line('Proceed to open cursor');
6296: END IF;
6297:
6298: /* Bug 2208664 : Nullified the ship_to_location_id when calling
6291: IF (g_asn_debug = 'Y') THEN
6292: asn_debug.put_line('Open Shipment records');
6293: asn_debug.put_line('PO Header id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6294: asn_debug.put_line('Item Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6295: asn_debug.put_line('Proceed to open cursor');
6296: END IF;
6297:
6298: /* Bug 2208664 : Nullified the ship_to_location_id when calling
6299: the cursors shipments, count_shipments, distributions and
6312: );
6313: -- }
6314: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
6315: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --{
6316: IF (g_asn_debug = 'Y') THEN
6317: asn_debug.put_line('Open Distribution records');
6318: asn_debug.put_line('PO Line id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6319: asn_debug.put_line('Line location Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6320: asn_debug.put_line('PO Distribution id ' || TO_CHAR(temp_cascaded_table(current_n).po_distribution_id));
6313: -- }
6314: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
6315: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --{
6316: IF (g_asn_debug = 'Y') THEN
6317: asn_debug.put_line('Open Distribution records');
6318: asn_debug.put_line('PO Line id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6319: asn_debug.put_line('Line location Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6320: asn_debug.put_line('PO Distribution id ' || TO_CHAR(temp_cascaded_table(current_n).po_distribution_id));
6321: asn_debug.put_line('PO RElease id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
6314: ELSIF( x_cascaded_table(n).transaction_type = 'DELIVER'
6315: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --{
6316: IF (g_asn_debug = 'Y') THEN
6317: asn_debug.put_line('Open Distribution records');
6318: asn_debug.put_line('PO Line id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6319: asn_debug.put_line('Line location Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6320: asn_debug.put_line('PO Distribution id ' || TO_CHAR(temp_cascaded_table(current_n).po_distribution_id));
6321: asn_debug.put_line('PO RElease id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
6322: asn_debug.put_line('Proceed to open cursor');
6315: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --{
6316: IF (g_asn_debug = 'Y') THEN
6317: asn_debug.put_line('Open Distribution records');
6318: asn_debug.put_line('PO Line id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6319: asn_debug.put_line('Line location Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6320: asn_debug.put_line('PO Distribution id ' || TO_CHAR(temp_cascaded_table(current_n).po_distribution_id));
6321: asn_debug.put_line('PO RElease id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
6322: asn_debug.put_line('Proceed to open cursor');
6323: END IF;
6316: IF (g_asn_debug = 'Y') THEN
6317: asn_debug.put_line('Open Distribution records');
6318: asn_debug.put_line('PO Line id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6319: asn_debug.put_line('Line location Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6320: asn_debug.put_line('PO Distribution id ' || TO_CHAR(temp_cascaded_table(current_n).po_distribution_id));
6321: asn_debug.put_line('PO RElease id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
6322: asn_debug.put_line('Proceed to open cursor');
6323: END IF;
6324:
6317: asn_debug.put_line('Open Distribution records');
6318: asn_debug.put_line('PO Line id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6319: asn_debug.put_line('Line location Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6320: asn_debug.put_line('PO Distribution id ' || TO_CHAR(temp_cascaded_table(current_n).po_distribution_id));
6321: asn_debug.put_line('PO RElease id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
6322: asn_debug.put_line('Proceed to open cursor');
6323: END IF;
6324:
6325: OPEN distributions(temp_cascaded_table(current_n).po_line_id,
6318: asn_debug.put_line('PO Line id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_id));
6319: asn_debug.put_line('Line location Id ' || TO_CHAR(temp_cascaded_table(current_n).po_line_location_id));
6320: asn_debug.put_line('PO Distribution id ' || TO_CHAR(temp_cascaded_table(current_n).po_distribution_id));
6321: asn_debug.put_line('PO RElease id ' || TO_CHAR(temp_cascaded_table(current_n).po_release_id));
6322: asn_debug.put_line('Proceed to open cursor');
6323: END IF;
6324:
6325: OPEN distributions(temp_cascaded_table(current_n).po_line_id,
6326: temp_cascaded_table(current_n).po_line_location_id,
6337:
6338:
6339: -- Assign transaction amount to remaining amount
6340:
6341: IF (g_asn_debug = 'Y') THEN
6342: asn_debug.put_line('Assign ordered_amount to remaining amount');
6343: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
6344: END IF;
6345:
6338:
6339: -- Assign transaction amount to remaining amount
6340:
6341: IF (g_asn_debug = 'Y') THEN
6342: asn_debug.put_line('Assign ordered_amount to remaining amount');
6343: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
6344: END IF;
6345:
6346: x_remaining_amount := temp_cascaded_table(current_n).amount;
6339: -- Assign transaction amount to remaining amount
6340:
6341: IF (g_asn_debug = 'Y') THEN
6342: asn_debug.put_line('Assign ordered_amount to remaining amount');
6343: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
6344: END IF;
6345:
6346: x_remaining_amount := temp_cascaded_table(current_n).amount;
6347:
6344: END IF;
6345:
6346: x_remaining_amount := temp_cascaded_table(current_n).amount;
6347:
6348: IF (g_asn_debug = 'Y') THEN
6349: asn_debug.put_line('Have assigned the amount ' || TO_CHAR(x_remaining_amount));
6350: END IF;
6351:
6352: -- Calculate tax_amount_factor for calculating tax_amount for
6345:
6346: x_remaining_amount := temp_cascaded_table(current_n).amount;
6347:
6348: IF (g_asn_debug = 'Y') THEN
6349: asn_debug.put_line('Have assigned the amount ' || TO_CHAR(x_remaining_amount));
6350: END IF;
6351:
6352: -- Calculate tax_amount_factor for calculating tax_amount for
6353: -- each cascaded line
6356: ELSE
6357: tax_amount_factor := 0;
6358: END IF;
6359:
6360: IF (g_asn_debug = 'Y') THEN
6361: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
6362: END IF;
6363:
6364: x_first_trans := TRUE;
6357: tax_amount_factor := 0;
6358: END IF;
6359:
6360: IF (g_asn_debug = 'Y') THEN
6361: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
6362: END IF;
6363:
6364: x_first_trans := TRUE;
6365: transaction_ok := FALSE;
6374: ELSE
6375: FETCH count_distributions INTO x_record_count;
6376: END IF;
6377:
6378: IF (g_asn_debug = 'Y') THEN
6379: asn_debug.put_line('Before starting Cascade');
6380: END IF;
6381:
6382: IF (g_asn_debug = 'Y') THEN
6375: FETCH count_distributions INTO x_record_count;
6376: END IF;
6377:
6378: IF (g_asn_debug = 'Y') THEN
6379: asn_debug.put_line('Before starting Cascade');
6380: END IF;
6381:
6382: IF (g_asn_debug = 'Y') THEN
6383: asn_debug.put_line('Record Count = ' || x_record_count);
6378: IF (g_asn_debug = 'Y') THEN
6379: asn_debug.put_line('Before starting Cascade');
6380: END IF;
6381:
6382: IF (g_asn_debug = 'Y') THEN
6383: asn_debug.put_line('Record Count = ' || x_record_count);
6384: END IF;
6385:
6386: asn_debug.put_line('record count ' || x_record_count);
6379: asn_debug.put_line('Before starting Cascade');
6380: END IF;
6381:
6382: IF (g_asn_debug = 'Y') THEN
6383: asn_debug.put_line('Record Count = ' || x_record_count);
6384: END IF;
6385:
6386: asn_debug.put_line('record count ' || x_record_count);
6387:
6382: IF (g_asn_debug = 'Y') THEN
6383: asn_debug.put_line('Record Count = ' || x_record_count);
6384: END IF;
6385:
6386: asn_debug.put_line('record count ' || x_record_count);
6387:
6388: LOOP --{
6389: IF (g_asn_debug = 'Y') THEN
6390: asn_debug.put_line('Remaining Amount ' || TO_CHAR(x_remaining_amount));
6385:
6386: asn_debug.put_line('record count ' || x_record_count);
6387:
6388: LOOP --{
6389: IF (g_asn_debug = 'Y') THEN
6390: asn_debug.put_line('Remaining Amount ' || TO_CHAR(x_remaining_amount));
6391: END IF;
6392:
6393: IF (g_asn_debug = 'Y') THEN
6386: asn_debug.put_line('record count ' || x_record_count);
6387:
6388: LOOP --{
6389: IF (g_asn_debug = 'Y') THEN
6390: asn_debug.put_line('Remaining Amount ' || TO_CHAR(x_remaining_amount));
6391: END IF;
6392:
6393: IF (g_asn_debug = 'Y') THEN
6394: asn_debug.put_line('open shipments and fetch');
6389: IF (g_asn_debug = 'Y') THEN
6390: asn_debug.put_line('Remaining Amount ' || TO_CHAR(x_remaining_amount));
6391: END IF;
6392:
6393: IF (g_asn_debug = 'Y') THEN
6394: asn_debug.put_line('open shipments and fetch');
6395: END IF;
6396:
6397: /*
6390: asn_debug.put_line('Remaining Amount ' || TO_CHAR(x_remaining_amount));
6391: END IF;
6392:
6393: IF (g_asn_debug = 'Y') THEN
6394: asn_debug.put_line('open shipments and fetch');
6395: END IF;
6396:
6397: /*
6398: ** Fetch the appropriate record
6396:
6397: /*
6398: ** Fetch the appropriate record
6399: */
6400: IF (g_asn_debug = 'Y') THEN
6401: asn_debug.put_line('transaction_type = ' || x_cascaded_table(n).transaction_type);
6402: END IF;
6403:
6404: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
6397: /*
6398: ** Fetch the appropriate record
6399: */
6400: IF (g_asn_debug = 'Y') THEN
6401: asn_debug.put_line('transaction_type = ' || x_cascaded_table(n).transaction_type);
6402: END IF;
6403:
6404: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
6405: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
6402: END IF;
6403:
6404: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
6405: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
6406: IF (g_asn_debug = 'Y') THEN
6407: asn_debug.put_line('Fetching Shipments Cursor');
6408: END IF;
6409:
6410: FETCH shipments INTO x_shipmentdistributionrec;
6403:
6404: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
6405: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
6406: IF (g_asn_debug = 'Y') THEN
6407: asn_debug.put_line('Fetching Shipments Cursor');
6408: END IF;
6409:
6410: FETCH shipments INTO x_shipmentdistributionrec;
6411:
6417: END IF;
6418:
6419: rows_fetched := shipments%ROWCOUNT;
6420:
6421: IF (g_asn_debug = 'Y') THEN
6422: asn_debug.put_line('Shipment Rows fetched ' || TO_CHAR(rows_fetched));
6423: END IF;
6424: -- }
6425: ELSE -- txn = deliver and other cases --{
6418:
6419: rows_fetched := shipments%ROWCOUNT;
6420:
6421: IF (g_asn_debug = 'Y') THEN
6422: asn_debug.put_line('Shipment Rows fetched ' || TO_CHAR(rows_fetched));
6423: END IF;
6424: -- }
6425: ELSE -- txn = deliver and other cases --{
6426: IF (g_asn_debug = 'Y') THEN
6422: asn_debug.put_line('Shipment Rows fetched ' || TO_CHAR(rows_fetched));
6423: END IF;
6424: -- }
6425: ELSE -- txn = deliver and other cases --{
6426: IF (g_asn_debug = 'Y') THEN
6427: asn_debug.put_line('Fetching Distributions Cursor in amount proc');
6428: END IF;
6429:
6430: FETCH distributions INTO x_shipmentdistributionrec;
6423: END IF;
6424: -- }
6425: ELSE -- txn = deliver and other cases --{
6426: IF (g_asn_debug = 'Y') THEN
6427: asn_debug.put_line('Fetching Distributions Cursor in amount proc');
6428: END IF;
6429:
6430: FETCH distributions INTO x_shipmentdistributionrec;
6431:
6437: END IF;
6438:
6439: rows_fetched := distributions%ROWCOUNT;
6440:
6441: IF (g_asn_debug = 'Y') THEN
6442: asn_debug.put_line('Distribution Rows fetched ' || TO_CHAR(rows_fetched));
6443: END IF;
6444: END IF; -- matches if condition of txn ! deliver --}
6445:
6438:
6439: rows_fetched := distributions%ROWCOUNT;
6440:
6441: IF (g_asn_debug = 'Y') THEN
6442: asn_debug.put_line('Distribution Rows fetched ' || TO_CHAR(rows_fetched));
6443: END IF;
6444: END IF; -- matches if condition of txn ! deliver --}
6445:
6446: IF ( lastrecord
6444: END IF; -- matches if condition of txn ! deliver --}
6445:
6446: IF ( lastrecord
6447: OR x_remaining_amount <= 0) THEN --{
6448: IF (g_asn_debug = 'Y') THEN
6449: asn_debug.put_line('Hit exit condition');
6450: END IF;
6451:
6452: IF NOT x_first_trans THEN
6445:
6446: IF ( lastrecord
6447: OR x_remaining_amount <= 0) THEN --{
6448: IF (g_asn_debug = 'Y') THEN
6449: asn_debug.put_line('Hit exit condition');
6450: END IF;
6451:
6452: IF NOT x_first_trans THEN
6453: -- x_first_trans has been reset which means some cascade has
6455: current_n := current_n - 1;
6456: END IF;
6457:
6458: -- do the tolerance act here
6459: IF (g_asn_debug = 'Y') THEN
6460: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
6461: asn_debug.put_line('Check which condition has occured');
6462: END IF;
6463:
6456: END IF;
6457:
6458: -- do the tolerance act here
6459: IF (g_asn_debug = 'Y') THEN
6460: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
6461: asn_debug.put_line('Check which condition has occured');
6462: END IF;
6463:
6464: -- lastrecord...we have run out of rows and we still have quantity to allocate
6457:
6458: -- do the tolerance act here
6459: IF (g_asn_debug = 'Y') THEN
6460: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
6461: asn_debug.put_line('Check which condition has occured');
6462: END IF;
6463:
6464: -- lastrecord...we have run out of rows and we still have quantity to allocate
6465: IF x_remaining_amount > 0 THEN --{
6462: END IF;
6463:
6464: -- lastrecord...we have run out of rows and we still have quantity to allocate
6465: IF x_remaining_amount > 0 THEN --{
6466: IF (g_asn_debug = 'Y') THEN
6467: asn_debug.put_line('There is amount remaining');
6468: asn_debug.put_line('Need to check qty/amt tolerances');
6469: END IF;
6470:
6463:
6464: -- lastrecord...we have run out of rows and we still have quantity to allocate
6465: IF x_remaining_amount > 0 THEN --{
6466: IF (g_asn_debug = 'Y') THEN
6467: asn_debug.put_line('There is amount remaining');
6468: asn_debug.put_line('Need to check qty/amt tolerances');
6469: END IF;
6470:
6471: IF rows_fetched > 0
6464: -- lastrecord...we have run out of rows and we still have quantity to allocate
6465: IF x_remaining_amount > 0 THEN --{
6466: IF (g_asn_debug = 'Y') THEN
6467: asn_debug.put_line('There is amount remaining');
6468: asn_debug.put_line('Need to check qty/amt tolerances');
6469: END IF;
6470:
6471: IF rows_fetched > 0
6472: AND NOT x_first_trans THEN --{
6476: INTO x_qty_rcv_exception_code
6477: FROM po_line_locations
6478: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
6479:
6480: IF (g_asn_debug = 'Y') THEN
6481: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
6482: END IF;
6483:
6484: --
6477: FROM po_line_locations
6478: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
6479:
6480: IF (g_asn_debug = 'Y') THEN
6481: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
6482: END IF;
6483:
6484: --
6485: get_clm_info( 'AMOUNT',
6498: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
6499: /* Bug# 1807842 */
6500: -- Bug 3506964.
6501: IF (temp_cascaded_table(current_n).amount < x_converted_trx_amt) THEN --{
6502: IF (g_asn_debug = 'Y') THEN
6503: asn_debug.put_line('Tolerable amount ' || TO_CHAR(x_converted_trx_amt));
6504: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6505: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6506: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
6499: /* Bug# 1807842 */
6500: -- Bug 3506964.
6501: IF (temp_cascaded_table(current_n).amount < x_converted_trx_amt) THEN --{
6502: IF (g_asn_debug = 'Y') THEN
6503: asn_debug.put_line('Tolerable amount ' || TO_CHAR(x_converted_trx_amt));
6504: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6505: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6506: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
6507: END IF;
6500: -- Bug 3506964.
6501: IF (temp_cascaded_table(current_n).amount < x_converted_trx_amt) THEN --{
6502: IF (g_asn_debug = 'Y') THEN
6503: asn_debug.put_line('Tolerable amount ' || TO_CHAR(x_converted_trx_amt));
6504: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6505: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6506: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
6507: END IF;
6508:
6501: IF (temp_cascaded_table(current_n).amount < x_converted_trx_amt) THEN --{
6502: IF (g_asn_debug = 'Y') THEN
6503: asn_debug.put_line('Tolerable amount ' || TO_CHAR(x_converted_trx_amt));
6504: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6505: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6506: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
6507: END IF;
6508:
6509: temp_cascaded_table(current_n).amount := temp_cascaded_table(current_n).amount + x_remaining_amount;
6502: IF (g_asn_debug = 'Y') THEN
6503: asn_debug.put_line('Tolerable amount ' || TO_CHAR(x_converted_trx_amt));
6504: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6505: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6506: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
6507: END IF;
6508:
6509: temp_cascaded_table(current_n).amount := temp_cascaded_table(current_n).amount + x_remaining_amount;
6510: temp_cascaded_table(current_n).amount_shipped := temp_cascaded_table(current_n).amount_shipped + x_remaining_amount;
6512: END IF; /* Bug# 1807842 */ --}
6513:
6514: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).amount * tax_amount_factor, 6);
6515:
6516: IF (g_asn_debug = 'Y') THEN
6517: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6518: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
6519: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6520: END IF;
6513:
6514: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).amount * tax_amount_factor, 6);
6515:
6516: IF (g_asn_debug = 'Y') THEN
6517: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6518: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
6519: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6520: END IF;
6521:
6514: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).amount * tax_amount_factor, 6);
6515:
6516: IF (g_asn_debug = 'Y') THEN
6517: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6518: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
6519: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6520: END IF;
6521:
6522: IF x_qty_rcv_exception_code = 'WARNING' THEN --{
6515:
6516: IF (g_asn_debug = 'Y') THEN
6517: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6518: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
6519: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6520: END IF;
6521:
6522: IF x_qty_rcv_exception_code = 'WARNING' THEN --{
6523: IF (g_asn_debug = 'Y') THEN
6519: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6520: END IF;
6521:
6522: IF x_qty_rcv_exception_code = 'WARNING' THEN --{
6523: IF (g_asn_debug = 'Y') THEN
6524: asn_debug.put_line('IN WARNING');
6525: END IF;
6526:
6527: temp_cascaded_table(current_n).error_status := 'W';
6520: END IF;
6521:
6522: IF x_qty_rcv_exception_code = 'WARNING' THEN --{
6523: IF (g_asn_debug = 'Y') THEN
6524: asn_debug.put_line('IN WARNING');
6525: END IF;
6526:
6527: temp_cascaded_table(current_n).error_status := 'W';
6528: temp_cascaded_table(current_n).error_message := 'RCV_SHIP_QTY_OVER_TOLERANCE';
6526:
6527: temp_cascaded_table(current_n).error_status := 'W';
6528: temp_cascaded_table(current_n).error_message := 'RCV_SHIP_QTY_OVER_TOLERANCE';
6529:
6530: IF (g_asn_debug = 'Y') THEN
6531: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
6532: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
6533: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
6534: END IF;
6527: temp_cascaded_table(current_n).error_status := 'W';
6528: temp_cascaded_table(current_n).error_message := 'RCV_SHIP_QTY_OVER_TOLERANCE';
6529:
6530: IF (g_asn_debug = 'Y') THEN
6531: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
6532: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
6533: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
6534: END IF;
6535:
6528: temp_cascaded_table(current_n).error_message := 'RCV_SHIP_QTY_OVER_TOLERANCE';
6529:
6530: IF (g_asn_debug = 'Y') THEN
6531: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
6532: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
6533: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
6534: END IF;
6535:
6536: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
6529:
6530: IF (g_asn_debug = 'Y') THEN
6531: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
6532: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
6533: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
6534: END IF;
6535:
6536: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
6537: rcv_error_pkg.set_error_message('RCV_SHIP_QTY_OVER_TOLERANCE', x_cascaded_table(n).error_message);
6538: rcv_error_pkg.set_token('QTY_A', temp_cascaded_table(current_n).quantity);
6539: rcv_error_pkg.set_token('QTY_B', temp_cascaded_table(current_n).quantity - x_remaining_amount);
6540: rcv_error_pkg.log_interface_warning('QUANTITY');
6541:
6542: IF (g_asn_debug = 'Y') THEN
6543: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
6544: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
6545: asn_debug.put_line('Need to insert into po_interface_errors');
6546: END IF;
6539: rcv_error_pkg.set_token('QTY_B', temp_cascaded_table(current_n).quantity - x_remaining_amount);
6540: rcv_error_pkg.log_interface_warning('QUANTITY');
6541:
6542: IF (g_asn_debug = 'Y') THEN
6543: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
6544: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
6545: asn_debug.put_line('Need to insert into po_interface_errors');
6546: END IF;
6547: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
6540: rcv_error_pkg.log_interface_warning('QUANTITY');
6541:
6542: IF (g_asn_debug = 'Y') THEN
6543: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
6544: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
6545: asn_debug.put_line('Need to insert into po_interface_errors');
6546: END IF;
6547: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
6548:
6541:
6542: IF (g_asn_debug = 'Y') THEN
6543: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
6544: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
6545: asn_debug.put_line('Need to insert into po_interface_errors');
6546: END IF;
6547: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
6548:
6549: IF (g_asn_debug = 'Y') THEN
6545: asn_debug.put_line('Need to insert into po_interface_errors');
6546: END IF;
6547: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
6548:
6549: IF (g_asn_debug = 'Y') THEN
6550: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6551: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
6552: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6553: END IF;
6546: END IF;
6547: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
6548:
6549: IF (g_asn_debug = 'Y') THEN
6550: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6551: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
6552: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6553: END IF;
6554: -- }
6547: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
6548:
6549: IF (g_asn_debug = 'Y') THEN
6550: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6551: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
6552: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6553: END IF;
6554: -- }
6555: ELSIF x_qty_rcv_exception_code = 'REJECT' THEN -- elseif for NONE/WARNING --{
6548:
6549: IF (g_asn_debug = 'Y') THEN
6550: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
6551: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
6552: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6553: END IF;
6554: -- }
6555: ELSIF x_qty_rcv_exception_code = 'REJECT' THEN -- elseif for NONE/WARNING --{
6556: IF (g_asn_debug = 'Y') THEN
6552: asn_debug.put_line('Current shipped amount ' || TO_CHAR(temp_cascaded_table(current_n).amount_shipped));
6553: END IF;
6554: -- }
6555: ELSIF x_qty_rcv_exception_code = 'REJECT' THEN -- elseif for NONE/WARNING --{
6556: IF (g_asn_debug = 'Y') THEN
6557: asn_debug.put_line('Extra Amount ' || TO_CHAR(x_remaining_amount));
6558: END IF;
6559:
6560: IF (g_asn_debug = 'Y') THEN
6553: END IF;
6554: -- }
6555: ELSIF x_qty_rcv_exception_code = 'REJECT' THEN -- elseif for NONE/WARNING --{
6556: IF (g_asn_debug = 'Y') THEN
6557: asn_debug.put_line('Extra Amount ' || TO_CHAR(x_remaining_amount));
6558: END IF;
6559:
6560: IF (g_asn_debug = 'Y') THEN
6561: asn_debug.put_line('delete the temp table ');
6556: IF (g_asn_debug = 'Y') THEN
6557: asn_debug.put_line('Extra Amount ' || TO_CHAR(x_remaining_amount));
6558: END IF;
6559:
6560: IF (g_asn_debug = 'Y') THEN
6561: asn_debug.put_line('delete the temp table ');
6562: END IF;
6563:
6564: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6557: asn_debug.put_line('Extra Amount ' || TO_CHAR(x_remaining_amount));
6558: END IF;
6559:
6560: IF (g_asn_debug = 'Y') THEN
6561: asn_debug.put_line('delete the temp table ');
6562: END IF;
6563:
6564: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6565:
6583:
6584: rcv_error_pkg.log_interface_error('AMOUNT', FALSE);
6585: temp_cascaded_table.DELETE;
6586:
6587: IF (g_asn_debug = 'Y') THEN
6588: asn_debug.put_line('mark the actual table with error status');
6589: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
6590: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
6591: END IF;
6584: rcv_error_pkg.log_interface_error('AMOUNT', FALSE);
6585: temp_cascaded_table.DELETE;
6586:
6587: IF (g_asn_debug = 'Y') THEN
6588: asn_debug.put_line('mark the actual table with error status');
6589: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
6590: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
6591: END IF;
6592:
6585: temp_cascaded_table.DELETE;
6586:
6587: IF (g_asn_debug = 'Y') THEN
6588: asn_debug.put_line('mark the actual table with error status');
6589: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
6590: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
6591: END IF;
6592:
6593: IF (g_asn_debug = 'Y') THEN
6586:
6587: IF (g_asn_debug = 'Y') THEN
6588: asn_debug.put_line('mark the actual table with error status');
6589: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
6590: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
6591: END IF;
6592:
6593: IF (g_asn_debug = 'Y') THEN
6594: asn_debug.put_line('Need to insert a row into po_interface_errors');
6589: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
6590: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
6591: END IF;
6592:
6593: IF (g_asn_debug = 'Y') THEN
6594: asn_debug.put_line('Need to insert a row into po_interface_errors');
6595: END IF;
6596: END IF; --} matches if(none/warning) and elseif(reject)
6597: --}
6590: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
6591: END IF;
6592:
6593: IF (g_asn_debug = 'Y') THEN
6594: asn_debug.put_line('Need to insert a row into po_interface_errors');
6595: END IF;
6596: END IF; --} matches if(none/warning) and elseif(reject)
6597: --}
6598: ELSE --{ else for rows fetched = 0 OR x_first_trans = true
6596: END IF; --} matches if(none/warning) and elseif(reject)
6597: --}
6598: ELSE --{ else for rows fetched = 0 OR x_first_trans = true
6599: IF rows_fetched = 0 THEN
6600: IF (g_asn_debug = 'Y') THEN
6601: asn_debug.put_line('No rows were retrieved from cursor.');
6602: END IF;
6603: ELSIF x_first_trans THEN
6604: IF (g_asn_debug = 'Y') THEN
6597: --}
6598: ELSE --{ else for rows fetched = 0 OR x_first_trans = true
6599: IF rows_fetched = 0 THEN
6600: IF (g_asn_debug = 'Y') THEN
6601: asn_debug.put_line('No rows were retrieved from cursor.');
6602: END IF;
6603: ELSIF x_first_trans THEN
6604: IF (g_asn_debug = 'Y') THEN
6605: asn_debug.put_line('No rows were cascaded');
6600: IF (g_asn_debug = 'Y') THEN
6601: asn_debug.put_line('No rows were retrieved from cursor.');
6602: END IF;
6603: ELSIF x_first_trans THEN
6604: IF (g_asn_debug = 'Y') THEN
6605: asn_debug.put_line('No rows were cascaded');
6606: END IF;
6607: END IF;
6608:
6601: asn_debug.put_line('No rows were retrieved from cursor.');
6602: END IF;
6603: ELSIF x_first_trans THEN
6604: IF (g_asn_debug = 'Y') THEN
6605: asn_debug.put_line('No rows were cascaded');
6606: END IF;
6607: END IF;
6608:
6609: x_temp_count := 1;
6735: END IF;
6736:
6737: IF ( x_include_closed_po = 'N'
6738: AND x_closed_code IN('FINALLY CLOSED', 'CLOSED', 'CLOSED FOR RECEIVING')) THEN
6739: IF (g_asn_debug = 'Y') THEN
6740: asn_debug.put_line('This PO is not open and the profile option to include closed POs is N');
6741: END IF;
6742:
6743: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6736:
6737: IF ( x_include_closed_po = 'N'
6738: AND x_closed_code IN('FINALLY CLOSED', 'CLOSED', 'CLOSED FOR RECEIVING')) THEN
6739: IF (g_asn_debug = 'Y') THEN
6740: asn_debug.put_line('This PO is not open and the profile option to include closed POs is N');
6741: END IF;
6742:
6743: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6744: rcv_error_pkg.set_error_message('RCV_ASN_SHIPMT_NOT_OPEN', x_cascaded_table(n).error_message);
6759: temp_cascaded_table.DELETE;
6760: END IF; --} end else for rows fetched = 0 OR x_first_trans = true
6761: -- end x_remaining_qty > 0 => this is the last record
6762: ELSE --
6763: IF (g_asn_debug = 'Y') THEN
6764: asn_debug.put_line('Remaining amount is zero ' || TO_CHAR(x_remaining_amount));
6765: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
6766: END IF;
6767: /* Bug 6610047.
6760: END IF; --} end else for rows fetched = 0 OR x_first_trans = true
6761: -- end x_remaining_qty > 0 => this is the last record
6762: ELSE --
6763: IF (g_asn_debug = 'Y') THEN
6764: asn_debug.put_line('Remaining amount is zero ' || TO_CHAR(x_remaining_amount));
6765: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
6766: END IF;
6767: /* Bug 6610047.
6768: * To allow, receipts with zero amount for timecards from now on.
6761: -- end x_remaining_qty > 0 => this is the last record
6762: ELSE --
6763: IF (g_asn_debug = 'Y') THEN
6764: asn_debug.put_line('Remaining amount is zero ' || TO_CHAR(x_remaining_amount));
6765: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
6766: END IF;
6767: /* Bug 6610047.
6768: * To allow, receipts with zero amount for timecards from now on.
6769: * Added below code to populate certain data into temp_cascaded_table()
6772: IF (temp_cascaded_table(current_n).value_basis = 'RATE'
6773: AND temp_cascaded_table(current_n).purchase_basis = 'TEMP LABOR'
6774: AND temp_cascaded_table(current_n).amount = 0) THEN --{
6775:
6776: IF (g_asn_debug = 'Y') THEN
6777: asn_debug.put_line('Rate/Temp Labor with amount = 0');
6778: END IF;
6779:
6780: temp_cascaded_table(current_n).po_distribution_id := x_shipmentdistributionrec.po_distribution_id;
6773: AND temp_cascaded_table(current_n).purchase_basis = 'TEMP LABOR'
6774: AND temp_cascaded_table(current_n).amount = 0) THEN --{
6775:
6776: IF (g_asn_debug = 'Y') THEN
6777: asn_debug.put_line('Rate/Temp Labor with amount = 0');
6778: END IF;
6779:
6780: temp_cascaded_table(current_n).po_distribution_id := x_shipmentdistributionrec.po_distribution_id;
6781: temp_cascaded_table(current_n).charge_account_id := x_shipmentdistributionrec.code_combination_id;
6799: END IF; --} ends the check for whether last record has been reached
6800:
6801: -- close cursors
6802:
6803: IF (g_asn_debug = 'Y') THEN
6804: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions');
6805: END IF;
6806:
6807: IF shipments%ISOPEN THEN
6800:
6801: -- close cursors
6802:
6803: IF (g_asn_debug = 'Y') THEN
6804: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions');
6805: END IF;
6806:
6807: IF shipments%ISOPEN THEN
6808: CLOSE shipments;
6824: END IF; --} matches lastrecord or x_remaining_amount <= 0
6825:
6826: -- eliminate the row if it fails the date check
6827:
6828: IF (g_asn_debug = 'Y') THEN
6829: asn_debug.put_line('Count in temp_cascade_table : ' || TO_CHAR(temp_cascaded_table.COUNT));
6830: asn_debug.put_line('Cursor record ' || TO_CHAR(rows_fetched));
6831: asn_debug.put_line('Check date tolerance');
6832: END IF;
6825:
6826: -- eliminate the row if it fails the date check
6827:
6828: IF (g_asn_debug = 'Y') THEN
6829: asn_debug.put_line('Count in temp_cascade_table : ' || TO_CHAR(temp_cascaded_table.COUNT));
6830: asn_debug.put_line('Cursor record ' || TO_CHAR(rows_fetched));
6831: asn_debug.put_line('Check date tolerance');
6832: END IF;
6833:
6826: -- eliminate the row if it fails the date check
6827:
6828: IF (g_asn_debug = 'Y') THEN
6829: asn_debug.put_line('Count in temp_cascade_table : ' || TO_CHAR(temp_cascaded_table.COUNT));
6830: asn_debug.put_line('Cursor record ' || TO_CHAR(rows_fetched));
6831: asn_debug.put_line('Check date tolerance');
6832: END IF;
6833:
6834: /* FPJ Services.
6827:
6828: IF (g_asn_debug = 'Y') THEN
6829: asn_debug.put_line('Count in temp_cascade_table : ' || TO_CHAR(temp_cascaded_table.COUNT));
6830: asn_debug.put_line('Cursor record ' || TO_CHAR(rows_fetched));
6831: asn_debug.put_line('Check date tolerance');
6832: END IF;
6833:
6834: /* FPJ Services.
6835: * We do not check date_tolerances if matching_basis is
6841: * Fixed Price / Services.
6842: */
6843: IF ( NVL(x_cascaded_table(n).value_basis, 'QUANTITY') <> 'RATE'
6844: AND NVL(x_cascaded_table(n).purchase_basis, 'GOODS') <> 'TEMP_LABOR') THEN
6845: IF (g_asn_debug = 'Y') THEN
6846: asn_debug.put_line('Check date tolerance for a Fixed Price services line');
6847: END IF;
6848:
6849: rcv_transactions_interface_sv.check_date_tolerance(NVL(temp_cascaded_table(1).expected_receipt_date, x_header_record.header_record.expected_receipt_date), -- Bug 487222
6842: */
6843: IF ( NVL(x_cascaded_table(n).value_basis, 'QUANTITY') <> 'RATE'
6844: AND NVL(x_cascaded_table(n).purchase_basis, 'GOODS') <> 'TEMP_LABOR') THEN
6845: IF (g_asn_debug = 'Y') THEN
6846: asn_debug.put_line('Check date tolerance for a Fixed Price services line');
6847: END IF;
6848:
6849: rcv_transactions_interface_sv.check_date_tolerance(NVL(temp_cascaded_table(1).expected_receipt_date, x_header_record.header_record.expected_receipt_date), -- Bug 487222
6850: x_shipmentdistributionrec.promised_date,
6861: /* FPJ SERVICES END */
6862:
6863: /* bug 1060261 - added error message to be shown when the expected date is outside tolerance range */
6864: IF (x_shipmentdistributionrec.receipt_days_exception_code = 'REJECT') THEN --{
6865: IF (g_asn_debug = 'Y') THEN
6866: asn_debug.put_line('Receipt days exception code is Reject. So error out.');
6867: END IF;
6868:
6869: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6862:
6863: /* bug 1060261 - added error message to be shown when the expected date is outside tolerance range */
6864: IF (x_shipmentdistributionrec.receipt_days_exception_code = 'REJECT') THEN --{
6865: IF (g_asn_debug = 'Y') THEN
6866: asn_debug.put_line('Receipt days exception code is Reject. So error out.');
6867: END IF;
6868:
6869: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
6870: rcv_error_pkg.set_error_message('RCV_ASN_DATE_OUT_TOL', x_cascaded_table(n).error_message);
6871: rcv_error_pkg.set_token('DELIVERY DATE', NVL(temp_cascaded_table(1).expected_receipt_date, x_header_record.header_record.expected_receipt_date));
6872: rcv_error_pkg.log_interface_error('EXPECTED_RECEIPT_DATE', FALSE);
6873: END IF; --}
6874:
6875: IF (g_asn_debug = 'Y') THEN
6876: asn_debug.put_line('Days exception Code ' || NVL(x_shipmentdistributionrec.receipt_days_exception_code, 'XXX'));
6877: END IF;
6878:
6879: -- Check shipto_location enforcement
6872: rcv_error_pkg.log_interface_error('EXPECTED_RECEIPT_DATE', FALSE);
6873: END IF; --}
6874:
6875: IF (g_asn_debug = 'Y') THEN
6876: asn_debug.put_line('Days exception Code ' || NVL(x_shipmentdistributionrec.receipt_days_exception_code, 'XXX'));
6877: END IF;
6878:
6879: -- Check shipto_location enforcement
6880:
6882: NVL(temp_cascaded_table(1).ship_to_location_id, x_header_record.header_record.location_id),
6883: x_shipmentdistributionrec.enforce_ship_to_location_code
6884: );
6885:
6886: IF (g_asn_debug = 'Y') THEN
6887: asn_debug.put_line('Enforce ShipToLocation ' || NVL(x_shipmentdistributionrec.enforce_ship_to_location_code, 'XXX'));
6888: END IF;
6889:
6890: /* Bug 2208664 : Enter error message in po_interface_errors if enforce_ship_to_location_code is 'WARNING', and
6883: x_shipmentdistributionrec.enforce_ship_to_location_code
6884: );
6885:
6886: IF (g_asn_debug = 'Y') THEN
6887: asn_debug.put_line('Enforce ShipToLocation ' || NVL(x_shipmentdistributionrec.enforce_ship_to_location_code, 'XXX'));
6888: END IF;
6889:
6890: /* Bug 2208664 : Enter error message in po_interface_errors if enforce_ship_to_location_code is 'WARNING', and
6891: Enter error message in po_interface_errors if enforce_ship_to_location_code is 'REJECT' and error out
6921: */
6922: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
6923: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
6924: /*Bug# 1548597 */
6925: IF (g_asn_debug = 'Y') THEN
6926: asn_debug.put_line('call get_available_amount for Receive');
6927: END IF;
6928:
6929: rcv_quantities_s.get_available_amount('RECEIVE',
6922: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
6923: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') <> 'DELIVER') THEN --{
6924: /*Bug# 1548597 */
6925: IF (g_asn_debug = 'Y') THEN
6926: asn_debug.put_line('call get_available_amount for Receive');
6927: END IF;
6928:
6929: rcv_quantities_s.get_available_amount('RECEIVE',
6930: x_shipmentdistributionrec.line_location_id,
6949: END IF;
6950: END LOOP;
6951: END IF;
6952: ELSE --} { for txn != deliver
6953: IF (g_asn_debug = 'Y') THEN
6954: asn_debug.put_line('call get_available_amount for Direct Delivery');
6955: END IF;
6956:
6957: /* Bug# 1548597*/
6950: END LOOP;
6951: END IF;
6952: ELSE --} { for txn != deliver
6953: IF (g_asn_debug = 'Y') THEN
6954: asn_debug.put_line('call get_available_amount for Direct Delivery');
6955: END IF;
6956:
6957: /* Bug# 1548597*/
6958: rcv_quantities_s.get_available_amount('DIRECT RECEIPT',
6983: END LOOP;
6984: END IF;
6985: END IF; --} for txn =deliver
6986:
6987: IF (g_asn_debug = 'Y') THEN
6988: asn_debug.put_line('After call to get_available quantity');
6989: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
6990: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
6991: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
6984: END IF;
6985: END IF; --} for txn =deliver
6986:
6987: IF (g_asn_debug = 'Y') THEN
6988: asn_debug.put_line('After call to get_available quantity');
6989: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
6990: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
6991: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
6992: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
6985: END IF; --} for txn =deliver
6986:
6987: IF (g_asn_debug = 'Y') THEN
6988: asn_debug.put_line('After call to get_available quantity');
6989: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
6990: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
6991: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
6992: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
6993: END IF;
6986:
6987: IF (g_asn_debug = 'Y') THEN
6988: asn_debug.put_line('After call to get_available quantity');
6989: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
6990: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
6991: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
6992: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
6993: END IF;
6994:
6987: IF (g_asn_debug = 'Y') THEN
6988: asn_debug.put_line('After call to get_available quantity');
6989: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
6990: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
6991: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
6992: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
6993: END IF;
6994:
6995: -- if amt has already been allocated then reduce available and tolerable
6988: asn_debug.put_line('After call to get_available quantity');
6989: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
6990: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
6991: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
6992: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
6993: END IF;
6994:
6995: -- if amt has already been allocated then reduce available and tolerable
6996: -- amt by the allocated amount
7006: IF x_tolerable_amt < 0 THEN
7007: x_tolerable_amt := 0;
7008: END IF;
7009:
7010: IF (g_asn_debug = 'Y') THEN
7011: asn_debug.put_line('Have some allocated amount. Will reduce amt');
7012: asn_debug.put_line('Allocated Amt ' || TO_CHAR(already_allocated_amt));
7013: asn_debug.put_line('After reducing by allocated amt');
7014: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
7007: x_tolerable_amt := 0;
7008: END IF;
7009:
7010: IF (g_asn_debug = 'Y') THEN
7011: asn_debug.put_line('Have some allocated amount. Will reduce amt');
7012: asn_debug.put_line('Allocated Amt ' || TO_CHAR(already_allocated_amt));
7013: asn_debug.put_line('After reducing by allocated amt');
7014: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
7015: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
7008: END IF;
7009:
7010: IF (g_asn_debug = 'Y') THEN
7011: asn_debug.put_line('Have some allocated amount. Will reduce amt');
7012: asn_debug.put_line('Allocated Amt ' || TO_CHAR(already_allocated_amt));
7013: asn_debug.put_line('After reducing by allocated amt');
7014: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
7015: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
7016: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
7009:
7010: IF (g_asn_debug = 'Y') THEN
7011: asn_debug.put_line('Have some allocated amount. Will reduce amt');
7012: asn_debug.put_line('Allocated Amt ' || TO_CHAR(already_allocated_amt));
7013: asn_debug.put_line('After reducing by allocated amt');
7014: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
7015: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
7016: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
7017: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
7010: IF (g_asn_debug = 'Y') THEN
7011: asn_debug.put_line('Have some allocated amount. Will reduce amt');
7012: asn_debug.put_line('Allocated Amt ' || TO_CHAR(already_allocated_amt));
7013: asn_debug.put_line('After reducing by allocated amt');
7014: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
7015: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
7016: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
7017: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
7018: END IF;
7011: asn_debug.put_line('Have some allocated amount. Will reduce amt');
7012: asn_debug.put_line('Allocated Amt ' || TO_CHAR(already_allocated_amt));
7013: asn_debug.put_line('After reducing by allocated amt');
7014: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
7015: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
7016: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
7017: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
7018: END IF;
7019: END IF; --}
7012: asn_debug.put_line('Allocated Amt ' || TO_CHAR(already_allocated_amt));
7013: asn_debug.put_line('After reducing by allocated amt');
7014: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
7015: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
7016: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
7017: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
7018: END IF;
7019: END IF; --}
7020:
7013: asn_debug.put_line('After reducing by allocated amt');
7014: asn_debug.put_line('Available Amount ' || TO_CHAR(x_converted_trx_amt));
7015: asn_debug.put_line('Tolerable Amount ' || TO_CHAR(x_tolerable_amt));
7016: asn_debug.put_line('Already Shipped amount ' || TO_CHAR(NVL(x_shipmentdistributionrec.amount_shipped, 0)));
7017: asn_debug.put_line('Pointer to temp table ' || TO_CHAR(current_n));
7018: END IF;
7019: END IF; --}
7020:
7021: -- If last row set available = tolerable - shipped
7024: IF rows_fetched = x_record_count THEN --{
7025: x_converted_trx_amt := x_tolerable_amt;
7026: x_converted_trx_amt := x_tolerable_amt - NVL(x_shipmentdistributionrec.amount_shipped, 0);
7027:
7028: IF (g_asn_debug = 'Y') THEN
7029: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_trx_amt));
7030: END IF;
7031: ELSE --} {
7032: IF (g_asn_debug = 'Y') THEN
7025: x_converted_trx_amt := x_tolerable_amt;
7026: x_converted_trx_amt := x_tolerable_amt - NVL(x_shipmentdistributionrec.amount_shipped, 0);
7027:
7028: IF (g_asn_debug = 'Y') THEN
7029: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_trx_amt));
7030: END IF;
7031: ELSE --} {
7032: IF (g_asn_debug = 'Y') THEN
7033: x_converted_trx_amt := x_converted_trx_amt - NVL(x_shipmentdistributionrec.amount_shipped, 0);
7028: IF (g_asn_debug = 'Y') THEN
7029: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_trx_amt));
7030: END IF;
7031: ELSE --} {
7032: IF (g_asn_debug = 'Y') THEN
7033: x_converted_trx_amt := x_converted_trx_amt - NVL(x_shipmentdistributionrec.amount_shipped, 0);
7034: asn_debug.put_line('Not Last Row : ' || TO_CHAR(x_converted_trx_amt));
7035: END IF;
7036: END IF; --}
7030: END IF;
7031: ELSE --} {
7032: IF (g_asn_debug = 'Y') THEN
7033: x_converted_trx_amt := x_converted_trx_amt - NVL(x_shipmentdistributionrec.amount_shipped, 0);
7034: asn_debug.put_line('Not Last Row : ' || TO_CHAR(x_converted_trx_amt));
7035: END IF;
7036: END IF; --}
7037:
7038: IF x_converted_trx_amt > 0 THEN --{
7036: END IF; --}
7037:
7038: IF x_converted_trx_amt > 0 THEN --{
7039: IF (x_converted_trx_amt < x_remaining_amount) THEN -- compare like uoms {
7040: IF (g_asn_debug = 'Y') THEN
7041: asn_debug.put_line('We are in > amt branch');
7042: END IF;
7043:
7044: x_remaining_amount := x_remaining_amount - x_converted_trx_amt;
7037:
7038: IF x_converted_trx_amt > 0 THEN --{
7039: IF (x_converted_trx_amt < x_remaining_amount) THEN -- compare like uoms {
7040: IF (g_asn_debug = 'Y') THEN
7041: asn_debug.put_line('We are in > amt branch');
7042: END IF;
7043:
7044: x_remaining_amount := x_remaining_amount - x_converted_trx_amt;
7045: insert_into_table := TRUE;
7043:
7044: x_remaining_amount := x_remaining_amount - x_converted_trx_amt;
7045: insert_into_table := TRUE;
7046: ELSE --} {
7047: IF (g_asn_debug = 'Y') THEN
7048: asn_debug.put_line('We are in <= amt branch ');
7049: END IF;
7050:
7051: x_converted_trx_amt := x_remaining_amount;
7044: x_remaining_amount := x_remaining_amount - x_converted_trx_amt;
7045: insert_into_table := TRUE;
7046: ELSE --} {
7047: IF (g_asn_debug = 'Y') THEN
7048: asn_debug.put_line('We are in <= amt branch ');
7049: END IF;
7050:
7051: x_converted_trx_amt := x_remaining_amount;
7052: insert_into_table := TRUE;
7054: END IF; --}
7055: ELSE -- no amt for this record but if last row we need it } {
7056: IF rows_fetched = x_record_count THEN --{ last row needs to be inserted anyway
7057: -- so that the row can be used based on qty tolerance checks
7058: IF (g_asn_debug = 'Y') THEN
7059: asn_debug.put_line('Amount is less then 0 but last record');
7060: END IF;
7061:
7062: insert_into_table := TRUE;
7055: ELSE -- no amt for this record but if last row we need it } {
7056: IF rows_fetched = x_record_count THEN --{ last row needs to be inserted anyway
7057: -- so that the row can be used based on qty tolerance checks
7058: IF (g_asn_debug = 'Y') THEN
7059: asn_debug.put_line('Amount is less then 0 but last record');
7060: END IF;
7061:
7062: insert_into_table := TRUE;
7063: x_converted_trx_amt := 0;
7061:
7062: insert_into_table := TRUE;
7063: x_converted_trx_amt := 0;
7064: ELSE --} {
7065: IF (g_asn_debug = 'Y') THEN
7066: asn_debug.put_line('<= 0 amount but more records in cursor');
7067: END IF;
7068:
7069: x_remaining_amount := 0;
7062: insert_into_table := TRUE;
7063: x_converted_trx_amt := 0;
7064: ELSE --} {
7065: IF (g_asn_debug = 'Y') THEN
7066: asn_debug.put_line('<= 0 amount but more records in cursor');
7067: END IF;
7068:
7069: x_remaining_amount := 0;
7070:
7067: END IF;
7068:
7069: x_remaining_amount := 0;
7070:
7071: IF (g_asn_debug = 'Y') THEN
7072: asn_debug.put_line('We have to deal with remaining_qty > 0 and x_converted_trx_qty -ve');
7073: END IF;
7074:
7075: insert_into_table := FALSE;
7068:
7069: x_remaining_amount := 0;
7070:
7071: IF (g_asn_debug = 'Y') THEN
7072: asn_debug.put_line('We have to deal with remaining_qty > 0 and x_converted_trx_qty -ve');
7073: END IF;
7074:
7075: insert_into_table := FALSE;
7076: END IF; --}
7077: END IF; --} remaining_amount <> 0
7078:
7079: IF insert_into_table THEN --{
7080: IF (x_first_trans) THEN --{
7081: IF (g_asn_debug = 'Y') THEN
7082: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
7083: END IF;
7084:
7085: x_first_trans := FALSE;
7078:
7079: IF insert_into_table THEN --{
7080: IF (x_first_trans) THEN --{
7081: IF (g_asn_debug = 'Y') THEN
7082: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
7083: END IF;
7084:
7085: x_first_trans := FALSE;
7086: ELSE --} { ! x_first_trans
7083: END IF;
7084:
7085: x_first_trans := FALSE;
7086: ELSE --} { ! x_first_trans
7087: IF (g_asn_debug = 'Y') THEN
7088: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
7089: END IF;
7090:
7091: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
7084:
7085: x_first_trans := FALSE;
7086: ELSE --} { ! x_first_trans
7087: IF (g_asn_debug = 'Y') THEN
7088: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
7089: END IF;
7090:
7091: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
7092: END IF; --} matches x_first_transfer
7096: temp_cascaded_table(current_n).interface_source_code := NVL(temp_cascaded_table(current_n).interface_source_code,'RCV'); -- Bug 10127806
7097: temp_cascaded_table(current_n).currency_code := x_shipmentdistributionrec.currency_code;
7098: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).amount * tax_amount_factor, 6);
7099:
7100: IF (g_asn_debug = 'Y') THEN
7101: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
7102: END IF;
7103:
7104: IF temp_cascaded_table(current_n).to_organization_id IS NULL THEN --{
7097: temp_cascaded_table(current_n).currency_code := x_shipmentdistributionrec.currency_code;
7098: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).amount * tax_amount_factor, 6);
7099:
7100: IF (g_asn_debug = 'Y') THEN
7101: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
7102: END IF;
7103:
7104: IF temp_cascaded_table(current_n).to_organization_id IS NULL THEN --{
7105: temp_cascaded_table(current_n).to_organization_id := x_shipmentdistributionrec.ship_to_organization_id;
7108: temp_cascaded_table(current_n).po_line_id := x_shipmentdistributionrec.po_line_id;
7109: temp_cascaded_table(current_n).po_line_location_id := x_shipmentdistributionrec.line_location_id;
7110:
7111: IF x_shipmentdistributionrec.enforce_ship_to_location_code = 'WARNING' THEN --{
7112: IF (g_asn_debug = 'Y') THEN
7113: asn_debug.put_line('Message to warn about different shiptolocations');
7114: END IF;
7115: END IF; --}
7116:
7109: temp_cascaded_table(current_n).po_line_location_id := x_shipmentdistributionrec.line_location_id;
7110:
7111: IF x_shipmentdistributionrec.enforce_ship_to_location_code = 'WARNING' THEN --{
7112: IF (g_asn_debug = 'Y') THEN
7113: asn_debug.put_line('Message to warn about different shiptolocations');
7114: END IF;
7115: END IF; --}
7116:
7117: /* ksareddy - 2329928 Ported changes by bao in branch to cache set_of_books_id */
7135: IF (x_ShipmentDistributionRec.match_option = 'R') THEN
7136: x_allow_rate_override := NVL(fnd_profile.value('ALLOW_RATE_OVERRIDE_FOR_USER_RATE_TYPE'), 'N');
7137: END IF;
7138:
7139: IF (g_asn_debug = 'Y') THEN
7140: asn_debug.put_line('Match Option:' || x_ShipmentDistributionRec.match_option ||
7141: 'Profile value ALLOW_RATE_OVERRIDE_FOR_USER_RATE_TYPE:' ||
7142: x_allow_rate_override);
7143: END IF;
7136: x_allow_rate_override := NVL(fnd_profile.value('ALLOW_RATE_OVERRIDE_FOR_USER_RATE_TYPE'), 'N');
7137: END IF;
7138:
7139: IF (g_asn_debug = 'Y') THEN
7140: asn_debug.put_line('Match Option:' || x_ShipmentDistributionRec.match_option ||
7141: 'Profile value ALLOW_RATE_OVERRIDE_FOR_USER_RATE_TYPE:' ||
7142: x_allow_rate_override);
7143: END IF;
7144:
7190: x_rate := round(x_rate,28);
7191: temp_cascaded_table(current_n).currency_conversion_rate := x_rate;
7192: EXCEPTION
7193: WHEN OTHERS THEN
7194: IF (g_asn_debug = 'Y') THEN
7195: asn_debug.put_line('Exception 3 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
7196: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
7197: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
7198: END IF;
7191: temp_cascaded_table(current_n).currency_conversion_rate := x_rate;
7192: EXCEPTION
7193: WHEN OTHERS THEN
7194: IF (g_asn_debug = 'Y') THEN
7195: asn_debug.put_line('Exception 3 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
7196: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
7197: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
7198: END IF;
7199: RAISE;
7193: WHEN OTHERS THEN
7194: IF (g_asn_debug = 'Y') THEN
7195: asn_debug.put_line('Exception 3 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
7196: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
7197: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
7198: END IF;
7199: RAISE;
7200: END;
7201: ELSE
7210: x_rate := round(x_rate,28);
7211: temp_cascaded_table(current_n).currency_conversion_rate := x_rate;
7212: EXCEPTION
7213: WHEN OTHERS THEN
7214: IF (g_asn_debug = 'Y') THEN
7215: asn_debug.put_line('Exception 4 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
7216: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
7217: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
7218: END IF;
7211: temp_cascaded_table(current_n).currency_conversion_rate := x_rate;
7212: EXCEPTION
7213: WHEN OTHERS THEN
7214: IF (g_asn_debug = 'Y') THEN
7215: asn_debug.put_line('Exception 4 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
7216: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
7217: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
7218: END IF;
7219: RAISE;
7213: WHEN OTHERS THEN
7214: IF (g_asn_debug = 'Y') THEN
7215: asn_debug.put_line('Exception 4 ::'||SQLERRM||':: occurred while deriving the rate for currency_conversion_date : '||temp_cascaded_table(current_n).currency_conversion_date
7216: ||' for the rate type : '||x_ShipmentDistributionRec.rate_type);
7217: asn_debug.put_line('The rate returned is : '||temp_cascaded_table(current_n).currency_conversion_rate);
7218: END IF;
7219: RAISE;
7220: END;
7221: END IF; --}
7226: /* End of fix for Bug 13013727 */
7227:
7228: temp_cascaded_table(current_n).currency_conversion_type := x_ShipmentDistributionRec.rate_type;
7229:
7230: IF (g_asn_debug = 'Y') THEN
7231: asn_debug.put_line('Rate, Rate type and Rate_date ::' ||
7232: temp_cascaded_table(current_n).currency_conversion_rate ||
7233: '::' || temp_cascaded_table(current_n).currency_conversion_type ||
7234: '::' || temp_cascaded_table(current_n).currency_conversion_date);
7227:
7228: temp_cascaded_table(current_n).currency_conversion_type := x_ShipmentDistributionRec.rate_type;
7229:
7230: IF (g_asn_debug = 'Y') THEN
7231: asn_debug.put_line('Rate, Rate type and Rate_date ::' ||
7232: temp_cascaded_table(current_n).currency_conversion_rate ||
7233: '::' || temp_cascaded_table(current_n).currency_conversion_type ||
7234: '::' || temp_cascaded_table(current_n).currency_conversion_date);
7235: END IF;
7271: EXCEPTION
7272: WHEN NO_DATA_FOUND THEN
7273: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
7274:
7275: IF (g_asn_debug = 'Y') THEN
7276: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
7277: asn_debug.put_line(' So it is cleared off');
7278: END IF;
7279: WHEN OTHERS THEN
7272: WHEN NO_DATA_FOUND THEN
7273: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
7274:
7275: IF (g_asn_debug = 'Y') THEN
7276: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
7277: asn_debug.put_line(' So it is cleared off');
7278: END IF;
7279: WHEN OTHERS THEN
7280: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
7273: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
7274:
7275: IF (g_asn_debug = 'Y') THEN
7276: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
7277: asn_debug.put_line(' So it is cleared off');
7278: END IF;
7279: WHEN OTHERS THEN
7280: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
7281:
7278: END IF;
7279: WHEN OTHERS THEN
7280: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
7281:
7282: IF (g_asn_debug = 'Y') THEN
7283: asn_debug.put_line('Some exception has occured');
7284: asn_debug.put_line('This exception is due to the PO deliver to person');
7285: asn_debug.put_line('The deliver to person is optional');
7286: asn_debug.put_line('So cleared off the deliver to person');
7279: WHEN OTHERS THEN
7280: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
7281:
7282: IF (g_asn_debug = 'Y') THEN
7283: asn_debug.put_line('Some exception has occured');
7284: asn_debug.put_line('This exception is due to the PO deliver to person');
7285: asn_debug.put_line('The deliver to person is optional');
7286: asn_debug.put_line('So cleared off the deliver to person');
7287: END IF;
7280: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
7281:
7282: IF (g_asn_debug = 'Y') THEN
7283: asn_debug.put_line('Some exception has occured');
7284: asn_debug.put_line('This exception is due to the PO deliver to person');
7285: asn_debug.put_line('The deliver to person is optional');
7286: asn_debug.put_line('So cleared off the deliver to person');
7287: END IF;
7288: END;
7281:
7282: IF (g_asn_debug = 'Y') THEN
7283: asn_debug.put_line('Some exception has occured');
7284: asn_debug.put_line('This exception is due to the PO deliver to person');
7285: asn_debug.put_line('The deliver to person is optional');
7286: asn_debug.put_line('So cleared off the deliver to person');
7287: END IF;
7288: END;
7289: END IF; --}
7282: IF (g_asn_debug = 'Y') THEN
7283: asn_debug.put_line('Some exception has occured');
7284: asn_debug.put_line('This exception is due to the PO deliver to person');
7285: asn_debug.put_line('The deliver to person is optional');
7286: asn_debug.put_line('So cleared off the deliver to person');
7287: END IF;
7288: END;
7289: END IF; --}
7290: END IF; --}
7297: END IF; --} matches txn != deliver
7298:
7299: current_n := current_n + 1;
7300:
7301: IF (g_asn_debug = 'Y') THEN
7302: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
7303: END IF;
7304: END IF; --} matches if insert into table
7305: END IF; --} matches shipmentdistributionrec.receipt_days_exception_code = none
7298:
7299: current_n := current_n + 1;
7300:
7301: IF (g_asn_debug = 'Y') THEN
7302: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
7303: END IF;
7304: END IF; --} matches if insert into table
7305: END IF; --} matches shipmentdistributionrec.receipt_days_exception_code = none
7306: END LOOP; --}
7305: END IF; --} matches shipmentdistributionrec.receipt_days_exception_code = none
7306: END LOOP; --}
7307: ELSE --} {
7308: -- error_status and error_message are set after validate_quantity_shipped
7309: IF (g_asn_debug = 'Y') THEN
7310: asn_debug.put_line('No po_header_id/item_id ');
7311: END IF;
7312:
7313: IF (g_asn_debug = 'Y') THEN
7306: END LOOP; --}
7307: ELSE --} {
7308: -- error_status and error_message are set after validate_quantity_shipped
7309: IF (g_asn_debug = 'Y') THEN
7310: asn_debug.put_line('No po_header_id/item_id ');
7311: END IF;
7312:
7313: IF (g_asn_debug = 'Y') THEN
7314: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
7309: IF (g_asn_debug = 'Y') THEN
7310: asn_debug.put_line('No po_header_id/item_id ');
7311: END IF;
7312:
7313: IF (g_asn_debug = 'Y') THEN
7314: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
7315: END IF;
7316:
7317: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
7310: asn_debug.put_line('No po_header_id/item_id ');
7311: END IF;
7312:
7313: IF (g_asn_debug = 'Y') THEN
7314: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
7315: END IF;
7316:
7317: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
7318: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
7338: IF count_distributions%ISOPEN THEN
7339: CLOSE count_distributions;
7340: END IF;
7341:
7342: IF (g_asn_debug = 'Y') THEN
7343: asn_debug.put_line('Exit derive_vendor_rcv_line_amt');
7344: END IF;
7345: EXCEPTION
7346: WHEN OTHERS THEN
7339: CLOSE count_distributions;
7340: END IF;
7341:
7342: IF (g_asn_debug = 'Y') THEN
7343: asn_debug.put_line('Exit derive_vendor_rcv_line_amt');
7344: END IF;
7345: EXCEPTION
7346: WHEN OTHERS THEN
7347: IF (g_asn_debug = 'Y') THEN
7343: asn_debug.put_line('Exit derive_vendor_rcv_line_amt');
7344: END IF;
7345: EXCEPTION
7346: WHEN OTHERS THEN
7347: IF (g_asn_debug = 'Y') THEN
7348: asn_debug.put_line('Exception in derive_vendor_rcv_line_amt');
7349: END IF;
7350:
7351: IF shipments%ISOPEN THEN
7344: END IF;
7345: EXCEPTION
7346: WHEN OTHERS THEN
7347: IF (g_asn_debug = 'Y') THEN
7348: asn_debug.put_line('Exception in derive_vendor_rcv_line_amt');
7349: END IF;
7350:
7351: IF shipments%ISOPEN THEN
7352: CLOSE shipments;
7368: rcv_error_pkg.set_sql_error_message('derive_vendor_rcv_line_qty', x_progress);
7369: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
7370: rcv_error_pkg.log_interface_error('DOCUMENT_NUM', FALSE);
7371:
7372: IF (g_asn_debug = 'Y') THEN
7373: asn_debug.put_line(TO_CHAR(n));
7374: asn_debug.put_line(SQLERRM);
7375: asn_debug.put_line('error ' || x_progress);
7376: END IF;
7369: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
7370: rcv_error_pkg.log_interface_error('DOCUMENT_NUM', FALSE);
7371:
7372: IF (g_asn_debug = 'Y') THEN
7373: asn_debug.put_line(TO_CHAR(n));
7374: asn_debug.put_line(SQLERRM);
7375: asn_debug.put_line('error ' || x_progress);
7376: END IF;
7377: END derive_vendor_rcv_line_amt;
7370: rcv_error_pkg.log_interface_error('DOCUMENT_NUM', FALSE);
7371:
7372: IF (g_asn_debug = 'Y') THEN
7373: asn_debug.put_line(TO_CHAR(n));
7374: asn_debug.put_line(SQLERRM);
7375: asn_debug.put_line('error ' || x_progress);
7376: END IF;
7377: END derive_vendor_rcv_line_amt;
7378:
7371:
7372: IF (g_asn_debug = 'Y') THEN
7373: asn_debug.put_line(TO_CHAR(n));
7374: asn_debug.put_line(SQLERRM);
7375: asn_debug.put_line('error ' || x_progress);
7376: END IF;
7377: END derive_vendor_rcv_line_amt;
7378:
7379: PROCEDURE validate_transaction_date(
7405: IF (x_cascaded_table(n).shipment_num IS NOT NULL AND
7406: x_cascaded_table(n).to_organization_id IS NOT NULL AND
7407: x_cascaded_table(n).transaction_date IS NOT NULL) THEN
7408:
7409: IF (g_asn_debug = 'Y') THEN
7410: asn_debug.put_line('Shipment Num ' || x_cascaded_table(n).shipment_num);
7411: asn_debug.put_line('To Organization ID ' || x_cascaded_table(n).to_organization_id);
7412: asn_debug.put_line('Transaction Date ' || x_cascaded_table(n).transaction_date);
7413: END IF;
7406: x_cascaded_table(n).to_organization_id IS NOT NULL AND
7407: x_cascaded_table(n).transaction_date IS NOT NULL) THEN
7408:
7409: IF (g_asn_debug = 'Y') THEN
7410: asn_debug.put_line('Shipment Num ' || x_cascaded_table(n).shipment_num);
7411: asn_debug.put_line('To Organization ID ' || x_cascaded_table(n).to_organization_id);
7412: asn_debug.put_line('Transaction Date ' || x_cascaded_table(n).transaction_date);
7413: END IF;
7414:
7407: x_cascaded_table(n).transaction_date IS NOT NULL) THEN
7408:
7409: IF (g_asn_debug = 'Y') THEN
7410: asn_debug.put_line('Shipment Num ' || x_cascaded_table(n).shipment_num);
7411: asn_debug.put_line('To Organization ID ' || x_cascaded_table(n).to_organization_id);
7412: asn_debug.put_line('Transaction Date ' || x_cascaded_table(n).transaction_date);
7413: END IF;
7414:
7415: BEGIN
7408:
7409: IF (g_asn_debug = 'Y') THEN
7410: asn_debug.put_line('Shipment Num ' || x_cascaded_table(n).shipment_num);
7411: asn_debug.put_line('To Organization ID ' || x_cascaded_table(n).to_organization_id);
7412: asn_debug.put_line('Transaction Date ' || x_cascaded_table(n).transaction_date);
7413: END IF;
7414:
7415: BEGIN
7416: SELECT creation_date, shipped_date
7418: FROM rcv_shipment_headers
7419: WHERE shipment_num = x_cascaded_table(n).shipment_num
7420: AND ship_to_org_id = x_cascaded_table(n).to_organization_id;
7421:
7422: IF (g_asn_debug = 'Y') THEN
7423: asn_debug.put_line('Creation Date ' || x_creation_date);
7424: asn_debug.put_line('Shipped Date ' || x_shipped_date);
7425: END IF;
7426:
7419: WHERE shipment_num = x_cascaded_table(n).shipment_num
7420: AND ship_to_org_id = x_cascaded_table(n).to_organization_id;
7421:
7422: IF (g_asn_debug = 'Y') THEN
7423: asn_debug.put_line('Creation Date ' || x_creation_date);
7424: asn_debug.put_line('Shipped Date ' || x_shipped_date);
7425: END IF;
7426:
7427:
7420: AND ship_to_org_id = x_cascaded_table(n).to_organization_id;
7421:
7422: IF (g_asn_debug = 'Y') THEN
7423: asn_debug.put_line('Creation Date ' || x_creation_date);
7424: asn_debug.put_line('Shipped Date ' || x_shipped_date);
7425: END IF;
7426:
7427:
7428: IF ( -- x_cascaded_table(n).transaction_date < x_creation_date OR
7434:
7435: EXCEPTION
7436: WHEN NO_DATA_FOUND THEN
7437: NULL;
7438: IF (g_asn_debug = 'Y') THEN
7439: asn_debug.put_line('No Shipment Header exists');
7440: END IF;
7441: END;
7442: END IF;
7435: EXCEPTION
7436: WHEN NO_DATA_FOUND THEN
7437: NULL;
7438: IF (g_asn_debug = 'Y') THEN
7439: asn_debug.put_line('No Shipment Header exists');
7440: END IF;
7441: END;
7442: END IF;
7443: /* Bug 6141065: End */
7455: EXCEPTION
7456: WHEN NO_DATA_FOUND THEN
7457: NULL;
7458:
7459: IF (g_asn_debug = 'Y') THEN
7460: asn_debug.put_line('Set of books id not defined');
7461: END IF;
7462: END;
7463:
7456: WHEN NO_DATA_FOUND THEN
7457: NULL;
7458:
7459: IF (g_asn_debug = 'Y') THEN
7460: asn_debug.put_line('Set of books id not defined');
7461: END IF;
7462: END;
7463:
7464: BEGIN
7468: x_cascaded_table(n).to_organization_id
7469: );
7470: EXCEPTION
7471: WHEN OTHERS THEN
7472: IF (g_asn_debug = 'Y') THEN
7473: asn_debug.put_line('Exception in val_open_period');
7474: END IF;
7475:
7476: x_val_open_ok := FALSE;
7469: );
7470: EXCEPTION
7471: WHEN OTHERS THEN
7472: IF (g_asn_debug = 'Y') THEN
7473: asn_debug.put_line('Exception in val_open_period');
7474: END IF;
7475:
7476: x_val_open_ok := FALSE;
7477: END;
7488: x_cascaded_table(n).to_organization_id
7489: );
7490: EXCEPTION
7491: WHEN OTHERS THEN
7492: IF (g_asn_debug = 'Y') THEN
7493: asn_debug.put_line('Exception in val_open_period of trx_date');
7494: END IF;
7495:
7496: x_val_open_ok := FALSE;
7489: );
7490: EXCEPTION
7491: WHEN OTHERS THEN
7492: IF (g_asn_debug = 'Y') THEN
7493: asn_debug.put_line('Exception in val_open_period of trx_date');
7494: END IF;
7495:
7496: x_val_open_ok := FALSE;
7497: END;
7510: EXCEPTION
7511: WHEN OTHERS THEN
7512: x_val_open_ok := FALSE;
7513:
7514: IF (g_asn_debug = 'Y') THEN
7515: asn_debug.put_line('Exception in val_open_period of gl_date');
7516: END IF;
7517: END;
7518:
7511: WHEN OTHERS THEN
7512: x_val_open_ok := FALSE;
7513:
7514: IF (g_asn_debug = 'Y') THEN
7515: asn_debug.put_line('Exception in val_open_period of gl_date');
7516: END IF;
7517: END;
7518:
7519: IF NOT(x_val_open_ok) THEN --{
7562: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
7563: RETURN;
7564: END IF;
7565:
7566: IF (g_asn_debug = 'Y') THEN
7567: asn_debug.put_line('Before call to validate UOM');
7568: asn_debug.put_line('Quantity ' || TO_CHAR(x_cascaded_table(n).quantity));
7569: asn_debug.put_line('unit_of_measure ' || x_cascaded_table(n).unit_of_measure);
7570: END IF;
7563: RETURN;
7564: END IF;
7565:
7566: IF (g_asn_debug = 'Y') THEN
7567: asn_debug.put_line('Before call to validate UOM');
7568: asn_debug.put_line('Quantity ' || TO_CHAR(x_cascaded_table(n).quantity));
7569: asn_debug.put_line('unit_of_measure ' || x_cascaded_table(n).unit_of_measure);
7570: END IF;
7571:
7564: END IF;
7565:
7566: IF (g_asn_debug = 'Y') THEN
7567: asn_debug.put_line('Before call to validate UOM');
7568: asn_debug.put_line('Quantity ' || TO_CHAR(x_cascaded_table(n).quantity));
7569: asn_debug.put_line('unit_of_measure ' || x_cascaded_table(n).unit_of_measure);
7570: END IF;
7571:
7572: uom_record.quantity_shipped := x_cascaded_table(n).quantity;
7565:
7566: IF (g_asn_debug = 'Y') THEN
7567: asn_debug.put_line('Before call to validate UOM');
7568: asn_debug.put_line('Quantity ' || TO_CHAR(x_cascaded_table(n).quantity));
7569: asn_debug.put_line('unit_of_measure ' || x_cascaded_table(n).unit_of_measure);
7570: END IF;
7571:
7572: uom_record.quantity_shipped := x_cascaded_table(n).quantity;
7573: uom_record.unit_of_measure := x_cascaded_table(n).unit_of_measure;
7578: uom_record.primary_unit_of_measure := x_cascaded_table(n).primary_unit_of_measure;
7579: uom_record.error_record.error_status := 'S';
7580: uom_record.error_record.error_message := NULL;
7581:
7582: IF (g_asn_debug = 'Y') THEN
7583: asn_debug.put_line('Validating UOM');
7584: END IF;
7585:
7586: rcv_transactions_interface_sv1.validate_uom(uom_record);
7579: uom_record.error_record.error_status := 'S';
7580: uom_record.error_record.error_message := NULL;
7581:
7582: IF (g_asn_debug = 'Y') THEN
7583: asn_debug.put_line('Validating UOM');
7584: END IF;
7585:
7586: rcv_transactions_interface_sv1.validate_uom(uom_record);
7587: x_cascaded_table(n).error_status := uom_record.error_record.error_status;
7606: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
7607: RETURN;
7608: END IF;
7609:
7610: IF (g_asn_debug = 'Y') THEN
7611: asn_debug.put_line('Validating Item');
7612: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).item_id));
7613: END IF;
7614:
7607: RETURN;
7608: END IF;
7609:
7610: IF (g_asn_debug = 'Y') THEN
7611: asn_debug.put_line('Validating Item');
7612: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).item_id));
7613: END IF;
7614:
7615: /*
7608: END IF;
7609:
7610: IF (g_asn_debug = 'Y') THEN
7611: asn_debug.put_line('Validating Item');
7612: asn_debug.put_line(TO_CHAR(x_cascaded_table(n).item_id));
7613: END IF;
7614:
7615: /*
7616: ** If this is a one time item shipment and you've matched up based on a
7621: AND x_cascaded_table(n).po_line_id IS NOT NULL) THEN --{
7622: item_id_record.error_record.error_status := x_cascaded_table(n).error_status;
7623: item_id_record.error_record.error_message := x_cascaded_table(n).error_message;
7624: ELSE
7625: asn_debug.put_line('before doing validate int org rcv item ');
7626:
7627: /* Bug 5182693 : Skip validate item for ASN transactions with substitute item */
7628:
7629: asn_debug.put_line('substitute_item_id: '|| x_cascaded_table(n).substitute_item_id);
7625: asn_debug.put_line('before doing validate int org rcv item ');
7626:
7627: /* Bug 5182693 : Skip validate item for ASN transactions with substitute item */
7628:
7629: asn_debug.put_line('substitute_item_id: '|| x_cascaded_table(n).substitute_item_id);
7630: asn_debug.put_line('g_txn_against_asn : '|| rcv_roi_header.g_txn_against_asn);
7631: /** Bug: 5598511
7632: * For ASN, substitution item id will be populated only during ASN creation and
7633: * not during the receipt of ASN. In order to bypass item validation for ASN added the
7626:
7627: /* Bug 5182693 : Skip validate item for ASN transactions with substitute item */
7628:
7629: asn_debug.put_line('substitute_item_id: '|| x_cascaded_table(n).substitute_item_id);
7630: asn_debug.put_line('g_txn_against_asn : '|| rcv_roi_header.g_txn_against_asn);
7631: /** Bug: 5598511
7632: * For ASN, substitution item id will be populated only during ASN creation and
7633: * not during the receipt of ASN. In order to bypass item validation for ASN added the
7634: * condition ' AND rcv_roi_header.g_txn_against_asn = 'N' '
7649: rcv_roi_header_common.validate_item(x_cascaded_table, n); -- bug 608353
7650: END IF; --}
7651: END IF; --}
7652:
7653: asn_debug.put_line('after doing validate item the error status is ' || x_cascaded_table(n).error_status);
7654: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'ITEM_NUM');
7655: item_id_record.item_description := x_cascaded_table(n).item_description;
7656: item_id_record.error_record.error_status := 'S';
7657: item_id_record.error_record.error_message := NULL;
7655: item_id_record.item_description := x_cascaded_table(n).item_description;
7656: item_id_record.error_record.error_status := 'S';
7657: item_id_record.error_record.error_message := NULL;
7658:
7659: IF (g_asn_debug = 'Y') THEN
7660: asn_debug.put_line('Validating Item Description ' || x_cascaded_table(n).item_description);
7661: END IF;
7662:
7663: rcv_transactions_interface_sv1.validate_item_description(item_id_record);
7656: item_id_record.error_record.error_status := 'S';
7657: item_id_record.error_record.error_message := NULL;
7658:
7659: IF (g_asn_debug = 'Y') THEN
7660: asn_debug.put_line('Validating Item Description ' || x_cascaded_table(n).item_description);
7661: END IF;
7662:
7663: rcv_transactions_interface_sv1.validate_item_description(item_id_record);
7664: x_cascaded_table(n).error_status := item_id_record.error_record.error_status;
7663: rcv_transactions_interface_sv1.validate_item_description(item_id_record);
7664: x_cascaded_table(n).error_status := item_id_record.error_record.error_status;
7665: x_cascaded_table(n).error_message := item_id_record.error_record.error_message;
7666:
7667: IF (g_asn_debug = 'Y') THEN
7668: asn_debug.put_line('Error status after validate item description ' || x_cascaded_table(n).error_status);
7669: END IF;
7670:
7671: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'ITEM_DESCRIPTION');
7664: x_cascaded_table(n).error_status := item_id_record.error_record.error_status;
7665: x_cascaded_table(n).error_message := item_id_record.error_record.error_message;
7666:
7667: IF (g_asn_debug = 'Y') THEN
7668: asn_debug.put_line('Error status after validate item description ' || x_cascaded_table(n).error_status);
7669: END IF;
7670:
7671: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'ITEM_DESCRIPTION');
7672:
7670:
7671: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'ITEM_DESCRIPTION');
7672:
7673: IF (x_cascaded_table(n).substitute_item_id IS NOT NULL) THEN --{
7674: IF (g_asn_debug = 'Y') THEN
7675: asn_debug.put_line('Validating Substitute Item');
7676: END IF;
7677:
7678: rcv_roi_header_common.validate_substitute_item(x_cascaded_table, n);
7671: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'ITEM_DESCRIPTION');
7672:
7673: IF (x_cascaded_table(n).substitute_item_id IS NOT NULL) THEN --{
7674: IF (g_asn_debug = 'Y') THEN
7675: asn_debug.put_line('Validating Substitute Item');
7676: END IF;
7677:
7678: rcv_roi_header_common.validate_substitute_item(x_cascaded_table, n);
7679: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'SUBSTITUTE_ITEM_NUM');
7723: END IF;
7724:
7725: EXCEPTION
7726: WHEN OTHERS THEN
7727: asn_debug.put_line('Erroring out in rcv_roi_transaction.validate_freight_carrier_code');
7728: asn_debug.put_line(SQLERRM);
7729: END;
7730: /* End of fix for Bug 8722496 */
7731:
7724:
7725: EXCEPTION
7726: WHEN OTHERS THEN
7727: asn_debug.put_line('Erroring out in rcv_roi_transaction.validate_freight_carrier_code');
7728: asn_debug.put_line(SQLERRM);
7729: END;
7730: /* End of fix for Bug 8722496 */
7731:
7732: freight_carrier_record.to_organization_id := x_cascaded_table(n).to_organization_id;
7734: freight_carrier_record.po_header_id := x_cascaded_table(n).po_header_id;
7735: freight_carrier_record.error_record.error_status := 'S';
7736: freight_carrier_record.error_record.error_message := NULL;
7737:
7738: IF (g_asn_debug = 'Y') THEN
7739: asn_debug.put_line('Validating Freight Carrier');
7740: END IF;
7741:
7742: rcv_transactions_interface_sv1.validate_freight_carrier(freight_carrier_record);
7735: freight_carrier_record.error_record.error_status := 'S';
7736: freight_carrier_record.error_record.error_message := NULL;
7737:
7738: IF (g_asn_debug = 'Y') THEN
7739: asn_debug.put_line('Validating Freight Carrier');
7740: END IF;
7741:
7742: rcv_transactions_interface_sv1.validate_freight_carrier(freight_carrier_record);
7743: x_cascaded_table(n).error_status := freight_carrier_record.error_record.error_status;
7766: po_lookup_code_record.lookup_type := 'RCV DESTINATION TYPE';
7767: po_lookup_code_record.error_record.error_status := 'S';
7768: po_lookup_code_record.error_record.error_message := NULL;
7769:
7770: IF (g_asn_debug = 'Y') THEN
7771: asn_debug.put_line('Validating Destination Type Code');
7772: END IF;
7773:
7774: rcv_transactions_interface_sv1.validate_po_lookup_code(po_lookup_code_record);
7767: po_lookup_code_record.error_record.error_status := 'S';
7768: po_lookup_code_record.error_record.error_message := NULL;
7769:
7770: IF (g_asn_debug = 'Y') THEN
7771: asn_debug.put_line('Validating Destination Type Code');
7772: END IF;
7773:
7774: rcv_transactions_interface_sv1.validate_po_lookup_code(po_lookup_code_record);
7775: x_cascaded_table(n).error_status := po_lookup_code_record.error_record.error_status;
7797: /* Skipping validation of ship_to_location in case of direct delivery Bug 8306879*/
7798: IF ( x_cascaded_table(n).transaction_type = 'RECEIVE'
7799: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN
7800:
7801: IF (g_asn_debug = 'Y') THEN
7802: asn_debug.put_line('Skipped Ship To Location Validation for Direct Delivery');
7803: END IF;
7804:
7805: RETURN;
7798: IF ( x_cascaded_table(n).transaction_type = 'RECEIVE'
7799: AND NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN
7800:
7801: IF (g_asn_debug = 'Y') THEN
7802: asn_debug.put_line('Skipped Ship To Location Validation for Direct Delivery');
7803: END IF;
7804:
7805: RETURN;
7806: END IF;
7815: location_record.transaction_date := x_cascaded_table(n).transaction_date;
7816: location_record.error_record.error_status := 'S';
7817: location_record.error_record.error_message := NULL;
7818:
7819: IF (g_asn_debug = 'Y') THEN
7820: asn_debug.put_line('Validating Ship To Location');
7821: END IF;
7822:
7823: rcv_transactions_interface_sv1.validate_location(location_record);
7816: location_record.error_record.error_status := 'S';
7817: location_record.error_record.error_message := NULL;
7818:
7819: IF (g_asn_debug = 'Y') THEN
7820: asn_debug.put_line('Validating Ship To Location');
7821: END IF;
7822:
7823: rcv_transactions_interface_sv1.validate_location(location_record);
7824: x_cascaded_table(n).error_status := location_record.error_record.error_status;
7848: employee_record.transaction_date := x_cascaded_table(n).transaction_date;
7849: employee_record.error_record.error_status := 'S';
7850: employee_record.error_record.error_message := NULL;
7851:
7852: IF (g_asn_debug = 'Y') THEN
7853: asn_debug.put_line('Validating Deliver to Person');
7854: END IF;
7855:
7856: rcv_transactions_interface_sv1.validate_employee(employee_record);
7849: employee_record.error_record.error_status := 'S';
7850: employee_record.error_record.error_message := NULL;
7851:
7852: IF (g_asn_debug = 'Y') THEN
7853: asn_debug.put_line('Validating Deliver to Person');
7854: END IF;
7855:
7856: rcv_transactions_interface_sv1.validate_employee(employee_record);
7857:
7865: deliver_to_person_id in case of validation failure for deliver_to_person_id
7866: in order to synch the behaviour of ROI as to that of forms.*/
7867:
7868: IF employee_record.error_record.error_status <> 'S' THEN--Start of bug#6375015 fix
7869: IF (g_asn_debug = 'Y') THEN
7870: asn_debug.put_line('validate_employee returned error, setting deliver_to_person_id null');
7871: END IF;
7872: --Validation failure for the deliver_to_person_id
7873: x_cascaded_table(n).deliver_to_person_id := null;
7866: in order to synch the behaviour of ROI as to that of forms.*/
7867:
7868: IF employee_record.error_record.error_status <> 'S' THEN--Start of bug#6375015 fix
7869: IF (g_asn_debug = 'Y') THEN
7870: asn_debug.put_line('validate_employee returned error, setting deliver_to_person_id null');
7871: END IF;
7872: --Validation failure for the deliver_to_person_id
7873: x_cascaded_table(n).deliver_to_person_id := null;
7874: x_cascaded_table(n).deliver_to_person_name := null;
7872: --Validation failure for the deliver_to_person_id
7873: x_cascaded_table(n).deliver_to_person_id := null;
7874: x_cascaded_table(n).deliver_to_person_name := null;
7875: ELSE
7876: IF (g_asn_debug = 'Y') THEN
7877: asn_debug.put_line('validate_employee returned success');
7878: END IF;
7879: END IF;--End of bug#6375015 fix
7880:
7873: x_cascaded_table(n).deliver_to_person_id := null;
7874: x_cascaded_table(n).deliver_to_person_name := null;
7875: ELSE
7876: IF (g_asn_debug = 'Y') THEN
7877: asn_debug.put_line('validate_employee returned success');
7878: END IF;
7879: END IF;--End of bug#6375015 fix
7880:
7881: /* WDK there was a second validation for
7899:
7900: /*
7901: ** Validate routing record bug 639750
7902: */
7903: IF (g_asn_debug = 'Y') THEN
7904: asn_debug.put_line('Validating routing_header_id');
7905: END IF;
7906:
7907: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
7900: /*
7901: ** Validate routing record bug 639750
7902: */
7903: IF (g_asn_debug = 'Y') THEN
7904: asn_debug.put_line('Validating routing_header_id');
7905: END IF;
7906:
7907: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
7908: RETURN;
7920:
7921: IF (x_cascaded_table(n).transaction_type IN('ACCEPT', 'REJECT')) THEN --{
7922: IF ( (x_cascaded_table(n).routing_header_id) IN(3)
7923: AND NVL(rcv_setup_s.get_override_routing, 'N') = 'N') THEN --{
7924: asn_debug.put_line('We cannot do inspection on this record .');
7925: rcv_error_pkg.set_error_message('RCV_INSPECT_ROUTING_FAILED');
7926: RAISE e_validation_error;
7927: END IF; --}
7928: END IF; --}
7958: END;
7959:
7960: IF l_insp_status = 'NOT INSPECTED' THEN
7961:
7962: asn_debug.put_line('We cannot do deliver on this record .');
7963: rcv_error_pkg.set_error_message('RCV_ASN_DELIVER_ROUTING_FAILED');
7964: RAISE e_validation_error;
7965:
7966: END IF;
8011: location_record.transaction_date := x_cascaded_table(n).transaction_date;
8012: location_record.error_record.error_status := 'S';
8013: location_record.error_record.error_message := NULL;
8014:
8015: IF (g_asn_debug = 'Y') THEN
8016: asn_debug.put_line('Validating Deliver To Location');
8017: END IF;
8018:
8019: rcv_transactions_interface_sv1.validate_location(location_record);
8012: location_record.error_record.error_status := 'S';
8013: location_record.error_record.error_message := NULL;
8014:
8015: IF (g_asn_debug = 'Y') THEN
8016: asn_debug.put_line('Validating Deliver To Location');
8017: END IF;
8018:
8019: rcv_transactions_interface_sv1.validate_location(location_record);
8020: x_cascaded_table(n).error_status := location_record.error_record.error_status;
8050:
8051: /* We can derive from_subinventory for Return transactions and derive
8052: * to_subinventory for receive, transfer and transfer transactions.
8053: */
8054: IF (g_asn_debug = 'Y') THEN
8055: asn_debug.put_line('Validating Subinventory ');
8056: END IF;
8057:
8058: /* bug 3367485: for dropship deliver, skip subinventory validation as
8051: /* We can derive from_subinventory for Return transactions and derive
8052: * to_subinventory for receive, transfer and transfer transactions.
8053: */
8054: IF (g_asn_debug = 'Y') THEN
8055: asn_debug.put_line('Validating Subinventory ');
8056: END IF;
8057:
8058: /* bug 3367485: for dropship deliver, skip subinventory validation as
8059: * Inventory has relaxed the subinventory validation for logical trxns
8060: */
8061: /* Commented this out as we will not support ASN auto deliver while
8062: * subinventory is null. See updates on Bug 3367485 */
8063: /* IF (x_drop_ship_flag = 'Y') THEN
8064: IF (g_asn_debug = 'Y') THEN
8065: asn_debug.put_line('Skip subinventory validation for dropship deliver ');
8066: END IF;
8067:
8068: RETURN;
8061: /* Commented this out as we will not support ASN auto deliver while
8062: * subinventory is null. See updates on Bug 3367485 */
8063: /* IF (x_drop_ship_flag = 'Y') THEN
8064: IF (g_asn_debug = 'Y') THEN
8065: asn_debug.put_line('Skip subinventory validation for dropship deliver ');
8066: END IF;
8067:
8068: RETURN;
8069: END IF; */
8070:
8071: IF ( ( x_cascaded_table(n).transaction_type = 'DELIVER'
8072: OR x_cascaded_table(n).auto_transact_code = 'DELIVER')
8073: AND x_cascaded_table(n).destination_type_code <> 'INVENTORY') THEN --{
8074: IF (g_asn_debug = 'Y') THEN
8075: asn_debug.put_line('No need to validate Subinventory if the destination_type is Expense. So return');
8076: END IF;
8077:
8078: RETURN;
8071: IF ( ( x_cascaded_table(n).transaction_type = 'DELIVER'
8072: OR x_cascaded_table(n).auto_transact_code = 'DELIVER')
8073: AND x_cascaded_table(n).destination_type_code <> 'INVENTORY') THEN --{
8074: IF (g_asn_debug = 'Y') THEN
8075: asn_debug.put_line('No need to validate Subinventory if the destination_type is Expense. So return');
8076: END IF;
8077:
8078: RETURN;
8079: END IF;
8089: ** Validate the subinventory
8090: */
8091: x_progress := '010';
8092:
8093: IF (g_asn_debug = 'Y') THEN
8094: asn_debug.put_line('subinventory ' || x_cascaded_table(n).subinventory);
8095: asn_debug.put_line('to_organization_id ' || x_cascaded_table(n).to_organization_id);
8096: asn_debug.put_line('transaction_date ' || x_cascaded_table(n).transaction_date);
8097: asn_debug.put_line('item_id ' || x_cascaded_table(n).item_id);
8090: */
8091: x_progress := '010';
8092:
8093: IF (g_asn_debug = 'Y') THEN
8094: asn_debug.put_line('subinventory ' || x_cascaded_table(n).subinventory);
8095: asn_debug.put_line('to_organization_id ' || x_cascaded_table(n).to_organization_id);
8096: asn_debug.put_line('transaction_date ' || x_cascaded_table(n).transaction_date);
8097: asn_debug.put_line('item_id ' || x_cascaded_table(n).item_id);
8098: END IF;
8091: x_progress := '010';
8092:
8093: IF (g_asn_debug = 'Y') THEN
8094: asn_debug.put_line('subinventory ' || x_cascaded_table(n).subinventory);
8095: asn_debug.put_line('to_organization_id ' || x_cascaded_table(n).to_organization_id);
8096: asn_debug.put_line('transaction_date ' || x_cascaded_table(n).transaction_date);
8097: asn_debug.put_line('item_id ' || x_cascaded_table(n).item_id);
8098: END IF;
8099:
8092:
8093: IF (g_asn_debug = 'Y') THEN
8094: asn_debug.put_line('subinventory ' || x_cascaded_table(n).subinventory);
8095: asn_debug.put_line('to_organization_id ' || x_cascaded_table(n).to_organization_id);
8096: asn_debug.put_line('transaction_date ' || x_cascaded_table(n).transaction_date);
8097: asn_debug.put_line('item_id ' || x_cascaded_table(n).item_id);
8098: END IF;
8099:
8100: SELECT NVL(MAX(secondary_inventory_name), 'notfound')
8093: IF (g_asn_debug = 'Y') THEN
8094: asn_debug.put_line('subinventory ' || x_cascaded_table(n).subinventory);
8095: asn_debug.put_line('to_organization_id ' || x_cascaded_table(n).to_organization_id);
8096: asn_debug.put_line('transaction_date ' || x_cascaded_table(n).transaction_date);
8097: asn_debug.put_line('item_id ' || x_cascaded_table(n).item_id);
8098: END IF;
8099:
8100: SELECT NVL(MAX(secondary_inventory_name), 'notfound')
8101: INTO x_subinventory
8116: )
8117: );
8118:
8119: IF (x_subinventory = 'notfound') THEN
8120: IF (g_asn_debug = 'Y') THEN
8121: asn_debug.put_line('subinventory not found. error ');
8122: END IF;
8123:
8124: rcv_error_pkg.set_error_message('RCV_DEST_SUB_INVALID');
8117: );
8118:
8119: IF (x_subinventory = 'notfound') THEN
8120: IF (g_asn_debug = 'Y') THEN
8121: asn_debug.put_line('subinventory not found. error ');
8122: END IF;
8123:
8124: rcv_error_pkg.set_error_message('RCV_DEST_SUB_INVALID');
8125: RAISE e_validation_error;
8155: NULL,
8156: NULL,
8157: NULL,
8158: 'Z') <> 'Y') THEN
8159: IF (g_asn_debug = 'Y') THEN
8160: asn_debug.put_line('subinventory is invalidate. error ');
8161: END IF;
8162:
8163: rcv_error_pkg.set_error_message('RCV_DEST_SUB_INVALID');
8156: NULL,
8157: NULL,
8158: 'Z') <> 'Y') THEN
8159: IF (g_asn_debug = 'Y') THEN
8160: asn_debug.put_line('subinventory is invalidate. error ');
8161: END IF;
8162:
8163: rcv_error_pkg.set_error_message('RCV_DEST_SUB_INVALID');
8164: RAISE e_validation_error;
8224: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
8225: RETURN;
8226: END IF;
8227:
8228: IF (g_asn_debug = 'Y') THEN
8229: asn_debug.put_line('Trx Type = ' || x_cascaded_table(n).transaction_type || 'Auto Trx Code = ' || x_cascaded_table(n).auto_transact_code);
8230: END IF;
8231:
8232: IF ( x_cascaded_table(n).transaction_type = 'DELIVER'
8225: RETURN;
8226: END IF;
8227:
8228: IF (g_asn_debug = 'Y') THEN
8229: asn_debug.put_line('Trx Type = ' || x_cascaded_table(n).transaction_type || 'Auto Trx Code = ' || x_cascaded_table(n).auto_transact_code);
8230: END IF;
8231:
8232: IF ( x_cascaded_table(n).transaction_type = 'DELIVER'
8233: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN
8230: END IF;
8231:
8232: IF ( x_cascaded_table(n).transaction_type = 'DELIVER'
8233: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN
8234: IF (g_asn_debug = 'Y') THEN
8235: asn_debug.put_line('Valid Loc - Destination Type Code = ' || x_cascaded_table(n).destination_type_code);
8236: END IF;
8237:
8238: IF (x_cascaded_table(n).destination_type_code = 'INVENTORY') THEN
8231:
8232: IF ( x_cascaded_table(n).transaction_type = 'DELIVER'
8233: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN
8234: IF (g_asn_debug = 'Y') THEN
8235: asn_debug.put_line('Valid Loc - Destination Type Code = ' || x_cascaded_table(n).destination_type_code);
8236: END IF;
8237:
8238: IF (x_cascaded_table(n).destination_type_code = 'INVENTORY') THEN
8239: locator_record.locator_id := x_cascaded_table(n).locator_id;
8250: locator_record.project_id := x_cascaded_table(n).project_id; --Bug13844195
8251: locator_record.task_id := x_cascaded_table(n).task_id; --Bug13844195
8252: --End Bug 13844195
8253:
8254: IF (g_asn_debug = 'Y') THEN
8255: asn_debug.put_line('Locator = ' || TO_CHAR(locator_record.locator_id));
8256: asn_debug.put_line('Subinventory = ' || locator_record.subinventory);
8257: asn_debug.put_line('To Org = ' || locator_record.to_organization_id);
8258: asn_debug.put_line('Dest Type = ' || locator_record.destination_type_code);
8251: locator_record.task_id := x_cascaded_table(n).task_id; --Bug13844195
8252: --End Bug 13844195
8253:
8254: IF (g_asn_debug = 'Y') THEN
8255: asn_debug.put_line('Locator = ' || TO_CHAR(locator_record.locator_id));
8256: asn_debug.put_line('Subinventory = ' || locator_record.subinventory);
8257: asn_debug.put_line('To Org = ' || locator_record.to_organization_id);
8258: asn_debug.put_line('Dest Type = ' || locator_record.destination_type_code);
8259: asn_debug.put_line('Item Id = ' || locator_record.item_id);
8252: --End Bug 13844195
8253:
8254: IF (g_asn_debug = 'Y') THEN
8255: asn_debug.put_line('Locator = ' || TO_CHAR(locator_record.locator_id));
8256: asn_debug.put_line('Subinventory = ' || locator_record.subinventory);
8257: asn_debug.put_line('To Org = ' || locator_record.to_organization_id);
8258: asn_debug.put_line('Dest Type = ' || locator_record.destination_type_code);
8259: asn_debug.put_line('Item Id = ' || locator_record.item_id);
8260: END IF;
8253:
8254: IF (g_asn_debug = 'Y') THEN
8255: asn_debug.put_line('Locator = ' || TO_CHAR(locator_record.locator_id));
8256: asn_debug.put_line('Subinventory = ' || locator_record.subinventory);
8257: asn_debug.put_line('To Org = ' || locator_record.to_organization_id);
8258: asn_debug.put_line('Dest Type = ' || locator_record.destination_type_code);
8259: asn_debug.put_line('Item Id = ' || locator_record.item_id);
8260: END IF;
8261:
8254: IF (g_asn_debug = 'Y') THEN
8255: asn_debug.put_line('Locator = ' || TO_CHAR(locator_record.locator_id));
8256: asn_debug.put_line('Subinventory = ' || locator_record.subinventory);
8257: asn_debug.put_line('To Org = ' || locator_record.to_organization_id);
8258: asn_debug.put_line('Dest Type = ' || locator_record.destination_type_code);
8259: asn_debug.put_line('Item Id = ' || locator_record.item_id);
8260: END IF;
8261:
8262: locator_record.error_record.error_status := 'S';
8255: asn_debug.put_line('Locator = ' || TO_CHAR(locator_record.locator_id));
8256: asn_debug.put_line('Subinventory = ' || locator_record.subinventory);
8257: asn_debug.put_line('To Org = ' || locator_record.to_organization_id);
8258: asn_debug.put_line('Dest Type = ' || locator_record.destination_type_code);
8259: asn_debug.put_line('Item Id = ' || locator_record.item_id);
8260: END IF;
8261:
8262: locator_record.error_record.error_status := 'S';
8263: locator_record.error_record.error_message := NULL;
8261:
8262: locator_record.error_record.error_status := 'S';
8263: locator_record.error_record.error_message := NULL;
8264:
8265: IF (g_asn_debug = 'Y') THEN
8266: asn_debug.put_line('Validating Locator');
8267: END IF;
8268:
8269: rcv_transactions_interface_sv1.validate_locator(locator_record);
8262: locator_record.error_record.error_status := 'S';
8263: locator_record.error_record.error_message := NULL;
8264:
8265: IF (g_asn_debug = 'Y') THEN
8266: asn_debug.put_line('Validating Locator');
8267: END IF;
8268:
8269: rcv_transactions_interface_sv1.validate_locator(locator_record);
8270: rcv_transactions_interface_sv1.validate_project_locator(locator_record); --Bug13844195
8286: */
8287:
8288: if locator_record.locator_id is null then
8289:
8290: asn_debug.put_line('Locator_id is nulled out');
8291: x_cascaded_table(n).locator_id := locator_record.locator_id;
8292: end if;
8293:
8294:
8291: x_cascaded_table(n).locator_id := locator_record.locator_id;
8292: end if;
8293:
8294:
8295: IF (g_asn_debug = 'Y') THEN
8296: asn_debug.put_line('Loc Error Status = ' || locator_record.error_record.error_status);
8297: asn_debug.put_line('Loc Error Msg = ' || locator_record.error_record.error_message);
8298: asn_debug.put_line('Locator_id = ' || locator_record.locator_id);
8299: END IF;
8292: end if;
8293:
8294:
8295: IF (g_asn_debug = 'Y') THEN
8296: asn_debug.put_line('Loc Error Status = ' || locator_record.error_record.error_status);
8297: asn_debug.put_line('Loc Error Msg = ' || locator_record.error_record.error_message);
8298: asn_debug.put_line('Locator_id = ' || locator_record.locator_id);
8299: END IF;
8300:
8293:
8294:
8295: IF (g_asn_debug = 'Y') THEN
8296: asn_debug.put_line('Loc Error Status = ' || locator_record.error_record.error_status);
8297: asn_debug.put_line('Loc Error Msg = ' || locator_record.error_record.error_message);
8298: asn_debug.put_line('Locator_id = ' || locator_record.locator_id);
8299: END IF;
8300:
8301: -- Bug 10253000 : Validate Material Status on locator level
8294:
8295: IF (g_asn_debug = 'Y') THEN
8296: asn_debug.put_line('Loc Error Status = ' || locator_record.error_record.error_status);
8297: asn_debug.put_line('Loc Error Msg = ' || locator_record.error_record.error_message);
8298: asn_debug.put_line('Locator_id = ' || locator_record.locator_id);
8299: END IF;
8300:
8301: -- Bug 10253000 : Validate Material Status on locator level
8302:
8343: );
8344: ELSE --}{
8345: x_cascaded_table(n).locator_id := NULL;
8346: x_cascaded_table(n).LOCATOR := NULL;
8347: IF (g_asn_debug = 'Y') THEN
8348: asn_debug.put_line('locator_id ' || x_cascaded_table(n).locator_id);
8349: asn_debug.put_line('locator ' || x_cascaded_table(n).locator);
8350: END IF;
8351: END IF; --}
8344: ELSE --}{
8345: x_cascaded_table(n).locator_id := NULL;
8346: x_cascaded_table(n).LOCATOR := NULL;
8347: IF (g_asn_debug = 'Y') THEN
8348: asn_debug.put_line('locator_id ' || x_cascaded_table(n).locator_id);
8349: asn_debug.put_line('locator ' || x_cascaded_table(n).locator);
8350: END IF;
8351: END IF; --}
8352: END IF;
8345: x_cascaded_table(n).locator_id := NULL;
8346: x_cascaded_table(n).LOCATOR := NULL;
8347: IF (g_asn_debug = 'Y') THEN
8348: asn_debug.put_line('locator_id ' || x_cascaded_table(n).locator_id);
8349: asn_debug.put_line('locator ' || x_cascaded_table(n).locator);
8350: END IF;
8351: END IF; --}
8352: END IF;
8353: END validate_locator;
8369: tax_name_record.tax_name := x_cascaded_table(n).tax_name;
8370: tax_name_record.error_record.error_status := 'S';
8371: tax_name_record.error_record.error_message := NULL;
8372:
8373: IF (g_asn_debug = 'Y') THEN
8374: asn_debug.put_line('Validating Tax Code');
8375: END IF;
8376:
8377: rcv_transactions_interface_sv1.validate_tax_code(tax_name_record);
8370: tax_name_record.error_record.error_status := 'S';
8371: tax_name_record.error_record.error_message := NULL;
8372:
8373: IF (g_asn_debug = 'Y') THEN
8374: asn_debug.put_line('Validating Tax Code');
8375: END IF;
8376:
8377: rcv_transactions_interface_sv1.validate_tax_code(tax_name_record);
8378: x_cascaded_table(n).error_status := tax_name_record.error_record.error_status;
8400: country_of_origin_record.country_of_origin_code := x_cascaded_table(n).country_of_origin_code;
8401: country_of_origin_record.error_record.error_status := 'S';
8402: country_of_origin_record.error_record.error_message := NULL;
8403:
8404: IF (g_asn_debug = 'Y') THEN
8405: asn_debug.put_line('Validating Country of Origin Code');
8406: END IF;
8407:
8408: rcv_transactions_interface_sv1.validate_country_of_origin(country_of_origin_record);
8401: country_of_origin_record.error_record.error_status := 'S';
8402: country_of_origin_record.error_record.error_message := NULL;
8403:
8404: IF (g_asn_debug = 'Y') THEN
8405: asn_debug.put_line('Validating Country of Origin Code');
8406: END IF;
8407:
8408: rcv_transactions_interface_sv1.validate_country_of_origin(country_of_origin_record);
8409: x_cascaded_table(n).error_status := country_of_origin_record.error_record.error_status;
8432: asl_record.to_organization_id := x_cascaded_table(n).to_organization_id;
8433: asl_record.error_record.error_status := 'S';
8434: asl_record.error_record.error_message := NULL;
8435:
8436: IF (g_asn_debug = 'Y') THEN
8437: asn_debug.put_line('Validating ASL');
8438: END IF;
8439:
8440: rcv_transactions_interface_sv1.validate_asl(asl_record);
8433: asl_record.error_record.error_status := 'S';
8434: asl_record.error_record.error_message := NULL;
8435:
8436: IF (g_asn_debug = 'Y') THEN
8437: asn_debug.put_line('Validating ASL');
8438: END IF;
8439:
8440: rcv_transactions_interface_sv1.validate_asl(asl_record);
8441: x_cascaded_table(n).error_status := asl_record.error_record.error_status;
8469: cum_quantity_record.transaction_date := x_cascaded_table(n).transaction_date;
8470: cum_quantity_record.error_record.error_status := 'S';
8471: cum_quantity_record.error_record.error_message := NULL;
8472:
8473: IF (g_asn_debug = 'Y') THEN
8474: asn_debug.put_line('Validating Cum Qty Shipped');
8475: END IF;
8476:
8477: rcv_transactions_interface_sv1.validate_cum_quantity_shipped(cum_quantity_record);
8470: cum_quantity_record.error_record.error_status := 'S';
8471: cum_quantity_record.error_record.error_message := NULL;
8472:
8473: IF (g_asn_debug = 'Y') THEN
8474: asn_debug.put_line('Validating Cum Qty Shipped');
8475: END IF;
8476:
8477: rcv_transactions_interface_sv1.validate_cum_quantity_shipped(cum_quantity_record);
8478: x_cascaded_table(n).error_status := cum_quantity_record.error_record.error_status;
8500: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
8501: RETURN;
8502: END IF;
8503:
8504: IF (g_asn_debug = 'Y') THEN
8505: asn_debug.put_line('Validating ref integrity');
8506: END IF;
8507:
8508: ref_integrity_record.to_organization_id := x_cascaded_table(n).to_organization_id;
8501: RETURN;
8502: END IF;
8503:
8504: IF (g_asn_debug = 'Y') THEN
8505: asn_debug.put_line('Validating ref integrity');
8506: END IF;
8507:
8508: ref_integrity_record.to_organization_id := x_cascaded_table(n).to_organization_id;
8509: ref_integrity_record.po_line_location_id := x_cascaded_table(n).po_line_location_id;
8533: */
8534: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN
8535: ref_integrity_record.po_revision_num := x_cascaded_table(n).po_revision_num;
8536:
8537: IF (g_asn_debug = 'Y') THEN
8538: asn_debug.put_line('Trx_type RECEIVE and revision num is ' || ref_integrity_record.po_revision_num);
8539: END IF;
8540: ELSE
8541: ref_integrity_record.po_revision_num := NULL;
8534: IF (x_cascaded_table(n).transaction_type = 'RECEIVE') THEN
8535: ref_integrity_record.po_revision_num := x_cascaded_table(n).po_revision_num;
8536:
8537: IF (g_asn_debug = 'Y') THEN
8538: asn_debug.put_line('Trx_type RECEIVE and revision num is ' || ref_integrity_record.po_revision_num);
8539: END IF;
8540: ELSE
8541: ref_integrity_record.po_revision_num := NULL;
8542:
8539: END IF;
8540: ELSE
8541: ref_integrity_record.po_revision_num := NULL;
8542:
8543: IF (g_asn_debug = 'Y') THEN
8544: asn_debug.put_line('Trx_type is not RECEIVE and revision num is ' || ref_integrity_record.po_revision_num);
8545: END IF;
8546: END IF;
8547:
8540: ELSE
8541: ref_integrity_record.po_revision_num := NULL;
8542:
8543: IF (g_asn_debug = 'Y') THEN
8544: asn_debug.put_line('Trx_type is not RECEIVE and revision num is ' || ref_integrity_record.po_revision_num);
8545: END IF;
8546: END IF;
8547:
8548: /* End of 3210821. */
8551: --replacing call with a validate_ref_integ call with the method in thid package
8552: -- rcv_transactions_interface_sv1.validate_ref_integ (ref_integrity_record,X_header_record);
8553: validate_ref_integ(ref_integrity_record, x_header_record);
8554:
8555: IF (g_asn_debug = 'Y') THEN
8556: asn_debug.put_line('After Validating Ref Integ: ' || ref_integrity_record.error_record.error_status);
8557: END IF;
8558:
8559: x_cascaded_table(n).error_status := ref_integrity_record.error_record.error_status;
8552: -- rcv_transactions_interface_sv1.validate_ref_integ (ref_integrity_record,X_header_record);
8553: validate_ref_integ(ref_integrity_record, x_header_record);
8554:
8555: IF (g_asn_debug = 'Y') THEN
8556: asn_debug.put_line('After Validating Ref Integ: ' || ref_integrity_record.error_record.error_status);
8557: END IF;
8558:
8559: x_cascaded_table(n).error_status := ref_integrity_record.error_record.error_status;
8560: x_cascaded_table(n).error_message := ref_integrity_record.error_record.error_message;
8560: x_cascaded_table(n).error_message := ref_integrity_record.error_record.error_message;
8561: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'TRANSACTIONS_INTERFACE_ID');
8562:
8563: IF (x_cascaded_table(n).matching_basis = 'AMOUNT') THEN --{
8564: IF (g_asn_debug = 'Y') THEN
8565: asn_debug.put_line('job_id ' || x_cascaded_table(n).job_id);
8566: asn_debug.put_line('item_description ' || x_cascaded_table(n).item_description);
8567: asn_debug.put_line('category_id ' || x_cascaded_table(n).category_id);
8568: END IF;
8561: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'TRANSACTIONS_INTERFACE_ID');
8562:
8563: IF (x_cascaded_table(n).matching_basis = 'AMOUNT') THEN --{
8564: IF (g_asn_debug = 'Y') THEN
8565: asn_debug.put_line('job_id ' || x_cascaded_table(n).job_id);
8566: asn_debug.put_line('item_description ' || x_cascaded_table(n).item_description);
8567: asn_debug.put_line('category_id ' || x_cascaded_table(n).category_id);
8568: END IF;
8569:
8562:
8563: IF (x_cascaded_table(n).matching_basis = 'AMOUNT') THEN --{
8564: IF (g_asn_debug = 'Y') THEN
8565: asn_debug.put_line('job_id ' || x_cascaded_table(n).job_id);
8566: asn_debug.put_line('item_description ' || x_cascaded_table(n).item_description);
8567: asn_debug.put_line('category_id ' || x_cascaded_table(n).category_id);
8568: END IF;
8569:
8570: IF (x_cascaded_table(n).job_id IS NOT NULL) THEN
8563: IF (x_cascaded_table(n).matching_basis = 'AMOUNT') THEN --{
8564: IF (g_asn_debug = 'Y') THEN
8565: asn_debug.put_line('job_id ' || x_cascaded_table(n).job_id);
8566: asn_debug.put_line('item_description ' || x_cascaded_table(n).item_description);
8567: asn_debug.put_line('category_id ' || x_cascaded_table(n).category_id);
8568: END IF;
8569:
8570: IF (x_cascaded_table(n).job_id IS NOT NULL) THEN
8571: IF (g_asn_debug = 'Y') THEN
8567: asn_debug.put_line('category_id ' || x_cascaded_table(n).category_id);
8568: END IF;
8569:
8570: IF (x_cascaded_table(n).job_id IS NOT NULL) THEN
8571: IF (g_asn_debug = 'Y') THEN
8572: asn_debug.put_line('Before select l_job_id ' || l_job_id);
8573: END IF;
8574:
8575: SELECT NVL(MAX(job_id), 0)
8568: END IF;
8569:
8570: IF (x_cascaded_table(n).job_id IS NOT NULL) THEN
8571: IF (g_asn_debug = 'Y') THEN
8572: asn_debug.put_line('Before select l_job_id ' || l_job_id);
8573: END IF;
8574:
8575: SELECT NVL(MAX(job_id), 0)
8576: INTO l_job_id
8577: FROM po_lines
8578: WHERE po_line_id = x_cascaded_table(n).po_line_id
8579: AND job_id = x_cascaded_table(n).job_id;
8580:
8581: IF (g_asn_debug = 'Y') THEN
8582: asn_debug.put_line('After select l_job_id ' || l_job_id);
8583: END IF;
8584:
8585: IF (l_job_id = 0) THEN
8578: WHERE po_line_id = x_cascaded_table(n).po_line_id
8579: AND job_id = x_cascaded_table(n).job_id;
8580:
8581: IF (g_asn_debug = 'Y') THEN
8582: asn_debug.put_line('After select l_job_id ' || l_job_id);
8583: END IF;
8584:
8585: IF (l_job_id = 0) THEN
8586: rcv_error_pkg.set_error_message('RCV_NOT_PO_JOB_ID');
8635: END;
8636:
8637: End if; --}
8638:
8639: IF (g_asn_debug = 'Y') THEN
8640: asn_debug.put_line('After select l_item_description ' || l_item_description);
8641: END IF;
8642:
8643: IF (l_item_description = 'NO DATA') THEN
8636:
8637: End if; --}
8638:
8639: IF (g_asn_debug = 'Y') THEN
8640: asn_debug.put_line('After select l_item_description ' || l_item_description);
8641: END IF;
8642:
8643: IF (l_item_description = 'NO DATA') THEN
8644: rcv_error_pkg.set_error_message('RCV_NOT_PO_ITEM_DESC');
8652: FROM po_lines
8653: WHERE po_line_id = x_cascaded_table(n).po_line_id
8654: AND category_id = x_cascaded_table(n).category_id;
8655:
8656: IF (g_asn_debug = 'Y') THEN
8657: asn_debug.put_line('After select l_category_id ' || l_category_id);
8658: END IF;
8659:
8660: IF (l_category_id = 0) THEN
8653: WHERE po_line_id = x_cascaded_table(n).po_line_id
8654: AND category_id = x_cascaded_table(n).category_id;
8655:
8656: IF (g_asn_debug = 'Y') THEN
8657: asn_debug.put_line('After select l_category_id ' || l_category_id);
8658: END IF;
8659:
8660: IF (l_category_id = 0) THEN
8661: rcv_error_pkg.set_error_message('RCV_NOT_PO_CATEGORY');
8662: RAISE e_validation_error;
8663: END IF;
8664: END IF;
8665:
8666: IF (g_asn_debug = 'Y') THEN
8667: asn_debug.put_line('l_job_id ' || l_job_id);
8668: asn_debug.put_line('l_item_description ' || l_item_description);
8669: asn_debug.put_line('l_category_id ' || l_category_id);
8670: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
8663: END IF;
8664: END IF;
8665:
8666: IF (g_asn_debug = 'Y') THEN
8667: asn_debug.put_line('l_job_id ' || l_job_id);
8668: asn_debug.put_line('l_item_description ' || l_item_description);
8669: asn_debug.put_line('l_category_id ' || l_category_id);
8670: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
8671: END IF;
8664: END IF;
8665:
8666: IF (g_asn_debug = 'Y') THEN
8667: asn_debug.put_line('l_job_id ' || l_job_id);
8668: asn_debug.put_line('l_item_description ' || l_item_description);
8669: asn_debug.put_line('l_category_id ' || l_category_id);
8670: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
8671: END IF;
8672: END IF; --}
8665:
8666: IF (g_asn_debug = 'Y') THEN
8667: asn_debug.put_line('l_job_id ' || l_job_id);
8668: asn_debug.put_line('l_item_description ' || l_item_description);
8669: asn_debug.put_line('l_category_id ' || l_category_id);
8670: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
8671: END IF;
8672: END IF; --}
8673:
8666: IF (g_asn_debug = 'Y') THEN
8667: asn_debug.put_line('l_job_id ' || l_job_id);
8668: asn_debug.put_line('l_item_description ' || l_item_description);
8669: asn_debug.put_line('l_category_id ' || l_category_id);
8670: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
8671: END IF;
8672: END IF; --}
8673:
8674: IF (g_asn_debug = 'Y') THEN
8670: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
8671: END IF;
8672: END IF; --}
8673:
8674: IF (g_asn_debug = 'Y') THEN
8675: asn_debug.put_line('Leave validate_ref_integrity');
8676: END IF;
8677: EXCEPTION
8678: WHEN e_validation_error THEN
8671: END IF;
8672: END IF; --}
8673:
8674: IF (g_asn_debug = 'Y') THEN
8675: asn_debug.put_line('Leave validate_ref_integrity');
8676: END IF;
8677: EXCEPTION
8678: WHEN e_validation_error THEN
8679: x_cascaded_table(n).error_status := x_error_status;
8740: AND inventory_item_id(+) = x_cascaded_table(n).substitute_item_id
8741: AND unit_of_measure = x_cascaded_table(n).unit_of_measure;
8742:
8743: IF x_uom_count = 0 THEN
8744: IF (g_asn_debug = 'Y') THEN
8745: asn_debug.put_line('The substitute item cannot be received in ASN uom' || x_cascaded_table(n).unit_of_measure);
8746: END IF;
8747:
8748: rcv_error_pkg.set_error_message('RCV_ITEM_SUB_NOT_ALLOWED');
8741: AND unit_of_measure = x_cascaded_table(n).unit_of_measure;
8742:
8743: IF x_uom_count = 0 THEN
8744: IF (g_asn_debug = 'Y') THEN
8745: asn_debug.put_line('The substitute item cannot be received in ASN uom' || x_cascaded_table(n).unit_of_measure);
8746: END IF;
8747:
8748: rcv_error_pkg.set_error_message('RCV_ITEM_SUB_NOT_ALLOWED');
8749: RAISE e_validation_error;
8755: WHERE mtl_system_items.inventory_item_id = x_cascaded_table(n).item_id
8756: AND mtl_system_items.organization_id = x_cascaded_table(n).to_organization_id;
8757:
8758: IF x_primary_uom IS NULL THEN
8759: IF (g_asn_debug = 'Y') THEN
8760: asn_debug.put_line('No Primary UOM for substitute item');
8761: END IF;
8762:
8763: rcv_error_pkg.set_error_message('RCV_UOM_NO_CONV_PRIMARY');
8756: AND mtl_system_items.organization_id = x_cascaded_table(n).to_organization_id;
8757:
8758: IF x_primary_uom IS NULL THEN
8759: IF (g_asn_debug = 'Y') THEN
8760: asn_debug.put_line('No Primary UOM for substitute item');
8761: END IF;
8762:
8763: rcv_error_pkg.set_error_message('RCV_UOM_NO_CONV_PRIMARY');
8764: RAISE e_validation_error;
8763: rcv_error_pkg.set_error_message('RCV_UOM_NO_CONV_PRIMARY');
8764: RAISE e_validation_error;
8765: END IF;
8766:
8767: IF (g_asn_debug = 'Y') THEN
8768: asn_debug.put_line('Primary UOM for substitute item is ' || x_primary_uom);
8769: END IF;
8770:
8771: IF x_primary_uom <> x_cascaded_table(n).primary_unit_of_measure THEN --{
8764: RAISE e_validation_error;
8765: END IF;
8766:
8767: IF (g_asn_debug = 'Y') THEN
8768: asn_debug.put_line('Primary UOM for substitute item is ' || x_primary_uom);
8769: END IF;
8770:
8771: IF x_primary_uom <> x_cascaded_table(n).primary_unit_of_measure THEN --{
8772: prim_uom_qty := rcv_transactions_interface_sv.convert_into_correct_qty(x_cascaded_table(n).quantity,
8775: x_primary_uom
8776: );
8777:
8778: IF prim_uom_qty = 0 THEN
8779: IF (g_asn_debug = 'Y') THEN
8780: asn_debug.put_line('Not possible to convert between asn and primary UOM');
8781: END IF;
8782:
8783: rcv_error_pkg.set_error_message('RCV_UOM_NO_CONV_PRIMARY');
8776: );
8777:
8778: IF prim_uom_qty = 0 THEN
8779: IF (g_asn_debug = 'Y') THEN
8780: asn_debug.put_line('Not possible to convert between asn and primary UOM');
8781: END IF;
8782:
8783: rcv_error_pkg.set_error_message('RCV_UOM_NO_CONV_PRIMARY');
8784: RAISE e_validation_error;
8843: l_consigned_po_rec.po_line_location_id := x_cascaded_table(n).po_line_location_id;
8844: l_consigned_po_rec.error_record.error_status := 'S';
8845: l_consigned_po_rec.error_record.error_message := NULL;
8846:
8847: IF (g_asn_debug = 'Y') THEN
8848: asn_debug.put_line('Validating ASBN for Consigned PO');
8849: END IF;
8850:
8851: rcv_transactions_interface_sv1.validate_consigned_po(l_consigned_po_rec);
8844: l_consigned_po_rec.error_record.error_status := 'S';
8845: l_consigned_po_rec.error_record.error_message := NULL;
8846:
8847: IF (g_asn_debug = 'Y') THEN
8848: asn_debug.put_line('Validating ASBN for Consigned PO');
8849: END IF;
8850:
8851: rcv_transactions_interface_sv1.validate_consigned_po(l_consigned_po_rec);
8852:
8849: END IF;
8850:
8851: rcv_transactions_interface_sv1.validate_consigned_po(l_consigned_po_rec);
8852:
8853: IF (g_asn_debug = 'Y') THEN
8854: asn_debug.put_line('After Validating ASBN for Consigned PO');
8855: END IF;
8856:
8857: x_cascaded_table(n).error_status := l_consigned_po_rec.error_record.error_status;
8850:
8851: rcv_transactions_interface_sv1.validate_consigned_po(l_consigned_po_rec);
8852:
8853: IF (g_asn_debug = 'Y') THEN
8854: asn_debug.put_line('After Validating ASBN for Consigned PO');
8855: END IF;
8856:
8857: x_cascaded_table(n).error_status := l_consigned_po_rec.error_record.error_status;
8858: x_cascaded_table(n).error_message := l_consigned_po_rec.error_record.error_message;
8856:
8857: x_cascaded_table(n).error_status := l_consigned_po_rec.error_record.error_status;
8858: x_cascaded_table(n).error_message := l_consigned_po_rec.error_record.error_message;
8859:
8860: IF (g_asn_debug = 'Y') THEN
8861: asn_debug.put_line('Error status ' || l_consigned_po_rec.error_record.error_status);
8862: asn_debug.put_line('Error name: ' || l_consigned_po_rec.error_record.error_message);
8863: END IF;
8864:
8857: x_cascaded_table(n).error_status := l_consigned_po_rec.error_record.error_status;
8858: x_cascaded_table(n).error_message := l_consigned_po_rec.error_record.error_message;
8859:
8860: IF (g_asn_debug = 'Y') THEN
8861: asn_debug.put_line('Error status ' || l_consigned_po_rec.error_record.error_status);
8862: asn_debug.put_line('Error name: ' || l_consigned_po_rec.error_record.error_message);
8863: END IF;
8864:
8865: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'PO_LINE_LOCATION_ID');
8858: x_cascaded_table(n).error_message := l_consigned_po_rec.error_record.error_message;
8859:
8860: IF (g_asn_debug = 'Y') THEN
8861: asn_debug.put_line('Error status ' || l_consigned_po_rec.error_record.error_status);
8862: asn_debug.put_line('Error name: ' || l_consigned_po_rec.error_record.error_message);
8863: END IF;
8864:
8865: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'PO_LINE_LOCATION_ID');
8866: END IF; -- IF ( (X_asn_type = 'ASBN')
8873: l_consumption_po_rec.po_header_id := x_cascaded_table(n).po_header_id;
8874: l_consumption_po_rec.error_record.error_status := 'S';
8875: l_consumption_po_rec.error_record.error_message := NULL;
8876:
8877: IF (g_asn_debug = 'Y') THEN
8878: asn_debug.put_line('Validating Consumption PO');
8879: END IF;
8880:
8881: rcv_transactions_interface_sv1.validate_consumption_po(l_consumption_po_rec);
8874: l_consumption_po_rec.error_record.error_status := 'S';
8875: l_consumption_po_rec.error_record.error_message := NULL;
8876:
8877: IF (g_asn_debug = 'Y') THEN
8878: asn_debug.put_line('Validating Consumption PO');
8879: END IF;
8880:
8881: rcv_transactions_interface_sv1.validate_consumption_po(l_consumption_po_rec);
8882:
8879: END IF;
8880:
8881: rcv_transactions_interface_sv1.validate_consumption_po(l_consumption_po_rec);
8882:
8883: IF (g_asn_debug = 'Y') THEN
8884: asn_debug.put_line('After Validating Consumption PO');
8885: END IF;
8886:
8887: x_cascaded_table(n).error_status := l_consumption_po_rec.error_record.error_status;
8880:
8881: rcv_transactions_interface_sv1.validate_consumption_po(l_consumption_po_rec);
8882:
8883: IF (g_asn_debug = 'Y') THEN
8884: asn_debug.put_line('After Validating Consumption PO');
8885: END IF;
8886:
8887: x_cascaded_table(n).error_status := l_consumption_po_rec.error_record.error_status;
8888: x_cascaded_table(n).error_message := l_consumption_po_rec.error_record.error_message;
8886:
8887: x_cascaded_table(n).error_status := l_consumption_po_rec.error_record.error_status;
8888: x_cascaded_table(n).error_message := l_consumption_po_rec.error_record.error_message;
8889:
8890: IF (g_asn_debug = 'Y') THEN
8891: asn_debug.put_line('Error status ' || l_consumption_po_rec.error_record.error_status);
8892: asn_debug.put_line('Error name: ' || l_consumption_po_rec.error_record.error_message);
8893: END IF;
8894:
8887: x_cascaded_table(n).error_status := l_consumption_po_rec.error_record.error_status;
8888: x_cascaded_table(n).error_message := l_consumption_po_rec.error_record.error_message;
8889:
8890: IF (g_asn_debug = 'Y') THEN
8891: asn_debug.put_line('Error status ' || l_consumption_po_rec.error_record.error_status);
8892: asn_debug.put_line('Error name: ' || l_consumption_po_rec.error_record.error_message);
8893: END IF;
8894:
8895: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'PO_HEADER_ID');
8888: x_cascaded_table(n).error_message := l_consumption_po_rec.error_record.error_message;
8889:
8890: IF (g_asn_debug = 'Y') THEN
8891: asn_debug.put_line('Error status ' || l_consumption_po_rec.error_record.error_status);
8892: asn_debug.put_line('Error name: ' || l_consumption_po_rec.error_record.error_message);
8893: END IF;
8894:
8895: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'PO_HEADER_ID');
8896: END IF;
8902: l_consumption_release_rec.po_release_id := x_cascaded_table(n).po_release_id;
8903: l_consumption_release_rec.error_record.error_status := 'S';
8904: l_consumption_release_rec.error_record.error_message := NULL;
8905:
8906: IF (g_asn_debug = 'Y') THEN
8907: asn_debug.put_line('Validating Consumption Release');
8908: END IF;
8909:
8910: rcv_transactions_interface_sv1.validate_consumption_release(l_consumption_release_rec);
8903: l_consumption_release_rec.error_record.error_status := 'S';
8904: l_consumption_release_rec.error_record.error_message := NULL;
8905:
8906: IF (g_asn_debug = 'Y') THEN
8907: asn_debug.put_line('Validating Consumption Release');
8908: END IF;
8909:
8910: rcv_transactions_interface_sv1.validate_consumption_release(l_consumption_release_rec);
8911:
8908: END IF;
8909:
8910: rcv_transactions_interface_sv1.validate_consumption_release(l_consumption_release_rec);
8911:
8912: IF (g_asn_debug = 'Y') THEN
8913: asn_debug.put_line('After Validating Consumption Release');
8914: END IF;
8915:
8916: x_cascaded_table(n).error_status := l_consumption_release_rec.error_record.error_status;
8909:
8910: rcv_transactions_interface_sv1.validate_consumption_release(l_consumption_release_rec);
8911:
8912: IF (g_asn_debug = 'Y') THEN
8913: asn_debug.put_line('After Validating Consumption Release');
8914: END IF;
8915:
8916: x_cascaded_table(n).error_status := l_consumption_release_rec.error_record.error_status;
8917: x_cascaded_table(n).error_message := l_consumption_release_rec.error_record.error_message;
8915:
8916: x_cascaded_table(n).error_status := l_consumption_release_rec.error_record.error_status;
8917: x_cascaded_table(n).error_message := l_consumption_release_rec.error_record.error_message;
8918:
8919: IF (g_asn_debug = 'Y') THEN
8920: asn_debug.put_line('Error status ' || l_consumption_release_rec.error_record.error_status);
8921: asn_debug.put_line('Error name: ' || l_consumption_release_rec.error_record.error_message);
8922: END IF;
8923:
8916: x_cascaded_table(n).error_status := l_consumption_release_rec.error_record.error_status;
8917: x_cascaded_table(n).error_message := l_consumption_release_rec.error_record.error_message;
8918:
8919: IF (g_asn_debug = 'Y') THEN
8920: asn_debug.put_line('Error status ' || l_consumption_release_rec.error_record.error_status);
8921: asn_debug.put_line('Error name: ' || l_consumption_release_rec.error_record.error_message);
8922: END IF;
8923:
8924: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'PO_RELEASE_ID');
8917: x_cascaded_table(n).error_message := l_consumption_release_rec.error_record.error_message;
8918:
8919: IF (g_asn_debug = 'Y') THEN
8920: asn_debug.put_line('Error status ' || l_consumption_release_rec.error_record.error_status);
8921: asn_debug.put_line('Error name: ' || l_consumption_release_rec.error_record.error_message);
8922: END IF;
8923:
8924: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status, 'PO_RELEASE_ID');
8925: END IF;
8953: RAISE e_validation_error;
8954: END IF;
8955: END IF;
8956:
8957: IF (g_asn_debug = 'Y') THEN
8958: asn_debug.put_line('Validating vendor id in PO ' || TO_CHAR(x_ref_integrity_rec.vendor_id));
8959: asn_debug.put_line('PO Header Id ' || TO_CHAR(x_ref_integrity_rec.po_header_id));
8960: END IF;
8961:
8954: END IF;
8955: END IF;
8956:
8957: IF (g_asn_debug = 'Y') THEN
8958: asn_debug.put_line('Validating vendor id in PO ' || TO_CHAR(x_ref_integrity_rec.vendor_id));
8959: asn_debug.put_line('PO Header Id ' || TO_CHAR(x_ref_integrity_rec.po_header_id));
8960: END IF;
8961:
8962: IF x_ref_integrity_rec.vendor_id IS NOT NULL THEN
8955: END IF;
8956:
8957: IF (g_asn_debug = 'Y') THEN
8958: asn_debug.put_line('Validating vendor id in PO ' || TO_CHAR(x_ref_integrity_rec.vendor_id));
8959: asn_debug.put_line('PO Header Id ' || TO_CHAR(x_ref_integrity_rec.po_header_id));
8960: END IF;
8961:
8962: IF x_ref_integrity_rec.vendor_id IS NOT NULL THEN
8963: SELECT NVL(MAX(vendor_id), 0)
8997: FROM po_headers
8998: WHERE po_header_id = x_ref_integrity_rec.po_header_id
8999: AND vendor_site_id = x_ref_integrity_rec.vendor_site_id;
9000:
9001: asn_debug.put_line('vendor_site_id from PO_HEADERS ' || TO_CHAR(x_po_vendor_site_id));
9002:
9003: END IF;
9004:
9005: IF (x_ref_integrity_rec.parent_txn_id IS NOT NULL) THEN
9010: WHERE po_header_id = x_ref_integrity_rec.po_header_id
9011: AND transaction_id = x_ref_integrity_rec.parent_txn_id
9012: AND vendor_site_id = x_ref_integrity_rec.vendor_site_id;
9013:
9014: asn_debug.put_line('vendor_site_id from RCV_TRANSACTIONS ' || TO_CHAR(x_po_vendor_site_id));
9015:
9016: END IF;
9017:
9018:
9022: END IF;
9023: END IF;
9024:
9025: IF x_ref_integrity_rec.po_revision_num IS NOT NULL THEN
9026: IF (g_asn_debug = 'Y') THEN
9027: asn_debug.put_line('po_revision_num: ' || x_ref_integrity_rec.po_revision_num);
9028: END IF;
9029:
9030: SELECT NVL(MAX(vendor_site_id), 0)
9023: END IF;
9024:
9025: IF x_ref_integrity_rec.po_revision_num IS NOT NULL THEN
9026: IF (g_asn_debug = 'Y') THEN
9027: asn_debug.put_line('po_revision_num: ' || x_ref_integrity_rec.po_revision_num);
9028: END IF;
9029:
9030: SELECT NVL(MAX(vendor_site_id), 0)
9031: INTO x_po_vendor_site_id
9163:
9164: /* Delete only once from the rcv_transactions_interface table for every
9165: group of pl/sql table rows that have the same interface id */
9166: FOR j IN i .. e_o_t LOOP
9167: asn_debug.put_line('Transaction Type ' || v_trans_tab(j).transaction_type);
9168: v_current_interface_id := v_trans_tab(j).interface_transaction_id;
9169: l_ls_table_idx := l_ls_table.COUNT + 1;
9170:
9171: /* SELECT GROUP_SEQUENCE_ID_S.nextval into V_TRANS_TAB(j).GROUP_ID
9175: IF (v_trans_tab(j).transaction_type IN('RECEIVE', 'SHIP')) THEN
9176: v_trans_tab(j).GROUP_ID := v_header_record.header_record.GROUP_ID;
9177: END IF;
9178:
9179: asn_debug.put_line('Group id ' || TO_CHAR(v_trans_tab(j).GROUP_ID));
9180: /* Assigning to_organization_id to lorgid which is passed
9181: as a parameter to WMS_INSTALL function .Also added
9182: debug messages .*/
9183: lorgid := v_trans_tab(j).to_organization_id;
9180: /* Assigning to_organization_id to lorgid which is passed
9181: as a parameter to WMS_INSTALL function .Also added
9182: debug messages .*/
9183: lorgid := v_trans_tab(j).to_organization_id;
9184: asn_debug.put_line('organization id ' || TO_CHAR(v_trans_tab(j).to_organization_id));
9185: asn_debug.put_line('lorgid ' || TO_CHAR(lorgid));
9186:
9187: IF v_current_interface_id <> v_prior_interface_id THEN
9188: asn_debug.put_line('Handle the original interface id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9181: as a parameter to WMS_INSTALL function .Also added
9182: debug messages .*/
9183: lorgid := v_trans_tab(j).to_organization_id;
9184: asn_debug.put_line('organization id ' || TO_CHAR(v_trans_tab(j).to_organization_id));
9185: asn_debug.put_line('lorgid ' || TO_CHAR(lorgid));
9186:
9187: IF v_current_interface_id <> v_prior_interface_id THEN
9188: asn_debug.put_line('Handle the original interface id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9189: asn_debug.put_line('delete from rcv_transactions_interface rowid ' || v_trans_tab(j).row_id);
9184: asn_debug.put_line('organization id ' || TO_CHAR(v_trans_tab(j).to_organization_id));
9185: asn_debug.put_line('lorgid ' || TO_CHAR(lorgid));
9186:
9187: IF v_current_interface_id <> v_prior_interface_id THEN
9188: asn_debug.put_line('Handle the original interface id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9189: asn_debug.put_line('delete from rcv_transactions_interface rowid ' || v_trans_tab(j).row_id);
9190: asn_debug.put_line('matching_basis=' || v_trans_tab(j).matching_basis);
9191:
9192: /* WMS Changes */
9185: asn_debug.put_line('lorgid ' || TO_CHAR(lorgid));
9186:
9187: IF v_current_interface_id <> v_prior_interface_id THEN
9188: asn_debug.put_line('Handle the original interface id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9189: asn_debug.put_line('delete from rcv_transactions_interface rowid ' || v_trans_tab(j).row_id);
9190: asn_debug.put_line('matching_basis=' || v_trans_tab(j).matching_basis);
9191:
9192: /* WMS Changes */
9193: IF v_trans_tab(j).matching_basis <> 'AMOUNT' THEN
9186:
9187: IF v_current_interface_id <> v_prior_interface_id THEN
9188: asn_debug.put_line('Handle the original interface id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9189: asn_debug.put_line('delete from rcv_transactions_interface rowid ' || v_trans_tab(j).row_id);
9190: asn_debug.put_line('matching_basis=' || v_trans_tab(j).matching_basis);
9191:
9192: /* WMS Changes */
9193: IF v_trans_tab(j).matching_basis <> 'AMOUNT' THEN
9194: l_orig_trx_id := v_trans_tab(j).interface_transaction_id;
9197: l_ls_table(l_ls_table_idx).new_interface_trx_id := l_orig_trx_id;
9198: l_ls_table(l_ls_table_idx).quantity := v_trans_tab(j).quantity;
9199: END IF;
9200:
9201: IF (g_asn_debug = 'Y') THEN
9202: asn_debug.put_line('Deleting RTI ' || v_trans_tab(j).interface_transaction_id);
9203: END IF;
9204:
9205: rcv_trx_interface_delete_pkg.delete_row(v_trans_tab(j).row_id);
9198: l_ls_table(l_ls_table_idx).quantity := v_trans_tab(j).quantity;
9199: END IF;
9200:
9201: IF (g_asn_debug = 'Y') THEN
9202: asn_debug.put_line('Deleting RTI ' || v_trans_tab(j).interface_transaction_id);
9203: END IF;
9204:
9205: rcv_trx_interface_delete_pkg.delete_row(v_trans_tab(j).row_id);
9206: /* V_TRANS_TAB(j).INTERFACE_TRANSACTION_ID := NULL; */ -- need to maintain the interface transaction id
9220: INTO v_trans_tab(j).lpn_group_id
9221: FROM DUAL;
9222: END IF;
9223:
9224: IF (g_asn_debug = 'Y') THEN
9225: asn_debug.put_line('Inserting new RTI');
9226: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9227: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9221: FROM DUAL;
9222: END IF;
9223:
9224: IF (g_asn_debug = 'Y') THEN
9225: asn_debug.put_line('Inserting new RTI');
9226: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9227: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9222: END IF;
9223:
9224: IF (g_asn_debug = 'Y') THEN
9225: asn_debug.put_line('Inserting new RTI');
9226: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9227: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9223:
9224: IF (g_asn_debug = 'Y') THEN
9225: asn_debug.put_line('Inserting new RTI');
9226: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9227: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9224: IF (g_asn_debug = 'Y') THEN
9225: asn_debug.put_line('Inserting new RTI');
9226: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9227: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9225: asn_debug.put_line('Inserting new RTI');
9226: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9227: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9226: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9227: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9227: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9228: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9229: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9230: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9231: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9232: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9233: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9234: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9235: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9236: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9237: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9238: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9239: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9240: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9241: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9242: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9243: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9244: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9245: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9246: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9247: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9248: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9249: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9250: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9251: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9252: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9253: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9254: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9255: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9256: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9257: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9258: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9259: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9260: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9261: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9262: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9263: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9264: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9265: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9266: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9267: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9268: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9269: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9270: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9271: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9272: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9273: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9274: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9275: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9276: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9277: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9278: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9279: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9280: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9281: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9282: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9283: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9291: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9284: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9291: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9292: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9285: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9291: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9292: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9293: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9286: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9291: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9292: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9293: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9294: asn_debug.put_line('timecard_id ' ||
9287: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9291: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9292: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9293: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9294: asn_debug.put_line('timecard_id ' ||
9295: v_trans_tab(j).timecard_id);
9288: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9291: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9292: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9293: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9294: asn_debug.put_line('timecard_id ' ||
9295: v_trans_tab(j).timecard_id);
9296: asn_debug.put_line('timecard_ovn ' ||
9289: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9291: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9292: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9293: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9294: asn_debug.put_line('timecard_id ' ||
9295: v_trans_tab(j).timecard_id);
9296: asn_debug.put_line('timecard_ovn ' ||
9297: v_trans_tab(j).timecard_ovn);
9290: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9291: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9292: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9293: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9294: asn_debug.put_line('timecard_id ' ||
9295: v_trans_tab(j).timecard_id);
9296: asn_debug.put_line('timecard_ovn ' ||
9297: v_trans_tab(j).timecard_ovn);
9298: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9292: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9293: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9294: asn_debug.put_line('timecard_id ' ||
9295: v_trans_tab(j).timecard_id);
9296: asn_debug.put_line('timecard_ovn ' ||
9297: v_trans_tab(j).timecard_ovn);
9298: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9299:
9300: asn_debug.put_line('matching_basis ' ||
9294: asn_debug.put_line('timecard_id ' ||
9295: v_trans_tab(j).timecard_id);
9296: asn_debug.put_line('timecard_ovn ' ||
9297: v_trans_tab(j).timecard_ovn);
9298: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9300: asn_debug.put_line('matching_basis ' ||
9301: v_trans_tab(j).matching_basis);
9302: asn_debug.put_line('amount_shipped ' ||
9296: asn_debug.put_line('timecard_ovn ' ||
9297: v_trans_tab(j).timecard_ovn);
9298: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9299:
9300: asn_debug.put_line('matching_basis ' ||
9301: v_trans_tab(j).matching_basis);
9302: asn_debug.put_line('amount_shipped ' ||
9303: v_trans_tab(j).amount_shipped);
9304: asn_debug.put_line('requested_amount ' ||
9298: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9299:
9300: asn_debug.put_line('matching_basis ' ||
9301: v_trans_tab(j).matching_basis);
9302: asn_debug.put_line('amount_shipped ' ||
9303: v_trans_tab(j).amount_shipped);
9304: asn_debug.put_line('requested_amount ' ||
9305: v_trans_tab(j).requested_amount);
9306: asn_debug.put_line('material_stored_amount ' ||
9300: asn_debug.put_line('matching_basis ' ||
9301: v_trans_tab(j).matching_basis);
9302: asn_debug.put_line('amount_shipped ' ||
9303: v_trans_tab(j).amount_shipped);
9304: asn_debug.put_line('requested_amount ' ||
9305: v_trans_tab(j).requested_amount);
9306: asn_debug.put_line('material_stored_amount ' ||
9307: v_trans_tab(j).material_stored_amount);
9308: asn_debug.put_line('replenish_order_line_id' ||
9302: asn_debug.put_line('amount_shipped ' ||
9303: v_trans_tab(j).amount_shipped);
9304: asn_debug.put_line('requested_amount ' ||
9305: v_trans_tab(j).requested_amount);
9306: asn_debug.put_line('material_stored_amount ' ||
9307: v_trans_tab(j).material_stored_amount);
9308: asn_debug.put_line('replenish_order_line_id' ||
9309: v_trans_tab(j).replenish_order_line_id);
9310: asn_debug.put_line('express_transaction' || v_trans_tab(j).express_transaction); -- Bug 14067935
9304: asn_debug.put_line('requested_amount ' ||
9305: v_trans_tab(j).requested_amount);
9306: asn_debug.put_line('material_stored_amount ' ||
9307: v_trans_tab(j).material_stored_amount);
9308: asn_debug.put_line('replenish_order_line_id' ||
9309: v_trans_tab(j).replenish_order_line_id);
9310: asn_debug.put_line('express_transaction' || v_trans_tab(j).express_transaction); -- Bug 14067935
9311: asn_debug.put_line('lcm_shipment_line_id' || v_trans_tab(j).lcm_shipment_line_id);
9312: asn_debug.put_line('unit_landed_cost' || v_trans_tab(j).unit_landed_cost);
9306: asn_debug.put_line('material_stored_amount ' ||
9307: v_trans_tab(j).material_stored_amount);
9308: asn_debug.put_line('replenish_order_line_id' ||
9309: v_trans_tab(j).replenish_order_line_id);
9310: asn_debug.put_line('express_transaction' || v_trans_tab(j).express_transaction); -- Bug 14067935
9311: asn_debug.put_line('lcm_shipment_line_id' || v_trans_tab(j).lcm_shipment_line_id);
9312: asn_debug.put_line('unit_landed_cost' || v_trans_tab(j).unit_landed_cost);
9313:
9314: END IF;
9307: v_trans_tab(j).material_stored_amount);
9308: asn_debug.put_line('replenish_order_line_id' ||
9309: v_trans_tab(j).replenish_order_line_id);
9310: asn_debug.put_line('express_transaction' || v_trans_tab(j).express_transaction); -- Bug 14067935
9311: asn_debug.put_line('lcm_shipment_line_id' || v_trans_tab(j).lcm_shipment_line_id);
9312: asn_debug.put_line('unit_landed_cost' || v_trans_tab(j).unit_landed_cost);
9313:
9314: END IF;
9315:
9308: asn_debug.put_line('replenish_order_line_id' ||
9309: v_trans_tab(j).replenish_order_line_id);
9310: asn_debug.put_line('express_transaction' || v_trans_tab(j).express_transaction); -- Bug 14067935
9311: asn_debug.put_line('lcm_shipment_line_id' || v_trans_tab(j).lcm_shipment_line_id);
9312: asn_debug.put_line('unit_landed_cost' || v_trans_tab(j).unit_landed_cost);
9313:
9314: END IF;
9315:
9316: rcv_asn_interface_trx_ins_pkg.insert_row(v_trans_tab(j).row_id,
9559: v_trans_tab(j).express_transaction,--NULL, -- Bug 14067935
9560: v_trans_tab(j).lcm_shipment_line_id, -- lcm changes
9561: v_trans_tab(j).unit_landed_cost -- lcm changes
9562: );
9563: asn_debug.put_line('RowId ' || v_trans_tab(j).row_id);
9564: asn_debug.put_line('Interface Id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9565: v_prior_interface_id := v_current_interface_id;
9566: v_trans_tab.DELETE(j);
9567: ELSE
9560: v_trans_tab(j).lcm_shipment_line_id, -- lcm changes
9561: v_trans_tab(j).unit_landed_cost -- lcm changes
9562: );
9563: asn_debug.put_line('RowId ' || v_trans_tab(j).row_id);
9564: asn_debug.put_line('Interface Id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9565: v_prior_interface_id := v_current_interface_id;
9566: v_trans_tab.DELETE(j);
9567: ELSE
9568: asn_debug.put_line('insert into rcv_transactions_interface with new id ');
9564: asn_debug.put_line('Interface Id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9565: v_prior_interface_id := v_current_interface_id;
9566: v_trans_tab.DELETE(j);
9567: ELSE
9568: asn_debug.put_line('insert into rcv_transactions_interface with new id ');
9569: /* Since we are inserting 1-> many rows need to generate a new interface id */
9570: v_trans_tab(j).interface_transaction_id := NULL;
9571: x_rowid := NULL;
9572:
9585: INTO v_trans_tab(j).lpn_group_id
9586: FROM DUAL;
9587: END IF;
9588:
9589: IF (g_asn_debug = 'Y') THEN
9590: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9591: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9592: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9586: FROM DUAL;
9587: END IF;
9588:
9589: IF (g_asn_debug = 'Y') THEN
9590: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9591: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9592: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9587: END IF;
9588:
9589: IF (g_asn_debug = 'Y') THEN
9590: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9591: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9592: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9588:
9589: IF (g_asn_debug = 'Y') THEN
9590: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9591: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9592: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9589: IF (g_asn_debug = 'Y') THEN
9590: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9591: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9592: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9590: asn_debug.put_line('category_id ' || v_trans_tab(j).category_id);
9591: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9592: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9591: asn_debug.put_line('quantity ' || v_trans_tab(j).quantity);
9592: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9592: asn_debug.put_line('amount ' || v_trans_tab(j).amount);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9593: asn_debug.put_line('unit_of_measure ' || v_trans_tab(j).unit_of_measure);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9594: asn_debug.put_line('interface_source_code ' || v_trans_tab(j).interface_source_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9595: asn_debug.put_line('interface_source_line_id ' || v_trans_tab(j).interface_source_line_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9596: asn_debug.put_line('inv_transaction_id ' || v_trans_tab(j).inv_transaction_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9597: asn_debug.put_line('item_id ' || v_trans_tab(j).item_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9598: asn_debug.put_line('item_description ' || v_trans_tab(j).item_description);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9599: asn_debug.put_line('item_revision ' || v_trans_tab(j).item_revision);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9600: asn_debug.put_line('uom_code ' || v_trans_tab(j).uom_code);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9601: asn_debug.put_line('employee_id ' || v_trans_tab(j).employee_id);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9602: asn_debug.put_line('auto_transact_code ' || v_trans_tab(j).auto_transact_code);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9603: asn_debug.put_line('shipment_header_id ' || v_trans_tab(j).shipment_header_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9604: asn_debug.put_line('shipment_header_id ' || v_header_record.header_record.receipt_header_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9605: asn_debug.put_line('shipment_line_id ' || v_trans_tab(j).shipment_line_id);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9606: asn_debug.put_line('ship_to_location_id ' || v_trans_tab(j).ship_to_location_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9607: asn_debug.put_line('primary_quantity ' || v_trans_tab(j).primary_quantity);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9608: asn_debug.put_line('primary_unit_of_measure ' || v_trans_tab(j).primary_unit_of_measure);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9609: asn_debug.put_line('receipt_source_code ' || v_trans_tab(j).receipt_source_code);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9610: asn_debug.put_line('vendor_id ' || v_trans_tab(j).vendor_id);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9611: asn_debug.put_line('vendor_site_id ' || v_trans_tab(j).vendor_site_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9612: asn_debug.put_line('from_organization_id ' || v_trans_tab(j).from_organization_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9613: asn_debug.put_line('from_subinventory ' || v_trans_tab(j).from_subinventory);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9614: asn_debug.put_line('to_organization_id ' || v_trans_tab(j).to_organization_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9615: asn_debug.put_line('intransit_owning_org_id ' || v_trans_tab(j).intransit_owning_org_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9616: asn_debug.put_line('routing_header_id ' || v_trans_tab(j).routing_header_id);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9617: asn_debug.put_line('routing_step_id ' || v_trans_tab(j).routing_step_id);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9618: asn_debug.put_line('source_document_code ' || v_trans_tab(j).source_document_code);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9619: asn_debug.put_line('parent_transaction_id ' || v_trans_tab(j).parent_transaction_id);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9620: asn_debug.put_line('po_header_id ' || v_trans_tab(j).po_header_id);
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9621: asn_debug.put_line('po_revision_num ' || v_trans_tab(j).po_revision_num);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9622: asn_debug.put_line('po_line_id ' || v_trans_tab(j).po_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9623: asn_debug.put_line('po_line_location_id ' || v_trans_tab(j).po_line_location_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9624: asn_debug.put_line('po_unit_price ' || v_trans_tab(j).po_unit_price);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9625: asn_debug.put_line('currency_code ' || v_trans_tab(j).currency_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9626: asn_debug.put_line('currency_conversion_type ' || v_trans_tab(j).currency_conversion_type);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9627: asn_debug.put_line('currency_conversion_rate ' || v_trans_tab(j).currency_conversion_rate);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9628: asn_debug.put_line('currency_conversion_date ' || TO_CHAR(v_trans_tab(j).currency_conversion_date, 'DD-MON-YYYY HH24:MI:SS'));
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9629: asn_debug.put_line('po_distribution_id ' || v_trans_tab(j).po_distribution_id);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9630: asn_debug.put_line('requisition_line_id ' || v_trans_tab(j).requisition_line_id);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9631: asn_debug.put_line('req_distribution_id ' || v_trans_tab(j).req_distribution_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9632: asn_debug.put_line('charge_account_id ' || v_trans_tab(j).charge_account_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9633: asn_debug.put_line('substitute_unordered_code ' || v_trans_tab(j).substitute_unordered_code);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9634: asn_debug.put_line('receipt_exception_flag ' || v_trans_tab(j).receipt_exception_flag);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9635: asn_debug.put_line('accrual_status_code ' || v_trans_tab(j).accrual_status_code);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9636: asn_debug.put_line('inspection_status_code ' || v_trans_tab(j).inspection_status_code);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9637: asn_debug.put_line('inspection_quality_code ' || v_trans_tab(j).inspection_quality_code);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9638: asn_debug.put_line('destination_type_code ' || v_trans_tab(j).destination_type_code);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9639: asn_debug.put_line('deliver_to_person_id ' || v_trans_tab(j).deliver_to_person_id);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9640: asn_debug.put_line('location_id ' || v_trans_tab(j).location_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9641: asn_debug.put_line('deliver_to_location_id ' || v_trans_tab(j).deliver_to_location_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9642: asn_debug.put_line('subinventory ' || v_trans_tab(j).subinventory);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9643: asn_debug.put_line('locator_id ' || v_trans_tab(j).locator_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9644: asn_debug.put_line('wip_entity_id ' || v_trans_tab(j).wip_entity_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9645: asn_debug.put_line('wip_line_id ' || v_trans_tab(j).wip_line_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9646: asn_debug.put_line('shipment_num ' || v_trans_tab(j).shipment_num);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9647: asn_debug.put_line('source_doc_quantity ' || v_trans_tab(j).source_doc_quantity);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9648: asn_debug.put_line('from_locator_id ' || v_trans_tab(j).from_locator_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9649: asn_debug.put_line('oe_order_header_id ' || v_trans_tab(j).oe_order_header_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9650: asn_debug.put_line('oe_order_line_id ' || v_trans_tab(j).oe_order_line_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9658: asn_debug.put_line('timecard_id ' || v_trans_tab(j).timecard_id);
9651: asn_debug.put_line('customer_id ' || v_trans_tab(j).customer_id);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9658: asn_debug.put_line('timecard_id ' || v_trans_tab(j).timecard_id);
9659: asn_debug.put_line('timecard_ovn ' || v_trans_tab(j).timecard_ovn);
9652: asn_debug.put_line('customer_site_id ' || v_trans_tab(j).customer_site_id);
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9658: asn_debug.put_line('timecard_id ' || v_trans_tab(j).timecard_id);
9659: asn_debug.put_line('timecard_ovn ' || v_trans_tab(j).timecard_ovn);
9660: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9653: asn_debug.put_line('lpn_id ' || v_trans_tab(j).lpn_id);
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9658: asn_debug.put_line('timecard_id ' || v_trans_tab(j).timecard_id);
9659: asn_debug.put_line('timecard_ovn ' || v_trans_tab(j).timecard_ovn);
9660: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9661: asn_debug.put_line('matching_basis ' ||
9654: asn_debug.put_line('transfer_lpn_id ' || v_trans_tab(j).transfer_lpn_id);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9658: asn_debug.put_line('timecard_id ' || v_trans_tab(j).timecard_id);
9659: asn_debug.put_line('timecard_ovn ' || v_trans_tab(j).timecard_ovn);
9660: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9661: asn_debug.put_line('matching_basis ' ||
9662: v_trans_tab(j).matching_basis);
9655: asn_debug.put_line('lpn_group_id ' || v_trans_tab(j).lpn_group_id);
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9658: asn_debug.put_line('timecard_id ' || v_trans_tab(j).timecard_id);
9659: asn_debug.put_line('timecard_ovn ' || v_trans_tab(j).timecard_ovn);
9660: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9661: asn_debug.put_line('matching_basis ' ||
9662: v_trans_tab(j).matching_basis);
9663: asn_debug.put_line('amount_shipped ' ||
9656: asn_debug.put_line('project_id ' || v_trans_tab(j).project_id);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9658: asn_debug.put_line('timecard_id ' || v_trans_tab(j).timecard_id);
9659: asn_debug.put_line('timecard_ovn ' || v_trans_tab(j).timecard_ovn);
9660: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9662: v_trans_tab(j).matching_basis);
9663: asn_debug.put_line('amount_shipped ' ||
9664: v_trans_tab(j).amount_shipped);
9657: asn_debug.put_line('task_id ' || v_trans_tab(j).task_id);
9658: asn_debug.put_line('timecard_id ' || v_trans_tab(j).timecard_id);
9659: asn_debug.put_line('timecard_ovn ' || v_trans_tab(j).timecard_ovn);
9660: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9661: asn_debug.put_line('matching_basis ' ||
9662: v_trans_tab(j).matching_basis);
9663: asn_debug.put_line('amount_shipped ' ||
9664: v_trans_tab(j).amount_shipped);
9665: asn_debug.put_line('requested_amount ' ||
9659: asn_debug.put_line('timecard_ovn ' || v_trans_tab(j).timecard_ovn);
9660: asn_debug.put_line('org_id ' || v_trans_tab(j).org_id); --
9661: asn_debug.put_line('matching_basis ' ||
9662: v_trans_tab(j).matching_basis);
9663: asn_debug.put_line('amount_shipped ' ||
9664: v_trans_tab(j).amount_shipped);
9665: asn_debug.put_line('requested_amount ' ||
9666: v_trans_tab(j).requested_amount);
9667: asn_debug.put_line('material_stored_amount ' ||
9661: asn_debug.put_line('matching_basis ' ||
9662: v_trans_tab(j).matching_basis);
9663: asn_debug.put_line('amount_shipped ' ||
9664: v_trans_tab(j).amount_shipped);
9665: asn_debug.put_line('requested_amount ' ||
9666: v_trans_tab(j).requested_amount);
9667: asn_debug.put_line('material_stored_amount ' ||
9668: v_trans_tab(j).material_stored_amount);
9669: asn_debug.put_line('replenish_order_line_id' ||
9663: asn_debug.put_line('amount_shipped ' ||
9664: v_trans_tab(j).amount_shipped);
9665: asn_debug.put_line('requested_amount ' ||
9666: v_trans_tab(j).requested_amount);
9667: asn_debug.put_line('material_stored_amount ' ||
9668: v_trans_tab(j).material_stored_amount);
9669: asn_debug.put_line('replenish_order_line_id' ||
9670: v_trans_tab(j).replenish_order_line_id);
9671: asn_debug.put_line('express_transaction' || v_trans_tab(j).express_transaction); -- Bug 14067935
9665: asn_debug.put_line('requested_amount ' ||
9666: v_trans_tab(j).requested_amount);
9667: asn_debug.put_line('material_stored_amount ' ||
9668: v_trans_tab(j).material_stored_amount);
9669: asn_debug.put_line('replenish_order_line_id' ||
9670: v_trans_tab(j).replenish_order_line_id);
9671: asn_debug.put_line('express_transaction' || v_trans_tab(j).express_transaction); -- Bug 14067935
9672: END IF;
9673:
9667: asn_debug.put_line('material_stored_amount ' ||
9668: v_trans_tab(j).material_stored_amount);
9669: asn_debug.put_line('replenish_order_line_id' ||
9670: v_trans_tab(j).replenish_order_line_id);
9671: asn_debug.put_line('express_transaction' || v_trans_tab(j).express_transaction); -- Bug 14067935
9672: END IF;
9673:
9674: rcv_asn_interface_trx_ins_pkg.insert_row(v_trans_tab(j).row_id,
9675: v_trans_tab(j).interface_transaction_id,
9915: v_trans_tab(j).material_stored_amount,
9916: v_trans_tab(j).replenish_order_line_id,
9917: v_trans_tab(j).express_transaction -- Bug 14067935
9918: );
9919: asn_debug.put_line('RowId ' || v_trans_tab(j).row_id);
9920: asn_debug.put_line('Interface Id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9921: asn_debug.put_line('matching_basis=' || v_trans_tab(j).matching_basis);
9922:
9923: IF v_trans_tab(j).matching_basis <> 'AMOUNT' THEN
9916: v_trans_tab(j).replenish_order_line_id,
9917: v_trans_tab(j).express_transaction -- Bug 14067935
9918: );
9919: asn_debug.put_line('RowId ' || v_trans_tab(j).row_id);
9920: asn_debug.put_line('Interface Id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9921: asn_debug.put_line('matching_basis=' || v_trans_tab(j).matching_basis);
9922:
9923: IF v_trans_tab(j).matching_basis <> 'AMOUNT' THEN
9924: l_ls_table(l_ls_table_idx).orig_interface_trx_id := l_orig_trx_id;
9917: v_trans_tab(j).express_transaction -- Bug 14067935
9918: );
9919: asn_debug.put_line('RowId ' || v_trans_tab(j).row_id);
9920: asn_debug.put_line('Interface Id ' || TO_CHAR(v_trans_tab(j).interface_transaction_id));
9921: asn_debug.put_line('matching_basis=' || v_trans_tab(j).matching_basis);
9922:
9923: IF v_trans_tab(j).matching_basis <> 'AMOUNT' THEN
9924: l_ls_table(l_ls_table_idx).orig_interface_trx_id := l_orig_trx_id;
9925: l_ls_table(l_ls_table_idx).new_interface_trx_id := v_trans_tab(j).interface_transaction_id;
9956: * still linked to rti with the interface_transaction_id. This api
9957: * will split the mtli and msni rows similar to rti rows and will
9958: * link with the correct ids.
9959: */
9960: IF (g_asn_debug = 'Y') THEN
9961: asn_debug.put_line('l_ls_table.COUNT: ' || l_ls_table.COUNT);
9962: END IF;
9963:
9964: IF l_ls_table.COUNT > 0 THEN --{
9957: * will split the mtli and msni rows similar to rti rows and will
9958: * link with the correct ids.
9959: */
9960: IF (g_asn_debug = 'Y') THEN
9961: asn_debug.put_line('l_ls_table.COUNT: ' || l_ls_table.COUNT);
9962: END IF;
9963:
9964: IF l_ls_table.COUNT > 0 THEN --{
9965: IF (g_asn_debug = 'Y') THEN
9961: asn_debug.put_line('l_ls_table.COUNT: ' || l_ls_table.COUNT);
9962: END IF;
9963:
9964: IF l_ls_table.COUNT > 0 THEN --{
9965: IF (g_asn_debug = 'Y') THEN
9966: asn_debug.put_line('Calling split_lot_serial');
9967: END IF;
9968:
9969: l_return := inv_rcv_integration_apis.split_lot_serial(p_api_version => l_api_version,
9962: END IF;
9963:
9964: IF l_ls_table.COUNT > 0 THEN --{
9965: IF (g_asn_debug = 'Y') THEN
9966: asn_debug.put_line('Calling split_lot_serial');
9967: END IF;
9968:
9969: l_return := inv_rcv_integration_apis.split_lot_serial(p_api_version => l_api_version,
9970: p_init_msg_lst => fnd_api.g_false,
9973: x_msg_data => l_msg_data,
9974: p_new_rti_info => l_ls_table
9975: );
9976:
9977: IF (g_asn_debug = 'Y') THEN
9978: asn_debug.put_line('After split_lot_serial Api');
9979: END IF;
9980:
9981: -- if lot serial validation failed, then fail all these split rows
9974: p_new_rti_info => l_ls_table
9975: );
9976:
9977: IF (g_asn_debug = 'Y') THEN
9978: asn_debug.put_line('After split_lot_serial Api');
9979: END IF;
9980:
9981: -- if lot serial validation failed, then fail all these split rows
9982: IF ( (NOT l_return)
9980:
9981: -- if lot serial validation failed, then fail all these split rows
9982: IF ( (NOT l_return)
9983: OR (l_return_status <> fnd_api.g_ret_sts_success)) THEN --{
9984: IF (g_asn_debug = 'Y') THEN
9985: asn_debug.put_line('split_lot_serial Api has errors');
9986:
9987: IF l_return THEN
9988: asn_debug.put_line('return value: true');
9981: -- if lot serial validation failed, then fail all these split rows
9982: IF ( (NOT l_return)
9983: OR (l_return_status <> fnd_api.g_ret_sts_success)) THEN --{
9984: IF (g_asn_debug = 'Y') THEN
9985: asn_debug.put_line('split_lot_serial Api has errors');
9986:
9987: IF l_return THEN
9988: asn_debug.put_line('return value: true');
9989: ELSE
9984: IF (g_asn_debug = 'Y') THEN
9985: asn_debug.put_line('split_lot_serial Api has errors');
9986:
9987: IF l_return THEN
9988: asn_debug.put_line('return value: true');
9989: ELSE
9990: asn_debug.put_line('return value: false');
9991: END IF;
9992:
9986:
9987: IF l_return THEN
9988: asn_debug.put_line('return value: true');
9989: ELSE
9990: asn_debug.put_line('return value: false');
9991: END IF;
9992:
9993: asn_debug.put_line('x_return_status: ' || l_return_status);
9994: asn_debug.put_line('x_msg_count: ' || l_msg_count);
9989: ELSE
9990: asn_debug.put_line('return value: false');
9991: END IF;
9992:
9993: asn_debug.put_line('x_return_status: ' || l_return_status);
9994: asn_debug.put_line('x_msg_count: ' || l_msg_count);
9995: asn_debug.put_line('x_msg_data: ' || l_msg_data);
9996: END IF;
9997:
9990: asn_debug.put_line('return value: false');
9991: END IF;
9992:
9993: asn_debug.put_line('x_return_status: ' || l_return_status);
9994: asn_debug.put_line('x_msg_count: ' || l_msg_count);
9995: asn_debug.put_line('x_msg_data: ' || l_msg_data);
9996: END IF;
9997:
9998: l_message := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_last, p_encoded => fnd_api.g_false);
9991: END IF;
9992:
9993: asn_debug.put_line('x_return_status: ' || l_return_status);
9994: asn_debug.put_line('x_msg_count: ' || l_msg_count);
9995: asn_debug.put_line('x_msg_data: ' || l_msg_data);
9996: END IF;
9997:
9998: l_message := fnd_msg_pub.get(p_msg_index => fnd_msg_pub.g_last, p_encoded => fnd_api.g_false);
9999:
10055: UPDATE rcv_headers_interface rhi
10056: SET processing_status_code='ERROR'
10057: WHERE header_interface_id=l_header_interface_id;
10058:
10059: asn_debug.put_line('Deleting the rsh record with shipment_header_id = '||l_ship_head_id);
10060: DELETE FROM rcv_shipment_headers rsh
10061: WHERE shipment_header_id=l_ship_head_id
10062: AND NOT EXISTS (SELECT 1 from rcv_shipment_lines
10063: WHERE shipment_header_id=rsh.shipment_header_id)
10082: END IF; --} if split_lot_serial failed
10083: END IF; --} if l_ls_table.count > 0
10084: END IF; --} if v_trans_tab.count > 0
10085:
10086: IF (g_asn_debug = 'Y') THEN
10087: asn_debug.put_line('Exit handle_rcv_asn_transactions');
10088: END IF;
10089: END handle_rcv_asn_transactions;
10090:
10083: END IF; --} if l_ls_table.count > 0
10084: END IF; --} if v_trans_tab.count > 0
10085:
10086: IF (g_asn_debug = 'Y') THEN
10087: asn_debug.put_line('Exit handle_rcv_asn_transactions');
10088: END IF;
10089: END handle_rcv_asn_transactions;
10090:
10091: PROCEDURE derive_vendor_trans_del(
10095: x_header_record IN rcv_roi_preprocessor.header_rec_type
10096: ) IS
10097: test NUMBER;
10098: BEGIN
10099: IF (g_asn_debug = 'Y') THEN
10100: asn_debug.put_line('enter derive_vendor_trans_del ');
10101: END IF;
10102:
10103:
10096: ) IS
10097: test NUMBER;
10098: BEGIN
10099: IF (g_asn_debug = 'Y') THEN
10100: asn_debug.put_line('enter derive_vendor_trans_del ');
10101: END IF;
10102:
10103:
10104: /* Derive the to_org_id */
10107: x_header_record
10108: );
10109:
10110: IF (x_cascaded_table(n).unit_of_measure IS NOT NULL) THEN
10111: IF (g_asn_debug = 'Y') THEN
10112: asn_debug.put_line('X_progress ' || x_progress);
10113: END IF;
10114:
10115: SELECT muom.uom_code
10108: );
10109:
10110: IF (x_cascaded_table(n).unit_of_measure IS NOT NULL) THEN
10111: IF (g_asn_debug = 'Y') THEN
10112: asn_debug.put_line('X_progress ' || x_progress);
10113: END IF;
10114:
10115: SELECT muom.uom_code
10116: INTO x_cascaded_table(n).uom_code
10116: INTO x_cascaded_table(n).uom_code
10117: FROM mtl_units_of_measure muom
10118: WHERE muom.unit_of_measure = x_cascaded_table(n).unit_of_measure;
10119: ELSE
10120: IF (g_asn_debug = 'Y') THEN
10121: asn_debug.put_line('uom_code not derived as unit_of_measure is null');
10122: END IF;
10123: END IF;
10124:
10117: FROM mtl_units_of_measure muom
10118: WHERE muom.unit_of_measure = x_cascaded_table(n).unit_of_measure;
10119: ELSE
10120: IF (g_asn_debug = 'Y') THEN
10121: asn_debug.put_line('uom_code not derived as unit_of_measure is null');
10122: END IF;
10123: END IF;
10124:
10125: x_progress := '026';
10173: /* This can be a third party which means we will have
10174: * parent_source_transaction_num populated or it is a child of
10175: * some other transaction.
10176: */
10177: IF (g_asn_debug = 'Y') THEN
10178: asn_debug.put_line('Enter Derive_parent_id');
10179: END IF;
10180:
10181: IF (x_cascaded_table(n).parent_interface_txn_id IS NOT NULL) THEN --{
10174: * parent_source_transaction_num populated or it is a child of
10175: * some other transaction.
10176: */
10177: IF (g_asn_debug = 'Y') THEN
10178: asn_debug.put_line('Enter Derive_parent_id');
10179: END IF;
10180:
10181: IF (x_cascaded_table(n).parent_interface_txn_id IS NOT NULL) THEN --{
10182: /* Check whether it is still in cascaded table */
10184: IF (x_cascaded_table(i).interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id) THEN
10185: derive_values_from_plsql_table := TRUE;
10186: cascaded_table_index := i;
10187:
10188: IF (g_asn_debug = 'Y') THEN
10189: asn_debug.put_line('set derive_values_from_plsql_table true ' || cascaded_table_index);
10190: END IF;
10191:
10192: x_cascaded_table(n).derive := 'Y';
10185: derive_values_from_plsql_table := TRUE;
10186: cascaded_table_index := i;
10187:
10188: IF (g_asn_debug = 'Y') THEN
10189: asn_debug.put_line('set derive_values_from_plsql_table true ' || cascaded_table_index);
10190: END IF;
10191:
10192: x_cascaded_table(n).derive := 'Y';
10193: x_cascaded_table(n).derive_index := cascaded_table_index;
10199: IF (NOT derive_values_from_plsql_table) THEN --{
10200: derive_values_from_rti := TRUE;
10201: x_cascaded_table(n).derive := 'Y';
10202:
10203: IF (g_asn_debug = 'Y') THEN
10204: asn_debug.put_line('set derive_values_from_rti true ' || x_cascaded_table(n).derive_index);
10205: END IF;
10206: END IF; /*if (not derived_values_from_table) then */ --}
10207: END IF; --}
10200: derive_values_from_rti := TRUE;
10201: x_cascaded_table(n).derive := 'Y';
10202:
10203: IF (g_asn_debug = 'Y') THEN
10204: asn_debug.put_line('set derive_values_from_rti true ' || x_cascaded_table(n).derive_index);
10205: END IF;
10206: END IF; /*if (not derived_values_from_table) then */ --}
10207: END IF; --}
10208:
10209: -- Bug 7651646: Start
10210: IF ( (x_cascaded_table(n).parent_interface_txn_id IS NULL)
10211: AND (x_cascaded_table(n).parent_source_transaction_num IS NOT NULL)
10212: AND (x_cascaded_table(n).parent_transaction_id IS NULL) ) THEN
10213: IF (g_asn_debug = 'Y') THEN
10214: asn_debug.put_line('Deriving parent_transaction_id from parent_source_transaction_num');
10215: END IF;
10216:
10217: BEGIN
10210: IF ( (x_cascaded_table(n).parent_interface_txn_id IS NULL)
10211: AND (x_cascaded_table(n).parent_source_transaction_num IS NOT NULL)
10212: AND (x_cascaded_table(n).parent_transaction_id IS NULL) ) THEN
10213: IF (g_asn_debug = 'Y') THEN
10214: asn_debug.put_line('Deriving parent_transaction_id from parent_source_transaction_num');
10215: END IF;
10216:
10217: BEGIN
10218: SELECT transaction_id
10241: * row in rti or the pl/sql table. Hence need to insert
10242: * into po_interface_errors saying that this is a child
10243: * without any parent in rti or rt.
10244: */
10245: IF (g_asn_debug = 'Y') THEN
10246: asn_debug.put_line('NO PARENT');
10247: END IF;
10248:
10249: rcv_error_pkg.set_error_message('RCV_NO_PARENT_TRANSACTION');
10242: * into po_interface_errors saying that this is a child
10243: * without any parent in rti or rt.
10244: */
10245: IF (g_asn_debug = 'Y') THEN
10246: asn_debug.put_line('NO PARENT');
10247: END IF;
10248:
10249: rcv_error_pkg.set_error_message('RCV_NO_PARENT_TRANSACTION');
10250: RAISE e_validation_error;
10264: FROM rcv_transactions_interface
10265: WHERE interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id;
10266: EXCEPTION
10267: WHEN OTHERS THEN
10268: IF (g_asn_debug = 'Y') THEN
10269: asn_debug.put_line('Exception in rti with parent_interface_txn_id ');
10270: END IF;
10271:
10272: RAISE e_unexpected_error;
10265: WHERE interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id;
10266: EXCEPTION
10267: WHEN OTHERS THEN
10268: IF (g_asn_debug = 'Y') THEN
10269: asn_debug.put_line('Exception in rti with parent_interface_txn_id ');
10270: END IF;
10271:
10272: RAISE e_unexpected_error;
10273: END;
10271:
10272: RAISE e_unexpected_error;
10273: END;
10274:
10275: IF (g_asn_debug = 'Y') THEN
10276: asn_debug.put_line('l_processing_status_code from rti ' || l_processing_status_code);
10277: END IF;
10278:
10279: IF (l_processing_status_code = 'ERROR') THEN
10272: RAISE e_unexpected_error;
10273: END;
10274:
10275: IF (g_asn_debug = 'Y') THEN
10276: asn_debug.put_line('l_processing_status_code from rti ' || l_processing_status_code);
10277: END IF;
10278:
10279: IF (l_processing_status_code = 'ERROR') THEN
10280: rcv_error_pkg.set_error_message('RCV_PARENT_RECORD_ERRORED');
10879: l_is_clm_po VARCHAR2(5) := 'N';
10880: l_partial_funded_flag VARCHAR2(5) := 'N';
10881: --
10882: BEGIN
10883: IF (g_asn_debug = 'Y') THEN
10884: asn_debug.put_line('enter derive_quantity ' || x_cascaded_table(n).parent_transaction_id);
10885: END IF;
10886:
10887: --Bug 7651646
10880: l_partial_funded_flag VARCHAR2(5) := 'N';
10881: --
10882: BEGIN
10883: IF (g_asn_debug = 'Y') THEN
10884: asn_debug.put_line('enter derive_quantity ' || x_cascaded_table(n).parent_transaction_id);
10885: END IF;
10886:
10887: --Bug 7651646
10888: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN
10935: delivered to inventory or returned back to supplier.
10936: In such a case raise an error and fail the transaction.
10937: */
10938:
10939: IF (g_asn_debug = 'Y') THEN
10940: asn_debug.put_line('l_num_of_distributions is 0');
10941: END IF;
10942:
10943: x_cascaded_table(n).error_status := 'F';
10936: In such a case raise an error and fail the transaction.
10937: */
10938:
10939: IF (g_asn_debug = 'Y') THEN
10940: asn_debug.put_line('l_num_of_distributions is 0');
10941: END IF;
10942:
10943: x_cascaded_table(n).error_status := 'F';
10944: rcv_error_pkg.set_error_message('RCV_NO_RECEIVE_SUPPLY', x_cascaded_table(n).error_message);
10947:
10948: END IF; /* End of FP for bug 4654553 */
10949: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
10950: AND (l_num_of_distributions > 1)) THEN --{
10951: IF (g_asn_debug = 'Y') THEN
10952: asn_debug.put_line(' open po_deliver table ' || x_cascaded_table(n).parent_transaction_id);
10953: END IF;
10954:
10955: /* Bug3553796 - Deriving Distribution number when Distribution
10948: END IF; /* End of FP for bug 4654553 */
10949: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
10950: AND (l_num_of_distributions > 1)) THEN --{
10951: IF (g_asn_debug = 'Y') THEN
10952: asn_debug.put_line(' open po_deliver table ' || x_cascaded_table(n).parent_transaction_id);
10953: END IF;
10954:
10955: /* Bug3553796 - Deriving Distribution number when Distribution
10956: id is available. */
10958: /* Bug3553796 - START */
10959: IF ( x_cascaded_table(n).po_distribution_id IS NOT NULL
10960: AND (x_cascaded_table(n).document_distribution_num IS NULL)) THEN
10961: BEGIN
10962: IF (g_asn_debug = 'Y') THEN
10963: asn_debug.put_line('Deriving Distribution Number from Distribution Id:' || x_cascaded_table(n).po_distribution_id);
10964: END IF;
10965:
10966: SELECT distribution_num
10959: IF ( x_cascaded_table(n).po_distribution_id IS NOT NULL
10960: AND (x_cascaded_table(n).document_distribution_num IS NULL)) THEN
10961: BEGIN
10962: IF (g_asn_debug = 'Y') THEN
10963: asn_debug.put_line('Deriving Distribution Number from Distribution Id:' || x_cascaded_table(n).po_distribution_id);
10964: END IF;
10965:
10966: SELECT distribution_num
10967: INTO x_cascaded_table(n).document_distribution_num
10967: INTO x_cascaded_table(n).document_distribution_num
10968: FROM po_distributions
10969: WHERE po_distribution_id = x_cascaded_table(n).po_distribution_id;
10970:
10971: IF (g_asn_debug = 'Y') THEN
10972: asn_debug.put_line('Derived Distribution Number:' || x_cascaded_table(n).document_distribution_num);
10973: END IF;
10974: EXCEPTION
10975: WHEN OTHERS THEN
10968: FROM po_distributions
10969: WHERE po_distribution_id = x_cascaded_table(n).po_distribution_id;
10970:
10971: IF (g_asn_debug = 'Y') THEN
10972: asn_debug.put_line('Derived Distribution Number:' || x_cascaded_table(n).document_distribution_num);
10973: END IF;
10974: EXCEPTION
10975: WHEN OTHERS THEN
10976: IF (g_asn_debug = 'Y') THEN
10972: asn_debug.put_line('Derived Distribution Number:' || x_cascaded_table(n).document_distribution_num);
10973: END IF;
10974: EXCEPTION
10975: WHEN OTHERS THEN
10976: IF (g_asn_debug = 'Y') THEN
10977: asn_debug.put_line('wrong po_distribution_id entered in rcv_transactions_interface');
10978: END IF;
10979: END;
10980: END IF;
10973: END IF;
10974: EXCEPTION
10975: WHEN OTHERS THEN
10976: IF (g_asn_debug = 'Y') THEN
10977: asn_debug.put_line('wrong po_distribution_id entered in rcv_transactions_interface');
10978: END IF;
10979: END;
10980: END IF;
10981:
10980: END IF;
10981:
10982: /* Bug3553796 - END */
10983: IF (x_cascaded_table(n).document_distribution_num IS NULL) THEN --{
10984: IF (g_asn_debug = 'Y') THEN
10985: asn_debug.put_line('Distribution num is required for delivering multi distribution Po');
10986: END IF;
10987:
10988: x_cascaded_table(n).error_status := 'F';
10981:
10982: /* Bug3553796 - END */
10983: IF (x_cascaded_table(n).document_distribution_num IS NULL) THEN --{
10984: IF (g_asn_debug = 'Y') THEN
10985: asn_debug.put_line('Distribution num is required for delivering multi distribution Po');
10986: END IF;
10987:
10988: x_cascaded_table(n).error_status := 'F';
10989: rcv_error_pkg.set_error_message('RCV_DIST_NUM_REQ', x_cascaded_table(n).error_message);
11000: already_derived := TRUE;
11001: END IF; --}
11002: END IF; --}
11003:
11004: IF (g_asn_debug = 'Y') THEN
11005: asn_debug.put_line('l_num_of_distributions ' || l_num_of_distributions);
11006: END IF;
11007:
11008: IF already_derived THEN --{
11001: END IF; --}
11002: END IF; --}
11003:
11004: IF (g_asn_debug = 'Y') THEN
11005: asn_debug.put_line('l_num_of_distributions ' || l_num_of_distributions);
11006: END IF;
11007:
11008: IF already_derived THEN --{
11009: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
11007:
11008: IF already_derived THEN --{
11009: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
11010: AND (l_num_of_distributions = 1)) THEN --{
11011: IF (g_asn_debug = 'Y') THEN
11012: asn_debug.put_line(' open po_single_deliver table ' || x_cascaded_table(n).parent_transaction_id);
11013: END IF;
11014:
11015: OPEN po_single_deliver(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
11008: IF already_derived THEN --{
11009: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
11010: AND (l_num_of_distributions = 1)) THEN --{
11011: IF (g_asn_debug = 'Y') THEN
11012: asn_debug.put_line(' open po_single_deliver table ' || x_cascaded_table(n).parent_transaction_id);
11013: END IF;
11014:
11015: OPEN po_single_deliver(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
11016: ELSIF(x_cascaded_table(n).transaction_type <> 'DELIVER') THEN --}{
11014:
11015: OPEN po_single_deliver(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
11016: ELSIF(x_cascaded_table(n).transaction_type <> 'DELIVER') THEN --}{
11017: /* For transfers, accept and reject */
11018: IF (g_asn_debug = 'Y') THEN
11019: asn_debug.put_line(' open po_transfer table ' || x_cascaded_table(n).parent_transaction_id);
11020: END IF;
11021:
11022: OPEN po_transfer(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
11015: OPEN po_single_deliver(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
11016: ELSIF(x_cascaded_table(n).transaction_type <> 'DELIVER') THEN --}{
11017: /* For transfers, accept and reject */
11018: IF (g_asn_debug = 'Y') THEN
11019: asn_debug.put_line(' open po_transfer table ' || x_cascaded_table(n).parent_transaction_id);
11020: END IF;
11021:
11022: OPEN po_transfer(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
11023: END IF; --}
11047: WHERE line_location_id = (SELECT po_line_location_id
11048: FROM rcv_transactions_interface
11049: WHERE interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id);
11050:
11051: IF (g_asn_debug = 'Y') THEN
11052: asn_debug.put_line('l_num_of_distributions ' || l_num_of_distributions);
11053: END IF;
11054:
11055: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
11048: FROM rcv_transactions_interface
11049: WHERE interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id);
11050:
11051: IF (g_asn_debug = 'Y') THEN
11052: asn_debug.put_line('l_num_of_distributions ' || l_num_of_distributions);
11053: END IF;
11054:
11055: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
11056: AND (l_num_of_distributions = 1)) THEN --{
11053: END IF;
11054:
11055: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
11056: AND (l_num_of_distributions = 1)) THEN --{
11057: IF (g_asn_debug = 'Y') THEN
11058: asn_debug.put_line(' open Single deliver cursor from rti');
11059: END IF;
11060:
11061: OPEN po_single_deliver_rti(x_cascaded_table(n).parent_interface_txn_id);
11054:
11055: IF ( (x_cascaded_table(n).transaction_type = 'DELIVER')
11056: AND (l_num_of_distributions = 1)) THEN --{
11057: IF (g_asn_debug = 'Y') THEN
11058: asn_debug.put_line(' open Single deliver cursor from rti');
11059: END IF;
11060:
11061: OPEN po_single_deliver_rti(x_cascaded_table(n).parent_interface_txn_id);
11062: ELSIF( (x_cascaded_table(n).transaction_type = 'DELIVER')
11069: IF ( x_cascaded_table(n).po_distribution_id IS NOT NULL
11070: AND (x_cascaded_table(n).document_distribution_num IS NULL)) THEN
11071:
11072: BEGIN
11073: IF (g_asn_debug = 'Y') THEN
11074: asn_debug.put_line('Deriving Distribution Number from Distribution Id:' || x_cascaded_table(n).po_distribution_id);
11075: END IF;
11076:
11077: SELECT distribution_num
11070: AND (x_cascaded_table(n).document_distribution_num IS NULL)) THEN
11071:
11072: BEGIN
11073: IF (g_asn_debug = 'Y') THEN
11074: asn_debug.put_line('Deriving Distribution Number from Distribution Id:' || x_cascaded_table(n).po_distribution_id);
11075: END IF;
11076:
11077: SELECT distribution_num
11078: INTO x_cascaded_table(n).document_distribution_num
11078: INTO x_cascaded_table(n).document_distribution_num
11079: FROM po_distributions
11080: WHERE po_distribution_id = x_cascaded_table(n).po_distribution_id;
11081:
11082: IF (g_asn_debug = 'Y') THEN
11083: asn_debug.put_line('Derived Distribution Number:' || x_cascaded_table(n).document_distribution_num);
11084: END IF;
11085:
11086: EXCEPTION
11079: FROM po_distributions
11080: WHERE po_distribution_id = x_cascaded_table(n).po_distribution_id;
11081:
11082: IF (g_asn_debug = 'Y') THEN
11083: asn_debug.put_line('Derived Distribution Number:' || x_cascaded_table(n).document_distribution_num);
11084: END IF;
11085:
11086: EXCEPTION
11087: WHEN OTHERS THEN
11084: END IF;
11085:
11086: EXCEPTION
11087: WHEN OTHERS THEN
11088: IF (g_asn_debug = 'Y') THEN
11089: asn_debug.put_line('wrong po_distribution_id entered in rcv_transactions_interface');
11090: END IF;
11091: END;
11092: END IF;
11085:
11086: EXCEPTION
11087: WHEN OTHERS THEN
11088: IF (g_asn_debug = 'Y') THEN
11089: asn_debug.put_line('wrong po_distribution_id entered in rcv_transactions_interface');
11090: END IF;
11091: END;
11092: END IF;
11093: -- } bug 5354379
11092: END IF;
11093: -- } bug 5354379
11094:
11095: IF (x_cascaded_table(n).document_distribution_num IS NULL) THEN --{
11096: IF (g_asn_debug = 'Y') THEN
11097: asn_debug.put_line('Distribution num is required for delivering multi distribution Po');
11098: END IF;
11099:
11100: x_cascaded_table(n).error_status := 'F';
11093: -- } bug 5354379
11094:
11095: IF (x_cascaded_table(n).document_distribution_num IS NULL) THEN --{
11096: IF (g_asn_debug = 'Y') THEN
11097: asn_debug.put_line('Distribution num is required for delivering multi distribution Po');
11098: END IF;
11099:
11100: x_cascaded_table(n).error_status := 'F';
11101: rcv_error_pkg.set_error_message('RCV_DIST_NUM_REQ', x_cascaded_table(n).error_message);
11101: rcv_error_pkg.set_error_message('RCV_DIST_NUM_REQ', x_cascaded_table(n).error_message);
11102: rcv_error_pkg.log_interface_error('INTERFACE_TRANSACTION_ID', FALSE);
11103: END IF; --}
11104:
11105: IF (g_asn_debug = 'Y') THEN
11106: asn_debug.put_line(' open Multi deliver cursor from rti');
11107: END IF;
11108:
11109: OPEN po_deliver_rti(x_cascaded_table(n).parent_interface_txn_id, x_cascaded_table(n).document_distribution_num);
11102: rcv_error_pkg.log_interface_error('INTERFACE_TRANSACTION_ID', FALSE);
11103: END IF; --}
11104:
11105: IF (g_asn_debug = 'Y') THEN
11106: asn_debug.put_line(' open Multi deliver cursor from rti');
11107: END IF;
11108:
11109: OPEN po_deliver_rti(x_cascaded_table(n).parent_interface_txn_id, x_cascaded_table(n).document_distribution_num);
11110: l_po_deliver_rti_cursor_opened := 1;--Bug 5354379
11108:
11109: OPEN po_deliver_rti(x_cascaded_table(n).parent_interface_txn_id, x_cascaded_table(n).document_distribution_num);
11110: l_po_deliver_rti_cursor_opened := 1;--Bug 5354379
11111: ELSE --}{
11112: IF (g_asn_debug = 'Y') THEN
11113: asn_debug.put_line(' open transfer cursor from rti');
11114: END IF;
11115:
11116: OPEN po_transfer_rti(x_cascaded_table(n).parent_interface_txn_id);
11109: OPEN po_deliver_rti(x_cascaded_table(n).parent_interface_txn_id, x_cascaded_table(n).document_distribution_num);
11110: l_po_deliver_rti_cursor_opened := 1;--Bug 5354379
11111: ELSE --}{
11112: IF (g_asn_debug = 'Y') THEN
11113: asn_debug.put_line(' open transfer cursor from rti');
11114: END IF;
11115:
11116: OPEN po_transfer_rti(x_cascaded_table(n).parent_interface_txn_id);
11117: END IF; --}
11121: /******************************************************************/
11122: --check line quanity > 0
11123: x_progress := '097';
11124:
11125: IF (g_asn_debug = 'Y') THEN
11126: asn_debug.put_line('X_progress ' || x_progress);
11127: END IF;
11128:
11129: IF x_cascaded_table(n).error_status IN('S', 'W')
11122: --check line quanity > 0
11123: x_progress := '097';
11124:
11125: IF (g_asn_debug = 'Y') THEN
11126: asn_debug.put_line('X_progress ' || x_progress);
11127: END IF;
11128:
11129: IF x_cascaded_table(n).error_status IN('S', 'W')
11130: AND x_cascaded_table(n).quantity <= 0 THEN --{
11127: END IF;
11128:
11129: IF x_cascaded_table(n).error_status IN('S', 'W')
11130: AND x_cascaded_table(n).quantity <= 0 THEN --{
11131: IF (g_asn_debug = 'Y') THEN
11132: asn_debug.put_line('Quantity is <= zero. Cascade will fail');
11133: END IF;
11134:
11135: x_cascaded_table(n).error_status := 'F';
11128:
11129: IF x_cascaded_table(n).error_status IN('S', 'W')
11130: AND x_cascaded_table(n).quantity <= 0 THEN --{
11131: IF (g_asn_debug = 'Y') THEN
11132: asn_debug.put_line('Quantity is <= zero. Cascade will fail');
11133: END IF;
11134:
11135: x_cascaded_table(n).error_status := 'F';
11136: rcv_error_pkg.set_error_message('RCV_ENTER_QTY_GT_ZERO', x_cascaded_table(n).error_message);
11148: such a way that the ROI validation does'nt error out when
11149: po_line_id is populated for one time items. */
11150: x_progress := '098';
11151:
11152: IF (g_asn_debug = 'Y') THEN
11153: asn_debug.put_line('X_progress ' || x_progress);
11154: END IF;
11155:
11156: IF ( ( x_cascaded_table(n).parent_transaction_id IS NOT NULL
11149: po_line_id is populated for one time items. */
11150: x_progress := '098';
11151:
11152: IF (g_asn_debug = 'Y') THEN
11153: asn_debug.put_line('X_progress ' || x_progress);
11154: END IF;
11155:
11156: IF ( ( x_cascaded_table(n).parent_transaction_id IS NOT NULL
11157: OR x_cascaded_table(n).parent_interface_txn_id IS NOT NULL)
11157: OR x_cascaded_table(n).parent_interface_txn_id IS NOT NULL)
11158: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
11159:
11160: -- Copy record from main table to temp table
11161: IF (g_asn_debug = 'Y') THEN
11162: asn_debug.put_line('Copy record from main table to temp table');
11163: END IF;
11164:
11165: current_n := 1;
11158: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
11159:
11160: -- Copy record from main table to temp table
11161: IF (g_asn_debug = 'Y') THEN
11162: asn_debug.put_line('Copy record from main table to temp table');
11163: END IF;
11164:
11165: current_n := 1;
11166: temp_cascaded_table(current_n) := x_cascaded_table(n);
11165: current_n := 1;
11166: temp_cascaded_table(current_n) := x_cascaded_table(n);
11167:
11168: -- Get all rows which meet this condition
11169: IF (g_asn_debug = 'Y') THEN
11170: asn_debug.put_line('Get all rows which meet this condition');
11171: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
11172: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
11173: END IF;
11166: temp_cascaded_table(current_n) := x_cascaded_table(n);
11167:
11168: -- Get all rows which meet this condition
11169: IF (g_asn_debug = 'Y') THEN
11170: asn_debug.put_line('Get all rows which meet this condition');
11171: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
11172: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
11173: END IF;
11174:
11167:
11168: -- Get all rows which meet this condition
11169: IF (g_asn_debug = 'Y') THEN
11170: asn_debug.put_line('Get all rows which meet this condition');
11171: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
11172: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
11173: END IF;
11174:
11175: -- Assign shipped quantity to remaining quantity
11168: -- Get all rows which meet this condition
11169: IF (g_asn_debug = 'Y') THEN
11170: asn_debug.put_line('Get all rows which meet this condition');
11171: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
11172: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
11173: END IF;
11174:
11175: -- Assign shipped quantity to remaining quantity
11176: IF (g_asn_debug = 'Y') THEN
11172: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
11173: END IF;
11174:
11175: -- Assign shipped quantity to remaining quantity
11176: IF (g_asn_debug = 'Y') THEN
11177: asn_debug.put_line('Assign populated quantity to remaining quantity ' || temp_cascaded_table(current_n).quantity);
11178: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
11179: END IF;
11180:
11173: END IF;
11174:
11175: -- Assign shipped quantity to remaining quantity
11176: IF (g_asn_debug = 'Y') THEN
11177: asn_debug.put_line('Assign populated quantity to remaining quantity ' || temp_cascaded_table(current_n).quantity);
11178: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
11179: END IF;
11180:
11181: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
11174:
11175: -- Assign shipped quantity to remaining quantity
11176: IF (g_asn_debug = 'Y') THEN
11177: asn_debug.put_line('Assign populated quantity to remaining quantity ' || temp_cascaded_table(current_n).quantity);
11178: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
11179: END IF;
11180:
11181: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
11182: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
11181: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
11182: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
11183: x_remaining_qty_po_uom := 0;
11184:
11185: IF (g_asn_debug = 'Y') THEN
11186: asn_debug.put_line('Have assigned the quantity ' || x_remaining_quantity);
11187: END IF;
11188:
11189: -- Calculate tax_amount_factor for calculating tax_amount for
11182: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
11183: x_remaining_qty_po_uom := 0;
11184:
11185: IF (g_asn_debug = 'Y') THEN
11186: asn_debug.put_line('Have assigned the quantity ' || x_remaining_quantity);
11187: END IF;
11188:
11189: -- Calculate tax_amount_factor for calculating tax_amount for
11190: -- each cascaded line
11194: ELSE
11195: tax_amount_factor := 0;
11196: END IF;
11197:
11198: IF (g_asn_debug = 'Y') THEN
11199: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
11200: asn_debug.put_line('Shipped Quantity : ' || TO_CHAR(x_remaining_quantity));
11201: END IF;
11202:
11195: tax_amount_factor := 0;
11196: END IF;
11197:
11198: IF (g_asn_debug = 'Y') THEN
11199: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
11200: asn_debug.put_line('Shipped Quantity : ' || TO_CHAR(x_remaining_quantity));
11201: END IF;
11202:
11203: x_first_trans := TRUE;
11196: END IF;
11197:
11198: IF (g_asn_debug = 'Y') THEN
11199: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
11200: asn_debug.put_line('Shipped Quantity : ' || TO_CHAR(x_remaining_quantity));
11201: END IF;
11202:
11203: x_first_trans := TRUE;
11204: transaction_ok := FALSE;
11202:
11203: x_first_trans := TRUE;
11204: transaction_ok := FALSE;
11205:
11206: IF (g_asn_debug = 'Y') THEN
11207: asn_debug.put_line('Before starting Cascade');
11208: END IF;
11209:
11210: IF (g_asn_debug = 'Y') THEN
11203: x_first_trans := TRUE;
11204: transaction_ok := FALSE;
11205:
11206: IF (g_asn_debug = 'Y') THEN
11207: asn_debug.put_line('Before starting Cascade');
11208: END IF;
11209:
11210: IF (g_asn_debug = 'Y') THEN
11211: asn_debug.put_line('Record Count = ' || x_record_count);
11206: IF (g_asn_debug = 'Y') THEN
11207: asn_debug.put_line('Before starting Cascade');
11208: END IF;
11209:
11210: IF (g_asn_debug = 'Y') THEN
11211: asn_debug.put_line('Record Count = ' || x_record_count);
11212: END IF;
11213:
11214: LOOP --{
11207: asn_debug.put_line('Before starting Cascade');
11208: END IF;
11209:
11210: IF (g_asn_debug = 'Y') THEN
11211: asn_debug.put_line('Record Count = ' || x_record_count);
11212: END IF;
11213:
11214: LOOP --{
11215: IF (g_asn_debug = 'Y') THEN
11211: asn_debug.put_line('Record Count = ' || x_record_count);
11212: END IF;
11213:
11214: LOOP --{
11215: IF (g_asn_debug = 'Y') THEN
11216: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
11217: asn_debug.put_line('Remaining Quantity ASN UOM ' || TO_CHAR(x_remaining_quantity));
11218: END IF;
11219:
11212: END IF;
11213:
11214: LOOP --{
11215: IF (g_asn_debug = 'Y') THEN
11216: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
11217: asn_debug.put_line('Remaining Quantity ASN UOM ' || TO_CHAR(x_remaining_quantity));
11218: END IF;
11219:
11220: /*
11213:
11214: LOOP --{
11215: IF (g_asn_debug = 'Y') THEN
11216: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
11217: asn_debug.put_line('Remaining Quantity ASN UOM ' || TO_CHAR(x_remaining_quantity));
11218: END IF;
11219:
11220: /*
11221: ** Fetch the appropriate record
11219:
11220: /*
11221: ** Fetch the appropriate record
11222: */
11223: IF (g_asn_debug = 'Y') THEN
11224: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
11225: END IF;
11226:
11227: IF (po_transfer%ISOPEN) THEN --{
11220: /*
11221: ** Fetch the appropriate record
11222: */
11223: IF (g_asn_debug = 'Y') THEN
11224: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
11225: END IF;
11226:
11227: IF (po_transfer%ISOPEN) THEN --{
11228: IF (g_asn_debug = 'Y') THEN
11224: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
11225: END IF;
11226:
11227: IF (po_transfer%ISOPEN) THEN --{
11228: IF (g_asn_debug = 'Y') THEN
11229: asn_debug.put_line(' fetch po_transfer');
11230: END IF;
11231:
11232: FETCH po_transfer INTO x_po_transferrec;
11225: END IF;
11226:
11227: IF (po_transfer%ISOPEN) THEN --{
11228: IF (g_asn_debug = 'Y') THEN
11229: asn_debug.put_line(' fetch po_transfer');
11230: END IF;
11231:
11232: FETCH po_transfer INTO x_po_transferrec;
11233:
11236: END IF;
11237:
11238: rows_fetched := po_transfer%ROWCOUNT;
11239: ELSIF(po_single_deliver%ISOPEN) THEN --}{
11240: IF (g_asn_debug = 'Y') THEN
11241: asn_debug.put_line(' fetch po_single_deliver');
11242: END IF;
11243:
11244: FETCH po_single_deliver INTO x_po_transferrec;
11237:
11238: rows_fetched := po_transfer%ROWCOUNT;
11239: ELSIF(po_single_deliver%ISOPEN) THEN --}{
11240: IF (g_asn_debug = 'Y') THEN
11241: asn_debug.put_line(' fetch po_single_deliver');
11242: END IF;
11243:
11244: FETCH po_single_deliver INTO x_po_transferrec;
11245:
11243:
11244: FETCH po_single_deliver INTO x_po_transferrec;
11245:
11246: IF (po_single_deliver%NOTFOUND) THEN
11247: IF (g_asn_debug = 'Y') THEN
11248: asn_debug.put_line('Single Deliver last row');
11249: END IF;
11250:
11251: lastrecord := TRUE;
11244: FETCH po_single_deliver INTO x_po_transferrec;
11245:
11246: IF (po_single_deliver%NOTFOUND) THEN
11247: IF (g_asn_debug = 'Y') THEN
11248: asn_debug.put_line('Single Deliver last row');
11249: END IF;
11250:
11251: lastrecord := TRUE;
11252: END IF;
11252: END IF;
11253:
11254: rows_fetched := po_single_deliver%ROWCOUNT;
11255: ELSIF(po_transfer_rti%ISOPEN) THEN --}{
11256: IF (g_asn_debug = 'Y') THEN
11257: asn_debug.put_line(' fetch po_transfer_rti');
11258: END IF;
11259:
11260: FETCH po_transfer_rti INTO x_po_transferrec;
11253:
11254: rows_fetched := po_single_deliver%ROWCOUNT;
11255: ELSIF(po_transfer_rti%ISOPEN) THEN --}{
11256: IF (g_asn_debug = 'Y') THEN
11257: asn_debug.put_line(' fetch po_transfer_rti');
11258: END IF;
11259:
11260: FETCH po_transfer_rti INTO x_po_transferrec;
11261:
11259:
11260: FETCH po_transfer_rti INTO x_po_transferrec;
11261:
11262: IF (po_transfer_rti%NOTFOUND) THEN
11263: IF (g_asn_debug = 'Y') THEN
11264: asn_debug.put_line('transfer last row');
11265: END IF;
11266:
11267: lastrecord := TRUE;
11260: FETCH po_transfer_rti INTO x_po_transferrec;
11261:
11262: IF (po_transfer_rti%NOTFOUND) THEN
11263: IF (g_asn_debug = 'Y') THEN
11264: asn_debug.put_line('transfer last row');
11265: END IF;
11266:
11267: lastrecord := TRUE;
11268: END IF;
11268: END IF;
11269:
11270: rows_fetched := po_transfer_rti%ROWCOUNT;
11271: ELSIF(po_single_deliver_rti%ISOPEN) THEN --}{
11272: IF (g_asn_debug = 'Y') THEN
11273: asn_debug.put_line(' fetch po_single_deliver_rti');
11274: END IF;
11275:
11276: FETCH po_single_deliver_rti INTO x_po_transferrec;
11269:
11270: rows_fetched := po_transfer_rti%ROWCOUNT;
11271: ELSIF(po_single_deliver_rti%ISOPEN) THEN --}{
11272: IF (g_asn_debug = 'Y') THEN
11273: asn_debug.put_line(' fetch po_single_deliver_rti');
11274: END IF;
11275:
11276: FETCH po_single_deliver_rti INTO x_po_transferrec;
11277:
11275:
11276: FETCH po_single_deliver_rti INTO x_po_transferrec;
11277:
11278: IF (po_single_deliver_rti%NOTFOUND) THEN
11279: IF (g_asn_debug = 'Y') THEN
11280: asn_debug.put_line('single_deliver_rti last row');
11281: END IF;
11282:
11283: lastrecord := TRUE;
11276: FETCH po_single_deliver_rti INTO x_po_transferrec;
11277:
11278: IF (po_single_deliver_rti%NOTFOUND) THEN
11279: IF (g_asn_debug = 'Y') THEN
11280: asn_debug.put_line('single_deliver_rti last row');
11281: END IF;
11282:
11283: lastrecord := TRUE;
11284: END IF;
11285:
11286: rows_fetched := po_single_deliver_rti%ROWCOUNT;
11287: ELSIF( po_deliver%ISOPEN
11288: AND x_cascaded_table(n).document_distribution_num IS NOT NULL) THEN --}{
11289: IF (g_asn_debug = 'Y') THEN
11290: asn_debug.put_line(' fetch po_deliver');
11291: END IF;
11292:
11293: FETCH po_deliver INTO x_po_transferrec;
11286: rows_fetched := po_single_deliver_rti%ROWCOUNT;
11287: ELSIF( po_deliver%ISOPEN
11288: AND x_cascaded_table(n).document_distribution_num IS NOT NULL) THEN --}{
11289: IF (g_asn_debug = 'Y') THEN
11290: asn_debug.put_line(' fetch po_deliver');
11291: END IF;
11292:
11293: FETCH po_deliver INTO x_po_transferrec;
11294:
11296: lastrecord := TRUE;
11297: END IF;
11298:
11299: IF (firstrecord) THEN
11300: IF (g_asn_debug = 'Y') THEN
11301: asn_debug.put_line('first record for multi distributions');
11302: END IF;
11303:
11304: firstrecord := FALSE;
11297: END IF;
11298:
11299: IF (firstrecord) THEN
11300: IF (g_asn_debug = 'Y') THEN
11301: asn_debug.put_line('first record for multi distributions');
11302: END IF;
11303:
11304: firstrecord := FALSE;
11305:
11309: WHERE rcv_transaction_id = x_po_transferrec.rcv_transaction_id
11310: AND supply_type_code = 'RECEIVING';
11311: END IF;
11312:
11313: IF (g_asn_debug = 'Y') THEN
11314: asn_debug.put_line(' l_total_rec_quantity ' || l_total_rec_quantity);
11315: END IF;
11316:
11317: rows_fetched := po_deliver%ROWCOUNT;
11310: AND supply_type_code = 'RECEIVING';
11311: END IF;
11312:
11313: IF (g_asn_debug = 'Y') THEN
11314: asn_debug.put_line(' l_total_rec_quantity ' || l_total_rec_quantity);
11315: END IF;
11316:
11317: rows_fetched := po_deliver%ROWCOUNT;
11318: ELSIF(po_deliver_rti%ISOPEN) THEN --}{
11315: END IF;
11316:
11317: rows_fetched := po_deliver%ROWCOUNT;
11318: ELSIF(po_deliver_rti%ISOPEN) THEN --}{
11319: IF (g_asn_debug = 'Y') THEN
11320: asn_debug.put_line(' fetch po_deliver_rti');
11321: END IF;
11322:
11323: FETCH po_deliver_rti INTO x_po_transferrec;
11316:
11317: rows_fetched := po_deliver%ROWCOUNT;
11318: ELSIF(po_deliver_rti%ISOPEN) THEN --}{
11319: IF (g_asn_debug = 'Y') THEN
11320: asn_debug.put_line(' fetch po_deliver_rti');
11321: END IF;
11322:
11323: FETCH po_deliver_rti INTO x_po_transferrec;
11324:
11322:
11323: FETCH po_deliver_rti INTO x_po_transferrec;
11324:
11325: IF (po_deliver_rti%NOTFOUND) THEN
11326: IF (g_asn_debug = 'Y') THEN
11327: asn_debug.put_line('deliver_rti last row');
11328: END IF;
11329:
11330: lastrecord := TRUE;
11323: FETCH po_deliver_rti INTO x_po_transferrec;
11324:
11325: IF (po_deliver_rti%NOTFOUND) THEN
11326: IF (g_asn_debug = 'Y') THEN
11327: asn_debug.put_line('deliver_rti last row');
11328: END IF;
11329:
11330: lastrecord := TRUE;
11331: END IF;
11331: END IF;
11332:
11333: l_total_rec_quantity := x_po_transferrec.qty;
11334:
11335: IF (g_asn_debug = 'Y') THEN
11336: asn_debug.put_line(' l_total_rec_quantity if multi distribution from rti ' || x_po_transferrec.qty);
11337: END IF;
11338:
11339: rows_fetched := po_deliver_rti%ROWCOUNT;
11332:
11333: l_total_rec_quantity := x_po_transferrec.qty;
11334:
11335: IF (g_asn_debug = 'Y') THEN
11336: asn_debug.put_line(' l_total_rec_quantity if multi distribution from rti ' || x_po_transferrec.qty);
11337: END IF;
11338:
11339: rows_fetched := po_deliver_rti%ROWCOUNT;
11340: ELSIF(temp_cascaded_table(current_n).derive = 'Y') THEN --}{
11345: * parent_interface_txn_id) populated with
11346: * with the correct value. Also we have cascaded_table_index
11347: * with the correct pl/sql table index number;
11348: */
11349: IF (g_asn_debug = 'Y') THEN
11350: asn_debug.put_line(' fetch pl/sql table');
11351: END IF;
11352:
11353: temp_index := temp_cascaded_table(current_n).derive_index;
11346: * with the correct value. Also we have cascaded_table_index
11347: * with the correct pl/sql table index number;
11348: */
11349: IF (g_asn_debug = 'Y') THEN
11350: asn_debug.put_line(' fetch pl/sql table');
11351: END IF;
11352:
11353: temp_index := temp_cascaded_table(current_n).derive_index;
11354: x_po_transferrec.po_line_location_id := x_cascaded_table(temp_index).po_line_location_id;
11388:
11389:
11390: --x_remaining_quantity:= temp_cascaded_table(current_n).quantity;
11391:
11392: IF (g_asn_debug = 'Y') THEN
11393: asn_debug.put_line('Transfer Rows fetched ' || TO_CHAR(rows_fetched));
11394: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_transferrec.po_line_id));
11395: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_transferrec.po_distribution_id));
11396: asn_debug.put_line('Transfer remainaing qty ' || x_remaining_quantity);
11389:
11390: --x_remaining_quantity:= temp_cascaded_table(current_n).quantity;
11391:
11392: IF (g_asn_debug = 'Y') THEN
11393: asn_debug.put_line('Transfer Rows fetched ' || TO_CHAR(rows_fetched));
11394: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_transferrec.po_line_id));
11395: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_transferrec.po_distribution_id));
11396: asn_debug.put_line('Transfer remainaing qty ' || x_remaining_quantity);
11397: END IF;
11390: --x_remaining_quantity:= temp_cascaded_table(current_n).quantity;
11391:
11392: IF (g_asn_debug = 'Y') THEN
11393: asn_debug.put_line('Transfer Rows fetched ' || TO_CHAR(rows_fetched));
11394: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_transferrec.po_line_id));
11395: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_transferrec.po_distribution_id));
11396: asn_debug.put_line('Transfer remainaing qty ' || x_remaining_quantity);
11397: END IF;
11398:
11391:
11392: IF (g_asn_debug = 'Y') THEN
11393: asn_debug.put_line('Transfer Rows fetched ' || TO_CHAR(rows_fetched));
11394: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_transferrec.po_line_id));
11395: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_transferrec.po_distribution_id));
11396: asn_debug.put_line('Transfer remainaing qty ' || x_remaining_quantity);
11397: END IF;
11398:
11399: /* { Bug 5354379: To log meaningful error message with the PO number, PO line number
11392: IF (g_asn_debug = 'Y') THEN
11393: asn_debug.put_line('Transfer Rows fetched ' || TO_CHAR(rows_fetched));
11394: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_transferrec.po_line_id));
11395: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_transferrec.po_distribution_id));
11396: asn_debug.put_line('Transfer remainaing qty ' || x_remaining_quantity);
11397: END IF;
11398:
11399: /* { Bug 5354379: To log meaningful error message with the PO number, PO line number
11400: PO line location number and distribution number and transaction qty.
11428: where po_release_id = x_cascaded_table(n).po_release_id;
11429: end if;
11430: EXCEPTION
11431: WHEN NO_DATA_FOUND THEN
11432: IF (g_asn_debug = 'Y') THEN
11433: asn_debug.put_line('No data found exception while getting document info for PO');
11434: END IF;
11435: END;
11436: -- } Bug 5354379
11429: end if;
11430: EXCEPTION
11431: WHEN NO_DATA_FOUND THEN
11432: IF (g_asn_debug = 'Y') THEN
11433: asn_debug.put_line('No data found exception while getting document info for PO');
11434: END IF;
11435: END;
11436: -- } Bug 5354379
11437:
11443: * We do not support any other receiving transactions other
11444: * than direct receipt. Error out if it is complex work PO.
11445: */
11446: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN
11447: IF (g_asn_debug = 'Y') THEN
11448: asn_debug.put_line('Parent_txn_id ' || x_cascaded_table(n).parent_transaction_id);
11449: END IF;
11450:
11451: SELECT po_line_id,po_header_id
11444: * than direct receipt. Error out if it is complex work PO.
11445: */
11446: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN
11447: IF (g_asn_debug = 'Y') THEN
11448: asn_debug.put_line('Parent_txn_id ' || x_cascaded_table(n).parent_transaction_id);
11449: END IF;
11450:
11451: SELECT po_line_id,po_header_id
11452: INTO l_service_po_line_id,l_po_header_id
11452: INTO l_service_po_line_id,l_po_header_id
11453: FROM rcv_transactions
11454: WHERE transaction_id = x_cascaded_table(n).parent_transaction_id;
11455: ELSIF(x_cascaded_table(n).parent_interface_txn_id IS NOT NULL) THEN
11456: IF (g_asn_debug = 'Y') THEN
11457: asn_debug.put_line('parent_interface_txn_id ' || x_cascaded_table(n).parent_interface_txn_id);
11458: END IF;
11459:
11460: SELECT po_line_id,po_header_id
11453: FROM rcv_transactions
11454: WHERE transaction_id = x_cascaded_table(n).parent_transaction_id;
11455: ELSIF(x_cascaded_table(n).parent_interface_txn_id IS NOT NULL) THEN
11456: IF (g_asn_debug = 'Y') THEN
11457: asn_debug.put_line('parent_interface_txn_id ' || x_cascaded_table(n).parent_interface_txn_id);
11458: END IF;
11459:
11460: SELECT po_line_id,po_header_id
11461: INTO l_service_po_line_id,l_po_header_id
11462: FROM rcv_transactions_interface
11463: WHERE interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id;
11464: END IF;
11465:
11466: IF (g_asn_debug = 'Y') THEN
11467: asn_debug.put_line('l_service_po_line_id ' || l_service_po_line_id);
11468: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
11469: END IF;
11470:
11463: WHERE interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id;
11464: END IF;
11465:
11466: IF (g_asn_debug = 'Y') THEN
11467: asn_debug.put_line('l_service_po_line_id ' || l_service_po_line_id);
11468: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
11469: END IF;
11470:
11471: IF l_service_po_line_id IS NOT NULL THEN --{
11464: END IF;
11465:
11466: IF (g_asn_debug = 'Y') THEN
11467: asn_debug.put_line('l_service_po_line_id ' || l_service_po_line_id);
11468: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
11469: END IF;
11470:
11471: IF l_service_po_line_id IS NOT NULL THEN --{
11472: SELECT NVL(order_type_lookup_code, 'QUANTITY'),
11498: l_return_status,
11499: l_complex_flag);
11500: IF (l_return_status IS NOT NULL AND
11501: l_return_status = FND_API.g_ret_sts_success) THEN
11502: IF( g_asn_debug = 'Y' ) THEN
11503: asn_debug.put_line('l_return_status ' || l_return_status);
11504: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
11505: END IF;
11506: ELSE
11499: l_complex_flag);
11500: IF (l_return_status IS NOT NULL AND
11501: l_return_status = FND_API.g_ret_sts_success) THEN
11502: IF( g_asn_debug = 'Y' ) THEN
11503: asn_debug.put_line('l_return_status ' || l_return_status);
11504: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
11505: END IF;
11506: ELSE
11507: IF( g_asn_debug = 'Y') THEN
11500: IF (l_return_status IS NOT NULL AND
11501: l_return_status = FND_API.g_ret_sts_success) THEN
11502: IF( g_asn_debug = 'Y' ) THEN
11503: asn_debug.put_line('l_return_status ' || l_return_status);
11504: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
11505: END IF;
11506: ELSE
11507: IF( g_asn_debug = 'Y') THEN
11508: asn_debug.put_line('l_return_status ' || l_return_status);
11503: asn_debug.put_line('l_return_status ' || l_return_status);
11504: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
11505: END IF;
11506: ELSE
11507: IF( g_asn_debug = 'Y') THEN
11508: asn_debug.put_line('l_return_status ' || l_return_status);
11509: END IF;
11510: END IF;
11511:
11504: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
11505: END IF;
11506: ELSE
11507: IF( g_asn_debug = 'Y') THEN
11508: asn_debug.put_line('l_return_status ' || l_return_status);
11509: END IF;
11510: END IF;
11511:
11512: IF (l_complex_flag = 'Y') THEN
11509: END IF;
11510: END IF;
11511:
11512: IF (l_complex_flag = 'Y') THEN
11513: asn_debug.put_line('We do not support transaction type ' || x_cascaded_table(n).transaction_type || ' for complex work POs');
11514: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
11515: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
11516: End if;
11517:
11520:
11521:
11522: IF ( lastrecord
11523: OR x_remaining_quantity <= 0) THEN --{
11524: IF (g_asn_debug = 'Y') THEN
11525: asn_debug.put_line('Hit exit condition');
11526: END IF;
11527:
11528: IF NOT x_first_trans THEN
11521:
11522: IF ( lastrecord
11523: OR x_remaining_quantity <= 0) THEN --{
11524: IF (g_asn_debug = 'Y') THEN
11525: asn_debug.put_line('Hit exit condition');
11526: END IF;
11527:
11528: IF NOT x_first_trans THEN
11529: -- x_first_trans has been reset which means some cascade has
11527:
11528: IF NOT x_first_trans THEN
11529: -- x_first_trans has been reset which means some cascade has
11530: -- happened. Otherwise current_n = 1
11531: IF (g_asn_debug = 'Y') THEN
11532: asn_debug.put_line('current_n before is ' || current_n);
11533: END IF;
11534:
11535: current_n := current_n - 1;
11528: IF NOT x_first_trans THEN
11529: -- x_first_trans has been reset which means some cascade has
11530: -- happened. Otherwise current_n = 1
11531: IF (g_asn_debug = 'Y') THEN
11532: asn_debug.put_line('current_n before is ' || current_n);
11533: END IF;
11534:
11535: current_n := current_n - 1;
11536: END IF;
11535: current_n := current_n - 1;
11536: END IF;
11537:
11538: -- do the tolerance act here
11539: IF (g_asn_debug = 'Y') THEN
11540: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
11541: asn_debug.put_line('Check which condition has occured');
11542: END IF;
11543:
11536: END IF;
11537:
11538: -- do the tolerance act here
11539: IF (g_asn_debug = 'Y') THEN
11540: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
11541: asn_debug.put_line('Check which condition has occured');
11542: END IF;
11543:
11544: -- lastrecord...we have run out of rows and we still have quantity to allocate
11537:
11538: -- do the tolerance act here
11539: IF (g_asn_debug = 'Y') THEN
11540: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
11541: asn_debug.put_line('Check which condition has occured');
11542: END IF;
11543:
11544: -- lastrecord...we have run out of rows and we still have quantity to allocate
11545: IF (round(x_remaining_quantity,6) > 0) THEN --{ Bug 13703497
11542: END IF;
11543:
11544: -- lastrecord...we have run out of rows and we still have quantity to allocate
11545: IF (round(x_remaining_quantity,6) > 0) THEN --{ Bug 13703497
11546: IF (g_asn_debug = 'Y') THEN
11547: asn_debug.put_line('There is quantity remaining');
11548: asn_debug.put_line('Need to check qty tolerances');
11549: END IF;
11550:
11543:
11544: -- lastrecord...we have run out of rows and we still have quantity to allocate
11545: IF (round(x_remaining_quantity,6) > 0) THEN --{ Bug 13703497
11546: IF (g_asn_debug = 'Y') THEN
11547: asn_debug.put_line('There is quantity remaining');
11548: asn_debug.put_line('Need to check qty tolerances');
11549: END IF;
11550:
11551: IF rows_fetched > 0
11544: -- lastrecord...we have run out of rows and we still have quantity to allocate
11545: IF (round(x_remaining_quantity,6) > 0) THEN --{ Bug 13703497
11546: IF (g_asn_debug = 'Y') THEN
11547: asn_debug.put_line('There is quantity remaining');
11548: asn_debug.put_line('Need to check qty tolerances');
11549: END IF;
11550:
11551: IF rows_fetched > 0
11552: AND NOT x_first_trans THEN --{
11555: /* for transfer,accept an reject type we dont have the
11556: * tolerance check. Hence error out.
11557: * We cannot transfer quantities more than that was received.
11558: */
11559: IF (g_asn_debug = 'Y') THEN
11560: asn_debug.put_line(' in transfer Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
11561: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
11562: END IF;
11563:
11556: * tolerance check. Hence error out.
11557: * We cannot transfer quantities more than that was received.
11558: */
11559: IF (g_asn_debug = 'Y') THEN
11560: asn_debug.put_line(' in transfer Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
11561: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
11562: END IF;
11563:
11564: IF (g_asn_debug = 'Y') THEN
11557: * We cannot transfer quantities more than that was received.
11558: */
11559: IF (g_asn_debug = 'Y') THEN
11560: asn_debug.put_line(' in transfer Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
11561: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
11562: END IF;
11563:
11564: IF (g_asn_debug = 'Y') THEN
11565: asn_debug.put_line('delete the temp table ');
11560: asn_debug.put_line(' in transfer Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
11561: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
11562: END IF;
11563:
11564: IF (g_asn_debug = 'Y') THEN
11565: asn_debug.put_line('delete the temp table ');
11566: END IF;
11567:
11568: --
11561: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
11562: END IF;
11563:
11564: IF (g_asn_debug = 'Y') THEN
11565: asn_debug.put_line('delete the temp table ');
11566: END IF;
11567:
11568: --
11569: IF x_cascaded_table(n).transaction_type = 'DELIVER' THEN
11621: temp_cascaded_table.DELETE(i);
11622: END LOOP;
11623: END IF;
11624:
11625: IF (g_asn_debug = 'Y') THEN
11626: asn_debug.put_line('mark the actual table with error status');
11627: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
11628: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
11629: END IF;
11622: END LOOP;
11623: END IF;
11624:
11625: IF (g_asn_debug = 'Y') THEN
11626: asn_debug.put_line('mark the actual table with error status');
11627: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
11628: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
11629: END IF;
11630:
11623: END IF;
11624:
11625: IF (g_asn_debug = 'Y') THEN
11626: asn_debug.put_line('mark the actual table with error status');
11627: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
11628: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
11629: END IF;
11630:
11631: IF (g_asn_debug = 'Y') THEN
11624:
11625: IF (g_asn_debug = 'Y') THEN
11626: asn_debug.put_line('mark the actual table with error status');
11627: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
11628: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
11629: END IF;
11630:
11631: IF (g_asn_debug = 'Y') THEN
11632: asn_debug.put_line('Need to insert a row into po_interface_errors for transfer');
11627: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
11628: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
11629: END IF;
11630:
11631: IF (g_asn_debug = 'Y') THEN
11632: asn_debug.put_line('Need to insert a row into po_interface_errors for transfer');
11633: END IF;
11634: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
11635: IF rows_fetched = 0 THEN
11628: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
11629: END IF;
11630:
11631: IF (g_asn_debug = 'Y') THEN
11632: asn_debug.put_line('Need to insert a row into po_interface_errors for transfer');
11633: END IF;
11634: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
11635: IF rows_fetched = 0 THEN
11636: IF (g_asn_debug = 'Y') THEN
11632: asn_debug.put_line('Need to insert a row into po_interface_errors for transfer');
11633: END IF;
11634: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
11635: IF rows_fetched = 0 THEN
11636: IF (g_asn_debug = 'Y') THEN
11637: asn_debug.put_line('No rows were retrieved from cursor.');
11638: END IF;
11639: ELSIF x_first_trans THEN
11640: IF (g_asn_debug = 'Y') THEN
11633: END IF;
11634: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
11635: IF rows_fetched = 0 THEN
11636: IF (g_asn_debug = 'Y') THEN
11637: asn_debug.put_line('No rows were retrieved from cursor.');
11638: END IF;
11639: ELSIF x_first_trans THEN
11640: IF (g_asn_debug = 'Y') THEN
11641: asn_debug.put_line('No rows were cascaded');
11636: IF (g_asn_debug = 'Y') THEN
11637: asn_debug.put_line('No rows were retrieved from cursor.');
11638: END IF;
11639: ELSIF x_first_trans THEN
11640: IF (g_asn_debug = 'Y') THEN
11641: asn_debug.put_line('No rows were cascaded');
11642: END IF;
11643: END IF;
11644:
11637: asn_debug.put_line('No rows were retrieved from cursor.');
11638: END IF;
11639: ELSIF x_first_trans THEN
11640: IF (g_asn_debug = 'Y') THEN
11641: asn_debug.put_line('No rows were cascaded');
11642: END IF;
11643: END IF;
11644:
11645: x_temp_count := 1;
11675: -- Bug 13703497
11676: x_remaining_quantity := 0;
11677: x_remaining_qty_po_uom := 0;
11678:
11679: IF (g_asn_debug = 'Y') THEN
11680: asn_debug.put_line('Remaining UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
11681: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
11682: END IF;
11683: END IF; --} ends the check for whether last record has been reached
11676: x_remaining_quantity := 0;
11677: x_remaining_qty_po_uom := 0;
11678:
11679: IF (g_asn_debug = 'Y') THEN
11680: asn_debug.put_line('Remaining UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
11681: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
11682: END IF;
11683: END IF; --} ends the check for whether last record has been reached
11684:
11677: x_remaining_qty_po_uom := 0;
11678:
11679: IF (g_asn_debug = 'Y') THEN
11680: asn_debug.put_line('Remaining UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
11681: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
11682: END IF;
11683: END IF; --} ends the check for whether last record has been reached
11684:
11685: -- close cursors
11683: END IF; --} ends the check for whether last record has been reached
11684:
11685: -- close cursors
11686:
11687: IF (g_asn_debug = 'Y') THEN
11688: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions ' || current_n);
11689: END IF;
11690:
11691: IF po_transfer%ISOPEN THEN
11684:
11685: -- close cursors
11686:
11687: IF (g_asn_debug = 'Y') THEN
11688: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions ' || current_n);
11689: END IF;
11690:
11691: IF po_transfer%ISOPEN THEN
11692: CLOSE po_transfer;
11707: IF po_deliver%ISOPEN THEN
11708: CLOSE po_deliver;
11709: END IF;
11710:
11711: IF (g_asn_debug = 'Y') THEN
11712: asn_debug.put_line('before exit current_n is ' || current_n);
11713: END IF;
11714:
11715: EXIT;
11708: CLOSE po_deliver;
11709: END IF;
11710:
11711: IF (g_asn_debug = 'Y') THEN
11712: asn_debug.put_line('before exit current_n is ' || current_n);
11713: END IF;
11714:
11715: EXIT;
11716: END IF; --} matches lastrecord or x_remaining_quantity <= 0
11716: END IF; --} matches lastrecord or x_remaining_quantity <= 0
11717:
11718: -- eliminate the row if it fails the date check
11719:
11720: IF (g_asn_debug = 'Y') THEN
11721: asn_debug.put_line(' Entering qty calculateion for transfer');
11722: END IF;
11723:
11724: IF (x_first_trans)
11717:
11718: -- eliminate the row if it fails the date check
11719:
11720: IF (g_asn_debug = 'Y') THEN
11721: asn_debug.put_line(' Entering qty calculateion for transfer');
11722: END IF;
11723:
11724: IF (x_first_trans)
11725: AND temp_cascaded_table(current_n).item_id IS NULL THEN
11733: current_n,
11734: x_converted_parent_trx_qty
11735: );
11736:
11737: IF (g_asn_debug = 'Y') THEN
11738: asn_debug.put_line('trans_del interface qty ' || x_converted_parent_trx_qty);
11739: END IF;
11740:
11741: /* If this is a deliver for a multi distribution PO shipment
11734: x_converted_parent_trx_qty
11735: );
11736:
11737: IF (g_asn_debug = 'Y') THEN
11738: asn_debug.put_line('trans_del interface qty ' || x_converted_parent_trx_qty);
11739: END IF;
11740:
11741: /* If this is a deliver for a multi distribution PO shipment
11742: * line and if its parent is in rti, then x_converted_parent_trx_qty
11746: * equal to the qty in po_distributions.
11747: */
11748: IF ( (temp_cascaded_table(1).transaction_type = 'DELIVER')
11749: AND (l_num_of_distributions > 1)) THEN --{
11750: IF (g_asn_debug = 'Y') THEN
11751: asn_debug.put_line('before getting available qty for standard multi distributions deliver ');
11752: END IF;
11753:
11754: --
11747: */
11748: IF ( (temp_cascaded_table(1).transaction_type = 'DELIVER')
11749: AND (l_num_of_distributions > 1)) THEN --{
11750: IF (g_asn_debug = 'Y') THEN
11751: asn_debug.put_line('before getting available qty for standard multi distributions deliver ');
11752: END IF;
11753:
11754: --
11755: get_clm_info('QUANTITY',
11769: So, get the available qty from RTI for that DELIVER txn
11770: */
11771:
11772: IF l_po_deliver_rti_cursor_opened = 1 THEN --{ l_po_deliver_rti_cursor_opened = 1
11773: IF (g_asn_debug = 'Y') THEN
11774: asn_debug.put_line('In l_po_deliver_rti_cursor_opened...');
11775: END IF;
11776: l_interface_txn_id := x_cascaded_table(n).interface_transaction_id;
11777:
11770: */
11771:
11772: IF l_po_deliver_rti_cursor_opened = 1 THEN --{ l_po_deliver_rti_cursor_opened = 1
11773: IF (g_asn_debug = 'Y') THEN
11774: asn_debug.put_line('In l_po_deliver_rti_cursor_opened...');
11775: END IF;
11776: l_interface_txn_id := x_cascaded_table(n).interface_transaction_id;
11777:
11778: --In the following 2 loops, trying to get the RECEIVE txn id for the current DELIVER txn.
11783: --If the "RECEIVE txn for the current DELIVER txn is available in RTI,
11784: --RECEIVE interface txn id is fetched from RTI and it will be available in the variable l_parent_interface_txn_id
11785:
11786: LOOP --{ loop1
11787: IF (g_asn_debug = 'Y') THEN
11788: asn_debug.put_line('Inside LOOP1 to fetch RECEIVE txn_id....');
11789: asn_debug.put_line('Fetching record from RTI, l_interface_txn_id'||l_interface_txn_id);
11790: END IF;
11791:
11784: --RECEIVE interface txn id is fetched from RTI and it will be available in the variable l_parent_interface_txn_id
11785:
11786: LOOP --{ loop1
11787: IF (g_asn_debug = 'Y') THEN
11788: asn_debug.put_line('Inside LOOP1 to fetch RECEIVE txn_id....');
11789: asn_debug.put_line('Fetching record from RTI, l_interface_txn_id'||l_interface_txn_id);
11790: END IF;
11791:
11792: BEGIN --{
11785:
11786: LOOP --{ loop1
11787: IF (g_asn_debug = 'Y') THEN
11788: asn_debug.put_line('Inside LOOP1 to fetch RECEIVE txn_id....');
11789: asn_debug.put_line('Fetching record from RTI, l_interface_txn_id'||l_interface_txn_id);
11790: END IF;
11791:
11792: BEGIN --{
11793: SELECT parent_interface_txn_id,
11803: --parent txn is available in rcv_transactions table
11804: l_transaction_id := l_parent_transaction_id;
11805: LOOP --{ loop2
11806: --Fetch the record from rcv_transactions table
11807: IF (g_asn_debug = 'Y') THEN
11808: asn_debug.put_line('Inside LOOP2 to fetch RECEIVE txn_id....');
11809: asn_debug.put_line('Fetching record from RT, l_transaction_id'||l_transaction_id);
11810: END IF;
11811:
11804: l_transaction_id := l_parent_transaction_id;
11805: LOOP --{ loop2
11806: --Fetch the record from rcv_transactions table
11807: IF (g_asn_debug = 'Y') THEN
11808: asn_debug.put_line('Inside LOOP2 to fetch RECEIVE txn_id....');
11809: asn_debug.put_line('Fetching record from RT, l_transaction_id'||l_transaction_id);
11810: END IF;
11811:
11812: SELECT transaction_type,
11805: LOOP --{ loop2
11806: --Fetch the record from rcv_transactions table
11807: IF (g_asn_debug = 'Y') THEN
11808: asn_debug.put_line('Inside LOOP2 to fetch RECEIVE txn_id....');
11809: asn_debug.put_line('Fetching record from RT, l_transaction_id'||l_transaction_id);
11810: END IF;
11811:
11812: SELECT transaction_type,
11813: parent_transaction_id
11819: IF l_transaction_type = 'RECEIVE' THEN --{
11820: --exit loop1 and loop2
11821: --return l_transaction_id
11822: l_parent_transaction_id := l_transaction_id;
11823: IF (g_asn_debug = 'Y') THEN
11824: asn_debug.put_line('Fetched RECEIVE txn_id from RT....'||l_parent_transaction_id);
11825: END IF;
11826: l_exit := 'Y';
11827: EXIT; --exit loop2
11820: --exit loop1 and loop2
11821: --return l_transaction_id
11822: l_parent_transaction_id := l_transaction_id;
11823: IF (g_asn_debug = 'Y') THEN
11824: asn_debug.put_line('Fetched RECEIVE txn_id from RT....'||l_parent_transaction_id);
11825: END IF;
11826: l_exit := 'Y';
11827: EXIT; --exit loop2
11828: ELSIF l_parent_transaction_id IS NOT NULL THEN
11831: ELSE
11832: --Error condition
11833: l_exit := 'Y';
11834: l_loop_exit_status := 'E';
11835: IF (g_asn_debug = 'Y') THEN
11836: asn_debug.put_line('Error condition..parent_txn_id is null, not able to fetch RECEIVE txn_id');
11837: END IF;
11838: EXIT; --exit loop2
11839: END IF; --} l_transaction_type = 'RECEIVE'
11832: --Error condition
11833: l_exit := 'Y';
11834: l_loop_exit_status := 'E';
11835: IF (g_asn_debug = 'Y') THEN
11836: asn_debug.put_line('Error condition..parent_txn_id is null, not able to fetch RECEIVE txn_id');
11837: END IF;
11838: EXIT; --exit loop2
11839: END IF; --} l_transaction_type = 'RECEIVE'
11840: END LOOP; --{ loop2
11854: --This is the RECEIVE txn in RTI
11855: l_parent_interface_txn_id := l_interface_txn_id;
11856: l_parent_receive_txn_in_rt := 'N';
11857: l_loop_exit_status := 'S';
11858: IF (g_asn_debug = 'Y') THEN
11859: asn_debug.put_line('Fetched RECEIVE interface txn_id from RTI....'||l_parent_interface_txn_id);
11860: END IF;
11861: ELSE
11862: --Error condtion
11855: l_parent_interface_txn_id := l_interface_txn_id;
11856: l_parent_receive_txn_in_rt := 'N';
11857: l_loop_exit_status := 'S';
11858: IF (g_asn_debug = 'Y') THEN
11859: asn_debug.put_line('Fetched RECEIVE interface txn_id from RTI....'||l_parent_interface_txn_id);
11860: END IF;
11861: ELSE
11862: --Error condtion
11863: l_loop_exit_status := 'E';
11860: END IF;
11861: ELSE
11862: --Error condtion
11863: l_loop_exit_status := 'E';
11864: IF (g_asn_debug = 'Y') THEN
11865: asn_debug.put_line('Error condition..parent_interface_txn_id is null, not able to fetch RECEIVE txn_id');
11866: END IF;
11867: END IF;
11868: l_exit := 'Y';
11861: ELSE
11862: --Error condtion
11863: l_loop_exit_status := 'E';
11864: IF (g_asn_debug = 'Y') THEN
11865: asn_debug.put_line('Error condition..parent_interface_txn_id is null, not able to fetch RECEIVE txn_id');
11866: END IF;
11867: END IF;
11868: l_exit := 'Y';
11869: EXIT; --exit loop1
11872: EXCEPTION
11873: WHEN NO_DATA_FOUND then
11874: l_exit := 'Y';
11875: l_loop_exit_status := 'E';
11876: IF (g_asn_debug = 'Y') THEN
11877: asn_debug.put_line('No data found exception occured in Fetching RECEIVE txn_id');
11878: END IF;
11879: END;--} BEGIN ends
11880:
11873: WHEN NO_DATA_FOUND then
11874: l_exit := 'Y';
11875: l_loop_exit_status := 'E';
11876: IF (g_asn_debug = 'Y') THEN
11877: asn_debug.put_line('No data found exception occured in Fetching RECEIVE txn_id');
11878: END IF;
11879: END;--} BEGIN ends
11880:
11881: --Check Exit condition met
11879: END;--} BEGIN ends
11880:
11881: --Check Exit condition met
11882: IF l_exit = 'Y' THEN
11883: IF (g_asn_debug = 'Y') THEN
11884: asn_debug.put_line('Exiting the loop to Fetch RECEIVE txn_id....');
11885: END IF;
11886: EXIT;--exit loop1
11887: END IF;
11880:
11881: --Check Exit condition met
11882: IF l_exit = 'Y' THEN
11883: IF (g_asn_debug = 'Y') THEN
11884: asn_debug.put_line('Exiting the loop to Fetch RECEIVE txn_id....');
11885: END IF;
11886: EXIT;--exit loop1
11887: END IF;
11888: END LOOP; --}loop1
11889:
11890: --Check Loop exited successfuly by fetching the RECEIVE txn id
11891: IF l_loop_exit_status = 'E' THEN --{
11892: --Error out this DELIVER txn and set RTI record status to 'E'
11893: IF (g_asn_debug = 'Y') THEN
11894: asn_debug.put_line('Error out this DELIVER txn and set RTI record status to Error, as not able get RECEIVE txn_id....');
11895: END IF;
11896: x_cascaded_table(n).error_status := 'E';
11897: ELSIF l_loop_exit_status = 'S' THEN --{ l_loop_exit_status = 'S'
11890: --Check Loop exited successfuly by fetching the RECEIVE txn id
11891: IF l_loop_exit_status = 'E' THEN --{
11892: --Error out this DELIVER txn and set RTI record status to 'E'
11893: IF (g_asn_debug = 'Y') THEN
11894: asn_debug.put_line('Error out this DELIVER txn and set RTI record status to Error, as not able get RECEIVE txn_id....');
11895: END IF;
11896: x_cascaded_table(n).error_status := 'E';
11897: ELSIF l_loop_exit_status = 'S' THEN --{ l_loop_exit_status = 'S'
11898: --Check where to get the AVAILABLE qty for this DELIVER txn
11901: IF l_parent_receive_txn_in_rt = 'Y' THEN--{ l_parent_receive_txn_in_rt = 'Y'
11902: --Fetch AVAILABLE qty from mtl_supply using l_parent_transaction_id
11903:
11904: BEGIN --{
11905: IF (g_asn_debug = 'Y') THEN
11906: asn_debug.put_line('Fetching mtl_supply, from the fetched RECEIVE txn_id....'||l_parent_transaction_id);
11907: asn_debug.put_line('PO distribution id....'||x_po_transferrec.po_distribution_id);
11908: END IF;
11909: /*Fetch the available qty for DELIVER txn based on the shipment line from mtl_supply.
11902: --Fetch AVAILABLE qty from mtl_supply using l_parent_transaction_id
11903:
11904: BEGIN --{
11905: IF (g_asn_debug = 'Y') THEN
11906: asn_debug.put_line('Fetching mtl_supply, from the fetched RECEIVE txn_id....'||l_parent_transaction_id);
11907: asn_debug.put_line('PO distribution id....'||x_po_transferrec.po_distribution_id);
11908: END IF;
11909: /*Fetch the available qty for DELIVER txn based on the shipment line from mtl_supply.
11910: Reason: When RECEIPT txn is performed through forms, we won't get distribution details.
11903:
11904: BEGIN --{
11905: IF (g_asn_debug = 'Y') THEN
11906: asn_debug.put_line('Fetching mtl_supply, from the fetched RECEIVE txn_id....'||l_parent_transaction_id);
11907: asn_debug.put_line('PO distribution id....'||x_po_transferrec.po_distribution_id);
11908: END IF;
11909: /*Fetch the available qty for DELIVER txn based on the shipment line from mtl_supply.
11910: Reason: When RECEIPT txn is performed through forms, we won't get distribution details.
11911: For eg: Assume PO with 1 line(qty15) 1shipment(15) and
11935: EXCEPTION
11936: WHEN NO_DATA_FOUND THEN
11937: --Error out DELIVER txn and set RTI status to 'E'
11938: l_fetch_mtl_supply := 'E';
11939: IF (g_asn_debug = 'Y') THEN
11940: asn_debug.put_line('No data found exception in fetching mtl_supply');
11941: END IF;
11942: END; --} Begin ends
11943:
11936: WHEN NO_DATA_FOUND THEN
11937: --Error out DELIVER txn and set RTI status to 'E'
11938: l_fetch_mtl_supply := 'E';
11939: IF (g_asn_debug = 'Y') THEN
11940: asn_debug.put_line('No data found exception in fetching mtl_supply');
11941: END IF;
11942: END; --} Begin ends
11943:
11944: IF l_fetch_mtl_supply = 'E' THEN
11942: END; --} Begin ends
11943:
11944: IF l_fetch_mtl_supply = 'E' THEN
11945: --Error out this DELIVER txn and set RTI record status to 'E'
11946: IF (g_asn_debug = 'Y') THEN
11947: asn_debug.put_line('mtl_supply doesnot exist. error out the DELIVER txn...');
11948: END IF;
11949: x_cascaded_table(n).error_status := 'E';
11950:
11943:
11944: IF l_fetch_mtl_supply = 'E' THEN
11945: --Error out this DELIVER txn and set RTI record status to 'E'
11946: IF (g_asn_debug = 'Y') THEN
11947: asn_debug.put_line('mtl_supply doesnot exist. error out the DELIVER txn...');
11948: END IF;
11949: x_cascaded_table(n).error_status := 'E';
11950:
11951: --
11987:
11988: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
11989: END IF;
11990:
11991: IF (g_asn_debug = 'Y') THEN
11992: asn_debug.put_line('l_distribution_qty:'||l_distribution_qty);
11993: asn_debug.put_line('Check whether l_distribution_qty is already consumed by other DELIVER txn submitted with same group_id');
11994: END IF;
11995:
11988: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
11989: END IF;
11990:
11991: IF (g_asn_debug = 'Y') THEN
11992: asn_debug.put_line('l_distribution_qty:'||l_distribution_qty);
11993: asn_debug.put_line('Check whether l_distribution_qty is already consumed by other DELIVER txn submitted with same group_id');
11994: END IF;
11995:
11996: --Fetch sum of quantity of only pre processed 'DELIVER' txns in RTI for that group_id
11989: END IF;
11990:
11991: IF (g_asn_debug = 'Y') THEN
11992: asn_debug.put_line('l_distribution_qty:'||l_distribution_qty);
11993: asn_debug.put_line('Check whether l_distribution_qty is already consumed by other DELIVER txn submitted with same group_id');
11994: END IF;
11995:
11996: --Fetch sum of quantity of only pre processed 'DELIVER' txns in RTI for that group_id
11997: --and po_shipment_line, to get total_deliver_qty for that po_shipment_line
12010: AND po_line_location_id = x_po_transferrec.po_line_location_id
12011: AND interface_transaction_id < x_cascaded_table(n).interface_transaction_id;
12012: EXCEPTION
12013: WHEN NO_DATA_FOUND then
12014: IF (g_asn_debug = 'Y') THEN
12015: asn_debug.put_line('No data found exception while fetching sum of delivered qty..');
12016: END IF;
12017: l_total_deliver_quantity := 0;
12018: END;--} Begin ends
12011: AND interface_transaction_id < x_cascaded_table(n).interface_transaction_id;
12012: EXCEPTION
12013: WHEN NO_DATA_FOUND then
12014: IF (g_asn_debug = 'Y') THEN
12015: asn_debug.put_line('No data found exception while fetching sum of delivered qty..');
12016: END IF;
12017: l_total_deliver_quantity := 0;
12018: END;--} Begin ends
12019:
12016: END IF;
12017: l_total_deliver_quantity := 0;
12018: END;--} Begin ends
12019:
12020: IF (g_asn_debug = 'Y') THEN
12021: asn_debug.put_line('Sum of delivered qty for preprocessed DELIVERED txns..'||l_total_deliver_quantity);
12022: END IF;
12023:
12024: --x_cascaded_table(n).quantity -> transaction qty of current Deliver txn
12017: l_total_deliver_quantity := 0;
12018: END;--} Begin ends
12019:
12020: IF (g_asn_debug = 'Y') THEN
12021: asn_debug.put_line('Sum of delivered qty for preprocessed DELIVERED txns..'||l_total_deliver_quantity);
12022: END IF;
12023:
12024: --x_cascaded_table(n).quantity -> transaction qty of current Deliver txn
12025: -- l_distribution_qty -> qty available in mtl_supply
12025: -- l_distribution_qty -> qty available in mtl_supply
12026: -- l_total_deliver_quantity -> Quantity already consumed by the DELIVER txns(only precprocessed RTI record) submitted with the same group_id
12027: IF x_cascaded_table(n).quantity > (l_distribution_qty - l_total_deliver_quantity) THEN --{ x_cascaded_table(n).quantity > (l_distribution_qty - l_total_deliver_quantity)
12028: --Error out this DELIVERY txn, as it results in Over delivery on that distribution
12029: IF (g_asn_debug = 'Y') THEN
12030: asn_debug.put_line('Error out this DELIVERY txn, as it results in Over delivery on that distribution'||x_po_transferrec.po_distribution_id);
12031: END IF;
12032: x_cascaded_table(n).error_status := 'E';
12033:
12026: -- l_total_deliver_quantity -> Quantity already consumed by the DELIVER txns(only precprocessed RTI record) submitted with the same group_id
12027: IF x_cascaded_table(n).quantity > (l_distribution_qty - l_total_deliver_quantity) THEN --{ x_cascaded_table(n).quantity > (l_distribution_qty - l_total_deliver_quantity)
12028: --Error out this DELIVERY txn, as it results in Over delivery on that distribution
12029: IF (g_asn_debug = 'Y') THEN
12030: asn_debug.put_line('Error out this DELIVERY txn, as it results in Over delivery on that distribution'||x_po_transferrec.po_distribution_id);
12031: END IF;
12032: x_cascaded_table(n).error_status := 'E';
12033:
12034: --
12073: END IF;--} x_cascaded_table(n).quantity > (l_distribution_qty - l_total_deliver_quantity)
12074: --} l_parent_receive_txn_in_rt = 'Y'
12075: ELSIF l_parent_receive_txn_in_rt = 'N' THEN--{ l_parent_receive_txn_in_rt = 'N'
12076: --Fetch the AVAILABLE qty from rcv_transactions_interface using l_parent_interface_txn_id
12077: IF (g_asn_debug = 'Y') THEN
12078: asn_debug.put_line('Fetching AVAILABLE qty from fetched RECEIVE interface_txn_id....');
12079: END IF;
12080:
12081: --Fetch sum of quantity of all preprocessed 'RECEIVE' txns loaded in RTI for that group_id
12074: --} l_parent_receive_txn_in_rt = 'Y'
12075: ELSIF l_parent_receive_txn_in_rt = 'N' THEN--{ l_parent_receive_txn_in_rt = 'N'
12076: --Fetch the AVAILABLE qty from rcv_transactions_interface using l_parent_interface_txn_id
12077: IF (g_asn_debug = 'Y') THEN
12078: asn_debug.put_line('Fetching AVAILABLE qty from fetched RECEIVE interface_txn_id....');
12079: END IF;
12080:
12081: --Fetch sum of quantity of all preprocessed 'RECEIVE' txns loaded in RTI for that group_id
12082: --and po_line_location_id, to get total_receive_qty for that po_line_location_id
12082: --and po_line_location_id, to get total_receive_qty for that po_line_location_id
12083: --( by this filter interface_transaction_id < x_po_transferrec.interface_transaction_id,
12084: -- only fetching preprocessed RECEIVE txn)
12085: --x_po_transferrec.interface_transaction_id is holding 'DELIVER' txn id
12086: IF (g_asn_debug = 'Y') THEN
12087: asn_debug.put_line('Fetching sum of received qty for preprocessed RECEIVE txns....');
12088: END IF;
12089:
12090: BEGIN --{
12083: --( by this filter interface_transaction_id < x_po_transferrec.interface_transaction_id,
12084: -- only fetching preprocessed RECEIVE txn)
12085: --x_po_transferrec.interface_transaction_id is holding 'DELIVER' txn id
12086: IF (g_asn_debug = 'Y') THEN
12087: asn_debug.put_line('Fetching sum of received qty for preprocessed RECEIVE txns....');
12088: END IF;
12089:
12090: BEGIN --{
12091: SELECT nvl(sum(quantity),0)
12099: AND po_line_location_id = x_po_transferrec.po_line_location_id
12100: AND interface_transaction_id < x_cascaded_table(n).interface_transaction_id;
12101: EXCEPTION
12102: WHEN NO_DATA_FOUND then
12103: IF (g_asn_debug = 'Y') THEN
12104: asn_debug.put_line('No data found exception while fetching sum of received qty..');
12105: END IF;
12106: l_total_receiving_quantity := 0;
12107: END;--} Begin ends
12100: AND interface_transaction_id < x_cascaded_table(n).interface_transaction_id;
12101: EXCEPTION
12102: WHEN NO_DATA_FOUND then
12103: IF (g_asn_debug = 'Y') THEN
12104: asn_debug.put_line('No data found exception while fetching sum of received qty..');
12105: END IF;
12106: l_total_receiving_quantity := 0;
12107: END;--} Begin ends
12108:
12105: END IF;
12106: l_total_receiving_quantity := 0;
12107: END;--} Begin ends
12108:
12109: IF (g_asn_debug = 'Y') THEN
12110: asn_debug.put_line('Sum of received qty for preprocessed RECEIVE txns..'||l_total_receiving_quantity);
12111: asn_debug.put_line('Fetching sum of Delivered qty for preprocessed DELIVER txns, excluding current deliver txn...');
12112: END IF;
12113:
12106: l_total_receiving_quantity := 0;
12107: END;--} Begin ends
12108:
12109: IF (g_asn_debug = 'Y') THEN
12110: asn_debug.put_line('Sum of received qty for preprocessed RECEIVE txns..'||l_total_receiving_quantity);
12111: asn_debug.put_line('Fetching sum of Delivered qty for preprocessed DELIVER txns, excluding current deliver txn...');
12112: END IF;
12113:
12114: --Fetch sum of quantity of only pre processed 'DELIVER' txns in RTI for that group_id
12107: END;--} Begin ends
12108:
12109: IF (g_asn_debug = 'Y') THEN
12110: asn_debug.put_line('Sum of received qty for preprocessed RECEIVE txns..'||l_total_receiving_quantity);
12111: asn_debug.put_line('Fetching sum of Delivered qty for preprocessed DELIVER txns, excluding current deliver txn...');
12112: END IF;
12113:
12114: --Fetch sum of quantity of only pre processed 'DELIVER' txns in RTI for that group_id
12115: --and po_line_location_id, to get total_deliver_qty for that po_distribution_id
12127: AND po_line_location_id = x_po_transferrec.po_line_location_id
12128: AND interface_transaction_id < x_cascaded_table(n).interface_transaction_id;
12129: EXCEPTION
12130: WHEN NO_DATA_FOUND then
12131: IF (g_asn_debug = 'Y') THEN
12132: asn_debug.put_line('No data found exception while fetching sum of delivered qty..');
12133: END IF;
12134: l_total_deliver_quantity := 0;
12135: END;
12128: AND interface_transaction_id < x_cascaded_table(n).interface_transaction_id;
12129: EXCEPTION
12130: WHEN NO_DATA_FOUND then
12131: IF (g_asn_debug = 'Y') THEN
12132: asn_debug.put_line('No data found exception while fetching sum of delivered qty..');
12133: END IF;
12134: l_total_deliver_quantity := 0;
12135: END;
12136:
12133: END IF;
12134: l_total_deliver_quantity := 0;
12135: END;
12136:
12137: IF (g_asn_debug = 'Y') THEN
12138: asn_debug.put_line('Sum of delivered qty for preprocessed DELIVERED txns..'||l_total_deliver_quantity);
12139: asn_debug.put_line('Fetching receive qty for RECEIVE txn...');
12140: END IF;
12141:
12134: l_total_deliver_quantity := 0;
12135: END;
12136:
12137: IF (g_asn_debug = 'Y') THEN
12138: asn_debug.put_line('Sum of delivered qty for preprocessed DELIVERED txns..'||l_total_deliver_quantity);
12139: asn_debug.put_line('Fetching receive qty for RECEIVE txn...');
12140: END IF;
12141:
12142: --Fetch the receive quantity for the 'RECEIVE'txn of the current DELIVER txn
12135: END;
12136:
12137: IF (g_asn_debug = 'Y') THEN
12138: asn_debug.put_line('Sum of delivered qty for preprocessed DELIVERED txns..'||l_total_deliver_quantity);
12139: asn_debug.put_line('Fetching receive qty for RECEIVE txn...');
12140: END IF;
12141:
12142: --Fetch the receive quantity for the 'RECEIVE'txn of the current DELIVER txn
12143: SELECT quantity
12144: INTO l_receive_quantity
12145: FROM rcv_transactions_interface
12146: WHERE interface_transaction_id = l_parent_interface_txn_id;
12147:
12148: IF (g_asn_debug = 'Y') THEN
12149: asn_debug.put_line('Receive qty for RECEIVE txn...'||l_receive_quantity);
12150: asn_debug.put_line('Fetching deliver qty for DELIVER txn...');
12151: END IF;
12152: --Fetch the deliver quantity for the current 'DELIVER'txn
12145: FROM rcv_transactions_interface
12146: WHERE interface_transaction_id = l_parent_interface_txn_id;
12147:
12148: IF (g_asn_debug = 'Y') THEN
12149: asn_debug.put_line('Receive qty for RECEIVE txn...'||l_receive_quantity);
12150: asn_debug.put_line('Fetching deliver qty for DELIVER txn...');
12151: END IF;
12152: --Fetch the deliver quantity for the current 'DELIVER'txn
12153: SELECT quantity
12146: WHERE interface_transaction_id = l_parent_interface_txn_id;
12147:
12148: IF (g_asn_debug = 'Y') THEN
12149: asn_debug.put_line('Receive qty for RECEIVE txn...'||l_receive_quantity);
12150: asn_debug.put_line('Fetching deliver qty for DELIVER txn...');
12151: END IF;
12152: --Fetch the deliver quantity for the current 'DELIVER'txn
12153: SELECT quantity
12154: INTO l_deliver_quantity
12154: INTO l_deliver_quantity
12155: FROM rcv_transactions_interface
12156: WHERE interface_transaction_id = x_cascaded_table(n).interface_transaction_id;
12157:
12158: IF (g_asn_debug = 'Y') THEN
12159: asn_debug.put_line('Deliver qty for DELIVER txn...'||l_deliver_quantity);
12160: END IF;
12161:
12162: IF (l_total_deliver_quantity + l_deliver_quantity) <= l_total_receiving_quantity THEN --{ (l_total_deliver_quantity + l_deliver_quantity) <= l_total_receiving_quantity
12155: FROM rcv_transactions_interface
12156: WHERE interface_transaction_id = x_cascaded_table(n).interface_transaction_id;
12157:
12158: IF (g_asn_debug = 'Y') THEN
12159: asn_debug.put_line('Deliver qty for DELIVER txn...'||l_deliver_quantity);
12160: END IF;
12161:
12162: IF (l_total_deliver_quantity + l_deliver_quantity) <= l_total_receiving_quantity THEN --{ (l_total_deliver_quantity + l_deliver_quantity) <= l_total_receiving_quantity
12163: --Not over delivery txn
12162: IF (l_total_deliver_quantity + l_deliver_quantity) <= l_total_receiving_quantity THEN --{ (l_total_deliver_quantity + l_deliver_quantity) <= l_total_receiving_quantity
12163: --Not over delivery txn
12164: --Check whether Receive txn line_location-id and deliver_txn line_location_id are same
12165: --and validate delivery qty is within the received qty
12166: IF (g_asn_debug = 'Y') THEN
12167: asn_debug.put_line('Not Over Delivery txn...');
12168: END IF;
12169: IF l_deliver_quantity <= l_receive_quantity THEN
12170: --Allow this deliver transaction
12163: --Not over delivery txn
12164: --Check whether Receive txn line_location-id and deliver_txn line_location_id are same
12165: --and validate delivery qty is within the received qty
12166: IF (g_asn_debug = 'Y') THEN
12167: asn_debug.put_line('Not Over Delivery txn...');
12168: END IF;
12169: IF l_deliver_quantity <= l_receive_quantity THEN
12170: --Allow this deliver transaction
12171: IF (g_asn_debug = 'Y') THEN
12167: asn_debug.put_line('Not Over Delivery txn...');
12168: END IF;
12169: IF l_deliver_quantity <= l_receive_quantity THEN
12170: --Allow this deliver transaction
12171: IF (g_asn_debug = 'Y') THEN
12172: asn_debug.put_line('Delivery qty <= received qty...');
12173: END IF;
12174: l_distribution_qty := l_receive_quantity;
12175: ELSE
12168: END IF;
12169: IF l_deliver_quantity <= l_receive_quantity THEN
12170: --Allow this deliver transaction
12171: IF (g_asn_debug = 'Y') THEN
12172: asn_debug.put_line('Delivery qty <= received qty...');
12173: END IF;
12174: l_distribution_qty := l_receive_quantity;
12175: ELSE
12176: --Over delivery for that Receive txn on the spefied distribution, error out this deliver txn
12173: END IF;
12174: l_distribution_qty := l_receive_quantity;
12175: ELSE
12176: --Over delivery for that Receive txn on the spefied distribution, error out this deliver txn
12177: IF (g_asn_debug = 'Y') THEN
12178: asn_debug.put_line('deliver qty > received qty.');
12179: END IF;
12180: x_cascaded_table(n).error_status := 'E';
12181:
12174: l_distribution_qty := l_receive_quantity;
12175: ELSE
12176: --Over delivery for that Receive txn on the spefied distribution, error out this deliver txn
12177: IF (g_asn_debug = 'Y') THEN
12178: asn_debug.put_line('deliver qty > received qty.');
12179: END IF;
12180: x_cascaded_table(n).error_status := 'E';
12181:
12182: --
12219: rcv_error_pkg.log_interface_error('QUANTITY', FALSE);
12220: END IF;
12221: ELSE
12222: --Over delivery for that Receive txn on the spefied distribution, error out this deliver txn
12223: IF (g_asn_debug = 'Y') THEN
12224: asn_debug.put_line('Trying to perform over Delivery txn, on the specified distribution...Error out this Deliver txn..');
12225: END IF;
12226: x_cascaded_table(n).error_status := 'E';
12227:
12220: END IF;
12221: ELSE
12222: --Over delivery for that Receive txn on the spefied distribution, error out this deliver txn
12223: IF (g_asn_debug = 'Y') THEN
12224: asn_debug.put_line('Trying to perform over Delivery txn, on the specified distribution...Error out this Deliver txn..');
12225: END IF;
12226: x_cascaded_table(n).error_status := 'E';
12227:
12228: --
12304: x_po_transferrec.rcv_transaction_id,
12305: x_cascaded_table(n).interface_transaction_id) LOOP
12306: l_deliver_quantity:=rtirec.quantity;
12307: l_unit_of_measure:=rtirec.unit_of_measure;
12308: asn_debug.put_line('Quantity in RTI Processed before uom conversion is = '||l_deliver_quantity
12309: ||' in uom = '||l_unit_of_measure);
12310: if(l_ship_unit<>l_unit_of_measure) then
12311: l_deliver_quantity := convert_into_correct_qty(l_deliver_quantity,
12312: l_unit_of_measure,
12312: l_unit_of_measure,
12313: temp_cascaded_table(current_n).item_id,
12314: l_ship_unit
12315: );
12316: asn_debug.put_line('Quantity in RTI Processed after uom conversion is = '||l_deliver_quantity
12317: ||' in uom = '||l_ship_unit);
12318: end if;
12319: l_total_deliver_quantity:=l_total_deliver_quantity+l_deliver_quantity;
12320: asn_debug.put_line('Total Quantity in RTI is = '||l_total_deliver_quantity
12316: asn_debug.put_line('Quantity in RTI Processed after uom conversion is = '||l_deliver_quantity
12317: ||' in uom = '||l_ship_unit);
12318: end if;
12319: l_total_deliver_quantity:=l_total_deliver_quantity+l_deliver_quantity;
12320: asn_debug.put_line('Total Quantity in RTI is = '||l_total_deliver_quantity
12321: ||' in uom = '||l_ship_unit);
12322: END LOOP;
12323: asn_debug.put_line('Total quantity in RTI Processed is = '||l_total_deliver_quantity
12324: ||' in uom = '||l_ship_unit);
12319: l_total_deliver_quantity:=l_total_deliver_quantity+l_deliver_quantity;
12320: asn_debug.put_line('Total Quantity in RTI is = '||l_total_deliver_quantity
12321: ||' in uom = '||l_ship_unit);
12322: END LOOP;
12323: asn_debug.put_line('Total quantity in RTI Processed is = '||l_total_deliver_quantity
12324: ||' in uom = '||l_ship_unit);
12325: l_distribution_qty:=l_distribution_qty-l_total_deliver_quantity;
12326:
12327: END IF; --
12329: --} l_po_deliver_rti_cursor_opened != 1
12330: END IF; ----}l_po_deliver_rti_cursor_opened = 1
12331:
12332: -- Bug 7675516
12333: IF (g_asn_debug = 'Y') THEN
12334: asn_debug.put_line('l_distribution_qty = ' || l_distribution_qty);
12335: asn_debug.put_line('l_ship_unit = ' || l_ship_unit);
12336: asn_debug.put_line('temp_cascaded_table(current_n).item_id = ' || temp_cascaded_table(current_n).item_id);
12337: asn_debug.put_line('x_po_transferrec.unit_of_meas = ' || x_po_transferrec.unit_of_meas);
12330: END IF; ----}l_po_deliver_rti_cursor_opened = 1
12331:
12332: -- Bug 7675516
12333: IF (g_asn_debug = 'Y') THEN
12334: asn_debug.put_line('l_distribution_qty = ' || l_distribution_qty);
12335: asn_debug.put_line('l_ship_unit = ' || l_ship_unit);
12336: asn_debug.put_line('temp_cascaded_table(current_n).item_id = ' || temp_cascaded_table(current_n).item_id);
12337: asn_debug.put_line('x_po_transferrec.unit_of_meas = ' || x_po_transferrec.unit_of_meas);
12338: asn_debug.put_line('temp_cascaded_table(current_n).quantity = ' || temp_cascaded_table(current_n).quantity);
12331:
12332: -- Bug 7675516
12333: IF (g_asn_debug = 'Y') THEN
12334: asn_debug.put_line('l_distribution_qty = ' || l_distribution_qty);
12335: asn_debug.put_line('l_ship_unit = ' || l_ship_unit);
12336: asn_debug.put_line('temp_cascaded_table(current_n).item_id = ' || temp_cascaded_table(current_n).item_id);
12337: asn_debug.put_line('x_po_transferrec.unit_of_meas = ' || x_po_transferrec.unit_of_meas);
12338: asn_debug.put_line('temp_cascaded_table(current_n).quantity = ' || temp_cascaded_table(current_n).quantity);
12339: asn_debug.put_line('temp_cascaded_table(current_n).unit_of_measure = ' || temp_cascaded_table(current_n).unit_of_measure);
12332: -- Bug 7675516
12333: IF (g_asn_debug = 'Y') THEN
12334: asn_debug.put_line('l_distribution_qty = ' || l_distribution_qty);
12335: asn_debug.put_line('l_ship_unit = ' || l_ship_unit);
12336: asn_debug.put_line('temp_cascaded_table(current_n).item_id = ' || temp_cascaded_table(current_n).item_id);
12337: asn_debug.put_line('x_po_transferrec.unit_of_meas = ' || x_po_transferrec.unit_of_meas);
12338: asn_debug.put_line('temp_cascaded_table(current_n).quantity = ' || temp_cascaded_table(current_n).quantity);
12339: asn_debug.put_line('temp_cascaded_table(current_n).unit_of_measure = ' || temp_cascaded_table(current_n).unit_of_measure);
12340: END IF;
12333: IF (g_asn_debug = 'Y') THEN
12334: asn_debug.put_line('l_distribution_qty = ' || l_distribution_qty);
12335: asn_debug.put_line('l_ship_unit = ' || l_ship_unit);
12336: asn_debug.put_line('temp_cascaded_table(current_n).item_id = ' || temp_cascaded_table(current_n).item_id);
12337: asn_debug.put_line('x_po_transferrec.unit_of_meas = ' || x_po_transferrec.unit_of_meas);
12338: asn_debug.put_line('temp_cascaded_table(current_n).quantity = ' || temp_cascaded_table(current_n).quantity);
12339: asn_debug.put_line('temp_cascaded_table(current_n).unit_of_measure = ' || temp_cascaded_table(current_n).unit_of_measure);
12340: END IF;
12341: -- End Bug 7675516
12334: asn_debug.put_line('l_distribution_qty = ' || l_distribution_qty);
12335: asn_debug.put_line('l_ship_unit = ' || l_ship_unit);
12336: asn_debug.put_line('temp_cascaded_table(current_n).item_id = ' || temp_cascaded_table(current_n).item_id);
12337: asn_debug.put_line('x_po_transferrec.unit_of_meas = ' || x_po_transferrec.unit_of_meas);
12338: asn_debug.put_line('temp_cascaded_table(current_n).quantity = ' || temp_cascaded_table(current_n).quantity);
12339: asn_debug.put_line('temp_cascaded_table(current_n).unit_of_measure = ' || temp_cascaded_table(current_n).unit_of_measure);
12340: END IF;
12341: -- End Bug 7675516
12342: -- } bugfix 5354379
12335: asn_debug.put_line('l_ship_unit = ' || l_ship_unit);
12336: asn_debug.put_line('temp_cascaded_table(current_n).item_id = ' || temp_cascaded_table(current_n).item_id);
12337: asn_debug.put_line('x_po_transferrec.unit_of_meas = ' || x_po_transferrec.unit_of_meas);
12338: asn_debug.put_line('temp_cascaded_table(current_n).quantity = ' || temp_cascaded_table(current_n).quantity);
12339: asn_debug.put_line('temp_cascaded_table(current_n).unit_of_measure = ' || temp_cascaded_table(current_n).unit_of_measure);
12340: END IF;
12341: -- End Bug 7675516
12342: -- } bugfix 5354379
12343:
12354: temp_cascaded_table(current_n).item_id,
12355: x_po_transferrec.unit_of_meas
12356: ); -- in parents uom
12357:
12358: IF (g_asn_debug = 'Y') THEN
12359: asn_debug.put_line('l_total_rec_quantity ' || l_total_rec_quantity);
12360: asn_debug.put_line('l_converted_transaction_qty ' || l_converted_transaction_qty);
12361: asn_debug.put_line('l_converted_distribution_qty ' || l_converted_distribution_qty);
12362: END IF;
12355: x_po_transferrec.unit_of_meas
12356: ); -- in parents uom
12357:
12358: IF (g_asn_debug = 'Y') THEN
12359: asn_debug.put_line('l_total_rec_quantity ' || l_total_rec_quantity);
12360: asn_debug.put_line('l_converted_transaction_qty ' || l_converted_transaction_qty);
12361: asn_debug.put_line('l_converted_distribution_qty ' || l_converted_distribution_qty);
12362: END IF;
12363:
12356: ); -- in parents uom
12357:
12358: IF (g_asn_debug = 'Y') THEN
12359: asn_debug.put_line('l_total_rec_quantity ' || l_total_rec_quantity);
12360: asn_debug.put_line('l_converted_transaction_qty ' || l_converted_transaction_qty);
12361: asn_debug.put_line('l_converted_distribution_qty ' || l_converted_distribution_qty);
12362: END IF;
12363:
12364: IF ( (l_converted_transaction_qty <= l_total_rec_quantity)
12357:
12358: IF (g_asn_debug = 'Y') THEN
12359: asn_debug.put_line('l_total_rec_quantity ' || l_total_rec_quantity);
12360: asn_debug.put_line('l_converted_transaction_qty ' || l_converted_transaction_qty);
12361: asn_debug.put_line('l_converted_distribution_qty ' || l_converted_distribution_qty);
12362: END IF;
12363:
12364: IF ( (l_converted_transaction_qty <= l_total_rec_quantity)
12365: AND (l_converted_transaction_qty <= l_converted_distribution_qty)) THEN
12367: ELSE
12368: x_converted_parent_trx_qty := 0;
12369: END IF;
12370:
12371: IF (g_asn_debug = 'Y') THEN
12372: asn_debug.put_line('Available qty for standard multiple distributions deliver ' || x_converted_parent_trx_qty);
12373: asn_debug.put_line('l_converted_distribution_qty ' || l_converted_distribution_qty);
12374: asn_debug.put_line('l_converted_transaction_qty ' || l_converted_transaction_qty);
12375: END IF;
12368: x_converted_parent_trx_qty := 0;
12369: END IF;
12370:
12371: IF (g_asn_debug = 'Y') THEN
12372: asn_debug.put_line('Available qty for standard multiple distributions deliver ' || x_converted_parent_trx_qty);
12373: asn_debug.put_line('l_converted_distribution_qty ' || l_converted_distribution_qty);
12374: asn_debug.put_line('l_converted_transaction_qty ' || l_converted_transaction_qty);
12375: END IF;
12376: END IF; --}
12369: END IF;
12370:
12371: IF (g_asn_debug = 'Y') THEN
12372: asn_debug.put_line('Available qty for standard multiple distributions deliver ' || x_converted_parent_trx_qty);
12373: asn_debug.put_line('l_converted_distribution_qty ' || l_converted_distribution_qty);
12374: asn_debug.put_line('l_converted_transaction_qty ' || l_converted_transaction_qty);
12375: END IF;
12376: END IF; --}
12377:
12370:
12371: IF (g_asn_debug = 'Y') THEN
12372: asn_debug.put_line('Available qty for standard multiple distributions deliver ' || x_converted_parent_trx_qty);
12373: asn_debug.put_line('l_converted_distribution_qty ' || l_converted_distribution_qty);
12374: asn_debug.put_line('l_converted_transaction_qty ' || l_converted_transaction_qty);
12375: END IF;
12376: END IF; --}
12377:
12378: IF ( (x_converted_parent_trx_qty = 0)
12378: IF ( (x_converted_parent_trx_qty = 0)
12379: AND ( (temp_cascaded_table(1).transaction_type <> 'DELIVER')
12380: OR ( temp_cascaded_table(1).transaction_type = 'DELIVER'
12381: AND l_num_of_distributions = 1))) THEN --{
12382: IF (g_asn_debug = 'Y') THEN
12383: asn_debug.put_line('calling transfer get_available_qty ');
12384: END IF;
12385:
12386: rcv_quantities_s.get_available_quantity('TRANSFER',
12379: AND ( (temp_cascaded_table(1).transaction_type <> 'DELIVER')
12380: OR ( temp_cascaded_table(1).transaction_type = 'DELIVER'
12381: AND l_num_of_distributions = 1))) THEN --{
12382: IF (g_asn_debug = 'Y') THEN
12383: asn_debug.put_line('calling transfer get_available_qty ');
12384: END IF;
12385:
12386: rcv_quantities_s.get_available_quantity('TRANSFER',
12387: x_po_transferrec.rcv_transaction_id,
12396: x_secondary_available_qty
12397: );
12398: END IF; --}
12399:
12400: IF (g_asn_debug = 'Y') THEN
12401: asn_debug.put_line('qty from GET_AVAILABLE_QUANTITY for transfer is ' || x_converted_parent_trx_qty);
12402: END IF;
12403:
12404: x_remaining_qty_parent_uom := convert_into_correct_qty(x_remaining_quantity,
12397: );
12398: END IF; --}
12399:
12400: IF (g_asn_debug = 'Y') THEN
12401: asn_debug.put_line('qty from GET_AVAILABLE_QUANTITY for transfer is ' || x_converted_parent_trx_qty);
12402: END IF;
12403:
12404: x_remaining_qty_parent_uom := convert_into_correct_qty(x_remaining_quantity,
12405: temp_cascaded_table(1).unit_of_measure,
12407: x_po_transferrec.unit_of_meas
12408: );
12409:
12410: IF (x_remaining_qty_parent_uom = 0) THEN
12411: IF (g_asn_debug = 'Y') THEN
12412: asn_debug.put_line(' Transfer Need an error message in the interface tables');
12413: END IF;
12414: ELSE
12415: /* Converted qty successfully and we have some quantity on which we can act */
12408: );
12409:
12410: IF (x_remaining_qty_parent_uom = 0) THEN
12411: IF (g_asn_debug = 'Y') THEN
12412: asn_debug.put_line(' Transfer Need an error message in the interface tables');
12413: END IF;
12414: ELSE
12415: /* Converted qty successfully and we have some quantity on which we can act */
12416: IF (g_asn_debug = 'Y') THEN
12412: asn_debug.put_line(' Transfer Need an error message in the interface tables');
12413: END IF;
12414: ELSE
12415: /* Converted qty successfully and we have some quantity on which we can act */
12416: IF (g_asn_debug = 'Y') THEN
12417: asn_debug.put_line('Converted trx qty that is available ' || x_converted_parent_trx_qty);
12418: asn_debug.put_line('Remaining qty in parents uom that is available ' || x_remaining_qty_parent_uom);
12419: END IF;
12420:
12413: END IF;
12414: ELSE
12415: /* Converted qty successfully and we have some quantity on which we can act */
12416: IF (g_asn_debug = 'Y') THEN
12417: asn_debug.put_line('Converted trx qty that is available ' || x_converted_parent_trx_qty);
12418: asn_debug.put_line('Remaining qty in parents uom that is available ' || x_remaining_qty_parent_uom);
12419: END IF;
12420:
12421: IF (x_converted_parent_trx_qty > 0) THEN --{
12414: ELSE
12415: /* Converted qty successfully and we have some quantity on which we can act */
12416: IF (g_asn_debug = 'Y') THEN
12417: asn_debug.put_line('Converted trx qty that is available ' || x_converted_parent_trx_qty);
12418: asn_debug.put_line('Remaining qty in parents uom that is available ' || x_remaining_qty_parent_uom);
12419: END IF;
12420:
12421: IF (x_converted_parent_trx_qty > 0) THEN --{
12422: --Bug 8631613 Rounding the remaining qty to 14 decimals.
12439: END IF;
12440:
12441: insert_into_table := TRUE;
12442: ELSE --}{
12443: IF (g_asn_debug = 'Y') THEN
12444: asn_debug.put_line('We are in >= Qty branch ');
12445: END IF;
12446:
12447: x_converted_parent_trx_qty := x_remaining_qty_parent_uom;
12440:
12441: insert_into_table := TRUE;
12442: ELSE --}{
12443: IF (g_asn_debug = 'Y') THEN
12444: asn_debug.put_line('We are in >= Qty branch ');
12445: END IF;
12446:
12447: x_converted_parent_trx_qty := x_remaining_qty_parent_uom;
12448: insert_into_table := TRUE;
12452: ELSE /* x_converted_parent_trx_qty >0 */ --}{
12453: IF rows_fetched = x_record_count THEN -- { last row needs to be inserted anyway
12454: -- so that the row can be used based on qty tolerance
12455: -- checks
12456: IF (g_asn_debug = 'Y') THEN
12457: asn_debug.put_line('Quantity is less then 0 but last record');
12458: END IF;
12459:
12460: insert_into_table := TRUE;
12453: IF rows_fetched = x_record_count THEN -- { last row needs to be inserted anyway
12454: -- so that the row can be used based on qty tolerance
12455: -- checks
12456: IF (g_asn_debug = 'Y') THEN
12457: asn_debug.put_line('Quantity is less then 0 but last record');
12458: END IF;
12459:
12460: insert_into_table := TRUE;
12461: x_converted_trx_qty := 0;
12459:
12460: insert_into_table := TRUE;
12461: x_converted_trx_qty := 0;
12462: ELSE --}{
12463: IF (g_asn_debug = 'Y') THEN
12464: asn_debug.put_line('<= 0 Quantity but more records in cursor');
12465: END IF;
12466:
12467: x_remaining_qty_po_uom := 0; -- we may have a diff uom on the next iteration
12460: insert_into_table := TRUE;
12461: x_converted_trx_qty := 0;
12462: ELSE --}{
12463: IF (g_asn_debug = 'Y') THEN
12464: asn_debug.put_line('<= 0 Quantity but more records in cursor');
12465: END IF;
12466:
12467: x_remaining_qty_po_uom := 0; -- we may have a diff uom on the next iteration
12468:
12465: END IF;
12466:
12467: x_remaining_qty_po_uom := 0; -- we may have a diff uom on the next iteration
12468:
12469: IF (g_asn_debug = 'Y') THEN
12470: asn_debug.put_line('We have to deal with remaining_qty > 0 and x_converted_trx_qty -ve');
12471: END IF;
12472:
12473: insert_into_table := FALSE;
12466:
12467: x_remaining_qty_po_uom := 0; -- we may have a diff uom on the next iteration
12468:
12469: IF (g_asn_debug = 'Y') THEN
12470: asn_debug.put_line('We have to deal with remaining_qty > 0 and x_converted_trx_qty -ve');
12471: END IF;
12472:
12473: insert_into_table := FALSE;
12474: END IF; --}
12475: END IF; /*x_converted_parent_trx_qty >0 */ --}
12476: END IF;
12477:
12478: /* Converted qty successfully and we have some quantity on which we can act */
12479: IF (g_asn_debug = 'Y') THEN
12480: asn_debug.put_line('Transaction qty in terms of the parents uom is ' || x_converted_parent_trx_qty);
12481: END IF;
12482:
12483: IF insert_into_table THEN --{ --start
12476: END IF;
12477:
12478: /* Converted qty successfully and we have some quantity on which we can act */
12479: IF (g_asn_debug = 'Y') THEN
12480: asn_debug.put_line('Transaction qty in terms of the parents uom is ' || x_converted_parent_trx_qty);
12481: END IF;
12482:
12483: IF insert_into_table THEN --{ --start
12484: IF (x_first_trans) THEN --{
12481: END IF;
12482:
12483: IF insert_into_table THEN --{ --start
12484: IF (x_first_trans) THEN --{
12485: IF (g_asn_debug = 'Y') THEN
12486: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
12487: END IF;
12488:
12489: x_first_trans := FALSE;
12482:
12483: IF insert_into_table THEN --{ --start
12484: IF (x_first_trans) THEN --{
12485: IF (g_asn_debug = 'Y') THEN
12486: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
12487: END IF;
12488:
12489: x_first_trans := FALSE;
12490: ELSE --}{
12487: END IF;
12488:
12489: x_first_trans := FALSE;
12490: ELSE --}{
12491: IF (g_asn_debug = 'Y') THEN
12492: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
12493: END IF;
12494:
12495: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
12488:
12489: x_first_trans := FALSE;
12490: ELSE --}{
12491: IF (g_asn_debug = 'Y') THEN
12492: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
12493: END IF;
12494:
12495: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
12496: END IF; --}
12516: temp_cascaded_table(current_n).unit_of_measure
12517: ); -- in asn uom*/
12518: --Bug 8631613
12519:
12520: IF (g_asn_debug = 'Y') THEN
12521: asn_debug.put_line('Transaction qty in terms of the transaction uom is ' || temp_cascaded_table(current_n).quantity);
12522: END IF;
12523: ELSE
12524: temp_cascaded_table(current_n).quantity := x_converted_parent_trx_qty;
12517: ); -- in asn uom*/
12518: --Bug 8631613
12519:
12520: IF (g_asn_debug = 'Y') THEN
12521: asn_debug.put_line('Transaction qty in terms of the transaction uom is ' || temp_cascaded_table(current_n).quantity);
12522: END IF;
12523: ELSE
12524: temp_cascaded_table(current_n).quantity := x_converted_parent_trx_qty;
12525: END IF;
12544: ELSE
12545: temp_cascaded_table(current_n).primary_quantity := x_converted_parent_trx_qty;
12546: END IF;
12547:
12548: IF (g_asn_debug = 'Y') THEN
12549: asn_debug.put_line('Transaction qty in terms of the primary uom is ' || temp_cascaded_table(current_n).primary_quantity);
12550: END IF;
12551:
12552: IF (NVL(x_cascaded_table(n).transaction_type, 'RECEIVE') = 'DELIVER') THEN --{
12545: temp_cascaded_table(current_n).primary_quantity := x_converted_parent_trx_qty;
12546: END IF;
12547:
12548: IF (g_asn_debug = 'Y') THEN
12549: asn_debug.put_line('Transaction qty in terms of the primary uom is ' || temp_cascaded_table(current_n).primary_quantity);
12550: END IF;
12551:
12552: IF (NVL(x_cascaded_table(n).transaction_type, 'RECEIVE') = 'DELIVER') THEN --{
12553: temp_cascaded_table(current_n).po_distribution_id := x_po_transferrec.po_distribution_id;
12557: -- temp_cascaded_table(current_n).currency_conversion_rate := x_po_transferrec.rate;
12558: temp_cascaded_table(current_n).destination_type_code := x_po_transferrec.destination_type_code;
12559: temp_cascaded_table(current_n).destination_context := x_po_transferrec.destination_type_code;
12560:
12561: IF (g_asn_debug = 'Y') THEN
12562: asn_debug.put_line(' po_dist ' || temp_cascaded_table(current_n).po_distribution_id);
12563: END IF;
12564:
12565: IF (NVL(temp_cascaded_table(current_n).deliver_to_location_id, 0) = 0) THEN
12558: temp_cascaded_table(current_n).destination_type_code := x_po_transferrec.destination_type_code;
12559: temp_cascaded_table(current_n).destination_context := x_po_transferrec.destination_type_code;
12560:
12561: IF (g_asn_debug = 'Y') THEN
12562: asn_debug.put_line(' po_dist ' || temp_cascaded_table(current_n).po_distribution_id);
12563: END IF;
12564:
12565: IF (NVL(temp_cascaded_table(current_n).deliver_to_location_id, 0) = 0) THEN
12566: temp_cascaded_table(current_n).deliver_to_location_id := x_po_transferrec.deliver_to_location_id;
12565: IF (NVL(temp_cascaded_table(current_n).deliver_to_location_id, 0) = 0) THEN
12566: temp_cascaded_table(current_n).deliver_to_location_id := x_po_transferrec.deliver_to_location_id;
12567: END IF;
12568:
12569: IF (g_asn_debug = 'Y') THEN
12570: asn_debug.put_line(' deliver_to_person_id ' || temp_cascaded_table(current_n).deliver_to_person_id);
12571: END IF;
12572:
12573: /* Bug 2392074 - If the deliver_to_person mentioned in the po_distributions is
12566: temp_cascaded_table(current_n).deliver_to_location_id := x_po_transferrec.deliver_to_location_id;
12567: END IF;
12568:
12569: IF (g_asn_debug = 'Y') THEN
12570: asn_debug.put_line(' deliver_to_person_id ' || temp_cascaded_table(current_n).deliver_to_person_id);
12571: END IF;
12572:
12573: /* Bug 2392074 - If the deliver_to_person mentioned in the po_distributions is
12574: invalid or inactive at the time of Receipt we need to clear the deliver to person,
12591: EXCEPTION
12592: WHEN NO_DATA_FOUND THEN
12593: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
12594:
12595: IF (g_asn_debug = 'Y') THEN
12596: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
12597: asn_debug.put_line(' So it is cleared off');
12598: END IF;
12599: WHEN OTHERS THEN
12592: WHEN NO_DATA_FOUND THEN
12593: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
12594:
12595: IF (g_asn_debug = 'Y') THEN
12596: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
12597: asn_debug.put_line(' So it is cleared off');
12598: END IF;
12599: WHEN OTHERS THEN
12600: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
12593: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
12594:
12595: IF (g_asn_debug = 'Y') THEN
12596: asn_debug.put_line('The deliver to person entered in PO is currently inactive');
12597: asn_debug.put_line(' So it is cleared off');
12598: END IF;
12599: WHEN OTHERS THEN
12600: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
12601:
12598: END IF;
12599: WHEN OTHERS THEN
12600: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
12601:
12602: IF (g_asn_debug = 'Y') THEN
12603: asn_debug.put_line('Some exception has occured');
12604: asn_debug.put_line('This exception is due to the PO deliver to person');
12605: asn_debug.put_line('The deliver to person is optional');
12606: asn_debug.put_line('So cleared off the deliver to person');
12599: WHEN OTHERS THEN
12600: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
12601:
12602: IF (g_asn_debug = 'Y') THEN
12603: asn_debug.put_line('Some exception has occured');
12604: asn_debug.put_line('This exception is due to the PO deliver to person');
12605: asn_debug.put_line('The deliver to person is optional');
12606: asn_debug.put_line('So cleared off the deliver to person');
12607: END IF;
12600: temp_cascaded_table(current_n).deliver_to_person_id := NULL;
12601:
12602: IF (g_asn_debug = 'Y') THEN
12603: asn_debug.put_line('Some exception has occured');
12604: asn_debug.put_line('This exception is due to the PO deliver to person');
12605: asn_debug.put_line('The deliver to person is optional');
12606: asn_debug.put_line('So cleared off the deliver to person');
12607: END IF;
12608: END;
12601:
12602: IF (g_asn_debug = 'Y') THEN
12603: asn_debug.put_line('Some exception has occured');
12604: asn_debug.put_line('This exception is due to the PO deliver to person');
12605: asn_debug.put_line('The deliver to person is optional');
12606: asn_debug.put_line('So cleared off the deliver to person');
12607: END IF;
12608: END;
12609: END IF; --}
12602: IF (g_asn_debug = 'Y') THEN
12603: asn_debug.put_line('Some exception has occured');
12604: asn_debug.put_line('This exception is due to the PO deliver to person');
12605: asn_debug.put_line('The deliver to person is optional');
12606: asn_debug.put_line('So cleared off the deliver to person');
12607: END IF;
12608: END;
12609: END IF; --}
12610: END IF; --}
12608: END;
12609: END IF; --}
12610: END IF; --}
12611:
12612: IF (g_asn_debug = 'Y') THEN
12613: asn_debug.put_line(' subinventory ' || temp_cascaded_table(current_n).subinventory);
12614: END IF;
12615:
12616: IF (temp_cascaded_table(current_n).subinventory IS NULL) THEN
12609: END IF; --}
12610: END IF; --}
12611:
12612: IF (g_asn_debug = 'Y') THEN
12613: asn_debug.put_line(' subinventory ' || temp_cascaded_table(current_n).subinventory);
12614: END IF;
12615:
12616: IF (temp_cascaded_table(current_n).subinventory IS NULL) THEN
12617: temp_cascaded_table(current_n).subinventory := x_po_transferrec.destination_subinventory;
12616: IF (temp_cascaded_table(current_n).subinventory IS NULL) THEN
12617: temp_cascaded_table(current_n).subinventory := x_po_transferrec.destination_subinventory;
12618: END IF;
12619:
12620: IF (g_asn_debug = 'Y') THEN
12621: asn_debug.put_line(' wip_entity_id ' || temp_cascaded_table(current_n).wip_entity_id);
12622: END IF;
12623:
12624: temp_cascaded_table(current_n).wip_entity_id := x_po_transferrec.wip_entity_id;
12617: temp_cascaded_table(current_n).subinventory := x_po_transferrec.destination_subinventory;
12618: END IF;
12619:
12620: IF (g_asn_debug = 'Y') THEN
12621: asn_debug.put_line(' wip_entity_id ' || temp_cascaded_table(current_n).wip_entity_id);
12622: END IF;
12623:
12624: temp_cascaded_table(current_n).wip_entity_id := x_po_transferrec.wip_entity_id;
12625: temp_cascaded_table(current_n).wip_operation_seq_num := x_po_transferrec.wip_operation_seq_num;
12627: temp_cascaded_table(current_n).wip_repetitive_schedule_id := x_po_transferrec.wip_repetitive_schedule_id;
12628: temp_cascaded_table(current_n).wip_line_id := x_po_transferrec.wip_line_id;
12629: temp_cascaded_table(current_n).bom_resource_id := x_po_transferrec.bom_resource_id;
12630:
12631: IF (g_asn_debug = 'Y') THEN
12632: asn_debug.put_line(' ussgl_transaction_code ' || temp_cascaded_table(current_n).ussgl_transaction_code);
12633: END IF;
12634:
12635: -- bug 1361786
12628: temp_cascaded_table(current_n).wip_line_id := x_po_transferrec.wip_line_id;
12629: temp_cascaded_table(current_n).bom_resource_id := x_po_transferrec.bom_resource_id;
12630:
12631: IF (g_asn_debug = 'Y') THEN
12632: asn_debug.put_line(' ussgl_transaction_code ' || temp_cascaded_table(current_n).ussgl_transaction_code);
12633: END IF;
12634:
12635: -- bug 1361786
12636: IF (temp_cascaded_table(current_n).ussgl_transaction_code IS NULL) THEN
12639: END IF; --}
12640:
12641: current_n := current_n + 1;
12642:
12643: IF (g_asn_debug = 'Y') THEN
12644: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
12645: END IF;
12646: END IF; --}
12647: /* Get the available qty in PRIMARY UOM */
12640:
12641: current_n := current_n + 1;
12642:
12643: IF (g_asn_debug = 'Y') THEN
12644: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
12645: END IF;
12646: END IF; --}
12647: /* Get the available qty in PRIMARY UOM */
12648: /*
12654: */
12655: END LOOP; --}
12656: ELSE --} {
12657: -- error_status and error_message are set after validate_quantity_shipped
12658: IF (g_asn_debug = 'Y') THEN
12659: asn_debug.put_line('No parent_transaction_id or parent_interface_transaction_id ');
12660: END IF;
12661:
12662: IF (g_asn_debug = 'Y') THEN
12655: END LOOP; --}
12656: ELSE --} {
12657: -- error_status and error_message are set after validate_quantity_shipped
12658: IF (g_asn_debug = 'Y') THEN
12659: asn_debug.put_line('No parent_transaction_id or parent_interface_transaction_id ');
12660: END IF;
12661:
12662: IF (g_asn_debug = 'Y') THEN
12663: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
12658: IF (g_asn_debug = 'Y') THEN
12659: asn_debug.put_line('No parent_transaction_id or parent_interface_transaction_id ');
12660: END IF;
12661:
12662: IF (g_asn_debug = 'Y') THEN
12663: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
12664: END IF;
12665:
12666: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
12659: asn_debug.put_line('No parent_transaction_id or parent_interface_transaction_id ');
12660: END IF;
12661:
12662: IF (g_asn_debug = 'Y') THEN
12663: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
12664: END IF;
12665:
12666: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
12667: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
12673: rcv_error_pkg.log_interface_error('PARENT_TRANSACTION_ID', FALSE);
12674: END IF; --}
12675: END IF; -- } of (asn quantity_shipped was valid)
12676:
12677: IF (g_asn_debug = 'Y') THEN
12678: asn_debug.put_line('before closing cursors current_n is ' || temp_cascaded_table.COUNT);
12679: END IF;
12680:
12681: IF po_transfer%ISOPEN THEN
12674: END IF; --}
12675: END IF; -- } of (asn quantity_shipped was valid)
12676:
12677: IF (g_asn_debug = 'Y') THEN
12678: asn_debug.put_line('before closing cursors current_n is ' || temp_cascaded_table.COUNT);
12679: END IF;
12680:
12681: IF po_transfer%ISOPEN THEN
12682: CLOSE po_transfer;
12697: IF po_deliver%ISOPEN THEN
12698: CLOSE po_deliver;
12699: END IF;
12700:
12701: IF (g_asn_debug = 'Y') THEN
12702: asn_debug.put_line('Exit explode_line_quantity');
12703: END IF;
12704: EXCEPTION
12705: WHEN OTHERS THEN
12698: CLOSE po_deliver;
12699: END IF;
12700:
12701: IF (g_asn_debug = 'Y') THEN
12702: asn_debug.put_line('Exit explode_line_quantity');
12703: END IF;
12704: EXCEPTION
12705: WHEN OTHERS THEN
12706: IF (g_asn_debug = 'Y') THEN
12702: asn_debug.put_line('Exit explode_line_quantity');
12703: END IF;
12704: EXCEPTION
12705: WHEN OTHERS THEN
12706: IF (g_asn_debug = 'Y') THEN
12707: asn_debug.put_line('Exception in derive_trans_del_quantity ');
12708: END IF;
12709:
12710: IF po_transfer%ISOPEN THEN
12703: END IF;
12704: EXCEPTION
12705: WHEN OTHERS THEN
12706: IF (g_asn_debug = 'Y') THEN
12707: asn_debug.put_line('Exception in derive_trans_del_quantity ');
12708: END IF;
12709:
12710: IF po_transfer%ISOPEN THEN
12711: CLOSE po_transfer;
12731: rcv_error_pkg.set_sql_error_message('derive_trans_del_line_quantity', x_progress);
12732: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
12733: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
12734:
12735: IF (g_asn_debug = 'Y') THEN
12736: asn_debug.put_line(TO_CHAR(n));
12737: asn_debug.put_line(SQLERRM);
12738: asn_debug.put_line('error ' || x_progress);
12739: END IF;
12732: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
12733: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
12734:
12735: IF (g_asn_debug = 'Y') THEN
12736: asn_debug.put_line(TO_CHAR(n));
12737: asn_debug.put_line(SQLERRM);
12738: asn_debug.put_line('error ' || x_progress);
12739: END IF;
12740: END derive_trans_del_line_quantity;
12733: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
12734:
12735: IF (g_asn_debug = 'Y') THEN
12736: asn_debug.put_line(TO_CHAR(n));
12737: asn_debug.put_line(SQLERRM);
12738: asn_debug.put_line('error ' || x_progress);
12739: END IF;
12740: END derive_trans_del_line_quantity;
12741:
12734:
12735: IF (g_asn_debug = 'Y') THEN
12736: asn_debug.put_line(TO_CHAR(n));
12737: asn_debug.put_line(SQLERRM);
12738: asn_debug.put_line('error ' || x_progress);
12739: END IF;
12740: END derive_trans_del_line_quantity;
12741:
12742: /*
12858: x_cascaded_table(n).processing_status_code := p_trx_record.processing_status_code;
12859: x_cascaded_table(n).transaction_status_code := p_trx_record.transaction_status_code;
12860: x_cascaded_table(n).auto_transact_code := p_trx_record.auto_transact_code;
12861:
12862: IF (g_asn_debug = 'Y') THEN
12863: asn_debug.put_line('Enter Default');
12864: END IF;
12865:
12866: IF x_cascaded_table(n).source_document_code IS NULL THEN
12859: x_cascaded_table(n).transaction_status_code := p_trx_record.transaction_status_code;
12860: x_cascaded_table(n).auto_transact_code := p_trx_record.auto_transact_code;
12861:
12862: IF (g_asn_debug = 'Y') THEN
12863: asn_debug.put_line('Enter Default');
12864: END IF;
12865:
12866: IF x_cascaded_table(n).source_document_code IS NULL THEN
12867: IF x_cascaded_table(n).receipt_source_code = 'CUSTOMER' THEN
12869: ELSE
12870: x_cascaded_table(n).source_document_code := 'PO';
12871: END IF;
12872:
12873: IF (g_asn_debug = 'Y') THEN
12874: asn_debug.put_line('Defaulting SOURCE_DOCUMENT_CODE ' || x_cascaded_table(n).source_document_code);
12875: END IF;
12876: END IF;
12877:
12870: x_cascaded_table(n).source_document_code := 'PO';
12871: END IF;
12872:
12873: IF (g_asn_debug = 'Y') THEN
12874: asn_debug.put_line('Defaulting SOURCE_DOCUMENT_CODE ' || x_cascaded_table(n).source_document_code);
12875: END IF;
12876: END IF;
12877:
12878: IF (x_cascaded_table(n).derive = 'Y') THEN --{
12920: x_cascaded_table(n).subinventory := x_cascaded_table(temp_index).subinventory;
12921: END IF;
12922: END IF; --}
12923: ELSE --} {
12924: IF (g_asn_debug = 'Y') THEN
12925: asn_debug.put_line('open cursor Default RTI');
12926: END IF;
12927:
12928: OPEN po_transfer_rti(x_cascaded_table(n).parent_interface_txn_id);
12921: END IF;
12922: END IF; --}
12923: ELSE --} {
12924: IF (g_asn_debug = 'Y') THEN
12925: asn_debug.put_line('open cursor Default RTI');
12926: END IF;
12927:
12928: OPEN po_transfer_rti(x_cascaded_table(n).parent_interface_txn_id);
12929: END IF; --}
12931: OPEN po_transfer(x_cascaded_table(n).parent_transaction_id);
12932: END IF; --}
12933:
12934: IF (po_transfer%ISOPEN) THEN
12935: IF (g_asn_debug = 'Y') THEN
12936: asn_debug.put_line('fetch cursor Default');
12937: END IF;
12938:
12939: FETCH po_transfer INTO default_po_transfer_info;
12932: END IF; --}
12933:
12934: IF (po_transfer%ISOPEN) THEN
12935: IF (g_asn_debug = 'Y') THEN
12936: asn_debug.put_line('fetch cursor Default');
12937: END IF;
12938:
12939: FETCH po_transfer INTO default_po_transfer_info;
12940: ELSIF(po_transfer_rti%ISOPEN) THEN
12944: IF ( ( po_transfer%ISOPEN
12945: AND po_transfer%FOUND)
12946: OR ( po_transfer_rti%ISOPEN
12947: AND po_transfer_rti%FOUND)) THEN --{
12948: IF (g_asn_debug = 'Y') THEN --{
12949: asn_debug.put_line('Defaulting Transfer po_revision_num' || default_po_transfer_info.po_revision_num);
12950: asn_debug.put_line('Defaulting Transfer item_description' || default_po_transfer_info.item_description);
12951: asn_debug.put_line('Defaulting Transfer po_release_id' || default_po_transfer_info.po_release_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12945: AND po_transfer%FOUND)
12946: OR ( po_transfer_rti%ISOPEN
12947: AND po_transfer_rti%FOUND)) THEN --{
12948: IF (g_asn_debug = 'Y') THEN --{
12949: asn_debug.put_line('Defaulting Transfer po_revision_num' || default_po_transfer_info.po_revision_num);
12950: asn_debug.put_line('Defaulting Transfer item_description' || default_po_transfer_info.item_description);
12951: asn_debug.put_line('Defaulting Transfer po_release_id' || default_po_transfer_info.po_release_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12946: OR ( po_transfer_rti%ISOPEN
12947: AND po_transfer_rti%FOUND)) THEN --{
12948: IF (g_asn_debug = 'Y') THEN --{
12949: asn_debug.put_line('Defaulting Transfer po_revision_num' || default_po_transfer_info.po_revision_num);
12950: asn_debug.put_line('Defaulting Transfer item_description' || default_po_transfer_info.item_description);
12951: asn_debug.put_line('Defaulting Transfer po_release_id' || default_po_transfer_info.po_release_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12947: AND po_transfer_rti%FOUND)) THEN --{
12948: IF (g_asn_debug = 'Y') THEN --{
12949: asn_debug.put_line('Defaulting Transfer po_revision_num' || default_po_transfer_info.po_revision_num);
12950: asn_debug.put_line('Defaulting Transfer item_description' || default_po_transfer_info.item_description);
12951: asn_debug.put_line('Defaulting Transfer po_release_id' || default_po_transfer_info.po_release_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12948: IF (g_asn_debug = 'Y') THEN --{
12949: asn_debug.put_line('Defaulting Transfer po_revision_num' || default_po_transfer_info.po_revision_num);
12950: asn_debug.put_line('Defaulting Transfer item_description' || default_po_transfer_info.item_description);
12951: asn_debug.put_line('Defaulting Transfer po_release_id' || default_po_transfer_info.po_release_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12949: asn_debug.put_line('Defaulting Transfer po_revision_num' || default_po_transfer_info.po_revision_num);
12950: asn_debug.put_line('Defaulting Transfer item_description' || default_po_transfer_info.item_description);
12951: asn_debug.put_line('Defaulting Transfer po_release_id' || default_po_transfer_info.po_release_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12950: asn_debug.put_line('Defaulting Transfer item_description' || default_po_transfer_info.item_description);
12951: asn_debug.put_line('Defaulting Transfer po_release_id' || default_po_transfer_info.po_release_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12951: asn_debug.put_line('Defaulting Transfer po_release_id' || default_po_transfer_info.po_release_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12952: asn_debug.put_line('Defaulting Transfer location_id' || default_po_transfer_info.loc_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12953: asn_debug.put_line('Defaulting Transfer organization_id' || default_po_transfer_info.organization_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12954: asn_debug.put_line('Defaulting Transfer routing_header_id' || default_po_transfer_info.routing_header_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12955: asn_debug.put_line('Defaulting Transfer currency_code' || default_po_transfer_info.currency_code);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12956: asn_debug.put_line('Defaulting Transfer currency_conversion_rate' || default_po_transfer_info.currency_conversion_rate);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12957: asn_debug.put_line('Defaulting Transfer currency_conversion_type' || default_po_transfer_info.currency_conversion_type);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12965: asn_debug.put_line('Defaulting Transfer DELIVER_TO_LOCATION_ID' || default_po_transfer_info.deliver_to_location_id);
12958: asn_debug.put_line('Defaulting Transfer currency_conversion_date' || default_po_transfer_info.currency_conversion_date);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12965: asn_debug.put_line('Defaulting Transfer DELIVER_TO_LOCATION_ID' || default_po_transfer_info.deliver_to_location_id);
12966: asn_debug.put_line('Defaulting Transfer SUBINVENTORY' || default_po_transfer_info.subinventory);
12959: asn_debug.put_line('Defaulting Transfer shipment_header_id' || default_po_transfer_info.shipment_header_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12965: asn_debug.put_line('Defaulting Transfer DELIVER_TO_LOCATION_ID' || default_po_transfer_info.deliver_to_location_id);
12966: asn_debug.put_line('Defaulting Transfer SUBINVENTORY' || default_po_transfer_info.subinventory);
12967: asn_debug.put_line('Defaulting Transfer CUSTOMER_ID' || default_po_transfer_info.customer_id);
12960: asn_debug.put_line('Defaulting Transfer shipment_line_id' || default_po_transfer_info.shipment_line_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12965: asn_debug.put_line('Defaulting Transfer DELIVER_TO_LOCATION_ID' || default_po_transfer_info.deliver_to_location_id);
12966: asn_debug.put_line('Defaulting Transfer SUBINVENTORY' || default_po_transfer_info.subinventory);
12967: asn_debug.put_line('Defaulting Transfer CUSTOMER_ID' || default_po_transfer_info.customer_id);
12968: asn_debug.put_line('Defaulting Transfer CUSTOMER_SITE_ID' || default_po_transfer_info.customer_site_id);
12961: asn_debug.put_line('Defaulting Transfer category_id' || default_po_transfer_info.category_id);
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12965: asn_debug.put_line('Defaulting Transfer DELIVER_TO_LOCATION_ID' || default_po_transfer_info.deliver_to_location_id);
12966: asn_debug.put_line('Defaulting Transfer SUBINVENTORY' || default_po_transfer_info.subinventory);
12967: asn_debug.put_line('Defaulting Transfer CUSTOMER_ID' || default_po_transfer_info.customer_id);
12968: asn_debug.put_line('Defaulting Transfer CUSTOMER_SITE_ID' || default_po_transfer_info.customer_site_id);
12969: END IF; --}
12962: asn_debug.put_line('Defaulting Transfer vendor_id' || default_po_transfer_info.vendor_id);
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12965: asn_debug.put_line('Defaulting Transfer DELIVER_TO_LOCATION_ID' || default_po_transfer_info.deliver_to_location_id);
12966: asn_debug.put_line('Defaulting Transfer SUBINVENTORY' || default_po_transfer_info.subinventory);
12967: asn_debug.put_line('Defaulting Transfer CUSTOMER_ID' || default_po_transfer_info.customer_id);
12968: asn_debug.put_line('Defaulting Transfer CUSTOMER_SITE_ID' || default_po_transfer_info.customer_site_id);
12969: END IF; --}
12970:
12963: asn_debug.put_line('Defaulting Transfer vendor_site_id' || default_po_transfer_info.vendor_site_id);
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12965: asn_debug.put_line('Defaulting Transfer DELIVER_TO_LOCATION_ID' || default_po_transfer_info.deliver_to_location_id);
12966: asn_debug.put_line('Defaulting Transfer SUBINVENTORY' || default_po_transfer_info.subinventory);
12967: asn_debug.put_line('Defaulting Transfer CUSTOMER_ID' || default_po_transfer_info.customer_id);
12968: asn_debug.put_line('Defaulting Transfer CUSTOMER_SITE_ID' || default_po_transfer_info.customer_site_id);
12969: END IF; --}
12970:
12971: IF x_cascaded_table(n).oe_order_header_id IS NULL
12964: asn_debug.put_line('Defaulting Transfer DELIVER_TO_PERSON_ID' || default_po_transfer_info.deliver_to_person_id);
12965: asn_debug.put_line('Defaulting Transfer DELIVER_TO_LOCATION_ID' || default_po_transfer_info.deliver_to_location_id);
12966: asn_debug.put_line('Defaulting Transfer SUBINVENTORY' || default_po_transfer_info.subinventory);
12967: asn_debug.put_line('Defaulting Transfer CUSTOMER_ID' || default_po_transfer_info.customer_id);
12968: asn_debug.put_line('Defaulting Transfer CUSTOMER_SITE_ID' || default_po_transfer_info.customer_site_id);
12969: END IF; --}
12970:
12971: IF x_cascaded_table(n).oe_order_header_id IS NULL
12972: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
12971: IF x_cascaded_table(n).oe_order_header_id IS NULL
12972: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
12973: x_cascaded_table(n).oe_order_header_id := default_po_transfer_info.oe_order_header_id;
12974:
12975: IF (g_asn_debug = 'Y') THEN
12976: asn_debug.put_line('Defaulting Transfer oe_order_header_id ' || x_cascaded_table(n).oe_order_header_id);
12977: END IF;
12978: END IF;
12979:
12972: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
12973: x_cascaded_table(n).oe_order_header_id := default_po_transfer_info.oe_order_header_id;
12974:
12975: IF (g_asn_debug = 'Y') THEN
12976: asn_debug.put_line('Defaulting Transfer oe_order_header_id ' || x_cascaded_table(n).oe_order_header_id);
12977: END IF;
12978: END IF;
12979:
12980: IF x_cascaded_table(n).oe_order_line_id IS NULL
12980: IF x_cascaded_table(n).oe_order_line_id IS NULL
12981: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
12982: x_cascaded_table(n).oe_order_line_id := default_po_transfer_info.oe_order_line_id;
12983:
12984: IF (g_asn_debug = 'Y') THEN
12985: asn_debug.put_line('Defaulting Transfer oe_order_line_id ' || x_cascaded_table(n).oe_order_line_id);
12986: END IF;
12987: END IF;
12988:
12981: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
12982: x_cascaded_table(n).oe_order_line_id := default_po_transfer_info.oe_order_line_id;
12983:
12984: IF (g_asn_debug = 'Y') THEN
12985: asn_debug.put_line('Defaulting Transfer oe_order_line_id ' || x_cascaded_table(n).oe_order_line_id);
12986: END IF;
12987: END IF;
12988:
12989: x_cascaded_table(n).po_revision_num := default_po_transfer_info.po_revision_num;
13020: WHERE pll.line_location_id = x_cascaded_table(n).po_line_location_id
13021: AND pl.po_line_id = x_cascaded_table(n).po_line_id
13022: AND pl.po_line_id = pll.po_line_id;
13023:
13024: IF (g_asn_debug = 'Y') THEN
13025: asn_debug.put_line('Defaulting Transfer po_unit_price' || x_cascaded_table(n).po_unit_price);
13026: END IF;
13027: END IF; --}
13028:
13021: AND pl.po_line_id = x_cascaded_table(n).po_line_id
13022: AND pl.po_line_id = pll.po_line_id;
13023:
13024: IF (g_asn_debug = 'Y') THEN
13025: asn_debug.put_line('Defaulting Transfer po_unit_price' || x_cascaded_table(n).po_unit_price);
13026: END IF;
13027: END IF; --}
13028:
13029: x_cascaded_table(n).customer_id := default_po_transfer_info.customer_id;
13103: IF (x_cascaded_table(n).transaction_type = 'DELIVER') THEN
13104: x_cascaded_table(n).location_id := x_cascaded_table(n).deliver_to_location_id;
13105: END IF;
13106:
13107: IF (g_asn_debug = 'Y') THEN
13108: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
13109: END IF;
13110:
13111: IF (g_asn_debug = 'Y') THEN
13104: x_cascaded_table(n).location_id := x_cascaded_table(n).deliver_to_location_id;
13105: END IF;
13106:
13107: IF (g_asn_debug = 'Y') THEN
13108: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
13109: END IF;
13110:
13111: IF (g_asn_debug = 'Y') THEN
13112: asn_debug.put_line('Exit default_vendor_trans_del');
13107: IF (g_asn_debug = 'Y') THEN
13108: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
13109: END IF;
13110:
13111: IF (g_asn_debug = 'Y') THEN
13112: asn_debug.put_line('Exit default_vendor_trans_del');
13113: END IF;
13114:
13115: IF po_transfer%ISOPEN THEN
13108: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
13109: END IF;
13110:
13111: IF (g_asn_debug = 'Y') THEN
13112: asn_debug.put_line('Exit default_vendor_trans_del');
13113: END IF;
13114:
13115: IF po_transfer%ISOPEN THEN
13116: CLOSE po_transfer;
13139: l_complex_flag varchar2(1);
13140: l_asn_type rcv_shipment_headers.asn_type%TYPE; --9534775
13141:
13142: BEGIN
13143: IF (g_asn_debug = 'Y') THEN
13144: asn_debug.put_line('enter derive_correction_line ');
13145: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13146: END IF;
13147:
13140: l_asn_type rcv_shipment_headers.asn_type%TYPE; --9534775
13141:
13142: BEGIN
13143: IF (g_asn_debug = 'Y') THEN
13144: asn_debug.put_line('enter derive_correction_line ');
13145: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13146: END IF;
13147:
13148: /* Derive the to_org_id */
13141:
13142: BEGIN
13143: IF (g_asn_debug = 'Y') THEN
13144: asn_debug.put_line('enter derive_correction_line ');
13145: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13146: END IF;
13147:
13148: /* Derive the to_org_id */
13149: derive_ship_to_org_info(x_cascaded_table,
13151: x_header_record
13152: );
13153:
13154: IF (x_cascaded_table(n).unit_of_measure IS NOT NULL) THEN
13155: IF (g_asn_debug = 'Y') THEN
13156: asn_debug.put_line('X_progress ' || x_progress);
13157: END IF;
13158:
13159: SELECT muom.uom_code
13152: );
13153:
13154: IF (x_cascaded_table(n).unit_of_measure IS NOT NULL) THEN
13155: IF (g_asn_debug = 'Y') THEN
13156: asn_debug.put_line('X_progress ' || x_progress);
13157: END IF;
13158:
13159: SELECT muom.uom_code
13160: INTO x_cascaded_table(n).uom_code
13160: INTO x_cascaded_table(n).uom_code
13161: FROM mtl_units_of_measure muom
13162: WHERE muom.unit_of_measure = x_cascaded_table(n).unit_of_measure;
13163: ELSE
13164: IF (g_asn_debug = 'Y') THEN
13165: asn_debug.put_line('uom_code not derived as unit_of_measure is null');
13166: END IF;
13167: END IF;
13168:
13161: FROM mtl_units_of_measure muom
13162: WHERE muom.unit_of_measure = x_cascaded_table(n).unit_of_measure;
13163: ELSE
13164: IF (g_asn_debug = 'Y') THEN
13165: asn_debug.put_line('uom_code not derived as unit_of_measure is null');
13166: END IF;
13167: END IF;
13168:
13169: x_progress := '091';
13172: x_cascaded_table(n).auto_transact_code := NULL;
13173:
13174: -- Determine whether this is a services line type
13175: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN
13176: IF (g_asn_debug = 'Y') THEN
13177: asn_debug.put_line('parent_transaction_id ' || x_cascaded_table(n).parent_transaction_id);
13178: END IF;
13179:
13180: SELECT po_line_id,po_header_id
13173:
13174: -- Determine whether this is a services line type
13175: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN
13176: IF (g_asn_debug = 'Y') THEN
13177: asn_debug.put_line('parent_transaction_id ' || x_cascaded_table(n).parent_transaction_id);
13178: END IF;
13179:
13180: SELECT po_line_id,po_header_id
13181: INTO x_cascaded_table(n).po_line_id,l_po_header_id
13181: INTO x_cascaded_table(n).po_line_id,l_po_header_id
13182: FROM rcv_transactions
13183: WHERE transaction_id = x_cascaded_table(n).parent_transaction_id;
13184: ELSIF(x_cascaded_table(n).parent_interface_txn_id IS NOT NULL) THEN
13185: IF (g_asn_debug = 'Y') THEN
13186: asn_debug.put_line('parent_interface_txn_id ' || x_cascaded_table(n).parent_interface_txn_id);
13187: END IF;
13188:
13189: SELECT po_line_id,po_header_id
13182: FROM rcv_transactions
13183: WHERE transaction_id = x_cascaded_table(n).parent_transaction_id;
13184: ELSIF(x_cascaded_table(n).parent_interface_txn_id IS NOT NULL) THEN
13185: IF (g_asn_debug = 'Y') THEN
13186: asn_debug.put_line('parent_interface_txn_id ' || x_cascaded_table(n).parent_interface_txn_id);
13187: END IF;
13188:
13189: SELECT po_line_id,po_header_id
13190: INTO x_cascaded_table(n).po_line_id,l_po_header_id
13191: FROM rcv_transactions_interface
13192: WHERE interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id;
13193: END IF;
13194:
13195: IF (g_asn_debug = 'Y') THEN
13196: asn_debug.put_line('po_line_id ' || x_cascaded_table(n).po_line_id);
13197: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
13198: END IF;
13199:
13192: WHERE interface_transaction_id = x_cascaded_table(n).parent_interface_txn_id;
13193: END IF;
13194:
13195: IF (g_asn_debug = 'Y') THEN
13196: asn_debug.put_line('po_line_id ' || x_cascaded_table(n).po_line_id);
13197: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
13198: END IF;
13199:
13200: /* R12 Complex work.
13193: END IF;
13194:
13195: IF (g_asn_debug = 'Y') THEN
13196: asn_debug.put_line('po_line_id ' || x_cascaded_table(n).po_line_id);
13197: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
13198: END IF;
13199:
13200: /* R12 Complex work.
13201: * We do not support any other receiving transactions other
13208: l_return_status,
13209: l_complex_flag);
13210: IF (l_return_status IS NOT NULL AND
13211: l_return_status = FND_API.g_ret_sts_success) THEN
13212: IF( g_asn_debug = 'Y' ) THEN
13213: asn_debug.put_line('l_return_status ' || l_return_status);
13214: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
13215: END IF;
13216: ELSE
13209: l_complex_flag);
13210: IF (l_return_status IS NOT NULL AND
13211: l_return_status = FND_API.g_ret_sts_success) THEN
13212: IF( g_asn_debug = 'Y' ) THEN
13213: asn_debug.put_line('l_return_status ' || l_return_status);
13214: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
13215: END IF;
13216: ELSE
13217: IF( g_asn_debug = 'Y') THEN
13210: IF (l_return_status IS NOT NULL AND
13211: l_return_status = FND_API.g_ret_sts_success) THEN
13212: IF( g_asn_debug = 'Y' ) THEN
13213: asn_debug.put_line('l_return_status ' || l_return_status);
13214: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
13215: END IF;
13216: ELSE
13217: IF( g_asn_debug = 'Y') THEN
13218: asn_debug.put_line('l_return_status ' || l_return_status);
13213: asn_debug.put_line('l_return_status ' || l_return_status);
13214: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
13215: END IF;
13216: ELSE
13217: IF( g_asn_debug = 'Y') THEN
13218: asn_debug.put_line('l_return_status ' || l_return_status);
13219: END IF;
13220: END IF;
13221:
13214: asn_debug.put_line('l_po_header_id ' || l_po_header_id);
13215: END IF;
13216: ELSE
13217: IF( g_asn_debug = 'Y') THEN
13218: asn_debug.put_line('l_return_status ' || l_return_status);
13219: END IF;
13220: END IF;
13221:
13222: /*Bug 9534775 need support wc -ve correction */
13225: into l_asn_type
13226: from rcv_shipment_headers
13227: where shipment_header_id = x_cascaded_table(n).shipment_header_id;
13228:
13229: IF( g_asn_debug = 'Y') THEN
13230: asn_debug.put_line('enter l_complex_flag = Y ');
13231: asn_debug.put_line('asn_type ' || l_asn_type);
13232: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13233: asn_debug.put_line('amount ' || x_cascaded_table(n).amount);
13226: from rcv_shipment_headers
13227: where shipment_header_id = x_cascaded_table(n).shipment_header_id;
13228:
13229: IF( g_asn_debug = 'Y') THEN
13230: asn_debug.put_line('enter l_complex_flag = Y ');
13231: asn_debug.put_line('asn_type ' || l_asn_type);
13232: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13233: asn_debug.put_line('amount ' || x_cascaded_table(n).amount);
13234: END IF;
13227: where shipment_header_id = x_cascaded_table(n).shipment_header_id;
13228:
13229: IF( g_asn_debug = 'Y') THEN
13230: asn_debug.put_line('enter l_complex_flag = Y ');
13231: asn_debug.put_line('asn_type ' || l_asn_type);
13232: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13233: asn_debug.put_line('amount ' || x_cascaded_table(n).amount);
13234: END IF;
13235: IF (l_asn_type ='WC' AND (nvl(x_cascaded_table(n).quantity,0) >0 OR nvl(x_cascaded_table(n).amount,0) > 0) ) THEN
13228:
13229: IF( g_asn_debug = 'Y') THEN
13230: asn_debug.put_line('enter l_complex_flag = Y ');
13231: asn_debug.put_line('asn_type ' || l_asn_type);
13232: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13233: asn_debug.put_line('amount ' || x_cascaded_table(n).amount);
13234: END IF;
13235: IF (l_asn_type ='WC' AND (nvl(x_cascaded_table(n).quantity,0) >0 OR nvl(x_cascaded_table(n).amount,0) > 0) ) THEN
13236: asn_debug.put_line('We do not support positive transaction type of ' || x_cascaded_table(n).transaction_type || ' for complex work POs');
13229: IF( g_asn_debug = 'Y') THEN
13230: asn_debug.put_line('enter l_complex_flag = Y ');
13231: asn_debug.put_line('asn_type ' || l_asn_type);
13232: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13233: asn_debug.put_line('amount ' || x_cascaded_table(n).amount);
13234: END IF;
13235: IF (l_asn_type ='WC' AND (nvl(x_cascaded_table(n).quantity,0) >0 OR nvl(x_cascaded_table(n).amount,0) > 0) ) THEN
13236: asn_debug.put_line('We do not support positive transaction type of ' || x_cascaded_table(n).transaction_type || ' for complex work POs');
13237: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
13232: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13233: asn_debug.put_line('amount ' || x_cascaded_table(n).amount);
13234: END IF;
13235: IF (l_asn_type ='WC' AND (nvl(x_cascaded_table(n).quantity,0) >0 OR nvl(x_cascaded_table(n).amount,0) > 0) ) THEN
13236: asn_debug.put_line('We do not support positive transaction type of ' || x_cascaded_table(n).transaction_type || ' for complex work POs');
13237: rcv_error_pkg.set_error_message('RCV_INVALID_TRANSACTION_TYPE');
13238: rcv_error_pkg.log_interface_error('TRANSACTION_TYPE');
13239: END IF;
13240: End if;
13267:
13268: END IF;
13269: /**End Bug 9534775**/
13270:
13271: IF (g_asn_debug = 'Y') THEN
13272: asn_debug.put_line('matching_basis ' || x_cascaded_table(n).matching_basis);
13273: END IF;
13274:
13275: IF (x_cascaded_table(n).matching_basis = 'AMOUNT') THEN
13268: END IF;
13269: /**End Bug 9534775**/
13270:
13271: IF (g_asn_debug = 'Y') THEN
13272: asn_debug.put_line('matching_basis ' || x_cascaded_table(n).matching_basis);
13273: END IF;
13274:
13275: IF (x_cascaded_table(n).matching_basis = 'AMOUNT') THEN
13276: derive_correction_line_amt(x_cascaded_table,
13283: temp_cascaded_table
13284: );
13285: END IF;
13286:
13287: IF (g_asn_debug = 'Y') THEN
13288: asn_debug.put_line('exit derive_correction_line');
13289: asn_debug.put_line('quantity ' || temp_cascaded_table(n).quantity);
13290: END IF;
13291: EXCEPTION
13284: );
13285: END IF;
13286:
13287: IF (g_asn_debug = 'Y') THEN
13288: asn_debug.put_line('exit derive_correction_line');
13289: asn_debug.put_line('quantity ' || temp_cascaded_table(n).quantity);
13290: END IF;
13291: EXCEPTION
13292: WHEN OTHERS THEN
13285: END IF;
13286:
13287: IF (g_asn_debug = 'Y') THEN
13288: asn_debug.put_line('exit derive_correction_line');
13289: asn_debug.put_line('quantity ' || temp_cascaded_table(n).quantity);
13290: END IF;
13291: EXCEPTION
13292: WHEN OTHERS THEN
13293: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_unexp_error;
13510: l_is_clm_po VARCHAR2(5) := 'N';
13511: l_partial_funded_flag VARCHAR2(5) := 'N';
13512: --
13513: BEGIN
13514: IF (g_asn_debug = 'Y') THEN
13515: asn_debug.put_line('enter derive_quantity ' || x_cascaded_table(n).parent_transaction_id);
13516: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13517: END IF;
13518:
13511: l_partial_funded_flag VARCHAR2(5) := 'N';
13512: --
13513: BEGIN
13514: IF (g_asn_debug = 'Y') THEN
13515: asn_debug.put_line('enter derive_quantity ' || x_cascaded_table(n).parent_transaction_id);
13516: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13517: END IF;
13518:
13519: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN --{
13512: --
13513: BEGIN
13514: IF (g_asn_debug = 'Y') THEN
13515: asn_debug.put_line('enter derive_quantity ' || x_cascaded_table(n).parent_transaction_id);
13516: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
13517: END IF;
13518:
13519: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN --{
13520: already_derived := TRUE;
13551: END;
13552: END IF; --}
13553:
13554: IF already_derived THEN --{
13555: IF (g_asn_debug = 'Y') THEN
13556: asn_debug.put_line(' open po_correct table ' || x_cascaded_table(n).parent_transaction_id);
13557: END IF;
13558:
13559: OPEN po_correct(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
13552: END IF; --}
13553:
13554: IF already_derived THEN --{
13555: IF (g_asn_debug = 'Y') THEN
13556: asn_debug.put_line(' open po_correct table ' || x_cascaded_table(n).parent_transaction_id);
13557: END IF;
13558:
13559: OPEN po_correct(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
13560: END IF; ---}
13576: * We will have x_cascaded_table(n).
13577: * parent_interface_txn_id) populated with teh
13578: * correct value.
13579: */
13580: IF (g_asn_debug = 'Y') THEN
13581: asn_debug.put_line(' open correct cursor from rti');
13582: END IF;
13583:
13584: OPEN po_correct_rti(x_cascaded_table(n).parent_interface_txn_id);
13577: * parent_interface_txn_id) populated with teh
13578: * correct value.
13579: */
13580: IF (g_asn_debug = 'Y') THEN
13581: asn_debug.put_line(' open correct cursor from rti');
13582: END IF;
13583:
13584: OPEN po_correct_rti(x_cascaded_table(n).parent_interface_txn_id);
13585: END IF;
13588: /******************************************************************/
13589: --check line quanity > 0
13590: x_progress := '097';
13591:
13592: IF (g_asn_debug = 'Y') THEN
13593: asn_debug.put_line('X_progress ' || x_progress);
13594: END IF;
13595:
13596: IF x_cascaded_table(n).error_status IN('S', 'W')
13589: --check line quanity > 0
13590: x_progress := '097';
13591:
13592: IF (g_asn_debug = 'Y') THEN
13593: asn_debug.put_line('X_progress ' || x_progress);
13594: END IF;
13595:
13596: IF x_cascaded_table(n).error_status IN('S', 'W')
13597: AND x_cascaded_table(n).quantity = 0 THEN --{
13594: END IF;
13595:
13596: IF x_cascaded_table(n).error_status IN('S', 'W')
13597: AND x_cascaded_table(n).quantity = 0 THEN --{
13598: IF (g_asn_debug = 'Y') THEN
13599: asn_debug.put_line('Quantity is <= zero. Cascade will fail');
13600: END IF;
13601:
13602: x_cascaded_table(n).error_status := 'F';
13595:
13596: IF x_cascaded_table(n).error_status IN('S', 'W')
13597: AND x_cascaded_table(n).quantity = 0 THEN --{
13598: IF (g_asn_debug = 'Y') THEN
13599: asn_debug.put_line('Quantity is <= zero. Cascade will fail');
13600: END IF;
13601:
13602: x_cascaded_table(n).error_status := 'F';
13603: rcv_error_pkg.set_error_message('RCV_ENTER_QTY_GT_ZERO', x_cascaded_table(n).error_message);
13615: such a way that the ROI validation does'nt error out when
13616: po_line_id is populated for one time items. */
13617: x_progress := '098';
13618:
13619: IF (g_asn_debug = 'Y') THEN
13620: asn_debug.put_line('X_progress ' || x_progress);
13621: END IF;
13622:
13623: IF ( ( x_cascaded_table(n).parent_transaction_id IS NOT NULL
13616: po_line_id is populated for one time items. */
13617: x_progress := '098';
13618:
13619: IF (g_asn_debug = 'Y') THEN
13620: asn_debug.put_line('X_progress ' || x_progress);
13621: END IF;
13622:
13623: IF ( ( x_cascaded_table(n).parent_transaction_id IS NOT NULL
13624: OR x_cascaded_table(n).parent_interface_txn_id IS NOT NULL)
13624: OR x_cascaded_table(n).parent_interface_txn_id IS NOT NULL)
13625: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
13626:
13627: -- Copy record from main table to temp table
13628: IF (g_asn_debug = 'Y') THEN
13629: asn_debug.put_line('Copy record from main table to temp table');
13630: END IF;
13631:
13632: current_n := 1;
13625: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
13626:
13627: -- Copy record from main table to temp table
13628: IF (g_asn_debug = 'Y') THEN
13629: asn_debug.put_line('Copy record from main table to temp table');
13630: END IF;
13631:
13632: current_n := 1;
13633: temp_cascaded_table(current_n) := x_cascaded_table(n);
13632: current_n := 1;
13633: temp_cascaded_table(current_n) := x_cascaded_table(n);
13634:
13635: -- Get all rows which meet this condition
13636: IF (g_asn_debug = 'Y') THEN
13637: asn_debug.put_line('Get all rows which meet this condition');
13638: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
13639: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
13640: END IF;
13633: temp_cascaded_table(current_n) := x_cascaded_table(n);
13634:
13635: -- Get all rows which meet this condition
13636: IF (g_asn_debug = 'Y') THEN
13637: asn_debug.put_line('Get all rows which meet this condition');
13638: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
13639: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
13640: END IF;
13641:
13634:
13635: -- Get all rows which meet this condition
13636: IF (g_asn_debug = 'Y') THEN
13637: asn_debug.put_line('Get all rows which meet this condition');
13638: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
13639: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
13640: END IF;
13641:
13642: -- Assign shipped quantity to remaining quantity
13635: -- Get all rows which meet this condition
13636: IF (g_asn_debug = 'Y') THEN
13637: asn_debug.put_line('Get all rows which meet this condition');
13638: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
13639: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
13640: END IF;
13641:
13642: -- Assign shipped quantity to remaining quantity
13643: IF (g_asn_debug = 'Y') THEN
13639: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
13640: END IF;
13641:
13642: -- Assign shipped quantity to remaining quantity
13643: IF (g_asn_debug = 'Y') THEN
13644: asn_debug.put_line('Assign populated quantity to remaining quantity');
13645: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
13646: END IF;
13647:
13640: END IF;
13641:
13642: -- Assign shipped quantity to remaining quantity
13643: IF (g_asn_debug = 'Y') THEN
13644: asn_debug.put_line('Assign populated quantity to remaining quantity');
13645: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
13646: END IF;
13647:
13648: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
13641:
13642: -- Assign shipped quantity to remaining quantity
13643: IF (g_asn_debug = 'Y') THEN
13644: asn_debug.put_line('Assign populated quantity to remaining quantity');
13645: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
13646: END IF;
13647:
13648: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
13649: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
13648: x_remaining_quantity := temp_cascaded_table(current_n).quantity;
13649: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
13650: x_remaining_qty_po_uom := 0;
13651:
13652: IF (g_asn_debug = 'Y') THEN
13653: asn_debug.put_line('Have assigned the quantity');
13654: END IF;
13655:
13656: -- Calculate tax_amount_factor for calculating tax_amount for
13649: x_bkp_qty := x_remaining_quantity; -- used for decrementing cum qty for first record
13650: x_remaining_qty_po_uom := 0;
13651:
13652: IF (g_asn_debug = 'Y') THEN
13653: asn_debug.put_line('Have assigned the quantity');
13654: END IF;
13655:
13656: -- Calculate tax_amount_factor for calculating tax_amount for
13657: -- each cascaded line
13661: ELSE
13662: tax_amount_factor := 0;
13663: END IF;
13664:
13665: IF (g_asn_debug = 'Y') THEN
13666: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
13667: asn_debug.put_line('transaction Quantity : ' || TO_CHAR(x_remaining_quantity));
13668: END IF;
13669:
13662: tax_amount_factor := 0;
13663: END IF;
13664:
13665: IF (g_asn_debug = 'Y') THEN
13666: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
13667: asn_debug.put_line('transaction Quantity : ' || TO_CHAR(x_remaining_quantity));
13668: END IF;
13669:
13670: x_first_trans := TRUE;
13663: END IF;
13664:
13665: IF (g_asn_debug = 'Y') THEN
13666: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
13667: asn_debug.put_line('transaction Quantity : ' || TO_CHAR(x_remaining_quantity));
13668: END IF;
13669:
13670: x_first_trans := TRUE;
13671: transaction_ok := FALSE;
13669:
13670: x_first_trans := TRUE;
13671: transaction_ok := FALSE;
13672:
13673: IF (g_asn_debug = 'Y') THEN
13674: asn_debug.put_line('Before starting Cascade');
13675: END IF;
13676:
13677: IF (g_asn_debug = 'Y') THEN
13670: x_first_trans := TRUE;
13671: transaction_ok := FALSE;
13672:
13673: IF (g_asn_debug = 'Y') THEN
13674: asn_debug.put_line('Before starting Cascade');
13675: END IF;
13676:
13677: IF (g_asn_debug = 'Y') THEN
13678: asn_debug.put_line('Record Count = ' || x_record_count);
13673: IF (g_asn_debug = 'Y') THEN
13674: asn_debug.put_line('Before starting Cascade');
13675: END IF;
13676:
13677: IF (g_asn_debug = 'Y') THEN
13678: asn_debug.put_line('Record Count = ' || x_record_count);
13679: END IF;
13680:
13681: LOOP --{
13674: asn_debug.put_line('Before starting Cascade');
13675: END IF;
13676:
13677: IF (g_asn_debug = 'Y') THEN
13678: asn_debug.put_line('Record Count = ' || x_record_count);
13679: END IF;
13680:
13681: LOOP --{
13682: IF (g_asn_debug = 'Y') THEN
13678: asn_debug.put_line('Record Count = ' || x_record_count);
13679: END IF;
13680:
13681: LOOP --{
13682: IF (g_asn_debug = 'Y') THEN
13683: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
13684: asn_debug.put_line('Remaining Quantity ' || TO_CHAR(x_remaining_quantity));
13685: END IF;
13686:
13679: END IF;
13680:
13681: LOOP --{
13682: IF (g_asn_debug = 'Y') THEN
13683: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
13684: asn_debug.put_line('Remaining Quantity ' || TO_CHAR(x_remaining_quantity));
13685: END IF;
13686:
13687: /*
13680:
13681: LOOP --{
13682: IF (g_asn_debug = 'Y') THEN
13683: asn_debug.put_line('Backup Qty ' || TO_CHAR(x_bkp_qty));
13684: asn_debug.put_line('Remaining Quantity ' || TO_CHAR(x_remaining_quantity));
13685: END IF;
13686:
13687: /*
13688: ** Fetch the appropriate record
13686:
13687: /*
13688: ** Fetch the appropriate record
13689: */
13690: IF (g_asn_debug = 'Y') THEN
13691: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
13692: END IF;
13693:
13694: IF (po_correct%ISOPEN) THEN --{
13687: /*
13688: ** Fetch the appropriate record
13689: */
13690: IF (g_asn_debug = 'Y') THEN
13691: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
13692: END IF;
13693:
13694: IF (po_correct%ISOPEN) THEN --{
13695: IF (g_asn_debug = 'Y') THEN
13691: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
13692: END IF;
13693:
13694: IF (po_correct%ISOPEN) THEN --{
13695: IF (g_asn_debug = 'Y') THEN
13696: asn_debug.put_line(' fetch po_correct');
13697: END IF;
13698:
13699: FETCH po_correct INTO x_po_correctrec;
13692: END IF;
13693:
13694: IF (po_correct%ISOPEN) THEN --{
13695: IF (g_asn_debug = 'Y') THEN
13696: asn_debug.put_line(' fetch po_correct');
13697: END IF;
13698:
13699: FETCH po_correct INTO x_po_correctrec;
13700:
13703: END IF;
13704:
13705: rows_fetched := po_correct%ROWCOUNT;
13706: ELSIF(po_correct_rti%ISOPEN) THEN --}{
13707: IF (g_asn_debug = 'Y') THEN
13708: asn_debug.put_line(' fetch po_correct_rti');
13709: END IF;
13710:
13711: FETCH po_correct_rti INTO x_po_correctrec;
13704:
13705: rows_fetched := po_correct%ROWCOUNT;
13706: ELSIF(po_correct_rti%ISOPEN) THEN --}{
13707: IF (g_asn_debug = 'Y') THEN
13708: asn_debug.put_line(' fetch po_correct_rti');
13709: END IF;
13710:
13711: FETCH po_correct_rti INTO x_po_correctrec;
13712:
13710:
13711: FETCH po_correct_rti INTO x_po_correctrec;
13712:
13713: IF (po_correct_rti%NOTFOUND) THEN
13714: IF (g_asn_debug = 'Y') THEN
13715: asn_debug.put_line('correct last row');
13716: END IF;
13717:
13718: lastrecord := TRUE;
13711: FETCH po_correct_rti INTO x_po_correctrec;
13712:
13713: IF (po_correct_rti%NOTFOUND) THEN
13714: IF (g_asn_debug = 'Y') THEN
13715: asn_debug.put_line('correct last row');
13716: END IF;
13717:
13718: lastrecord := TRUE;
13719: END IF;
13727: * parent_interface_txn_id) populated with
13728: * with the correct value. Also we have cascaded_table_index
13729: * with the correct pl/sql table index number;
13730: */
13731: IF (g_asn_debug = 'Y') THEN
13732: asn_debug.put_line(' fetch pl/sql table');
13733: END IF;
13734:
13735: temp_index := temp_cascaded_table(current_n).derive_index;
13728: * with the correct value. Also we have cascaded_table_index
13729: * with the correct pl/sql table index number;
13730: */
13731: IF (g_asn_debug = 'Y') THEN
13732: asn_debug.put_line(' fetch pl/sql table');
13733: END IF;
13734:
13735: temp_index := temp_cascaded_table(current_n).derive_index;
13736: x_po_correctrec.po_line_location_id := x_cascaded_table(temp_index).po_line_location_id;
13770: lastrecord := TRUE;
13771: END IF; --}
13772: --x_remaining_quantity:= temp_cascaded_table(current_n).quantity;
13773:
13774: IF (g_asn_debug = 'Y') THEN
13775: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
13776: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
13777: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
13778: asn_debug.put_line('correct remainaing qty ' || x_remaining_quantity);
13771: END IF; --}
13772: --x_remaining_quantity:= temp_cascaded_table(current_n).quantity;
13773:
13774: IF (g_asn_debug = 'Y') THEN
13775: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
13776: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
13777: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
13778: asn_debug.put_line('correct remainaing qty ' || x_remaining_quantity);
13779: END IF;
13772: --x_remaining_quantity:= temp_cascaded_table(current_n).quantity;
13773:
13774: IF (g_asn_debug = 'Y') THEN
13775: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
13776: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
13777: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
13778: asn_debug.put_line('correct remainaing qty ' || x_remaining_quantity);
13779: END IF;
13780:
13773:
13774: IF (g_asn_debug = 'Y') THEN
13775: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
13776: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
13777: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
13778: asn_debug.put_line('correct remainaing qty ' || x_remaining_quantity);
13779: END IF;
13780:
13781: IF (lastrecord) THEN --{
13774: IF (g_asn_debug = 'Y') THEN
13775: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
13776: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
13777: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
13778: asn_debug.put_line('correct remainaing qty ' || x_remaining_quantity);
13779: END IF;
13780:
13781: IF (lastrecord) THEN --{
13782: IF (g_asn_debug = 'Y') THEN
13778: asn_debug.put_line('correct remainaing qty ' || x_remaining_quantity);
13779: END IF;
13780:
13781: IF (lastrecord) THEN --{
13782: IF (g_asn_debug = 'Y') THEN
13783: asn_debug.put_line('Hit exit condition');
13784: END IF;
13785:
13786: IF NOT x_first_trans THEN
13779: END IF;
13780:
13781: IF (lastrecord) THEN --{
13782: IF (g_asn_debug = 'Y') THEN
13783: asn_debug.put_line('Hit exit condition');
13784: END IF;
13785:
13786: IF NOT x_first_trans THEN
13787: -- x_first_trans has been reset which means some cascade has
13785:
13786: IF NOT x_first_trans THEN
13787: -- x_first_trans has been reset which means some cascade has
13788: -- happened. Otherwise current_n = 1
13789: IF (g_asn_debug = 'Y') THEN
13790: asn_debug.put_line('current_n before is ' || current_n);
13791: END IF;
13792:
13793: current_n := current_n - 1;
13786: IF NOT x_first_trans THEN
13787: -- x_first_trans has been reset which means some cascade has
13788: -- happened. Otherwise current_n = 1
13789: IF (g_asn_debug = 'Y') THEN
13790: asn_debug.put_line('current_n before is ' || current_n);
13791: END IF;
13792:
13793: current_n := current_n - 1;
13794: END IF;
13793: current_n := current_n - 1;
13794: END IF;
13795:
13796: -- do the tolerance act here
13797: IF (g_asn_debug = 'Y') THEN
13798: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
13799: asn_debug.put_line('Check which condition has occured');
13800: END IF;
13801:
13794: END IF;
13795:
13796: -- do the tolerance act here
13797: IF (g_asn_debug = 'Y') THEN
13798: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
13799: asn_debug.put_line('Check which condition has occured');
13800: END IF;
13801:
13802: -- lastrecord...we have run out of rows and we still have quantity to allocate
13795:
13796: -- do the tolerance act here
13797: IF (g_asn_debug = 'Y') THEN
13798: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
13799: asn_debug.put_line('Check which condition has occured');
13800: END IF;
13801:
13802: -- lastrecord...we have run out of rows and we still have quantity to allocate
13803: /* Do abs(x_remaining_quantity) since it can be a negative
13803: /* Do abs(x_remaining_quantity) since it can be a negative
13804: * or positive correction.
13805: */
13806: IF ABS(x_remaining_quantity) > 0 THEN --{
13807: IF (g_asn_debug = 'Y') THEN
13808: asn_debug.put_line('There is quantity remaining ');
13809: asn_debug.put_line('tolerable quantity now in plsql table ' || temp_cascaded_table(current_n).quantity);
13810: asn_debug.put_line('rows_fetched ' || rows_fetched);
13811: END IF;
13804: * or positive correction.
13805: */
13806: IF ABS(x_remaining_quantity) > 0 THEN --{
13807: IF (g_asn_debug = 'Y') THEN
13808: asn_debug.put_line('There is quantity remaining ');
13809: asn_debug.put_line('tolerable quantity now in plsql table ' || temp_cascaded_table(current_n).quantity);
13810: asn_debug.put_line('rows_fetched ' || rows_fetched);
13811: END IF;
13812:
13805: */
13806: IF ABS(x_remaining_quantity) > 0 THEN --{
13807: IF (g_asn_debug = 'Y') THEN
13808: asn_debug.put_line('There is quantity remaining ');
13809: asn_debug.put_line('tolerable quantity now in plsql table ' || temp_cascaded_table(current_n).quantity);
13810: asn_debug.put_line('rows_fetched ' || rows_fetched);
13811: END IF;
13812:
13813: IF NOT x_first_trans THEN
13806: IF ABS(x_remaining_quantity) > 0 THEN --{
13807: IF (g_asn_debug = 'Y') THEN
13808: asn_debug.put_line('There is quantity remaining ');
13809: asn_debug.put_line('tolerable quantity now in plsql table ' || temp_cascaded_table(current_n).quantity);
13810: asn_debug.put_line('rows_fetched ' || rows_fetched);
13811: END IF;
13812:
13813: IF NOT x_first_trans THEN
13814: IF (g_asn_debug = 'Y') THEN
13810: asn_debug.put_line('rows_fetched ' || rows_fetched);
13811: END IF;
13812:
13813: IF NOT x_first_trans THEN
13814: IF (g_asn_debug = 'Y') THEN
13815: asn_debug.put_line('not fisrt txn');
13816: END IF;
13817: END IF;
13818:
13811: END IF;
13812:
13813: IF NOT x_first_trans THEN
13814: IF (g_asn_debug = 'Y') THEN
13815: asn_debug.put_line('not fisrt txn');
13816: END IF;
13817: END IF;
13818:
13819: IF rows_fetched > 0
13817: END IF;
13818:
13819: IF rows_fetched > 0
13820: AND NOT x_first_trans THEN --{
13821: IF (g_asn_debug = 'Y') THEN
13822: asn_debug.put_line(' inside transaction_type ' || x_po_correctrec.parent_transaction_type);
13823: END IF;
13824:
13825: IF (SIGN(x_cascaded_table(current_n).quantity) = 1) THEN --{
13818:
13819: IF rows_fetched > 0
13820: AND NOT x_first_trans THEN --{
13821: IF (g_asn_debug = 'Y') THEN
13822: asn_debug.put_line(' inside transaction_type ' || x_po_correctrec.parent_transaction_type);
13823: END IF;
13824:
13825: IF (SIGN(x_cascaded_table(current_n).quantity) = 1) THEN --{
13826: IF (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH')) THEN --{
13823: END IF;
13824:
13825: IF (SIGN(x_cascaded_table(current_n).quantity) = 1) THEN --{
13826: IF (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH')) THEN --{
13827: IF (g_asn_debug = 'Y') THEN
13828: asn_debug.put_line('Need to check qty tolerances');
13829: END IF;
13830:
13831: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
13824:
13825: IF (SIGN(x_cascaded_table(current_n).quantity) = 1) THEN --{
13826: IF (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH')) THEN --{
13827: IF (g_asn_debug = 'Y') THEN
13828: asn_debug.put_line('Need to check qty tolerances');
13829: END IF;
13830:
13831: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
13832: INTO x_qty_rcv_exception_code
13832: INTO x_qty_rcv_exception_code
13833: FROM po_line_locations
13834: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
13835:
13836: IF (g_asn_debug = 'Y') THEN
13837: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
13838: END IF;
13839:
13840: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
13833: FROM po_line_locations
13834: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
13835:
13836: IF (g_asn_debug = 'Y') THEN
13837: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
13838: END IF;
13839:
13840: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
13841: /* Bug# 1807842 */
13839:
13840: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
13841: /* Bug# 1807842 */
13842: IF (temp_cascaded_table(current_n).quantity <= x_converted_parent_trx_qty) THEN --{
13843: IF (g_asn_debug = 'Y') THEN
13844: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_parent_trx_qty));
13845: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13846: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13847: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
13840: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
13841: /* Bug# 1807842 */
13842: IF (temp_cascaded_table(current_n).quantity <= x_converted_parent_trx_qty) THEN --{
13843: IF (g_asn_debug = 'Y') THEN
13844: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_parent_trx_qty));
13845: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13846: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13847: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
13848: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
13841: /* Bug# 1807842 */
13842: IF (temp_cascaded_table(current_n).quantity <= x_converted_parent_trx_qty) THEN --{
13843: IF (g_asn_debug = 'Y') THEN
13844: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_parent_trx_qty));
13845: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13846: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13847: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
13848: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
13849: END IF;
13842: IF (temp_cascaded_table(current_n).quantity <= x_converted_parent_trx_qty) THEN --{
13843: IF (g_asn_debug = 'Y') THEN
13844: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_parent_trx_qty));
13845: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13846: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13847: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
13848: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
13849: END IF;
13850:
13843: IF (g_asn_debug = 'Y') THEN
13844: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_parent_trx_qty));
13845: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13846: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13847: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
13848: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
13849: END IF;
13850:
13851: temp_cascaded_table(current_n).quantity := temp_cascaded_table(current_n).quantity + x_remaining_quantity;
13844: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_parent_trx_qty));
13845: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13846: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13847: asn_debug.put_line('Assign remaining ASN UOM qty ' || TO_CHAR(x_remaining_quantity) || ' to last record');
13848: asn_debug.put_line('Assign remaining PO UOM qty ' || TO_CHAR(x_remaining_qty_po_uom) || ' to last record');
13849: END IF;
13850:
13851: temp_cascaded_table(current_n).quantity := temp_cascaded_table(current_n).quantity + x_remaining_quantity;
13852: temp_cascaded_table(current_n).primary_quantity := temp_cascaded_table(current_n).primary_quantity
13858: END IF; /* Bug# 1807842 */ --}
13859:
13860: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).quantity * tax_amount_factor, 6);
13861:
13862: IF (g_asn_debug = 'Y') THEN
13863: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13864: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13865: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13866: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13859:
13860: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).quantity * tax_amount_factor, 6);
13861:
13862: IF (g_asn_debug = 'Y') THEN
13863: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13864: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13865: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13866: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13867: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13860: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).quantity * tax_amount_factor, 6);
13861:
13862: IF (g_asn_debug = 'Y') THEN
13863: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13864: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13865: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13866: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13867: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13868: END IF;
13861:
13862: IF (g_asn_debug = 'Y') THEN
13863: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13864: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13865: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13866: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13867: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13868: END IF;
13869:
13862: IF (g_asn_debug = 'Y') THEN
13863: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13864: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13865: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13866: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13867: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13868: END IF;
13869:
13870: --
13863: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13864: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13865: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13866: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13867: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13868: END IF;
13869:
13870: --
13871: get_clm_info( 'QUANTITY',
13881: END IF;
13882: --
13883:
13884: IF x_qty_rcv_exception_code = 'WARNING' THEN --{
13885: IF (g_asn_debug = 'Y') THEN
13886: asn_debug.put_line('IN WARNING');
13887: END IF;
13888:
13889: temp_cascaded_table(current_n).error_status := 'W';
13882: --
13883:
13884: IF x_qty_rcv_exception_code = 'WARNING' THEN --{
13885: IF (g_asn_debug = 'Y') THEN
13886: asn_debug.put_line('IN WARNING');
13887: END IF;
13888:
13889: temp_cascaded_table(current_n).error_status := 'W';
13890: temp_cascaded_table(current_n).error_message := 'RCV_ALL_QTY_OVER_TOLERANCE';
13888:
13889: temp_cascaded_table(current_n).error_status := 'W';
13890: temp_cascaded_table(current_n).error_message := 'RCV_ALL_QTY_OVER_TOLERANCE';
13891:
13892: IF (g_asn_debug = 'Y') THEN
13893: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
13894: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
13895: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
13896: END IF;
13889: temp_cascaded_table(current_n).error_status := 'W';
13890: temp_cascaded_table(current_n).error_message := 'RCV_ALL_QTY_OVER_TOLERANCE';
13891:
13892: IF (g_asn_debug = 'Y') THEN
13893: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
13894: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
13895: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
13896: END IF;
13897:
13890: temp_cascaded_table(current_n).error_message := 'RCV_ALL_QTY_OVER_TOLERANCE';
13891:
13892: IF (g_asn_debug = 'Y') THEN
13893: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
13894: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
13895: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
13896: END IF;
13897:
13898: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
13891:
13892: IF (g_asn_debug = 'Y') THEN
13893: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
13894: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
13895: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
13896: END IF;
13897:
13898: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
13899: rcv_error_pkg.set_error_message('RCV_ENTER_QTY_GT_ZERO', x_cascaded_table(n).error_message);
13900: rcv_error_pkg.set_token('QTY_A', temp_cascaded_table(current_n).quantity);
13901: rcv_error_pkg.set_token('QTY_B', temp_cascaded_table(current_n).quantity - x_remaining_quantity);
13902: rcv_error_pkg.log_interface_warning('QUANTITY');
13903:
13904: IF (g_asn_debug = 'Y') THEN
13905: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
13906: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
13907: asn_debug.put_line('Need to insert into po_interface_errors');
13908: END IF;
13901: rcv_error_pkg.set_token('QTY_B', temp_cascaded_table(current_n).quantity - x_remaining_quantity);
13902: rcv_error_pkg.log_interface_warning('QUANTITY');
13903:
13904: IF (g_asn_debug = 'Y') THEN
13905: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
13906: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
13907: asn_debug.put_line('Need to insert into po_interface_errors');
13908: END IF;
13909: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
13902: rcv_error_pkg.log_interface_warning('QUANTITY');
13903:
13904: IF (g_asn_debug = 'Y') THEN
13905: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
13906: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
13907: asn_debug.put_line('Need to insert into po_interface_errors');
13908: END IF;
13909: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
13910:
13903:
13904: IF (g_asn_debug = 'Y') THEN
13905: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
13906: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
13907: asn_debug.put_line('Need to insert into po_interface_errors');
13908: END IF;
13909: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
13910:
13911: IF (g_asn_debug = 'Y') THEN
13907: asn_debug.put_line('Need to insert into po_interface_errors');
13908: END IF;
13909: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
13910:
13911: IF (g_asn_debug = 'Y') THEN
13912: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13913: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13914: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13915: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13908: END IF;
13909: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
13910:
13911: IF (g_asn_debug = 'Y') THEN
13912: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13913: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13914: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13915: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13916: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13909: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
13910:
13911: IF (g_asn_debug = 'Y') THEN
13912: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13913: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13914: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13915: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13916: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13917: END IF;
13910:
13911: IF (g_asn_debug = 'Y') THEN
13912: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13913: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13914: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13915: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13916: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13917: END IF;
13918: END IF; --}
13911: IF (g_asn_debug = 'Y') THEN
13912: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13913: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13914: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13915: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13916: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13917: END IF;
13918: END IF; --}
13919: END IF; --}
13912: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity));
13913: asn_debug.put_line('Current shipped quantity ' || TO_CHAR(temp_cascaded_table(current_n).quantity_shipped));
13914: asn_debug.put_line('Current source document quantity ' || TO_CHAR(temp_cascaded_table(current_n).source_doc_quantity));
13915: asn_debug.put_line('Current primary quantity ' || TO_CHAR(temp_cascaded_table(current_n).primary_quantity));
13916: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
13917: END IF;
13918: END IF; --}
13919: END IF; --}
13920:
13920:
13921: IF ( ( (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH'))
13922: AND x_qty_rcv_exception_code = 'REJECT')
13923: OR (x_po_correctrec.parent_transaction_type NOT IN('RECEIVE', 'MATCH'))) THEN --{
13924: IF (g_asn_debug = 'Y') THEN
13925: asn_debug.put_line('Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
13926: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
13927: END IF;
13928:
13921: IF ( ( (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH'))
13922: AND x_qty_rcv_exception_code = 'REJECT')
13923: OR (x_po_correctrec.parent_transaction_type NOT IN('RECEIVE', 'MATCH'))) THEN --{
13924: IF (g_asn_debug = 'Y') THEN
13925: asn_debug.put_line('Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
13926: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
13927: END IF;
13928:
13929: IF (g_asn_debug = 'Y') THEN
13922: AND x_qty_rcv_exception_code = 'REJECT')
13923: OR (x_po_correctrec.parent_transaction_type NOT IN('RECEIVE', 'MATCH'))) THEN --{
13924: IF (g_asn_debug = 'Y') THEN
13925: asn_debug.put_line('Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
13926: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
13927: END IF;
13928:
13929: IF (g_asn_debug = 'Y') THEN
13930: asn_debug.put_line('delete the temp table ');
13925: asn_debug.put_line('Extra ASN UOM Quantity ' || TO_CHAR(x_remaining_quantity));
13926: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
13927: END IF;
13928:
13929: IF (g_asn_debug = 'Y') THEN
13930: asn_debug.put_line('delete the temp table ');
13931: END IF;
13932:
13933: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
13926: asn_debug.put_line('Extra PO UOM Quantity ' || TO_CHAR(x_remaining_qty_po_uom));
13927: END IF;
13928:
13929: IF (g_asn_debug = 'Y') THEN
13930: asn_debug.put_line('delete the temp table ');
13931: END IF;
13932:
13933: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
13934:
13956: temp_cascaded_table.DELETE(i);
13957: END LOOP;
13958: END IF;
13959:
13960: IF (g_asn_debug = 'Y') THEN
13961: asn_debug.put_line('mark the actual table with error status');
13962: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13963: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
13964: END IF;
13957: END LOOP;
13958: END IF;
13959:
13960: IF (g_asn_debug = 'Y') THEN
13961: asn_debug.put_line('mark the actual table with error status');
13962: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13963: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
13964: END IF;
13965:
13958: END IF;
13959:
13960: IF (g_asn_debug = 'Y') THEN
13961: asn_debug.put_line('mark the actual table with error status');
13962: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13963: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
13964: END IF;
13965:
13966: IF (g_asn_debug = 'Y') THEN
13959:
13960: IF (g_asn_debug = 'Y') THEN
13961: asn_debug.put_line('mark the actual table with error status');
13962: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13963: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
13964: END IF;
13965:
13966: IF (g_asn_debug = 'Y') THEN
13967: asn_debug.put_line('Need to insert a row into po_interface_errors');
13962: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13963: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
13964: END IF;
13965:
13966: IF (g_asn_debug = 'Y') THEN
13967: asn_debug.put_line('Need to insert a row into po_interface_errors');
13968: END IF;
13969: END IF; --} matches if(none/warning) and elseif(reject)
13970: END IF; --}
13963: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
13964: END IF;
13965:
13966: IF (g_asn_debug = 'Y') THEN
13967: asn_debug.put_line('Need to insert a row into po_interface_errors');
13968: END IF;
13969: END IF; --} matches if(none/warning) and elseif(reject)
13970: END IF; --}
13971:
13973: /* for correct,accept an reject type we dont have the
13974: * tolerance check. Hence error out.
13975: * We cannot correct quantities more than that was received.
13976: */
13977: IF (g_asn_debug = 'Y') THEN
13978: asn_debug.put_line(' in correct extra Quantity ' || TO_CHAR(x_remaining_quantity));
13979: END IF;
13980:
13981: IF (g_asn_debug = 'Y') THEN
13974: * tolerance check. Hence error out.
13975: * We cannot correct quantities more than that was received.
13976: */
13977: IF (g_asn_debug = 'Y') THEN
13978: asn_debug.put_line(' in correct extra Quantity ' || TO_CHAR(x_remaining_quantity));
13979: END IF;
13980:
13981: IF (g_asn_debug = 'Y') THEN
13982: asn_debug.put_line('delete the temp table ');
13977: IF (g_asn_debug = 'Y') THEN
13978: asn_debug.put_line(' in correct extra Quantity ' || TO_CHAR(x_remaining_quantity));
13979: END IF;
13980:
13981: IF (g_asn_debug = 'Y') THEN
13982: asn_debug.put_line('delete the temp table ');
13983: END IF;
13984: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
13985: rcv_error_pkg.set_error_message('RCV_CORRECT_QTY_OVER_TOLERANCE', x_cascaded_table(n).error_message);
13978: asn_debug.put_line(' in correct extra Quantity ' || TO_CHAR(x_remaining_quantity));
13979: END IF;
13980:
13981: IF (g_asn_debug = 'Y') THEN
13982: asn_debug.put_line('delete the temp table ');
13983: END IF;
13984: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
13985: rcv_error_pkg.set_error_message('RCV_CORRECT_QTY_OVER_TOLERANCE', x_cascaded_table(n).error_message);
13986: rcv_error_pkg.set_token('QTY_A', x_cascaded_table(current_n).quantity);
13992: temp_cascaded_table.DELETE(i);
13993: END LOOP;
13994: END IF;
13995:
13996: IF (g_asn_debug = 'Y') THEN
13997: asn_debug.put_line('mark the actual table with error status');
13998: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13999: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
14000: END IF;
13993: END LOOP;
13994: END IF;
13995:
13996: IF (g_asn_debug = 'Y') THEN
13997: asn_debug.put_line('mark the actual table with error status');
13998: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13999: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
14000: END IF;
14001:
13994: END IF;
13995:
13996: IF (g_asn_debug = 'Y') THEN
13997: asn_debug.put_line('mark the actual table with error status');
13998: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13999: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
14000: END IF;
14001:
14002: IF (g_asn_debug = 'Y') THEN
13995:
13996: IF (g_asn_debug = 'Y') THEN
13997: asn_debug.put_line('mark the actual table with error status');
13998: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13999: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
14000: END IF;
14001:
14002: IF (g_asn_debug = 'Y') THEN
14003: asn_debug.put_line('Need to insert a row into po_interface_errors for correct');
13998: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
13999: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
14000: END IF;
14001:
14002: IF (g_asn_debug = 'Y') THEN
14003: asn_debug.put_line('Need to insert a row into po_interface_errors for correct');
14004: END IF;
14005: END IF; --}
14006: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
13999: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
14000: END IF;
14001:
14002: IF (g_asn_debug = 'Y') THEN
14003: asn_debug.put_line('Need to insert a row into po_interface_errors for correct');
14004: END IF;
14005: END IF; --}
14006: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
14007: IF rows_fetched = 0 THEN
14004: END IF;
14005: END IF; --}
14006: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
14007: IF rows_fetched = 0 THEN
14008: IF (g_asn_debug = 'Y') THEN
14009: asn_debug.put_line('No rows were retrieved from cursor.');
14010: END IF;
14011: ELSIF x_first_trans THEN
14012: IF (g_asn_debug = 'Y') THEN
14005: END IF; --}
14006: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
14007: IF rows_fetched = 0 THEN
14008: IF (g_asn_debug = 'Y') THEN
14009: asn_debug.put_line('No rows were retrieved from cursor.');
14010: END IF;
14011: ELSIF x_first_trans THEN
14012: IF (g_asn_debug = 'Y') THEN
14013: asn_debug.put_line('No rows were cascaded');
14008: IF (g_asn_debug = 'Y') THEN
14009: asn_debug.put_line('No rows were retrieved from cursor.');
14010: END IF;
14011: ELSIF x_first_trans THEN
14012: IF (g_asn_debug = 'Y') THEN
14013: asn_debug.put_line('No rows were cascaded');
14014: END IF;
14015: END IF;
14016:
14009: asn_debug.put_line('No rows were retrieved from cursor.');
14010: END IF;
14011: ELSIF x_first_trans THEN
14012: IF (g_asn_debug = 'Y') THEN
14013: asn_debug.put_line('No rows were cascaded');
14014: END IF;
14015: END IF;
14016:
14017: x_temp_count := 1;
14123: END LOOP;
14124: END IF;
14125: END IF; --}
14126: ELSE -- }{
14127: IF (g_asn_debug = 'Y') THEN
14128: asn_debug.put_line('Remaining UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
14129: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
14130: END IF;
14131: END IF; --} ends the check for whether last record has been reached
14124: END IF;
14125: END IF; --}
14126: ELSE -- }{
14127: IF (g_asn_debug = 'Y') THEN
14128: asn_debug.put_line('Remaining UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
14129: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
14130: END IF;
14131: END IF; --} ends the check for whether last record has been reached
14132:
14125: END IF; --}
14126: ELSE -- }{
14127: IF (g_asn_debug = 'Y') THEN
14128: asn_debug.put_line('Remaining UOM quantity is zero ' || TO_CHAR(x_remaining_quantity));
14129: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
14130: END IF;
14131: END IF; --} ends the check for whether last record has been reached
14132:
14133: -- close cursors
14131: END IF; --} ends the check for whether last record has been reached
14132:
14133: -- close cursors
14134:
14135: IF (g_asn_debug = 'Y') THEN
14136: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions ' || current_n);
14137: END IF;
14138:
14139: IF po_correct%ISOPEN THEN
14132:
14133: -- close cursors
14134:
14135: IF (g_asn_debug = 'Y') THEN
14136: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions ' || current_n);
14137: END IF;
14138:
14139: IF po_correct%ISOPEN THEN
14140: CLOSE po_correct;
14143: IF po_correct_rti%ISOPEN THEN
14144: CLOSE po_correct_rti;
14145: END IF;
14146:
14147: IF (g_asn_debug = 'Y') THEN
14148: asn_debug.put_line('before exit current_n is ' || current_n);
14149: END IF;
14150:
14151: EXIT;
14144: CLOSE po_correct_rti;
14145: END IF;
14146:
14147: IF (g_asn_debug = 'Y') THEN
14148: asn_debug.put_line('before exit current_n is ' || current_n);
14149: END IF;
14150:
14151: EXIT;
14152: END IF; --} matches lastrecord or x_remaining_quantity <= 0
14155: --copy the parents unit of measure into the childs unit of measure, as this will be the one
14156: --which will be finally populated into RT for the child record (correction record).
14157: --temp_cascaded_table(current_n).unit_of_measure := x_po_correctrec.unit_of_meas;
14158:
14159: IF (g_asn_debug = 'Y') THEN
14160: asn_debug.put_line(' Entering qty calculation for correct');
14161: END IF;
14162:
14163: IF (x_first_trans)
14156: --which will be finally populated into RT for the child record (correction record).
14157: --temp_cascaded_table(current_n).unit_of_measure := x_po_correctrec.unit_of_meas;
14158:
14159: IF (g_asn_debug = 'Y') THEN
14160: asn_debug.put_line(' Entering qty calculation for correct');
14161: END IF;
14162:
14163: IF (x_first_trans)
14164: AND temp_cascaded_table(current_n).item_id IS NULL THEN
14168:
14169: insert_into_table := FALSE;
14170: already_allocated_qty := 0;
14171:
14172: IF (g_asn_debug = 'Y') THEN
14173: asn_debug.put_line('calling Correct get_available_qty ' || x_po_correctrec.parent_transaction_type);
14174: END IF;
14175:
14176: get_interface_available_qty(temp_cascaded_table,
14169: insert_into_table := FALSE;
14170: already_allocated_qty := 0;
14171:
14172: IF (g_asn_debug = 'Y') THEN
14173: asn_debug.put_line('calling Correct get_available_qty ' || x_po_correctrec.parent_transaction_type);
14174: END IF;
14175:
14176: get_interface_available_qty(temp_cascaded_table,
14177: current_n,
14177: current_n,
14178: x_converted_parent_trx_qty
14179: );
14180:
14181: IF (g_asn_debug = 'Y') THEN
14182: asn_debug.put_line('correct interface_available_qty ' || x_converted_parent_trx_qty);
14183: END IF;
14184:
14185: /* x_converted_parent_trx_qty will be 0 when this is not a child
14178: x_converted_parent_trx_qty
14179: );
14180:
14181: IF (g_asn_debug = 'Y') THEN
14182: asn_debug.put_line('correct interface_available_qty ' || x_converted_parent_trx_qty);
14183: END IF;
14184:
14185: /* x_converted_parent_trx_qty will be 0 when this is not a child
14186: * transaction to any rti row. Also for correct, grand parent
14187: * may already be processed and for positive correction we
14188: * might need to get the quantity from the grand parent.
14189: */
14190: IF (x_converted_parent_trx_qty = 0) THEN --{
14191: IF (g_asn_debug = 'Y') THEN
14192: asn_debug.put_line('interface qty is 0');
14193: END IF;
14194:
14195: IF (SIGN(temp_cascaded_table(current_n).quantity) = -1) THEN --{
14188: * might need to get the quantity from the grand parent.
14189: */
14190: IF (x_converted_parent_trx_qty = 0) THEN --{
14191: IF (g_asn_debug = 'Y') THEN
14192: asn_debug.put_line('interface qty is 0');
14193: END IF;
14194:
14195: IF (SIGN(temp_cascaded_table(current_n).quantity) = -1) THEN --{
14196: rcv_quantities_s.get_available_quantity('CORRECT',
14205: x_secondary_available_qty
14206: );
14207:
14208: /* Bug#5369121 - START */
14209: IF (g_asn_debug = 'Y') THEN
14210: asn_debug.put_line('x_converted_parent_trx_qty:' || x_converted_parent_trx_qty);
14211: asn_debug.put_line('transaction_quantity:' || temp_cascaded_table(current_n).quantity);
14212: END IF;
14213:
14206: );
14207:
14208: /* Bug#5369121 - START */
14209: IF (g_asn_debug = 'Y') THEN
14210: asn_debug.put_line('x_converted_parent_trx_qty:' || x_converted_parent_trx_qty);
14211: asn_debug.put_line('transaction_quantity:' || temp_cascaded_table(current_n).quantity);
14212: END IF;
14213:
14214: IF (x_converted_parent_trx_qty < ABS(temp_cascaded_table(current_n).quantity)) THEN
14207:
14208: /* Bug#5369121 - START */
14209: IF (g_asn_debug = 'Y') THEN
14210: asn_debug.put_line('x_converted_parent_trx_qty:' || x_converted_parent_trx_qty);
14211: asn_debug.put_line('transaction_quantity:' || temp_cascaded_table(current_n).quantity);
14212: END IF;
14213:
14214: IF (x_converted_parent_trx_qty < ABS(temp_cascaded_table(current_n).quantity)) THEN
14215:
14251: /*
14252: ** There is unprocessed quantity. Convert it to the transaction uom
14253: ** so that the available quantity can be calculated in the trx uom
14254: */
14255: IF (g_asn_debug = 'Y') THEN
14256: asn_debug.put_line('Before uom_convert:');
14257: asn_debug.put_line('l_interface_quantity' || l_interface_quantity);
14258: asn_debug.put_line('l_primary_uom' || l_primary_uom);
14259: asn_debug.put_line('l_transaction_uom' || l_transaction_uom);
14252: ** There is unprocessed quantity. Convert it to the transaction uom
14253: ** so that the available quantity can be calculated in the trx uom
14254: */
14255: IF (g_asn_debug = 'Y') THEN
14256: asn_debug.put_line('Before uom_convert:');
14257: asn_debug.put_line('l_interface_quantity' || l_interface_quantity);
14258: asn_debug.put_line('l_primary_uom' || l_primary_uom);
14259: asn_debug.put_line('l_transaction_uom' || l_transaction_uom);
14260: asn_debug.put_line('l_item_id' || l_item_id);
14253: ** so that the available quantity can be calculated in the trx uom
14254: */
14255: IF (g_asn_debug = 'Y') THEN
14256: asn_debug.put_line('Before uom_convert:');
14257: asn_debug.put_line('l_interface_quantity' || l_interface_quantity);
14258: asn_debug.put_line('l_primary_uom' || l_primary_uom);
14259: asn_debug.put_line('l_transaction_uom' || l_transaction_uom);
14260: asn_debug.put_line('l_item_id' || l_item_id);
14261: END IF;
14254: */
14255: IF (g_asn_debug = 'Y') THEN
14256: asn_debug.put_line('Before uom_convert:');
14257: asn_debug.put_line('l_interface_quantity' || l_interface_quantity);
14258: asn_debug.put_line('l_primary_uom' || l_primary_uom);
14259: asn_debug.put_line('l_transaction_uom' || l_transaction_uom);
14260: asn_debug.put_line('l_item_id' || l_item_id);
14261: END IF;
14262:
14255: IF (g_asn_debug = 'Y') THEN
14256: asn_debug.put_line('Before uom_convert:');
14257: asn_debug.put_line('l_interface_quantity' || l_interface_quantity);
14258: asn_debug.put_line('l_primary_uom' || l_primary_uom);
14259: asn_debug.put_line('l_transaction_uom' || l_transaction_uom);
14260: asn_debug.put_line('l_item_id' || l_item_id);
14261: END IF;
14262:
14263: po_uom_s.uom_convert(l_interface_quantity, l_primary_uom, l_item_id,
14256: asn_debug.put_line('Before uom_convert:');
14257: asn_debug.put_line('l_interface_quantity' || l_interface_quantity);
14258: asn_debug.put_line('l_primary_uom' || l_primary_uom);
14259: asn_debug.put_line('l_transaction_uom' || l_transaction_uom);
14260: asn_debug.put_line('l_item_id' || l_item_id);
14261: END IF;
14262:
14263: po_uom_s.uom_convert(l_interface_quantity, l_primary_uom, l_item_id,
14264: l_transaction_uom, l_interface_qty_in_trx_uom);
14266: END IF;
14267:
14268: x_converted_parent_trx_qty := x_converted_parent_trx_qty - l_interface_qty_in_trx_uom;
14269:
14270: IF (g_asn_debug = 'Y') THEN
14271: asn_debug.put_line('x_converted_parent_trx_qty:' || x_converted_parent_trx_qty);
14272: END IF;
14273:
14274: END IF;
14267:
14268: x_converted_parent_trx_qty := x_converted_parent_trx_qty - l_interface_qty_in_trx_uom;
14269:
14270: IF (g_asn_debug = 'Y') THEN
14271: asn_debug.put_line('x_converted_parent_trx_qty:' || x_converted_parent_trx_qty);
14272: END IF;
14273:
14274: END IF;
14275: /* Bug#5369121 - END */
14304: END IF;
14305: END IF; --}
14306: END IF; --} -- interface_available_qty is 0.
14307:
14308: IF (g_asn_debug = 'Y') THEN
14309: asn_debug.put_line('qty from GET_AVAILABLE_QUANTITY for correct is ' || x_converted_parent_trx_qty);
14310: asn_debug.put_line('tolerable qty from GET_AVAILABLE_QUANTITY for correct is ' || x_tolerable_qty);
14311: END IF;
14312:
14305: END IF; --}
14306: END IF; --} -- interface_available_qty is 0.
14307:
14308: IF (g_asn_debug = 'Y') THEN
14309: asn_debug.put_line('qty from GET_AVAILABLE_QUANTITY for correct is ' || x_converted_parent_trx_qty);
14310: asn_debug.put_line('tolerable qty from GET_AVAILABLE_QUANTITY for correct is ' || x_tolerable_qty);
14311: END IF;
14312:
14313: IF (x_remaining_quantity = 0) THEN
14306: END IF; --} -- interface_available_qty is 0.
14307:
14308: IF (g_asn_debug = 'Y') THEN
14309: asn_debug.put_line('qty from GET_AVAILABLE_QUANTITY for correct is ' || x_converted_parent_trx_qty);
14310: asn_debug.put_line('tolerable qty from GET_AVAILABLE_QUANTITY for correct is ' || x_tolerable_qty);
14311: END IF;
14312:
14313: IF (x_remaining_quantity = 0) THEN
14314: IF (g_asn_debug = 'Y') THEN
14310: asn_debug.put_line('tolerable qty from GET_AVAILABLE_QUANTITY for correct is ' || x_tolerable_qty);
14311: END IF;
14312:
14313: IF (x_remaining_quantity = 0) THEN
14314: IF (g_asn_debug = 'Y') THEN
14315: asn_debug.put_line(' correct Need an error message in the interface tables');
14316: END IF;
14317: ELSE
14318: /* Converted successfully and have some quantity on which we can act */
14311: END IF;
14312:
14313: IF (x_remaining_quantity = 0) THEN
14314: IF (g_asn_debug = 'Y') THEN
14315: asn_debug.put_line(' correct Need an error message in the interface tables');
14316: END IF;
14317: ELSE
14318: /* Converted successfully and have some quantity on which we can act */
14319: IF (g_asn_debug = 'Y') THEN
14315: asn_debug.put_line(' correct Need an error message in the interface tables');
14316: END IF;
14317: ELSE
14318: /* Converted successfully and have some quantity on which we can act */
14319: IF (g_asn_debug = 'Y') THEN
14320: asn_debug.put_line('Converted trx qty that is available ' || x_converted_parent_trx_qty);
14321: asn_debug.put_line('Remaining qty in parents uom that is available ' || x_remaining_quantity);
14322: END IF;
14323:
14316: END IF;
14317: ELSE
14318: /* Converted successfully and have some quantity on which we can act */
14319: IF (g_asn_debug = 'Y') THEN
14320: asn_debug.put_line('Converted trx qty that is available ' || x_converted_parent_trx_qty);
14321: asn_debug.put_line('Remaining qty in parents uom that is available ' || x_remaining_quantity);
14322: END IF;
14323:
14324: /* x_tolerable_quantity will be > 0 only for correction
14317: ELSE
14318: /* Converted successfully and have some quantity on which we can act */
14319: IF (g_asn_debug = 'Y') THEN
14320: asn_debug.put_line('Converted trx qty that is available ' || x_converted_parent_trx_qty);
14321: asn_debug.put_line('Remaining qty in parents uom that is available ' || x_remaining_quantity);
14322: END IF;
14323:
14324: /* x_tolerable_quantity will be > 0 only for correction
14325: * against a receive transcation.
14327: IF ( (SIGN(temp_cascaded_table(current_n).quantity) = 1)
14328: AND (x_tolerable_qty > 0)) THEN --{
14329: x_converted_parent_trx_qty := x_tolerable_qty;
14330:
14331: IF (g_asn_debug = 'Y') THEN
14332: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_parent_trx_qty));
14333: END IF;
14334: END IF; --}
14335:
14328: AND (x_tolerable_qty > 0)) THEN --{
14329: x_converted_parent_trx_qty := x_tolerable_qty;
14330:
14331: IF (g_asn_debug = 'Y') THEN
14332: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_parent_trx_qty));
14333: END IF;
14334: END IF; --}
14335:
14336: IF (g_asn_debug = 'Y') THEN
14332: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_parent_trx_qty));
14333: END IF;
14334: END IF; --}
14335:
14336: IF (g_asn_debug = 'Y') THEN
14337: asn_debug.put_line('x_converted_parent_trx_qty : ' || TO_CHAR(x_converted_parent_trx_qty));
14338: END IF;
14339:
14340: IF (x_converted_parent_trx_qty > 0) THEN --{
14333: END IF;
14334: END IF; --}
14335:
14336: IF (g_asn_debug = 'Y') THEN
14337: asn_debug.put_line('x_converted_parent_trx_qty : ' || TO_CHAR(x_converted_parent_trx_qty));
14338: END IF;
14339:
14340: IF (x_converted_parent_trx_qty > 0) THEN --{
14341: /* Compare with abs(x_remaining_qty) here since we want
14351: */
14352: x_remaining_quantity := x_remaining_quantity - SIGN(temp_cascaded_table(current_n).quantity) * x_converted_parent_trx_qty;
14353: x_converted_parent_trx_qty := SIGN(temp_cascaded_table(current_n).quantity) * x_converted_parent_trx_qty;
14354:
14355: IF (g_asn_debug = 'Y') THEN
14356: asn_debug.put_line('remaning qty after allocation is : ' || TO_CHAR(x_remaining_quantity));
14357: END IF;
14358:
14359: insert_into_table := TRUE;
14352: x_remaining_quantity := x_remaining_quantity - SIGN(temp_cascaded_table(current_n).quantity) * x_converted_parent_trx_qty;
14353: x_converted_parent_trx_qty := SIGN(temp_cascaded_table(current_n).quantity) * x_converted_parent_trx_qty;
14354:
14355: IF (g_asn_debug = 'Y') THEN
14356: asn_debug.put_line('remaning qty after allocation is : ' || TO_CHAR(x_remaining_quantity));
14357: END IF;
14358:
14359: insert_into_table := TRUE;
14360: ELSE --}{
14357: END IF;
14358:
14359: insert_into_table := TRUE;
14360: ELSE --}{
14361: IF (g_asn_debug = 'Y') THEN
14362: asn_debug.put_line('We are in >= Qty branch ');
14363: END IF;
14364:
14365: x_converted_parent_trx_qty := x_remaining_quantity;
14358:
14359: insert_into_table := TRUE;
14360: ELSE --}{
14361: IF (g_asn_debug = 'Y') THEN
14362: asn_debug.put_line('We are in >= Qty branch ');
14363: END IF;
14364:
14365: x_converted_parent_trx_qty := x_remaining_quantity;
14366: insert_into_table := TRUE;
14369: ELSE /* x_converted_parent_trx_qty >0 */ --}{
14370:
14371: -- so that the row can be used based on qty tolerance
14372: -- checks
14373: IF (g_asn_debug = 'Y') THEN
14374: asn_debug.put_line('Quantity is less then 0 but last record');
14375: END IF;
14376:
14377: insert_into_table := TRUE;
14370:
14371: -- so that the row can be used based on qty tolerance
14372: -- checks
14373: IF (g_asn_debug = 'Y') THEN
14374: asn_debug.put_line('Quantity is less then 0 but last record');
14375: END IF;
14376:
14377: insert_into_table := TRUE;
14378: x_converted_parent_trx_qty := 0;
14379: END IF; /*x_converted_parent_trx_qty >0 */ --}
14380: END IF; --} just added this
14381:
14382: /* Converted qty successfully and we have some quantity on which we can act */
14383: IF (g_asn_debug = 'Y') THEN
14384: asn_debug.put_line('Transaction qty in terms of the parents uom is ' || x_converted_parent_trx_qty);
14385: END IF;
14386:
14387: IF insert_into_table THEN --{
14380: END IF; --} just added this
14381:
14382: /* Converted qty successfully and we have some quantity on which we can act */
14383: IF (g_asn_debug = 'Y') THEN
14384: asn_debug.put_line('Transaction qty in terms of the parents uom is ' || x_converted_parent_trx_qty);
14385: END IF;
14386:
14387: IF insert_into_table THEN --{
14388: IF (x_first_trans) THEN --{
14385: END IF;
14386:
14387: IF insert_into_table THEN --{
14388: IF (x_first_trans) THEN --{
14389: IF (g_asn_debug = 'Y') THEN
14390: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
14391: END IF;
14392:
14393: x_first_trans := FALSE;
14386:
14387: IF insert_into_table THEN --{
14388: IF (x_first_trans) THEN --{
14389: IF (g_asn_debug = 'Y') THEN
14390: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
14391: END IF;
14392:
14393: x_first_trans := FALSE;
14394: ELSE --}{
14391: END IF;
14392:
14393: x_first_trans := FALSE;
14394: ELSE --}{
14395: IF (g_asn_debug = 'Y') THEN
14396: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
14397: END IF;
14398:
14399: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
14392:
14393: x_first_trans := FALSE;
14394: ELSE --}{
14395: IF (g_asn_debug = 'Y') THEN
14396: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
14397: END IF;
14398:
14399: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
14400: END IF; --}
14415: ELSE
14416: temp_cascaded_table(current_n).primary_quantity := x_converted_parent_trx_qty;
14417: END IF;
14418:
14419: IF (g_asn_debug = 'Y') THEN
14420: asn_debug.put_line('Transaction qty in terms of the primary uom is ' || temp_cascaded_table(current_n).primary_quantity);
14421: END IF;
14422:
14423: current_n := current_n + 1;
14416: temp_cascaded_table(current_n).primary_quantity := x_converted_parent_trx_qty;
14417: END IF;
14418:
14419: IF (g_asn_debug = 'Y') THEN
14420: asn_debug.put_line('Transaction qty in terms of the primary uom is ' || temp_cascaded_table(current_n).primary_quantity);
14421: END IF;
14422:
14423: current_n := current_n + 1;
14424:
14421: END IF;
14422:
14423: current_n := current_n + 1;
14424:
14425: IF (g_asn_debug = 'Y') THEN
14426: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
14427: END IF;
14428: END IF; --}
14429: /* Get the available qty in PRIMARY UOM */
14422:
14423: current_n := current_n + 1;
14424:
14425: IF (g_asn_debug = 'Y') THEN
14426: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
14427: END IF;
14428: END IF; --}
14429: /* Get the available qty in PRIMARY UOM */
14430: /*
14436: */
14437: END LOOP; --}
14438: ELSE --} {
14439: -- error_status and error_message are set after validate_quantity_shipped
14440: IF (g_asn_debug = 'Y') THEN
14441: asn_debug.put_line('No po_header_id/item_id ');
14442: END IF;
14443:
14444: IF (g_asn_debug = 'Y') THEN
14437: END LOOP; --}
14438: ELSE --} {
14439: -- error_status and error_message are set after validate_quantity_shipped
14440: IF (g_asn_debug = 'Y') THEN
14441: asn_debug.put_line('No po_header_id/item_id ');
14442: END IF;
14443:
14444: IF (g_asn_debug = 'Y') THEN
14445: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
14440: IF (g_asn_debug = 'Y') THEN
14441: asn_debug.put_line('No po_header_id/item_id ');
14442: END IF;
14443:
14444: IF (g_asn_debug = 'Y') THEN
14445: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
14446: END IF;
14447:
14448: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
14441: asn_debug.put_line('No po_header_id/item_id ');
14442: END IF;
14443:
14444: IF (g_asn_debug = 'Y') THEN
14445: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
14446: END IF;
14447:
14448: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
14449: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
14457:
14458: RETURN;
14459: END IF; -- } of (asn quantity_shipped was valid)
14460:
14461: IF (g_asn_debug = 'Y') THEN
14462: asn_debug.put_line('before closing cursors current_n is ' || temp_cascaded_table.COUNT);
14463: END IF;
14464:
14465: IF po_correct%ISOPEN THEN
14458: RETURN;
14459: END IF; -- } of (asn quantity_shipped was valid)
14460:
14461: IF (g_asn_debug = 'Y') THEN
14462: asn_debug.put_line('before closing cursors current_n is ' || temp_cascaded_table.COUNT);
14463: END IF;
14464:
14465: IF po_correct%ISOPEN THEN
14466: CLOSE po_correct;
14469: IF po_correct_rti%ISOPEN THEN
14470: CLOSE po_correct_rti;
14471: END IF;
14472:
14473: IF (g_asn_debug = 'Y') THEN
14474: asn_debug.put_line('Exit explode_line_quantity');
14475: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
14476: END IF;
14477: EXCEPTION
14470: CLOSE po_correct_rti;
14471: END IF;
14472:
14473: IF (g_asn_debug = 'Y') THEN
14474: asn_debug.put_line('Exit explode_line_quantity');
14475: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
14476: END IF;
14477: EXCEPTION
14478: WHEN OTHERS THEN
14471: END IF;
14472:
14473: IF (g_asn_debug = 'Y') THEN
14474: asn_debug.put_line('Exit explode_line_quantity');
14475: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
14476: END IF;
14477: EXCEPTION
14478: WHEN OTHERS THEN
14479: IF (g_asn_debug = 'Y') THEN
14475: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
14476: END IF;
14477: EXCEPTION
14478: WHEN OTHERS THEN
14479: IF (g_asn_debug = 'Y') THEN
14480: asn_debug.put_line('Exception in derive_correction_line_quantity ');
14481: END IF;
14482:
14483: IF po_correct%ISOPEN THEN
14476: END IF;
14477: EXCEPTION
14478: WHEN OTHERS THEN
14479: IF (g_asn_debug = 'Y') THEN
14480: asn_debug.put_line('Exception in derive_correction_line_quantity ');
14481: END IF;
14482:
14483: IF po_correct%ISOPEN THEN
14484: CLOSE po_correct;
14492: rcv_error_pkg.set_sql_error_message('derive_correction_line_qty', x_progress);
14493: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
14494: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
14495:
14496: IF (g_asn_debug = 'Y') THEN
14497: asn_debug.put_line(TO_CHAR(n));
14498: asn_debug.put_line(SQLERRM);
14499: asn_debug.put_line('error ' || x_progress);
14500: END IF;
14493: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
14494: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
14495:
14496: IF (g_asn_debug = 'Y') THEN
14497: asn_debug.put_line(TO_CHAR(n));
14498: asn_debug.put_line(SQLERRM);
14499: asn_debug.put_line('error ' || x_progress);
14500: END IF;
14501: END derive_correction_line_qty;
14494: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
14495:
14496: IF (g_asn_debug = 'Y') THEN
14497: asn_debug.put_line(TO_CHAR(n));
14498: asn_debug.put_line(SQLERRM);
14499: asn_debug.put_line('error ' || x_progress);
14500: END IF;
14501: END derive_correction_line_qty;
14502:
14495:
14496: IF (g_asn_debug = 'Y') THEN
14497: asn_debug.put_line(TO_CHAR(n));
14498: asn_debug.put_line(SQLERRM);
14499: asn_debug.put_line('error ' || x_progress);
14500: END IF;
14501: END derive_correction_line_qty;
14502:
14503: PROCEDURE derive_correction_line_amt(
14662: l_is_clm_po VARCHAR2(5) := 'N';
14663: l_partial_funded_flag VARCHAR2(5) := 'N';
14664: --
14665: BEGIN
14666: IF (g_asn_debug = 'Y') THEN
14667: asn_debug.put_line('enter derive_amount ' || x_cascaded_table(n).parent_transaction_id);
14668: END IF;
14669:
14670: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN --{
14663: l_partial_funded_flag VARCHAR2(5) := 'N';
14664: --
14665: BEGIN
14666: IF (g_asn_debug = 'Y') THEN
14667: asn_debug.put_line('enter derive_amount ' || x_cascaded_table(n).parent_transaction_id);
14668: END IF;
14669:
14670: IF (x_cascaded_table(n).parent_transaction_id IS NOT NULL) THEN --{
14671: already_derived := TRUE;
14702: END;
14703: END IF; --}
14704:
14705: IF already_derived THEN --{
14706: IF (g_asn_debug = 'Y') THEN
14707: asn_debug.put_line(' open po_correct table ' || x_cascaded_table(n).parent_transaction_id);
14708: END IF;
14709:
14710: OPEN po_correct(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
14703: END IF; --}
14704:
14705: IF already_derived THEN --{
14706: IF (g_asn_debug = 'Y') THEN
14707: asn_debug.put_line(' open po_correct table ' || x_cascaded_table(n).parent_transaction_id);
14708: END IF;
14709:
14710: OPEN po_correct(x_cascaded_table(n).parent_transaction_id, x_cascaded_table(n).to_organization_id);
14711: END IF; ---}
14727: * We will have x_cascaded_table(n).
14728: * parent_interface_txn_id) populated with teh
14729: * correct value.
14730: */
14731: IF (g_asn_debug = 'Y') THEN
14732: asn_debug.put_line(' open correct cursor from rti');
14733: END IF;
14734:
14735: OPEN po_correct_rti(x_cascaded_table(n).parent_interface_txn_id);
14728: * parent_interface_txn_id) populated with teh
14729: * correct value.
14730: */
14731: IF (g_asn_debug = 'Y') THEN
14732: asn_debug.put_line(' open correct cursor from rti');
14733: END IF;
14734:
14735: OPEN po_correct_rti(x_cascaded_table(n).parent_interface_txn_id);
14736: END IF;
14739: /******************************************************************/
14740: --check line amount > 0
14741: x_progress := '097';
14742:
14743: IF (g_asn_debug = 'Y') THEN
14744: asn_debug.put_line('X_progress ' || x_progress);
14745: END IF;
14746: /* Bug 6610047.
14747: * To allow corrections to timecards with zero amounts.
14740: --check line amount > 0
14741: x_progress := '097';
14742:
14743: IF (g_asn_debug = 'Y') THEN
14744: asn_debug.put_line('X_progress ' || x_progress);
14745: END IF;
14746: /* Bug 6610047.
14747: * To allow corrections to timecards with zero amounts.
14748: * Commented the validation which checks for zero amount on the correction.
14748: * Commented the validation which checks for zero amount on the correction.
14749:
14750: /* IF x_cascaded_table(n).error_status IN('S', 'W')
14751: AND x_cascaded_table(n).amount = 0 THEN --{
14752: IF (g_asn_debug = 'Y') THEN
14753: asn_debug.put_line('Amount is <= zero. Cascade will fail');
14754: END IF;
14755:
14756: x_cascaded_table(n).error_status := 'F';
14749:
14750: /* IF x_cascaded_table(n).error_status IN('S', 'W')
14751: AND x_cascaded_table(n).amount = 0 THEN --{
14752: IF (g_asn_debug = 'Y') THEN
14753: asn_debug.put_line('Amount is <= zero. Cascade will fail');
14754: END IF;
14755:
14756: x_cascaded_table(n).error_status := 'F';
14757: rcv_error_pkg.set_error_message('RCV_ENTER_QTY_GT_ZERO', x_cascaded_table(n).error_message);
14769: such a way that the ROI validation does'nt error out when
14770: po_line_id is populated for one time items. */
14771: x_progress := '098';
14772:
14773: IF (g_asn_debug = 'Y') THEN
14774: asn_debug.put_line('X_progress ' || x_progress);
14775: END IF;
14776:
14777: IF ( ( x_cascaded_table(n).parent_transaction_id IS NOT NULL
14770: po_line_id is populated for one time items. */
14771: x_progress := '098';
14772:
14773: IF (g_asn_debug = 'Y') THEN
14774: asn_debug.put_line('X_progress ' || x_progress);
14775: END IF;
14776:
14777: IF ( ( x_cascaded_table(n).parent_transaction_id IS NOT NULL
14778: OR x_cascaded_table(n).parent_interface_txn_id IS NOT NULL)
14778: OR x_cascaded_table(n).parent_interface_txn_id IS NOT NULL)
14779: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
14780:
14781: -- Copy record from main table to temp table
14782: IF (g_asn_debug = 'Y') THEN
14783: asn_debug.put_line('Copy record from main table to temp table');
14784: END IF;
14785:
14786: current_n := 1;
14779: AND x_cascaded_table(n).error_status IN('S', 'W')) THEN --{
14780:
14781: -- Copy record from main table to temp table
14782: IF (g_asn_debug = 'Y') THEN
14783: asn_debug.put_line('Copy record from main table to temp table');
14784: END IF;
14785:
14786: current_n := 1;
14787: temp_cascaded_table(current_n) := x_cascaded_table(n);
14786: current_n := 1;
14787: temp_cascaded_table(current_n) := x_cascaded_table(n);
14788:
14789: -- Get all rows which meet this condition
14790: IF (g_asn_debug = 'Y') THEN
14791: asn_debug.put_line('Get all rows which meet this condition');
14792: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
14793: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
14794: END IF;
14787: temp_cascaded_table(current_n) := x_cascaded_table(n);
14788:
14789: -- Get all rows which meet this condition
14790: IF (g_asn_debug = 'Y') THEN
14791: asn_debug.put_line('Get all rows which meet this condition');
14792: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
14793: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
14794: END IF;
14795:
14788:
14789: -- Get all rows which meet this condition
14790: IF (g_asn_debug = 'Y') THEN
14791: asn_debug.put_line('Get all rows which meet this condition');
14792: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
14793: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
14794: END IF;
14795:
14796: -- Assign shipped amount to remaining amount
14789: -- Get all rows which meet this condition
14790: IF (g_asn_debug = 'Y') THEN
14791: asn_debug.put_line('Get all rows which meet this condition');
14792: asn_debug.put_line('Transaction Type = ' || x_cascaded_table(n).transaction_type);
14793: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
14794: END IF;
14795:
14796: -- Assign shipped amount to remaining amount
14797: IF (g_asn_debug = 'Y') THEN
14793: asn_debug.put_line('Auto Transact Code = ' || x_cascaded_table(n).auto_transact_code);
14794: END IF;
14795:
14796: -- Assign shipped amount to remaining amount
14797: IF (g_asn_debug = 'Y') THEN
14798: asn_debug.put_line('Assign populated amount to remaining amount');
14799: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
14800: END IF;
14801:
14794: END IF;
14795:
14796: -- Assign shipped amount to remaining amount
14797: IF (g_asn_debug = 'Y') THEN
14798: asn_debug.put_line('Assign populated amount to remaining amount');
14799: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
14800: END IF;
14801:
14802: x_remaining_amount := temp_cascaded_table(current_n).amount;
14795:
14796: -- Assign shipped amount to remaining amount
14797: IF (g_asn_debug = 'Y') THEN
14798: asn_debug.put_line('Assign populated amount to remaining amount');
14799: asn_debug.put_line('Pointer in temp_cascade ' || TO_CHAR(current_n));
14800: END IF;
14801:
14802: x_remaining_amount := temp_cascaded_table(current_n).amount;
14803:
14800: END IF;
14801:
14802: x_remaining_amount := temp_cascaded_table(current_n).amount;
14803:
14804: IF (g_asn_debug = 'Y') THEN
14805: asn_debug.put_line('Have assigned the amount');
14806: END IF;
14807:
14808: -- Calculate tax_amount_factor for calculating tax_amount for
14801:
14802: x_remaining_amount := temp_cascaded_table(current_n).amount;
14803:
14804: IF (g_asn_debug = 'Y') THEN
14805: asn_debug.put_line('Have assigned the amount');
14806: END IF;
14807:
14808: -- Calculate tax_amount_factor for calculating tax_amount for
14809: -- each cascaded line
14813: ELSE
14814: tax_amount_factor := 0;
14815: END IF;
14816:
14817: IF (g_asn_debug = 'Y') THEN
14818: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
14819: asn_debug.put_line('transaction amount : ' || TO_CHAR(x_remaining_amount));
14820: END IF;
14821:
14814: tax_amount_factor := 0;
14815: END IF;
14816:
14817: IF (g_asn_debug = 'Y') THEN
14818: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
14819: asn_debug.put_line('transaction amount : ' || TO_CHAR(x_remaining_amount));
14820: END IF;
14821:
14822: x_first_trans := TRUE;
14815: END IF;
14816:
14817: IF (g_asn_debug = 'Y') THEN
14818: asn_debug.put_line('Tax Factor ' || TO_CHAR(tax_amount_factor));
14819: asn_debug.put_line('transaction amount : ' || TO_CHAR(x_remaining_amount));
14820: END IF;
14821:
14822: x_first_trans := TRUE;
14823: transaction_ok := FALSE;
14821:
14822: x_first_trans := TRUE;
14823: transaction_ok := FALSE;
14824:
14825: IF (g_asn_debug = 'Y') THEN
14826: asn_debug.put_line('Before starting Cascade');
14827: END IF;
14828:
14829: IF (g_asn_debug = 'Y') THEN
14822: x_first_trans := TRUE;
14823: transaction_ok := FALSE;
14824:
14825: IF (g_asn_debug = 'Y') THEN
14826: asn_debug.put_line('Before starting Cascade');
14827: END IF;
14828:
14829: IF (g_asn_debug = 'Y') THEN
14830: asn_debug.put_line('Record Count = ' || x_record_count);
14825: IF (g_asn_debug = 'Y') THEN
14826: asn_debug.put_line('Before starting Cascade');
14827: END IF;
14828:
14829: IF (g_asn_debug = 'Y') THEN
14830: asn_debug.put_line('Record Count = ' || x_record_count);
14831: END IF;
14832:
14833: LOOP --{
14826: asn_debug.put_line('Before starting Cascade');
14827: END IF;
14828:
14829: IF (g_asn_debug = 'Y') THEN
14830: asn_debug.put_line('Record Count = ' || x_record_count);
14831: END IF;
14832:
14833: LOOP --{
14834: IF (g_asn_debug = 'Y') THEN
14830: asn_debug.put_line('Record Count = ' || x_record_count);
14831: END IF;
14832:
14833: LOOP --{
14834: IF (g_asn_debug = 'Y') THEN
14835: asn_debug.put_line('Remaining Quantity ' || TO_CHAR(x_remaining_amount));
14836: END IF;
14837:
14838: /*
14831: END IF;
14832:
14833: LOOP --{
14834: IF (g_asn_debug = 'Y') THEN
14835: asn_debug.put_line('Remaining Quantity ' || TO_CHAR(x_remaining_amount));
14836: END IF;
14837:
14838: /*
14839: ** Fetch the appropriate record
14837:
14838: /*
14839: ** Fetch the appropriate record
14840: */
14841: IF (g_asn_debug = 'Y') THEN
14842: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
14843: END IF;
14844:
14845: IF (po_correct%ISOPEN) THEN --{
14838: /*
14839: ** Fetch the appropriate record
14840: */
14841: IF (g_asn_debug = 'Y') THEN
14842: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
14843: END IF;
14844:
14845: IF (po_correct%ISOPEN) THEN --{
14846: IF (g_asn_debug = 'Y') THEN
14842: asn_debug.put_line('DEBUG: transaction_type = ' || x_cascaded_table(n).transaction_type);
14843: END IF;
14844:
14845: IF (po_correct%ISOPEN) THEN --{
14846: IF (g_asn_debug = 'Y') THEN
14847: asn_debug.put_line(' fetch po_correct');
14848: END IF;
14849:
14850: FETCH po_correct INTO x_po_correctrec;
14843: END IF;
14844:
14845: IF (po_correct%ISOPEN) THEN --{
14846: IF (g_asn_debug = 'Y') THEN
14847: asn_debug.put_line(' fetch po_correct');
14848: END IF;
14849:
14850: FETCH po_correct INTO x_po_correctrec;
14851:
14854: END IF;
14855:
14856: rows_fetched := po_correct%ROWCOUNT;
14857: ELSIF(po_correct_rti%ISOPEN) THEN --}{
14858: IF (g_asn_debug = 'Y') THEN
14859: asn_debug.put_line(' fetch po_correct_rti');
14860: END IF;
14861:
14862: FETCH po_correct_rti INTO x_po_correctrec;
14855:
14856: rows_fetched := po_correct%ROWCOUNT;
14857: ELSIF(po_correct_rti%ISOPEN) THEN --}{
14858: IF (g_asn_debug = 'Y') THEN
14859: asn_debug.put_line(' fetch po_correct_rti');
14860: END IF;
14861:
14862: FETCH po_correct_rti INTO x_po_correctrec;
14863:
14861:
14862: FETCH po_correct_rti INTO x_po_correctrec;
14863:
14864: IF (po_correct_rti%NOTFOUND) THEN
14865: IF (g_asn_debug = 'Y') THEN
14866: asn_debug.put_line('correct last row');
14867: END IF;
14868:
14869: lastrecord := TRUE;
14862: FETCH po_correct_rti INTO x_po_correctrec;
14863:
14864: IF (po_correct_rti%NOTFOUND) THEN
14865: IF (g_asn_debug = 'Y') THEN
14866: asn_debug.put_line('correct last row');
14867: END IF;
14868:
14869: lastrecord := TRUE;
14870: END IF;
14878: * parent_interface_txn_id) populated with
14879: * with the correct value. Also we have cascaded_table_index
14880: * with the correct pl/sql table index number;
14881: */
14882: IF (g_asn_debug = 'Y') THEN
14883: asn_debug.put_line(' fetch pl/sql table');
14884: END IF;
14885:
14886: temp_index := temp_cascaded_table(current_n).derive_index;
14879: * with the correct value. Also we have cascaded_table_index
14880: * with the correct pl/sql table index number;
14881: */
14882: IF (g_asn_debug = 'Y') THEN
14883: asn_debug.put_line(' fetch pl/sql table');
14884: END IF;
14885:
14886: temp_index := temp_cascaded_table(current_n).derive_index;
14887: x_po_correctrec.po_line_location_id := x_cascaded_table(temp_index).po_line_location_id;
14907: rows_fetched := 1;
14908: lastrecord := TRUE;
14909: END IF; --}
14910:
14911: IF (g_asn_debug = 'Y') THEN
14912: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
14913: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
14914: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
14915: asn_debug.put_line('correct remainaing amount ' || x_remaining_amount);
14908: lastrecord := TRUE;
14909: END IF; --}
14910:
14911: IF (g_asn_debug = 'Y') THEN
14912: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
14913: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
14914: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
14915: asn_debug.put_line('correct remainaing amount ' || x_remaining_amount);
14916: END IF;
14909: END IF; --}
14910:
14911: IF (g_asn_debug = 'Y') THEN
14912: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
14913: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
14914: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
14915: asn_debug.put_line('correct remainaing amount ' || x_remaining_amount);
14916: END IF;
14917:
14910:
14911: IF (g_asn_debug = 'Y') THEN
14912: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
14913: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
14914: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
14915: asn_debug.put_line('correct remainaing amount ' || x_remaining_amount);
14916: END IF;
14917:
14918: /* Support for RATE based from OTL */
14911: IF (g_asn_debug = 'Y') THEN
14912: asn_debug.put_line('Correct Rows fetched ' || TO_CHAR(rows_fetched));
14913: asn_debug.put_line('po_line_id ' || TO_CHAR(x_po_correctrec.po_line_id));
14914: asn_debug.put_line('po_dist ' || TO_CHAR(x_po_correctrec.po_distribution_id));
14915: asn_debug.put_line('correct remainaing amount ' || x_remaining_amount);
14916: END IF;
14917:
14918: /* Support for RATE based from OTL */
14919: IF ( x_cascaded_table(n).value_basis = 'RATE'
14917:
14918: /* Support for RATE based from OTL */
14919: IF ( x_cascaded_table(n).value_basis = 'RATE'
14920: AND x_cascaded_table(n).purchase_basis = 'TEMP LABOR') THEN --{
14921: IF (g_asn_debug = 'Y') THEN
14922: asn_debug.put_line('Rate/Temp Labor');
14923: END IF;
14924:
14925: /* Bug 3648861.
14918: /* Support for RATE based from OTL */
14919: IF ( x_cascaded_table(n).value_basis = 'RATE'
14920: AND x_cascaded_table(n).purchase_basis = 'TEMP LABOR') THEN --{
14921: IF (g_asn_debug = 'Y') THEN
14922: asn_debug.put_line('Rate/Temp Labor');
14923: END IF;
14924:
14925: /* Bug 3648861.
14926: * The where condition has
14943: AND pol.po_line_id = x_cascaded_table(n).po_line_id
14944: AND pol.order_type_lookup_code = 'RATE'
14945: AND pol.purchase_basis = 'TEMP LABOR';
14946:
14947: IF (g_asn_debug = 'Y') THEN
14948: asn_debug.put_line('count ' || l_time_count);
14949: END IF;
14950:
14951: IF (l_time_count = 0) THEN --{
14944: AND pol.order_type_lookup_code = 'RATE'
14945: AND pol.purchase_basis = 'TEMP LABOR';
14946:
14947: IF (g_asn_debug = 'Y') THEN
14948: asn_debug.put_line('count ' || l_time_count);
14949: END IF;
14950:
14951: IF (l_time_count = 0) THEN --{
14952: IF (g_asn_debug = 'Y') THEN
14948: asn_debug.put_line('count ' || l_time_count);
14949: END IF;
14950:
14951: IF (l_time_count = 0) THEN --{
14952: IF (g_asn_debug = 'Y') THEN
14953: asn_debug.put_line('We do not support RATE/TEMP LABOR through ROI unless it comes through OTL');
14954: END IF;
14955:
14956: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
14949: END IF;
14950:
14951: IF (l_time_count = 0) THEN --{
14952: IF (g_asn_debug = 'Y') THEN
14953: asn_debug.put_line('We do not support RATE/TEMP LABOR through ROI unless it comes through OTL');
14954: END IF;
14955:
14956: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
14957: rcv_error_pkg.set_error_message('RCV_NO_RATE_UNLESS_OTL', x_cascaded_table(n).error_message);
14959: END IF; --}
14960: END IF; --}
14961:
14962: IF (lastrecord) THEN --{
14963: IF (g_asn_debug = 'Y') THEN
14964: asn_debug.put_line('Hit exit condition');
14965: END IF;
14966:
14967: IF NOT x_first_trans THEN
14960: END IF; --}
14961:
14962: IF (lastrecord) THEN --{
14963: IF (g_asn_debug = 'Y') THEN
14964: asn_debug.put_line('Hit exit condition');
14965: END IF;
14966:
14967: IF NOT x_first_trans THEN
14968: -- x_first_trans has been reset which means some cascade has
14966:
14967: IF NOT x_first_trans THEN
14968: -- x_first_trans has been reset which means some cascade has
14969: -- happened. Otherwise current_n = 1
14970: IF (g_asn_debug = 'Y') THEN
14971: asn_debug.put_line('current_n before is ' || current_n);
14972: END IF;
14973:
14974: current_n := current_n - 1;
14967: IF NOT x_first_trans THEN
14968: -- x_first_trans has been reset which means some cascade has
14969: -- happened. Otherwise current_n = 1
14970: IF (g_asn_debug = 'Y') THEN
14971: asn_debug.put_line('current_n before is ' || current_n);
14972: END IF;
14973:
14974: current_n := current_n - 1;
14975: END IF;
14974: current_n := current_n - 1;
14975: END IF;
14976:
14977: -- do the tolerance act here
14978: IF (g_asn_debug = 'Y') THEN
14979: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
14980: asn_debug.put_line('Check which condition has occured');
14981: END IF;
14982:
14975: END IF;
14976:
14977: -- do the tolerance act here
14978: IF (g_asn_debug = 'Y') THEN
14979: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
14980: asn_debug.put_line('Check which condition has occured');
14981: END IF;
14982:
14983: -- lastrecord...we have run out of rows and we still have quantity to allocate
14976:
14977: -- do the tolerance act here
14978: IF (g_asn_debug = 'Y') THEN
14979: asn_debug.put_line('Temp table pointer ' || TO_CHAR(current_n));
14980: asn_debug.put_line('Check which condition has occured');
14981: END IF;
14982:
14983: -- lastrecord...we have run out of rows and we still have quantity to allocate
14984: /* Do abs(x_remaining_quantity) since it can be a negative
14984: /* Do abs(x_remaining_quantity) since it can be a negative
14985: * or positive correction.
14986: */
14987: IF ABS(x_remaining_amount) > 0 THEN --{
14988: IF (g_asn_debug = 'Y') THEN
14989: asn_debug.put_line('There is amount remaining ');
14990: asn_debug.put_line('tolerable amount now in plsql table ' || temp_cascaded_table(current_n).amount);
14991: asn_debug.put_line('rows_fetched ' || rows_fetched);
14992: END IF;
14985: * or positive correction.
14986: */
14987: IF ABS(x_remaining_amount) > 0 THEN --{
14988: IF (g_asn_debug = 'Y') THEN
14989: asn_debug.put_line('There is amount remaining ');
14990: asn_debug.put_line('tolerable amount now in plsql table ' || temp_cascaded_table(current_n).amount);
14991: asn_debug.put_line('rows_fetched ' || rows_fetched);
14992: END IF;
14993:
14986: */
14987: IF ABS(x_remaining_amount) > 0 THEN --{
14988: IF (g_asn_debug = 'Y') THEN
14989: asn_debug.put_line('There is amount remaining ');
14990: asn_debug.put_line('tolerable amount now in plsql table ' || temp_cascaded_table(current_n).amount);
14991: asn_debug.put_line('rows_fetched ' || rows_fetched);
14992: END IF;
14993:
14994: IF NOT x_first_trans THEN
14987: IF ABS(x_remaining_amount) > 0 THEN --{
14988: IF (g_asn_debug = 'Y') THEN
14989: asn_debug.put_line('There is amount remaining ');
14990: asn_debug.put_line('tolerable amount now in plsql table ' || temp_cascaded_table(current_n).amount);
14991: asn_debug.put_line('rows_fetched ' || rows_fetched);
14992: END IF;
14993:
14994: IF NOT x_first_trans THEN
14995: IF (g_asn_debug = 'Y') THEN
14991: asn_debug.put_line('rows_fetched ' || rows_fetched);
14992: END IF;
14993:
14994: IF NOT x_first_trans THEN
14995: IF (g_asn_debug = 'Y') THEN
14996: asn_debug.put_line('not fisrt txn');
14997: END IF;
14998: END IF;
14999:
14992: END IF;
14993:
14994: IF NOT x_first_trans THEN
14995: IF (g_asn_debug = 'Y') THEN
14996: asn_debug.put_line('not fisrt txn');
14997: END IF;
14998: END IF;
14999:
15000: IF rows_fetched > 0
14998: END IF;
14999:
15000: IF rows_fetched > 0
15001: AND NOT x_first_trans THEN --{
15002: IF (g_asn_debug = 'Y') THEN
15003: asn_debug.put_line(' inside transaction_type ' || x_po_correctrec.parent_transaction_type);
15004: END IF;
15005:
15006: IF (SIGN(x_cascaded_table(current_n).amount) = 1) THEN --{
14999:
15000: IF rows_fetched > 0
15001: AND NOT x_first_trans THEN --{
15002: IF (g_asn_debug = 'Y') THEN
15003: asn_debug.put_line(' inside transaction_type ' || x_po_correctrec.parent_transaction_type);
15004: END IF;
15005:
15006: IF (SIGN(x_cascaded_table(current_n).amount) = 1) THEN --{
15007: IF (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH')) THEN --{
15004: END IF;
15005:
15006: IF (SIGN(x_cascaded_table(current_n).amount) = 1) THEN --{
15007: IF (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH')) THEN --{
15008: IF (g_asn_debug = 'Y') THEN
15009: asn_debug.put_line('Need to check amount tolerances');
15010: END IF;
15011:
15012: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
15005:
15006: IF (SIGN(x_cascaded_table(current_n).amount) = 1) THEN --{
15007: IF (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH')) THEN --{
15008: IF (g_asn_debug = 'Y') THEN
15009: asn_debug.put_line('Need to check amount tolerances');
15010: END IF;
15011:
15012: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
15013: INTO x_qty_rcv_exception_code
15013: INTO x_qty_rcv_exception_code
15014: FROM po_line_locations
15015: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
15016:
15017: IF (g_asn_debug = 'Y') THEN
15018: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
15019: END IF;
15020:
15021: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
15014: FROM po_line_locations
15015: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
15016:
15017: IF (g_asn_debug = 'Y') THEN
15018: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
15019: END IF;
15020:
15021: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
15022: /* Bug# 1807842 */
15020:
15021: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
15022: /* Bug# 1807842 */
15023: IF (temp_cascaded_table(current_n).amount <= x_converted_trx_amt) THEN --{
15024: IF (g_asn_debug = 'Y') THEN
15025: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_amt));
15026: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15027: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
15028: END IF;
15021: IF x_qty_rcv_exception_code IN('NONE', 'WARNING') THEN --{
15022: /* Bug# 1807842 */
15023: IF (temp_cascaded_table(current_n).amount <= x_converted_trx_amt) THEN --{
15024: IF (g_asn_debug = 'Y') THEN
15025: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_amt));
15026: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15027: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
15028: END IF;
15029:
15022: /* Bug# 1807842 */
15023: IF (temp_cascaded_table(current_n).amount <= x_converted_trx_amt) THEN --{
15024: IF (g_asn_debug = 'Y') THEN
15025: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_amt));
15026: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15027: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
15028: END IF;
15029:
15030: temp_cascaded_table(current_n).amount := temp_cascaded_table(current_n).amount + x_remaining_amount;
15023: IF (temp_cascaded_table(current_n).amount <= x_converted_trx_amt) THEN --{
15024: IF (g_asn_debug = 'Y') THEN
15025: asn_debug.put_line('Tolerable quantity ' || TO_CHAR(x_converted_trx_amt));
15026: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15027: asn_debug.put_line('Assign remaining amount ' || TO_CHAR(x_remaining_amount) || ' to last record');
15028: END IF;
15029:
15030: temp_cascaded_table(current_n).amount := temp_cascaded_table(current_n).amount + x_remaining_amount;
15031: END IF; /* Bug# 1807842 */ --}
15031: END IF; /* Bug# 1807842 */ --}
15032:
15033: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).amount * tax_amount_factor, 6);
15034:
15035: IF (g_asn_debug = 'Y') THEN
15036: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15037: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
15038: END IF;
15039:
15032:
15033: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).amount * tax_amount_factor, 6);
15034:
15035: IF (g_asn_debug = 'Y') THEN
15036: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15037: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
15038: END IF;
15039:
15040: --
15033: temp_cascaded_table(current_n).tax_amount := ROUND(temp_cascaded_table(current_n).amount * tax_amount_factor, 6);
15034:
15035: IF (g_asn_debug = 'Y') THEN
15036: asn_debug.put_line('Current amount ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15037: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
15038: END IF;
15039:
15040: --
15041: get_clm_info( 'AMOUNT',
15051: END IF;
15052: --
15053:
15054: IF x_qty_rcv_exception_code = 'WARNING' THEN --{
15055: IF (g_asn_debug = 'Y') THEN
15056: asn_debug.put_line('IN WARNING');
15057: END IF;
15058:
15059: temp_cascaded_table(current_n).error_status := 'W';
15052: --
15053:
15054: IF x_qty_rcv_exception_code = 'WARNING' THEN --{
15055: IF (g_asn_debug = 'Y') THEN
15056: asn_debug.put_line('IN WARNING');
15057: END IF;
15058:
15059: temp_cascaded_table(current_n).error_status := 'W';
15060: temp_cascaded_table(current_n).error_message := 'RCV_ALL_AMT_OVER_TOLERANCE';
15058:
15059: temp_cascaded_table(current_n).error_status := 'W';
15060: temp_cascaded_table(current_n).error_message := 'RCV_ALL_AMT_OVER_TOLERANCE';
15061:
15062: IF (g_asn_debug = 'Y') THEN
15063: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
15064: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
15065: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
15066: END IF;
15059: temp_cascaded_table(current_n).error_status := 'W';
15060: temp_cascaded_table(current_n).error_message := 'RCV_ALL_AMT_OVER_TOLERANCE';
15061:
15062: IF (g_asn_debug = 'Y') THEN
15063: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
15064: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
15065: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
15066: END IF;
15067:
15060: temp_cascaded_table(current_n).error_message := 'RCV_ALL_AMT_OVER_TOLERANCE';
15061:
15062: IF (g_asn_debug = 'Y') THEN
15063: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
15064: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
15065: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
15066: END IF;
15067:
15068: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
15061:
15062: IF (g_asn_debug = 'Y') THEN
15063: asn_debug.put_line('Group Id ' || TO_CHAR(temp_cascaded_table(current_n).GROUP_ID));
15064: asn_debug.put_line('Header Interface Id ' || TO_CHAR(temp_cascaded_table(current_n).header_interface_id));
15065: asn_debug.put_line('IN Trans Id ' || TO_CHAR(temp_cascaded_table(current_n).interface_transaction_id));
15066: END IF;
15067:
15068: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_warning;
15069: rcv_error_pkg.set_error_message('RCV_ALL_AMT_OVER_TOLERANCE', x_cascaded_table(n).error_message);
15070: rcv_error_pkg.set_token('AMT_A', temp_cascaded_table(current_n).amount);
15071: rcv_error_pkg.set_token('AMT_B', temp_cascaded_table(current_n).amount - x_remaining_amount);
15072: rcv_error_pkg.log_interface_warning('AMOUNT');
15073:
15074: IF (g_asn_debug = 'Y') THEN
15075: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
15076: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
15077: asn_debug.put_line('Need to insert into po_interface_errors');
15078: END IF;
15071: rcv_error_pkg.set_token('AMT_B', temp_cascaded_table(current_n).amount - x_remaining_amount);
15072: rcv_error_pkg.log_interface_warning('AMOUNT');
15073:
15074: IF (g_asn_debug = 'Y') THEN
15075: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
15076: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
15077: asn_debug.put_line('Need to insert into po_interface_errors');
15078: END IF;
15079: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
15072: rcv_error_pkg.log_interface_warning('AMOUNT');
15073:
15074: IF (g_asn_debug = 'Y') THEN
15075: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
15076: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
15077: asn_debug.put_line('Need to insert into po_interface_errors');
15078: END IF;
15079: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
15080:
15073:
15074: IF (g_asn_debug = 'Y') THEN
15075: asn_debug.put_line('Error Status ' || temp_cascaded_table(current_n).error_status);
15076: asn_debug.put_line('Error message ' || temp_cascaded_table(current_n).error_message);
15077: asn_debug.put_line('Need to insert into po_interface_errors');
15078: END IF;
15079: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
15080:
15081: IF (g_asn_debug = 'Y') THEN
15077: asn_debug.put_line('Need to insert into po_interface_errors');
15078: END IF;
15079: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
15080:
15081: IF (g_asn_debug = 'Y') THEN
15082: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15083: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
15084: END IF;
15085: END IF; --}
15078: END IF;
15079: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
15080:
15081: IF (g_asn_debug = 'Y') THEN
15082: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15083: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
15084: END IF;
15085: END IF; --}
15086: END IF; --}
15079: END IF; --} matches x_qty_rcv_exception_code = 'WARNING'
15080:
15081: IF (g_asn_debug = 'Y') THEN
15082: asn_debug.put_line('Current quantity ' || TO_CHAR(temp_cascaded_table(current_n).amount));
15083: asn_debug.put_line('Current Tax Amount ' || TO_CHAR(temp_cascaded_table(current_n).tax_amount));
15084: END IF;
15085: END IF; --}
15086: END IF; --}
15087:
15087:
15088: IF ( ( (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH'))
15089: AND x_qty_rcv_exception_code = 'REJECT')
15090: OR (x_po_correctrec.parent_transaction_type NOT IN('RECEIVE', 'MATCH'))) THEN --{
15091: IF (g_asn_debug = 'Y') THEN
15092: asn_debug.put_line('Extra amount ' || TO_CHAR(x_remaining_amount));
15093: END IF;
15094:
15095: IF (g_asn_debug = 'Y') THEN
15088: IF ( ( (x_po_correctrec.parent_transaction_type IN('RECEIVE', 'MATCH'))
15089: AND x_qty_rcv_exception_code = 'REJECT')
15090: OR (x_po_correctrec.parent_transaction_type NOT IN('RECEIVE', 'MATCH'))) THEN --{
15091: IF (g_asn_debug = 'Y') THEN
15092: asn_debug.put_line('Extra amount ' || TO_CHAR(x_remaining_amount));
15093: END IF;
15094:
15095: IF (g_asn_debug = 'Y') THEN
15096: asn_debug.put_line('delete the temp table ');
15091: IF (g_asn_debug = 'Y') THEN
15092: asn_debug.put_line('Extra amount ' || TO_CHAR(x_remaining_amount));
15093: END IF;
15094:
15095: IF (g_asn_debug = 'Y') THEN
15096: asn_debug.put_line('delete the temp table ');
15097: END IF;
15098:
15099: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
15092: asn_debug.put_line('Extra amount ' || TO_CHAR(x_remaining_amount));
15093: END IF;
15094:
15095: IF (g_asn_debug = 'Y') THEN
15096: asn_debug.put_line('delete the temp table ');
15097: END IF;
15098:
15099: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
15100:
15117:
15118: rcv_error_pkg.log_interface_error('AMOUNT', FALSE);
15119: temp_cascaded_table.DELETE;
15120:
15121: IF (g_asn_debug = 'Y') THEN
15122: asn_debug.put_line('mark the actual table with error status');
15123: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15124: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15125: END IF;
15118: rcv_error_pkg.log_interface_error('AMOUNT', FALSE);
15119: temp_cascaded_table.DELETE;
15120:
15121: IF (g_asn_debug = 'Y') THEN
15122: asn_debug.put_line('mark the actual table with error status');
15123: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15124: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15125: END IF;
15126:
15119: temp_cascaded_table.DELETE;
15120:
15121: IF (g_asn_debug = 'Y') THEN
15122: asn_debug.put_line('mark the actual table with error status');
15123: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15124: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15125: END IF;
15126:
15127: IF (g_asn_debug = 'Y') THEN
15120:
15121: IF (g_asn_debug = 'Y') THEN
15122: asn_debug.put_line('mark the actual table with error status');
15123: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15124: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15125: END IF;
15126:
15127: IF (g_asn_debug = 'Y') THEN
15128: asn_debug.put_line('Need to insert a row into po_interface_errors');
15123: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15124: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15125: END IF;
15126:
15127: IF (g_asn_debug = 'Y') THEN
15128: asn_debug.put_line('Need to insert a row into po_interface_errors');
15129: END IF;
15130: END IF; --} matches if(none/warning) and elseif(reject)
15131: END IF; --}
15124: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15125: END IF;
15126:
15127: IF (g_asn_debug = 'Y') THEN
15128: asn_debug.put_line('Need to insert a row into po_interface_errors');
15129: END IF;
15130: END IF; --} matches if(none/warning) and elseif(reject)
15131: END IF; --}
15132:
15134: /* for correct,accept an reject type we dont have the
15135: * tolerance check. Hence error out.
15136: * We cannot correct quantities more than that was received.
15137: */
15138: IF (g_asn_debug = 'Y') THEN
15139: asn_debug.put_line(' in correct extra amount ' || TO_CHAR(x_remaining_amount));
15140: asn_debug.put_line('delete the temp table ');
15141: END IF;
15142:
15135: * tolerance check. Hence error out.
15136: * We cannot correct quantities more than that was received.
15137: */
15138: IF (g_asn_debug = 'Y') THEN
15139: asn_debug.put_line(' in correct extra amount ' || TO_CHAR(x_remaining_amount));
15140: asn_debug.put_line('delete the temp table ');
15141: END IF;
15142:
15143: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
15136: * We cannot correct quantities more than that was received.
15137: */
15138: IF (g_asn_debug = 'Y') THEN
15139: asn_debug.put_line(' in correct extra amount ' || TO_CHAR(x_remaining_amount));
15140: asn_debug.put_line('delete the temp table ');
15141: END IF;
15142:
15143: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
15144: rcv_error_pkg.set_error_message('RCV_CORRECT_AMT_OVER_TOLERANCE', x_cascaded_table(n).error_message);
15146: rcv_error_pkg.set_token('AMT_B', temp_cascaded_table(current_n).amount - x_remaining_amount);
15147: rcv_error_pkg.log_interface_error('AMOUNT', FALSE);
15148: temp_cascaded_table.DELETE;
15149:
15150: IF (g_asn_debug = 'Y') THEN
15151: asn_debug.put_line('mark the actual table with error status');
15152: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15153: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15154: asn_debug.put_line('Need to insert a row into po_interface_errors for correct');
15147: rcv_error_pkg.log_interface_error('AMOUNT', FALSE);
15148: temp_cascaded_table.DELETE;
15149:
15150: IF (g_asn_debug = 'Y') THEN
15151: asn_debug.put_line('mark the actual table with error status');
15152: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15153: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15154: asn_debug.put_line('Need to insert a row into po_interface_errors for correct');
15155: END IF;
15148: temp_cascaded_table.DELETE;
15149:
15150: IF (g_asn_debug = 'Y') THEN
15151: asn_debug.put_line('mark the actual table with error status');
15152: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15153: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15154: asn_debug.put_line('Need to insert a row into po_interface_errors for correct');
15155: END IF;
15156: END IF; --}
15149:
15150: IF (g_asn_debug = 'Y') THEN
15151: asn_debug.put_line('mark the actual table with error status');
15152: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15153: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15154: asn_debug.put_line('Need to insert a row into po_interface_errors for correct');
15155: END IF;
15156: END IF; --}
15157: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
15150: IF (g_asn_debug = 'Y') THEN
15151: asn_debug.put_line('mark the actual table with error status');
15152: asn_debug.put_line('Error Status ' || x_cascaded_table(n).error_status);
15153: asn_debug.put_line('Error message ' || x_cascaded_table(n).error_message);
15154: asn_debug.put_line('Need to insert a row into po_interface_errors for correct');
15155: END IF;
15156: END IF; --}
15157: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
15158: IF rows_fetched = 0 THEN
15155: END IF;
15156: END IF; --}
15157: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
15158: IF rows_fetched = 0 THEN
15159: IF (g_asn_debug = 'Y') THEN
15160: asn_debug.put_line('No rows were retrieved from cursor.');
15161: END IF;
15162: ELSIF x_first_trans THEN
15163: IF (g_asn_debug = 'Y') THEN
15156: END IF; --}
15157: ELSE --}{ else for rows fetched = 0 OR x_first_trans = true
15158: IF rows_fetched = 0 THEN
15159: IF (g_asn_debug = 'Y') THEN
15160: asn_debug.put_line('No rows were retrieved from cursor.');
15161: END IF;
15162: ELSIF x_first_trans THEN
15163: IF (g_asn_debug = 'Y') THEN
15164: asn_debug.put_line('No rows were cascaded');
15159: IF (g_asn_debug = 'Y') THEN
15160: asn_debug.put_line('No rows were retrieved from cursor.');
15161: END IF;
15162: ELSIF x_first_trans THEN
15163: IF (g_asn_debug = 'Y') THEN
15164: asn_debug.put_line('No rows were cascaded');
15165: END IF;
15166: END IF;
15167:
15160: asn_debug.put_line('No rows were retrieved from cursor.');
15161: END IF;
15162: ELSIF x_first_trans THEN
15163: IF (g_asn_debug = 'Y') THEN
15164: asn_debug.put_line('No rows were cascaded');
15165: END IF;
15166: END IF;
15167:
15168: x_temp_count := 1;
15270:
15271: temp_cascaded_table.DELETE;
15272: END IF; --}
15273: ELSE -- }{
15274: IF (g_asn_debug = 'Y') THEN
15275: asn_debug.put_line('Remaining amount is zero ' || TO_CHAR(x_remaining_amount));
15276: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
15277: END IF;
15278: END IF; --} ends the check for whether last record has been reached
15271: temp_cascaded_table.DELETE;
15272: END IF; --}
15273: ELSE -- }{
15274: IF (g_asn_debug = 'Y') THEN
15275: asn_debug.put_line('Remaining amount is zero ' || TO_CHAR(x_remaining_amount));
15276: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
15277: END IF;
15278: END IF; --} ends the check for whether last record has been reached
15279:
15272: END IF; --}
15273: ELSE -- }{
15274: IF (g_asn_debug = 'Y') THEN
15275: asn_debug.put_line('Remaining amount is zero ' || TO_CHAR(x_remaining_amount));
15276: asn_debug.put_line('Return the cascaded rows back to the calling procedure');
15277: END IF;
15278: END IF; --} ends the check for whether last record has been reached
15279:
15280: -- close cursors
15278: END IF; --} ends the check for whether last record has been reached
15279:
15280: -- close cursors
15281:
15282: IF (g_asn_debug = 'Y') THEN
15283: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions ' || current_n);
15284: END IF;
15285:
15286: IF po_correct%ISOPEN THEN
15279:
15280: -- close cursors
15281:
15282: IF (g_asn_debug = 'Y') THEN
15283: asn_debug.put_line('Close cursors shipments, count_shipments, distributions, count_disributions ' || current_n);
15284: END IF;
15285:
15286: IF po_correct%ISOPEN THEN
15287: CLOSE po_correct;
15290: IF po_correct_rti%ISOPEN THEN
15291: CLOSE po_correct_rti;
15292: END IF;
15293:
15294: IF (g_asn_debug = 'Y') THEN
15295: asn_debug.put_line('before exit current_n is ' || current_n);
15296: END IF;
15297:
15298: EXIT;
15291: CLOSE po_correct_rti;
15292: END IF;
15293:
15294: IF (g_asn_debug = 'Y') THEN
15295: asn_debug.put_line('before exit current_n is ' || current_n);
15296: END IF;
15297:
15298: EXIT;
15299: END IF; --} matches lastrecord or x_remaining_quantity <= 0
15297:
15298: EXIT;
15299: END IF; --} matches lastrecord or x_remaining_quantity <= 0
15300:
15301: IF (g_asn_debug = 'Y') THEN
15302: asn_debug.put_line(' Entering amount calculation for correct');
15303: END IF;
15304:
15305: /* If destination_type_code is inventory then we need to make
15298: EXIT;
15299: END IF; --} matches lastrecord or x_remaining_quantity <= 0
15300:
15301: IF (g_asn_debug = 'Y') THEN
15302: asn_debug.put_line(' Entering amount calculation for correct');
15303: END IF;
15304:
15305: /* If destination_type_code is inventory then we need to make
15306: * sure that we can correct this qty since it might have been
15317:
15318: insert_into_table := FALSE;
15319: already_allocated_amt := 0;
15320:
15321: IF (g_asn_debug = 'Y') THEN
15322: asn_debug.put_line('calling Correct get_available_amount ' || x_po_correctrec.parent_transaction_type);
15323: END IF;
15324:
15325: get_interface_available_amt(temp_cascaded_table,
15318: insert_into_table := FALSE;
15319: already_allocated_amt := 0;
15320:
15321: IF (g_asn_debug = 'Y') THEN
15322: asn_debug.put_line('calling Correct get_available_amount ' || x_po_correctrec.parent_transaction_type);
15323: END IF;
15324:
15325: get_interface_available_amt(temp_cascaded_table,
15326: current_n,
15326: current_n,
15327: x_converted_parent_trx_amt
15328: );
15329:
15330: IF (g_asn_debug = 'Y') THEN
15331: asn_debug.put_line('correct interface_available_amt ' || x_converted_parent_trx_amt);
15332: END IF;
15333:
15334: /* x_converted_parent_trx_qty will be 0 when this is not a child
15327: x_converted_parent_trx_amt
15328: );
15329:
15330: IF (g_asn_debug = 'Y') THEN
15331: asn_debug.put_line('correct interface_available_amt ' || x_converted_parent_trx_amt);
15332: END IF;
15333:
15334: /* x_converted_parent_trx_qty will be 0 when this is not a child
15335: * transaction to any rti row. Also for correct, grand parent
15336: * may already be processed and for positive correction we
15337: * might need to get the quantity from the grand parent.
15338: */
15339: IF (x_converted_parent_trx_amt = 0) THEN --{
15340: IF (g_asn_debug = 'Y') THEN
15341: asn_debug.put_line('interface amount is 0');
15342: END IF;
15343:
15344: IF (SIGN(temp_cascaded_table(current_n).amount) = -1) THEN --{
15337: * might need to get the quantity from the grand parent.
15338: */
15339: IF (x_converted_parent_trx_amt = 0) THEN --{
15340: IF (g_asn_debug = 'Y') THEN
15341: asn_debug.put_line('interface amount is 0');
15342: END IF;
15343:
15344: IF (SIGN(temp_cascaded_table(current_n).amount) = -1) THEN --{
15345: asn_debug.put_line('Before call to get_available_amt for negative correction');
15341: asn_debug.put_line('interface amount is 0');
15342: END IF;
15343:
15344: IF (SIGN(temp_cascaded_table(current_n).amount) = -1) THEN --{
15345: asn_debug.put_line('Before call to get_available_amt for negative correction');
15346: rcv_quantities_s.get_available_amount('CORRECT',
15347: x_po_correctrec.rcv_transaction_id,
15348: 'VENDOR',
15349: x_po_correctrec.parent_transaction_type,
15354: );
15355: ELSE --}{
15356: IF (x_po_correctrec.parent_transaction_type NOT IN('RECEIVE', 'MATCH', 'UNORDERED')) THEN
15357: l_grand_parent_trx_id := x_po_correctrec.grand_parent_txn_id;
15358: asn_debug.put_line('Parent_trx not in receive and gp is ' || l_grand_parent_trx_id);
15359: ELSIF(x_po_correctrec.parent_transaction_type IN('MATCH', 'RECEIVE')) THEN
15360: IF (temp_cascaded_table(current_n).parent_transaction_id IS NOT NULL) THEN
15361: l_grand_parent_trx_id := x_po_correctrec.po_line_location_id;
15362: asn_debug.put_line('Parent_trx in receive and parent_trx_id not null gp is ' || l_grand_parent_trx_id);
15358: asn_debug.put_line('Parent_trx not in receive and gp is ' || l_grand_parent_trx_id);
15359: ELSIF(x_po_correctrec.parent_transaction_type IN('MATCH', 'RECEIVE')) THEN
15360: IF (temp_cascaded_table(current_n).parent_transaction_id IS NOT NULL) THEN
15361: l_grand_parent_trx_id := x_po_correctrec.po_line_location_id;
15362: asn_debug.put_line('Parent_trx in receive and parent_trx_id not null gp is ' || l_grand_parent_trx_id);
15363: ELSIF(temp_cascaded_table(current_n).parent_interface_txn_id IS NOT NULL) THEN
15364: /* We would have the value derived in the x_cascaded_table
15365: * but not have inserted it back into rti.
15366: */
15364: /* We would have the value derived in the x_cascaded_table
15365: * but not have inserted it back into rti.
15366: */
15367: l_grand_parent_trx_id := temp_cascaded_table(current_n).po_line_location_id;
15368: asn_debug.put_line('Parent_trx in receive and parent_inter_trx_id not null gp is ' || l_grand_parent_trx_id);
15369: END IF;
15370: ELSIF(x_po_correctrec.parent_transaction_type = 'UNORDERED') THEN
15371: l_grand_parent_trx_id := x_po_correctrec.rcv_transaction_id;
15372: END IF;
15371: l_grand_parent_trx_id := x_po_correctrec.rcv_transaction_id;
15372: END IF;
15373:
15374: IF (l_grand_parent_trx_id IS NOT NULL) THEN
15375: asn_debug.put_line('gp before get_avail_amt for +ve corr' || l_grand_parent_trx_id);
15376: rcv_quantities_s.get_available_amount('CORRECT',
15377: x_po_correctrec.rcv_transaction_id,
15378: 'VENDOR',
15379: x_po_correctrec.parent_transaction_type,
15385: END IF;
15386: END IF; --}
15387: END IF; --} -- interface_available_qty is 0.
15388:
15389: IF (g_asn_debug = 'Y') THEN
15390: asn_debug.put_line('amount from GET_AVAILABLE_AMOUNT for correct is ' || x_converted_parent_trx_amt);
15391: END IF;
15392:
15393: IF (x_remaining_amount = 0) THEN
15386: END IF; --}
15387: END IF; --} -- interface_available_qty is 0.
15388:
15389: IF (g_asn_debug = 'Y') THEN
15390: asn_debug.put_line('amount from GET_AVAILABLE_AMOUNT for correct is ' || x_converted_parent_trx_amt);
15391: END IF;
15392:
15393: IF (x_remaining_amount = 0) THEN
15394: IF (g_asn_debug = 'Y') THEN
15390: asn_debug.put_line('amount from GET_AVAILABLE_AMOUNT for correct is ' || x_converted_parent_trx_amt);
15391: END IF;
15392:
15393: IF (x_remaining_amount = 0) THEN
15394: IF (g_asn_debug = 'Y') THEN
15395: asn_debug.put_line(' correct Need an error message in the interface tables');
15396: END IF;
15397: ELSE
15398: /* Converted successfully and have some quantity on which we can act */
15391: END IF;
15392:
15393: IF (x_remaining_amount = 0) THEN
15394: IF (g_asn_debug = 'Y') THEN
15395: asn_debug.put_line(' correct Need an error message in the interface tables');
15396: END IF;
15397: ELSE
15398: /* Converted successfully and have some quantity on which we can act */
15399: IF (g_asn_debug = 'Y') THEN
15395: asn_debug.put_line(' correct Need an error message in the interface tables');
15396: END IF;
15397: ELSE
15398: /* Converted successfully and have some quantity on which we can act */
15399: IF (g_asn_debug = 'Y') THEN
15400: asn_debug.put_line('Converted trx amt that is available ' || x_converted_parent_trx_amt);
15401: asn_debug.put_line('Remaining amt that is available ' || x_remaining_amount);
15402: END IF;
15403:
15396: END IF;
15397: ELSE
15398: /* Converted successfully and have some quantity on which we can act */
15399: IF (g_asn_debug = 'Y') THEN
15400: asn_debug.put_line('Converted trx amt that is available ' || x_converted_parent_trx_amt);
15401: asn_debug.put_line('Remaining amt that is available ' || x_remaining_amount);
15402: END IF;
15403:
15404: IF ( (rows_fetched = x_record_count)
15397: ELSE
15398: /* Converted successfully and have some quantity on which we can act */
15399: IF (g_asn_debug = 'Y') THEN
15400: asn_debug.put_line('Converted trx amt that is available ' || x_converted_parent_trx_amt);
15401: asn_debug.put_line('Remaining amt that is available ' || x_remaining_amount);
15402: END IF;
15403:
15404: IF ( (rows_fetched = x_record_count)
15405: AND (SIGN(temp_cascaded_table(current_n).amount) = 1)) THEN --{
15404: IF ( (rows_fetched = x_record_count)
15405: AND (SIGN(temp_cascaded_table(current_n).amount) = 1)) THEN --{
15406: x_converted_trx_amt := x_tolerable_amt;
15407:
15408: IF (g_asn_debug = 'Y') THEN
15409: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_trx_amt));
15410: END IF;
15411: END IF; --}
15412:
15405: AND (SIGN(temp_cascaded_table(current_n).amount) = 1)) THEN --{
15406: x_converted_trx_amt := x_tolerable_amt;
15407:
15408: IF (g_asn_debug = 'Y') THEN
15409: asn_debug.put_line('Last Row : ' || TO_CHAR(x_converted_trx_amt));
15410: END IF;
15411: END IF; --}
15412:
15413: IF (x_converted_parent_trx_amt > 0) THEN --{
15424: */
15425: x_remaining_amount := x_remaining_amount - SIGN(temp_cascaded_table(current_n).amount) * x_converted_parent_trx_amt;
15426: x_converted_parent_trx_amt := SIGN(temp_cascaded_table(current_n).amount) * x_converted_parent_trx_amt;
15427:
15428: IF (g_asn_debug = 'Y') THEN
15429: asn_debug.put_line('remaning amt after allocation is : ' || TO_CHAR(x_remaining_amount));
15430: END IF;
15431:
15432: insert_into_table := TRUE;
15425: x_remaining_amount := x_remaining_amount - SIGN(temp_cascaded_table(current_n).amount) * x_converted_parent_trx_amt;
15426: x_converted_parent_trx_amt := SIGN(temp_cascaded_table(current_n).amount) * x_converted_parent_trx_amt;
15427:
15428: IF (g_asn_debug = 'Y') THEN
15429: asn_debug.put_line('remaning amt after allocation is : ' || TO_CHAR(x_remaining_amount));
15430: END IF;
15431:
15432: insert_into_table := TRUE;
15433: ELSE --}{
15430: END IF;
15431:
15432: insert_into_table := TRUE;
15433: ELSE --}{
15434: IF (g_asn_debug = 'Y') THEN
15435: asn_debug.put_line('We are in >= amount branch ');
15436: END IF;
15437:
15438: x_converted_parent_trx_amt := x_remaining_amount;
15431:
15432: insert_into_table := TRUE;
15433: ELSE --}{
15434: IF (g_asn_debug = 'Y') THEN
15435: asn_debug.put_line('We are in >= amount branch ');
15436: END IF;
15437:
15438: x_converted_parent_trx_amt := x_remaining_amount;
15439: insert_into_table := TRUE;
15442: ELSE /* x_converted_parent_trx_qty >0 */ --}{
15443:
15444: -- so that the row can be used based on qty tolerance
15445: -- checks
15446: IF (g_asn_debug = 'Y') THEN
15447: asn_debug.put_line('amount is less then 0 but last record');
15448: END IF;
15449:
15450: insert_into_table := TRUE;
15443:
15444: -- so that the row can be used based on qty tolerance
15445: -- checks
15446: IF (g_asn_debug = 'Y') THEN
15447: asn_debug.put_line('amount is less then 0 but last record');
15448: END IF;
15449:
15450: insert_into_table := TRUE;
15451: x_converted_trx_amt := 0;
15452: END IF; /*x_converted_parent_trx_qty >0 */ --}
15453: END IF; --} just added this
15454:
15455: /* Converted amt successfully and we have some amount on which we can act */
15456: IF (g_asn_debug = 'Y') THEN
15457: asn_debug.put_line('Transaction amt is ' || x_converted_parent_trx_amt);
15458: END IF;
15459:
15460: IF insert_into_table THEN --{
15453: END IF; --} just added this
15454:
15455: /* Converted amt successfully and we have some amount on which we can act */
15456: IF (g_asn_debug = 'Y') THEN
15457: asn_debug.put_line('Transaction amt is ' || x_converted_parent_trx_amt);
15458: END IF;
15459:
15460: IF insert_into_table THEN --{
15461: IF (x_first_trans) THEN --{
15458: END IF;
15459:
15460: IF insert_into_table THEN --{
15461: IF (x_first_trans) THEN --{
15462: IF (g_asn_debug = 'Y') THEN
15463: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
15464: END IF;
15465:
15466: x_first_trans := FALSE;
15459:
15460: IF insert_into_table THEN --{
15461: IF (x_first_trans) THEN --{
15462: IF (g_asn_debug = 'Y') THEN
15463: asn_debug.put_line('First Time ' || TO_CHAR(current_n));
15464: END IF;
15465:
15466: x_first_trans := FALSE;
15467: ELSE --}{
15464: END IF;
15465:
15466: x_first_trans := FALSE;
15467: ELSE --}{
15468: IF (g_asn_debug = 'Y') THEN
15469: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
15470: END IF;
15471:
15472: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
15465:
15466: x_first_trans := FALSE;
15467: ELSE --}{
15468: IF (g_asn_debug = 'Y') THEN
15469: asn_debug.put_line('Next Time ' || TO_CHAR(current_n));
15470: END IF;
15471:
15472: temp_cascaded_table(current_n) := temp_cascaded_table(current_n - 1);
15473: END IF; --}
15477: temp_cascaded_table(current_n).po_line_location_id := x_po_correctrec.po_line_location_id;
15478: temp_cascaded_table(current_n).po_distribution_id := x_po_correctrec.po_distribution_id;
15479: temp_cascaded_table(current_n).amount := x_converted_parent_trx_amt;
15480:
15481: IF (g_asn_debug = 'Y') THEN
15482: asn_debug.put_line('Transaction amt ' || temp_cascaded_table(current_n).amount);
15483: END IF;
15484:
15485: current_n := current_n + 1;
15478: temp_cascaded_table(current_n).po_distribution_id := x_po_correctrec.po_distribution_id;
15479: temp_cascaded_table(current_n).amount := x_converted_parent_trx_amt;
15480:
15481: IF (g_asn_debug = 'Y') THEN
15482: asn_debug.put_line('Transaction amt ' || temp_cascaded_table(current_n).amount);
15483: END IF;
15484:
15485: current_n := current_n + 1;
15486:
15483: END IF;
15484:
15485: current_n := current_n + 1;
15486:
15487: IF (g_asn_debug = 'Y') THEN
15488: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
15489: END IF;
15490: END IF; --}
15491: END LOOP; --}
15484:
15485: current_n := current_n + 1;
15486:
15487: IF (g_asn_debug = 'Y') THEN
15488: asn_debug.put_line('Increment pointer by 1 ' || TO_CHAR(current_n));
15489: END IF;
15490: END IF; --}
15491: END LOOP; --}
15492: ELSE --} {
15490: END IF; --}
15491: END LOOP; --}
15492: ELSE --} {
15493: -- error_status and error_message are set after validate_quantity_shipped
15494: IF (g_asn_debug = 'Y') THEN
15495: asn_debug.put_line('No po_header_id/item_id ');
15496: END IF;
15497:
15498: IF (g_asn_debug = 'Y') THEN
15491: END LOOP; --}
15492: ELSE --} {
15493: -- error_status and error_message are set after validate_quantity_shipped
15494: IF (g_asn_debug = 'Y') THEN
15495: asn_debug.put_line('No po_header_id/item_id ');
15496: END IF;
15497:
15498: IF (g_asn_debug = 'Y') THEN
15499: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
15494: IF (g_asn_debug = 'Y') THEN
15495: asn_debug.put_line('No po_header_id/item_id ');
15496: END IF;
15497:
15498: IF (g_asn_debug = 'Y') THEN
15499: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
15500: END IF;
15501:
15502: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
15495: asn_debug.put_line('No po_header_id/item_id ');
15496: END IF;
15497:
15498: IF (g_asn_debug = 'Y') THEN
15499: asn_debug.put_line('Status = ' || x_cascaded_table(n).error_status);
15500: END IF;
15501:
15502: IF x_cascaded_table(n).error_status IN('S', 'W', 'F') THEN --{
15503: x_cascaded_table(n).error_status := rcv_error_pkg.g_ret_sts_error;
15511:
15512: RETURN;
15513: END IF; -- } of (asn quantity_shipped was valid)
15514:
15515: IF (g_asn_debug = 'Y') THEN
15516: asn_debug.put_line('before closing cursors current_n is ' || temp_cascaded_table.COUNT);
15517: END IF;
15518:
15519: IF po_correct%ISOPEN THEN
15512: RETURN;
15513: END IF; -- } of (asn quantity_shipped was valid)
15514:
15515: IF (g_asn_debug = 'Y') THEN
15516: asn_debug.put_line('before closing cursors current_n is ' || temp_cascaded_table.COUNT);
15517: END IF;
15518:
15519: IF po_correct%ISOPEN THEN
15520: CLOSE po_correct;
15523: IF po_correct_rti%ISOPEN THEN
15524: CLOSE po_correct_rti;
15525: END IF;
15526:
15527: IF (g_asn_debug = 'Y') THEN
15528: asn_debug.put_line('Exit derive_correction_line_amt');
15529: END IF;
15530: EXCEPTION
15531: WHEN OTHERS THEN
15524: CLOSE po_correct_rti;
15525: END IF;
15526:
15527: IF (g_asn_debug = 'Y') THEN
15528: asn_debug.put_line('Exit derive_correction_line_amt');
15529: END IF;
15530: EXCEPTION
15531: WHEN OTHERS THEN
15532: IF (g_asn_debug = 'Y') THEN
15528: asn_debug.put_line('Exit derive_correction_line_amt');
15529: END IF;
15530: EXCEPTION
15531: WHEN OTHERS THEN
15532: IF (g_asn_debug = 'Y') THEN
15533: asn_debug.put_line('Exception in derive_correction_line_amt ');
15534: END IF;
15535:
15536: IF po_correct%ISOPEN THEN
15529: END IF;
15530: EXCEPTION
15531: WHEN OTHERS THEN
15532: IF (g_asn_debug = 'Y') THEN
15533: asn_debug.put_line('Exception in derive_correction_line_amt ');
15534: END IF;
15535:
15536: IF po_correct%ISOPEN THEN
15537: CLOSE po_correct;
15545: rcv_error_pkg.set_sql_error_message('derive_correction_line_amt', x_progress);
15546: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
15547: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
15548:
15549: IF (g_asn_debug = 'Y') THEN
15550: asn_debug.put_line(TO_CHAR(n));
15551: asn_debug.put_line(SQLERRM);
15552: asn_debug.put_line('error ' || x_progress);
15553: END IF;
15546: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
15547: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
15548:
15549: IF (g_asn_debug = 'Y') THEN
15550: asn_debug.put_line(TO_CHAR(n));
15551: asn_debug.put_line(SQLERRM);
15552: asn_debug.put_line('error ' || x_progress);
15553: END IF;
15554: END derive_correction_line_amt;
15547: rcv_error_pkg.log_interface_error('TRANSACTIONS_INTERFACE_ID', FALSE);
15548:
15549: IF (g_asn_debug = 'Y') THEN
15550: asn_debug.put_line(TO_CHAR(n));
15551: asn_debug.put_line(SQLERRM);
15552: asn_debug.put_line('error ' || x_progress);
15553: END IF;
15554: END derive_correction_line_amt;
15555:
15548:
15549: IF (g_asn_debug = 'Y') THEN
15550: asn_debug.put_line(TO_CHAR(n));
15551: asn_debug.put_line(SQLERRM);
15552: asn_debug.put_line('error ' || x_progress);
15553: END IF;
15554: END derive_correction_line_amt;
15555:
15556: PROCEDURE default_vendor_correct(
15702: x_cascaded_table(n).processing_status_code := p_trx_record.processing_status_code;
15703: x_cascaded_table(n).transaction_status_code := p_trx_record.transaction_status_code;
15704: x_cascaded_table(n).auto_transact_code := p_trx_record.auto_transact_code;
15705:
15706: IF (g_asn_debug = 'Y') THEN
15707: asn_debug.put_line('Enter Default for Correct transaction');
15708: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
15709: END IF;
15710:
15703: x_cascaded_table(n).transaction_status_code := p_trx_record.transaction_status_code;
15704: x_cascaded_table(n).auto_transact_code := p_trx_record.auto_transact_code;
15705:
15706: IF (g_asn_debug = 'Y') THEN
15707: asn_debug.put_line('Enter Default for Correct transaction');
15708: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
15709: END IF;
15710:
15711: IF x_cascaded_table(n).source_document_code IS NULL THEN
15704: x_cascaded_table(n).auto_transact_code := p_trx_record.auto_transact_code;
15705:
15706: IF (g_asn_debug = 'Y') THEN
15707: asn_debug.put_line('Enter Default for Correct transaction');
15708: asn_debug.put_line('quantity ' || x_cascaded_table(n).quantity);
15709: END IF;
15710:
15711: IF x_cascaded_table(n).source_document_code IS NULL THEN
15712: IF x_cascaded_table(n).receipt_source_code = 'CUSTOMER' THEN
15714: ELSE
15715: x_cascaded_table(n).source_document_code := 'PO';
15716: END IF;
15717:
15718: IF (g_asn_debug = 'Y') THEN
15719: asn_debug.put_line('Defaulting SOURCE_DOCUMENT_CODE ' || x_cascaded_table(n).source_document_code);
15720: END IF;
15721: END IF;
15722:
15715: x_cascaded_table(n).source_document_code := 'PO';
15716: END IF;
15717:
15718: IF (g_asn_debug = 'Y') THEN
15719: asn_debug.put_line('Defaulting SOURCE_DOCUMENT_CODE ' || x_cascaded_table(n).source_document_code);
15720: END IF;
15721: END IF;
15722:
15723: IF (x_cascaded_table(n).derive = 'Y') THEN --{
15755: * populating these columns. So this case of giving a warning
15756: * will not arise as it will be defaulted by them
15757: */
15758: ELSE --} {
15759: IF (g_asn_debug = 'Y') THEN
15760: asn_debug.put_line('open cursor Default RTI');
15761: END IF;
15762:
15763: OPEN po_correct_rti(x_cascaded_table(n).parent_interface_txn_id);
15756: * will not arise as it will be defaulted by them
15757: */
15758: ELSE --} {
15759: IF (g_asn_debug = 'Y') THEN
15760: asn_debug.put_line('open cursor Default RTI');
15761: END IF;
15762:
15763: OPEN po_correct_rti(x_cascaded_table(n).parent_interface_txn_id);
15764: END IF; --}
15766: OPEN po_correct(x_cascaded_table(n).parent_transaction_id);
15767: END IF; --}
15768:
15769: IF (po_correct%ISOPEN) THEN
15770: IF (g_asn_debug = 'Y') THEN
15771: asn_debug.put_line('fetch cursor Default ' || x_cascaded_table(n).parent_transaction_id);
15772: END IF;
15773:
15774: FETCH po_correct INTO default_po_correct_info;
15767: END IF; --}
15768:
15769: IF (po_correct%ISOPEN) THEN
15770: IF (g_asn_debug = 'Y') THEN
15771: asn_debug.put_line('fetch cursor Default ' || x_cascaded_table(n).parent_transaction_id);
15772: END IF;
15773:
15774: FETCH po_correct INTO default_po_correct_info;
15775: ELSIF(po_correct_rti%ISOPEN) THEN
15779: IF ( ( po_correct%ISOPEN
15780: AND po_correct%FOUND)
15781: OR ( po_correct_rti%ISOPEN
15782: AND po_correct_rti%FOUND)) THEN --{
15783: IF (g_asn_debug = 'Y') THEN --{
15784: asn_debug.put_line('Defaulting Correct po_revision_num' || default_po_correct_info.po_revision_num);
15785: asn_debug.put_line('Defaulting Correct item_description' || default_po_correct_info.item_description);
15786: asn_debug.put_line('Defaulting Correct po_release_id' || default_po_correct_info.po_release_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15780: AND po_correct%FOUND)
15781: OR ( po_correct_rti%ISOPEN
15782: AND po_correct_rti%FOUND)) THEN --{
15783: IF (g_asn_debug = 'Y') THEN --{
15784: asn_debug.put_line('Defaulting Correct po_revision_num' || default_po_correct_info.po_revision_num);
15785: asn_debug.put_line('Defaulting Correct item_description' || default_po_correct_info.item_description);
15786: asn_debug.put_line('Defaulting Correct po_release_id' || default_po_correct_info.po_release_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15781: OR ( po_correct_rti%ISOPEN
15782: AND po_correct_rti%FOUND)) THEN --{
15783: IF (g_asn_debug = 'Y') THEN --{
15784: asn_debug.put_line('Defaulting Correct po_revision_num' || default_po_correct_info.po_revision_num);
15785: asn_debug.put_line('Defaulting Correct item_description' || default_po_correct_info.item_description);
15786: asn_debug.put_line('Defaulting Correct po_release_id' || default_po_correct_info.po_release_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15782: AND po_correct_rti%FOUND)) THEN --{
15783: IF (g_asn_debug = 'Y') THEN --{
15784: asn_debug.put_line('Defaulting Correct po_revision_num' || default_po_correct_info.po_revision_num);
15785: asn_debug.put_line('Defaulting Correct item_description' || default_po_correct_info.item_description);
15786: asn_debug.put_line('Defaulting Correct po_release_id' || default_po_correct_info.po_release_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15783: IF (g_asn_debug = 'Y') THEN --{
15784: asn_debug.put_line('Defaulting Correct po_revision_num' || default_po_correct_info.po_revision_num);
15785: asn_debug.put_line('Defaulting Correct item_description' || default_po_correct_info.item_description);
15786: asn_debug.put_line('Defaulting Correct po_release_id' || default_po_correct_info.po_release_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15784: asn_debug.put_line('Defaulting Correct po_revision_num' || default_po_correct_info.po_revision_num);
15785: asn_debug.put_line('Defaulting Correct item_description' || default_po_correct_info.item_description);
15786: asn_debug.put_line('Defaulting Correct po_release_id' || default_po_correct_info.po_release_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15785: asn_debug.put_line('Defaulting Correct item_description' || default_po_correct_info.item_description);
15786: asn_debug.put_line('Defaulting Correct po_release_id' || default_po_correct_info.po_release_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15786: asn_debug.put_line('Defaulting Correct po_release_id' || default_po_correct_info.po_release_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15787: asn_debug.put_line('Defaulting Correct location_id' || default_po_correct_info.loc_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15788: asn_debug.put_line('Defaulting Correct organization_id' || default_po_correct_info.organization_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15789: asn_debug.put_line('Defaulting Correct routing_header_id' || default_po_correct_info.routing_header_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15790: asn_debug.put_line('Defaulting Correct currency_code' || default_po_correct_info.currency_code);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15791: asn_debug.put_line('Defaulting Correct currency_conversion_rate' || default_po_correct_info.currency_conversion_rate);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15792: asn_debug.put_line('Defaulting Correct currency_conversion_type' || default_po_correct_info.currency_conversion_type);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15793: asn_debug.put_line('Defaulting Correct currency_conversion_date' || default_po_correct_info.currency_conversion_date);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15794: asn_debug.put_line('Defaulting Correct shipment_header_id' || default_po_correct_info.shipment_header_id);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15802: asn_debug.put_line('Defaulting Correct SUBINVENTORY' || default_po_correct_info.subinventory);
15795: asn_debug.put_line('Defaulting Correct shipment_line_id' || default_po_correct_info.shipment_line_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15802: asn_debug.put_line('Defaulting Correct SUBINVENTORY' || default_po_correct_info.subinventory);
15803: asn_debug.put_line('Defaulting Correct CUSTOMER_ID' || default_po_correct_info.customer_id);
15796: asn_debug.put_line('Defaulting Correct category_id' || default_po_correct_info.category_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15802: asn_debug.put_line('Defaulting Correct SUBINVENTORY' || default_po_correct_info.subinventory);
15803: asn_debug.put_line('Defaulting Correct CUSTOMER_ID' || default_po_correct_info.customer_id);
15804: asn_debug.put_line('Defaulting Correct CUSTOMER_SITE_ID' || default_po_correct_info.customer_site_id);
15797: asn_debug.put_line('Defaulting Correct vendor_id' || default_po_correct_info.vendor_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15802: asn_debug.put_line('Defaulting Correct SUBINVENTORY' || default_po_correct_info.subinventory);
15803: asn_debug.put_line('Defaulting Correct CUSTOMER_ID' || default_po_correct_info.customer_id);
15804: asn_debug.put_line('Defaulting Correct CUSTOMER_SITE_ID' || default_po_correct_info.customer_site_id);
15805: asn_debug.put_line('Defaulting Correct job_id' || default_po_correct_info.job_id);
15798: asn_debug.put_line('Defaulting Correct vendor_site_id' || default_po_correct_info.vendor_site_id);
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15802: asn_debug.put_line('Defaulting Correct SUBINVENTORY' || default_po_correct_info.subinventory);
15803: asn_debug.put_line('Defaulting Correct CUSTOMER_ID' || default_po_correct_info.customer_id);
15804: asn_debug.put_line('Defaulting Correct CUSTOMER_SITE_ID' || default_po_correct_info.customer_site_id);
15805: asn_debug.put_line('Defaulting Correct job_id' || default_po_correct_info.job_id);
15806: END IF; --}
15799: asn_debug.put_line('Defaulting Correct po_unit_price' || default_po_correct_info.po_unit_price);
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15802: asn_debug.put_line('Defaulting Correct SUBINVENTORY' || default_po_correct_info.subinventory);
15803: asn_debug.put_line('Defaulting Correct CUSTOMER_ID' || default_po_correct_info.customer_id);
15804: asn_debug.put_line('Defaulting Correct CUSTOMER_SITE_ID' || default_po_correct_info.customer_site_id);
15805: asn_debug.put_line('Defaulting Correct job_id' || default_po_correct_info.job_id);
15806: END IF; --}
15807:
15800: asn_debug.put_line('Defaulting Correct DELIVER_TO_PERSON_ID' || default_po_correct_info.deliver_to_person_id);
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15802: asn_debug.put_line('Defaulting Correct SUBINVENTORY' || default_po_correct_info.subinventory);
15803: asn_debug.put_line('Defaulting Correct CUSTOMER_ID' || default_po_correct_info.customer_id);
15804: asn_debug.put_line('Defaulting Correct CUSTOMER_SITE_ID' || default_po_correct_info.customer_site_id);
15805: asn_debug.put_line('Defaulting Correct job_id' || default_po_correct_info.job_id);
15806: END IF; --}
15807:
15808: IF x_cascaded_table(n).oe_order_header_id IS NULL
15801: asn_debug.put_line('Defaulting Correct DELIVER_TO_LOCATION_ID' || default_po_correct_info.deliver_to_location_id);
15802: asn_debug.put_line('Defaulting Correct SUBINVENTORY' || default_po_correct_info.subinventory);
15803: asn_debug.put_line('Defaulting Correct CUSTOMER_ID' || default_po_correct_info.customer_id);
15804: asn_debug.put_line('Defaulting Correct CUSTOMER_SITE_ID' || default_po_correct_info.customer_site_id);
15805: asn_debug.put_line('Defaulting Correct job_id' || default_po_correct_info.job_id);
15806: END IF; --}
15807:
15808: IF x_cascaded_table(n).oe_order_header_id IS NULL
15809: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
15808: IF x_cascaded_table(n).oe_order_header_id IS NULL
15809: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
15810: x_cascaded_table(n).oe_order_header_id := default_po_correct_info.oe_order_header_id;
15811:
15812: IF (g_asn_debug = 'Y') THEN
15813: asn_debug.put_line('Defaulting Transfer oe_order_header_id ' || x_cascaded_table(n).oe_order_header_id);
15814: END IF;
15815: END IF;
15816:
15809: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
15810: x_cascaded_table(n).oe_order_header_id := default_po_correct_info.oe_order_header_id;
15811:
15812: IF (g_asn_debug = 'Y') THEN
15813: asn_debug.put_line('Defaulting Transfer oe_order_header_id ' || x_cascaded_table(n).oe_order_header_id);
15814: END IF;
15815: END IF;
15816:
15817: IF x_cascaded_table(n).oe_order_line_id IS NULL
15817: IF x_cascaded_table(n).oe_order_line_id IS NULL
15818: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
15819: x_cascaded_table(n).oe_order_line_id := default_po_correct_info.oe_order_line_id;
15820:
15821: IF (g_asn_debug = 'Y') THEN
15822: asn_debug.put_line('Defaulting Transfer oe_order_line_id ' || x_cascaded_table(n).oe_order_line_id);
15823: END IF;
15824: END IF;
15825:
15818: AND x_cascaded_table(n).source_document_code = 'RMA' THEN
15819: x_cascaded_table(n).oe_order_line_id := default_po_correct_info.oe_order_line_id;
15820:
15821: IF (g_asn_debug = 'Y') THEN
15822: asn_debug.put_line('Defaulting Transfer oe_order_line_id ' || x_cascaded_table(n).oe_order_line_id);
15823: END IF;
15824: END IF;
15825:
15826: x_cascaded_table(n).po_revision_num := default_po_correct_info.po_revision_num;
15861: WHERE pll.line_location_id = x_cascaded_table(n).po_line_location_id
15862: AND pl.po_line_id = x_cascaded_table(n).po_line_id
15863: AND pl.po_line_id = pll.po_line_id;
15864:
15865: IF (g_asn_debug = 'Y') THEN
15866: asn_debug.put_line('Defaulting Correct po_unit_price' || x_cascaded_table(n).po_unit_price);
15867: END IF;
15868: END IF; --}
15869:
15862: AND pl.po_line_id = x_cascaded_table(n).po_line_id
15863: AND pl.po_line_id = pll.po_line_id;
15864:
15865: IF (g_asn_debug = 'Y') THEN
15866: asn_debug.put_line('Defaulting Correct po_unit_price' || x_cascaded_table(n).po_unit_price);
15867: END IF;
15868: END IF; --}
15869:
15870: x_cascaded_table(n).location_id := default_po_correct_info.loc_id;
15871: x_cascaded_table(n).deliver_to_person_id := default_po_correct_info.deliver_to_person_id;
15872: x_cascaded_table(n).deliver_to_location_id := default_po_correct_info.deliver_to_location_id;
15873: x_cascaded_table(n).subinventory := default_po_correct_info.subinventory;
15874: -- LPN defaulting
15875: asn_debug.put_line(' defaulting lpn_id and transfer_lpn_id for int org cor');
15876: /* Bug 3444284.
15877: * We dont need to default lpn_ids. WMS will take care of
15878: * populating these columns. So this case of giving a warning
15879: * will not arise as it will be defaulted by them
15906: END Comment: Bug: 4735484
15907: */
15908: END IF;
15909:
15910: IF (g_asn_debug = 'Y') THEN
15911: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
15912: asn_debug.put_line(' quantity ' || x_cascaded_table(n).quantity);
15913: END IF;
15914:
15907: */
15908: END IF;
15909:
15910: IF (g_asn_debug = 'Y') THEN
15911: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
15912: asn_debug.put_line(' quantity ' || x_cascaded_table(n).quantity);
15913: END IF;
15914:
15915: IF (g_asn_debug = 'Y') THEN
15908: END IF;
15909:
15910: IF (g_asn_debug = 'Y') THEN
15911: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
15912: asn_debug.put_line(' quantity ' || x_cascaded_table(n).quantity);
15913: END IF;
15914:
15915: IF (g_asn_debug = 'Y') THEN
15916: asn_debug.put_line('Exit default_vendor_correct');
15911: asn_debug.put_line('Set Location_id = ' || TO_CHAR(x_cascaded_table(n).location_id));
15912: asn_debug.put_line(' quantity ' || x_cascaded_table(n).quantity);
15913: END IF;
15914:
15915: IF (g_asn_debug = 'Y') THEN
15916: asn_debug.put_line('Exit default_vendor_correct');
15917: END IF;
15918:
15919: IF po_correct%ISOPEN THEN
15912: asn_debug.put_line(' quantity ' || x_cascaded_table(n).quantity);
15913: END IF;
15914:
15915: IF (g_asn_debug = 'Y') THEN
15916: asn_debug.put_line('Exit default_vendor_correct');
15917: END IF;
15918:
15919: IF po_correct%ISOPEN THEN
15920: CLOSE po_correct;
15953:
15954: RETURN(correct_qty);
15955: EXCEPTION
15956: WHEN OTHERS THEN
15957: IF (g_asn_debug = 'Y') THEN
15958: asn_debug.put_line('Could not convert between UOMs');
15959: asn_debug.put_line('Will return 0');
15960: END IF;
15961:
15954: RETURN(correct_qty);
15955: EXCEPTION
15956: WHEN OTHERS THEN
15957: IF (g_asn_debug = 'Y') THEN
15958: asn_debug.put_line('Could not convert between UOMs');
15959: asn_debug.put_line('Will return 0');
15960: END IF;
15961:
15962: correct_qty := 0;
15955: EXCEPTION
15956: WHEN OTHERS THEN
15957: IF (g_asn_debug = 'Y') THEN
15958: asn_debug.put_line('Could not convert between UOMs');
15959: asn_debug.put_line('Will return 0');
15960: END IF;
15961:
15962: correct_qty := 0;
15963: RETURN(correct_qty);
15991:
15992: po_lookup_code_record.error_record.error_status := 'S';
15993: po_lookup_code_record.error_record.error_message := NULL;
15994:
15995: IF (g_asn_debug = 'Y') THEN
15996: asn_debug.put_line('Validating Source Type Code');
15997: END IF;
15998:
15999: rcv_transactions_interface_sv1.validate_po_lookup_code(po_lookup_code_record);
15992: po_lookup_code_record.error_record.error_status := 'S';
15993: po_lookup_code_record.error_record.error_message := NULL;
15994:
15995: IF (g_asn_debug = 'Y') THEN
15996: asn_debug.put_line('Validating Source Type Code');
15997: END IF;
15998:
15999: rcv_transactions_interface_sv1.validate_po_lookup_code(po_lookup_code_record);
16000: x_cascaded_table(n).error_status := po_lookup_code_record.error_record.error_status;
16027: po_lookup_code_record.lookup_type := 'RCV TRANSACTION TYPE';
16028: po_lookup_code_record.error_record.error_status := 'S';
16029: po_lookup_code_record.error_record.error_message := NULL;
16030:
16031: IF (g_asn_debug = 'Y') THEN
16032: asn_debug.put_line('Validating Destination Type Code');
16033: END IF;
16034:
16035: rcv_transactions_interface_sv1.validate_po_lookup_code(po_lookup_code_record);
16028: po_lookup_code_record.error_record.error_status := 'S';
16029: po_lookup_code_record.error_record.error_message := NULL;
16030:
16031: IF (g_asn_debug = 'Y') THEN
16032: asn_debug.put_line('Validating Destination Type Code');
16033: END IF;
16034:
16035: rcv_transactions_interface_sv1.validate_po_lookup_code(po_lookup_code_record);
16036: x_cascaded_table(n).error_status := po_lookup_code_record.error_record.error_status;
16063: po_lookup_code_record.lookup_type := 'INSPECTION STATUS';
16064: po_lookup_code_record.error_record.error_status := 'S';
16065: po_lookup_code_record.error_record.error_message := NULL;
16066:
16067: IF (g_asn_debug = 'Y') THEN
16068: asn_debug.put_line('Validating INSPECTION STATUS ');
16069: END IF;
16070:
16071: rcv_transactions_interface_sv1.validate_po_lookup_code(po_lookup_code_record);
16064: po_lookup_code_record.error_record.error_status := 'S';
16065: po_lookup_code_record.error_record.error_message := NULL;
16066:
16067: IF (g_asn_debug = 'Y') THEN
16068: asn_debug.put_line('Validating INSPECTION STATUS ');
16069: END IF;
16070:
16071: rcv_transactions_interface_sv1.validate_po_lookup_code(po_lookup_code_record);
16072: x_cascaded_table(n).error_status := po_lookup_code_record.error_record.error_status;
16119: /*
16120: IF ( gml_process_flags.opm_installed = 1
16121: AND x_cascaded_table(n).item_id IS NOT NULL
16122: AND gml_process_flags.check_process_orgn(p_organization_id => x_cascaded_table(n).to_organization_id) = 1 ) THEN
16123: IF (g_asn_debug = 'Y') THEN
16124: asn_debug.put_line('In validate opm attributes');
16125: END IF;
16126: */
16127:
16120: IF ( gml_process_flags.opm_installed = 1
16121: AND x_cascaded_table(n).item_id IS NOT NULL
16122: AND gml_process_flags.check_process_orgn(p_organization_id => x_cascaded_table(n).to_organization_id) = 1 ) THEN
16123: IF (g_asn_debug = 'Y') THEN
16124: asn_debug.put_line('In validate opm attributes');
16125: END IF;
16126: */
16127:
16128: IF (g_asn_debug = 'Y') THEN
16124: asn_debug.put_line('In validate opm attributes');
16125: END IF;
16126: */
16127:
16128: IF (g_asn_debug = 'Y') THEN
16129: asn_debug.put_line('In validate opm attributes');
16130: END IF;
16131:
16132:
16125: END IF;
16126: */
16127:
16128: IF (g_asn_debug = 'Y') THEN
16129: asn_debug.put_line('In validate opm attributes');
16130: END IF;
16131:
16132:
16133: -- if receiving full qty against an ASN/Internal Order , default the secondary qty from shipment line
16150: WHEN OTHERS THEN
16151: NULL;
16152: END;
16153:
16154: IF (g_asn_debug = 'Y') THEN
16155: asn_debug.put_line('quantity shipped = ' || l_quantity_shipped);
16156: asn_debug.put_line('secondary qty shipped = ' || l_secondary_quantity_shipped);
16157: END IF;
16158:
16151: NULL;
16152: END;
16153:
16154: IF (g_asn_debug = 'Y') THEN
16155: asn_debug.put_line('quantity shipped = ' || l_quantity_shipped);
16156: asn_debug.put_line('secondary qty shipped = ' || l_secondary_quantity_shipped);
16157: END IF;
16158:
16159: IF l_quantity_shipped = x_cascaded_table(n).quantity THEN
16152: END;
16153:
16154: IF (g_asn_debug = 'Y') THEN
16155: asn_debug.put_line('quantity shipped = ' || l_quantity_shipped);
16156: asn_debug.put_line('secondary qty shipped = ' || l_secondary_quantity_shipped);
16157: END IF;
16158:
16159: IF l_quantity_shipped = x_cascaded_table(n).quantity THEN
16160: x_cascaded_table(n).secondary_quantity := l_secondary_quantity_shipped;
16176: WHEN OTHERS THEN
16177: NULL;
16178: END;
16179:
16180: IF (g_asn_debug = 'Y') THEN
16181: asn_debug.put_line('po shipment qty = ' || l_quantity_shipped);
16182: asn_debug.put_line('po shipment secondary qty = ' || l_secondary_quantity_shipped);
16183: END IF;
16184:
16177: NULL;
16178: END;
16179:
16180: IF (g_asn_debug = 'Y') THEN
16181: asn_debug.put_line('po shipment qty = ' || l_quantity_shipped);
16182: asn_debug.put_line('po shipment secondary qty = ' || l_secondary_quantity_shipped);
16183: END IF;
16184:
16185: IF l_quantity_shipped = x_cascaded_table(n).quantity THEN
16178: END;
16179:
16180: IF (g_asn_debug = 'Y') THEN
16181: asn_debug.put_line('po shipment qty = ' || l_quantity_shipped);
16182: asn_debug.put_line('po shipment secondary qty = ' || l_secondary_quantity_shipped);
16183: END IF;
16184:
16185: IF l_quantity_shipped = x_cascaded_table(n).quantity THEN
16186: x_cascaded_table(n).secondary_quantity := l_secondary_quantity_shipped;
16213: l_opm_record_type.GROUP_ID := x_cascaded_table(n).GROUP_ID;
16214: l_opm_record_type.primary_quantity := x_cascaded_table(n).primary_quantity;
16215: l_opm_record_type.from_locator_id := x_cascaded_table(n).from_locator_id;
16216:
16217: IF (g_asn_debug = 'Y') THEN
16218: asn_debug.put_line('unit_of_measure = ' || l_opm_record_type.unit_of_measure);
16219: asn_debug.put_line('secondary unit_of_measure = ' || l_opm_record_type.secondary_unit_of_measure);
16220: asn_debug.put_line('Quantity = ' || l_opm_record_type.quantity);
16221: asn_debug.put_line('Secondary Quantity = ' || l_opm_record_type.secondary_quantity);
16214: l_opm_record_type.primary_quantity := x_cascaded_table(n).primary_quantity;
16215: l_opm_record_type.from_locator_id := x_cascaded_table(n).from_locator_id;
16216:
16217: IF (g_asn_debug = 'Y') THEN
16218: asn_debug.put_line('unit_of_measure = ' || l_opm_record_type.unit_of_measure);
16219: asn_debug.put_line('secondary unit_of_measure = ' || l_opm_record_type.secondary_unit_of_measure);
16220: asn_debug.put_line('Quantity = ' || l_opm_record_type.quantity);
16221: asn_debug.put_line('Secondary Quantity = ' || l_opm_record_type.secondary_quantity);
16222: asn_debug.put_line('Item Id = ' || l_opm_record_type.item_id);
16215: l_opm_record_type.from_locator_id := x_cascaded_table(n).from_locator_id;
16216:
16217: IF (g_asn_debug = 'Y') THEN
16218: asn_debug.put_line('unit_of_measure = ' || l_opm_record_type.unit_of_measure);
16219: asn_debug.put_line('secondary unit_of_measure = ' || l_opm_record_type.secondary_unit_of_measure);
16220: asn_debug.put_line('Quantity = ' || l_opm_record_type.quantity);
16221: asn_debug.put_line('Secondary Quantity = ' || l_opm_record_type.secondary_quantity);
16222: asn_debug.put_line('Item Id = ' || l_opm_record_type.item_id);
16223: END IF;
16216:
16217: IF (g_asn_debug = 'Y') THEN
16218: asn_debug.put_line('unit_of_measure = ' || l_opm_record_type.unit_of_measure);
16219: asn_debug.put_line('secondary unit_of_measure = ' || l_opm_record_type.secondary_unit_of_measure);
16220: asn_debug.put_line('Quantity = ' || l_opm_record_type.quantity);
16221: asn_debug.put_line('Secondary Quantity = ' || l_opm_record_type.secondary_quantity);
16222: asn_debug.put_line('Item Id = ' || l_opm_record_type.item_id);
16223: END IF;
16224:
16217: IF (g_asn_debug = 'Y') THEN
16218: asn_debug.put_line('unit_of_measure = ' || l_opm_record_type.unit_of_measure);
16219: asn_debug.put_line('secondary unit_of_measure = ' || l_opm_record_type.secondary_unit_of_measure);
16220: asn_debug.put_line('Quantity = ' || l_opm_record_type.quantity);
16221: asn_debug.put_line('Secondary Quantity = ' || l_opm_record_type.secondary_quantity);
16222: asn_debug.put_line('Item Id = ' || l_opm_record_type.item_id);
16223: END IF;
16224:
16225: l_opm_record_type.error_record.error_status := 'S';
16218: asn_debug.put_line('unit_of_measure = ' || l_opm_record_type.unit_of_measure);
16219: asn_debug.put_line('secondary unit_of_measure = ' || l_opm_record_type.secondary_unit_of_measure);
16220: asn_debug.put_line('Quantity = ' || l_opm_record_type.quantity);
16221: asn_debug.put_line('Secondary Quantity = ' || l_opm_record_type.secondary_quantity);
16222: asn_debug.put_line('Item Id = ' || l_opm_record_type.item_id);
16223: END IF;
16224:
16225: l_opm_record_type.error_record.error_status := 'S';
16226: l_opm_record_type.error_record.error_message := NULL;
16239: l_att_rec.error_record.error_message := NULL;
16240: l_transaction_id :=x_cascaded_table(n).interface_transaction_id; /*BUG#10380635 */
16241:
16242:
16243: IF (g_asn_debug = 'Y') THEN
16244: asn_debug.put_line('printing the values before calling RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16245: asn_debug.put_line('unit_of_measure = ' || l_att_rec.transaction_unit_of_measure);
16246: asn_debug.put_line('secondary unit_of_measure = ' || l_att_rec.secondary_unit_of_measure);
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16240: l_transaction_id :=x_cascaded_table(n).interface_transaction_id; /*BUG#10380635 */
16241:
16242:
16243: IF (g_asn_debug = 'Y') THEN
16244: asn_debug.put_line('printing the values before calling RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16245: asn_debug.put_line('unit_of_measure = ' || l_att_rec.transaction_unit_of_measure);
16246: asn_debug.put_line('secondary unit_of_measure = ' || l_att_rec.secondary_unit_of_measure);
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16241:
16242:
16243: IF (g_asn_debug = 'Y') THEN
16244: asn_debug.put_line('printing the values before calling RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16245: asn_debug.put_line('unit_of_measure = ' || l_att_rec.transaction_unit_of_measure);
16246: asn_debug.put_line('secondary unit_of_measure = ' || l_att_rec.secondary_unit_of_measure);
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16249: asn_debug.put_line('Item Id = ' || l_att_rec.inventory_item_id);
16242:
16243: IF (g_asn_debug = 'Y') THEN
16244: asn_debug.put_line('printing the values before calling RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16245: asn_debug.put_line('unit_of_measure = ' || l_att_rec.transaction_unit_of_measure);
16246: asn_debug.put_line('secondary unit_of_measure = ' || l_att_rec.secondary_unit_of_measure);
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16249: asn_debug.put_line('Item Id = ' || l_att_rec.inventory_item_id);
16250: asn_debug.put_line('Secondary_uom_code = ' || l_att_rec.secondary_uom_code);
16243: IF (g_asn_debug = 'Y') THEN
16244: asn_debug.put_line('printing the values before calling RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16245: asn_debug.put_line('unit_of_measure = ' || l_att_rec.transaction_unit_of_measure);
16246: asn_debug.put_line('secondary unit_of_measure = ' || l_att_rec.secondary_unit_of_measure);
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16249: asn_debug.put_line('Item Id = ' || l_att_rec.inventory_item_id);
16250: asn_debug.put_line('Secondary_uom_code = ' || l_att_rec.secondary_uom_code);
16251: asn_debug.put_line('to organization id = ' || l_att_rec.to_organization_id);
16244: asn_debug.put_line('printing the values before calling RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16245: asn_debug.put_line('unit_of_measure = ' || l_att_rec.transaction_unit_of_measure);
16246: asn_debug.put_line('secondary unit_of_measure = ' || l_att_rec.secondary_unit_of_measure);
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16249: asn_debug.put_line('Item Id = ' || l_att_rec.inventory_item_id);
16250: asn_debug.put_line('Secondary_uom_code = ' || l_att_rec.secondary_uom_code);
16251: asn_debug.put_line('to organization id = ' || l_att_rec.to_organization_id);
16252: asn_debug.put_line('Transaction_id = ' || l_transaction_id); /*BUG#10380635 */
16245: asn_debug.put_line('unit_of_measure = ' || l_att_rec.transaction_unit_of_measure);
16246: asn_debug.put_line('secondary unit_of_measure = ' || l_att_rec.secondary_unit_of_measure);
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16249: asn_debug.put_line('Item Id = ' || l_att_rec.inventory_item_id);
16250: asn_debug.put_line('Secondary_uom_code = ' || l_att_rec.secondary_uom_code);
16251: asn_debug.put_line('to organization id = ' || l_att_rec.to_organization_id);
16252: asn_debug.put_line('Transaction_id = ' || l_transaction_id); /*BUG#10380635 */
16253: END IF;
16246: asn_debug.put_line('secondary unit_of_measure = ' || l_att_rec.secondary_unit_of_measure);
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16249: asn_debug.put_line('Item Id = ' || l_att_rec.inventory_item_id);
16250: asn_debug.put_line('Secondary_uom_code = ' || l_att_rec.secondary_uom_code);
16251: asn_debug.put_line('to organization id = ' || l_att_rec.to_organization_id);
16252: asn_debug.put_line('Transaction_id = ' || l_transaction_id); /*BUG#10380635 */
16253: END IF;
16254:
16247: asn_debug.put_line('Quantity = ' || l_att_rec.transaction_quantity);
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16249: asn_debug.put_line('Item Id = ' || l_att_rec.inventory_item_id);
16250: asn_debug.put_line('Secondary_uom_code = ' || l_att_rec.secondary_uom_code);
16251: asn_debug.put_line('to organization id = ' || l_att_rec.to_organization_id);
16252: asn_debug.put_line('Transaction_id = ' || l_transaction_id); /*BUG#10380635 */
16253: END IF;
16254:
16255: /*INVCONV ,validate_opm_parameters procedure is being called to validate the OPM
16248: asn_debug.put_line('Secondary Quantity = ' || l_att_rec.secondary_quantity);
16249: asn_debug.put_line('Item Id = ' || l_att_rec.inventory_item_id);
16250: asn_debug.put_line('Secondary_uom_code = ' || l_att_rec.secondary_uom_code);
16251: asn_debug.put_line('to organization id = ' || l_att_rec.to_organization_id);
16252: asn_debug.put_line('Transaction_id = ' || l_transaction_id); /*BUG#10380635 */
16253: END IF;
16254:
16255: /*INVCONV ,validate_opm_parameters procedure is being called to validate the OPM
16256: specific parameters.Now it shall be replaced with a new routine which shall
16261: gml_opm_roi_grp.validate_opm_parameters(l_opm_record_type);
16262: x_cascaded_table(n).error_status := l_opm_record_type.error_record.error_status;
16263: x_cascaded_table(n).error_message := l_opm_record_type.error_record.error_message;
16264:
16265: IF (g_asn_debug = 'Y') THEN
16266: asn_debug.put_line('OPM Error Status = ' || l_opm_record_type.error_record.error_status);
16267: asn_debug.put_line('OPM Error Msg = ' || l_opm_record_type.error_record.error_message);
16268: END IF;
16269: */
16262: x_cascaded_table(n).error_status := l_opm_record_type.error_record.error_status;
16263: x_cascaded_table(n).error_message := l_opm_record_type.error_record.error_message;
16264:
16265: IF (g_asn_debug = 'Y') THEN
16266: asn_debug.put_line('OPM Error Status = ' || l_opm_record_type.error_record.error_status);
16267: asn_debug.put_line('OPM Error Msg = ' || l_opm_record_type.error_record.error_message);
16268: END IF;
16269: */
16270:
16263: x_cascaded_table(n).error_message := l_opm_record_type.error_record.error_message;
16264:
16265: IF (g_asn_debug = 'Y') THEN
16266: asn_debug.put_line('OPM Error Status = ' || l_opm_record_type.error_record.error_status);
16267: asn_debug.put_line('OPM Error Msg = ' || l_opm_record_type.error_record.error_message);
16268: END IF;
16269: */
16270:
16271: IF x_cascaded_table(n).item_id IS NOT NULL THEN
16269: */
16270:
16271: IF x_cascaded_table(n).item_id IS NOT NULL THEN
16272:
16273: IF (g_asn_debug = 'Y') THEN
16274: asn_debug.put_line('Before calling new API RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16275: END IF;
16276:
16277:
16270:
16271: IF x_cascaded_table(n).item_id IS NOT NULL THEN
16272:
16273: IF (g_asn_debug = 'Y') THEN
16274: asn_debug.put_line('Before calling new API RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16275: END IF;
16276:
16277:
16278: RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS (
16302: /* error handling , INVCONV*/
16303: x_cascaded_table(n).error_status := l_att_rec.error_record.error_status;
16304: x_cascaded_table(n).error_message := l_att_rec.error_record.error_message;
16305:
16306: IF (g_asn_debug = 'Y') THEN
16307: asn_debug.put_line('After calling new API RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16308: asn_debug.put_line('return status of RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS = ' || x_cascaded_table(n).error_status);
16309: asn_debug.put_line('return message of RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS = ' || x_cascaded_table(n).error_message);
16310: END IF;
16303: x_cascaded_table(n).error_status := l_att_rec.error_record.error_status;
16304: x_cascaded_table(n).error_message := l_att_rec.error_record.error_message;
16305:
16306: IF (g_asn_debug = 'Y') THEN
16307: asn_debug.put_line('After calling new API RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16308: asn_debug.put_line('return status of RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS = ' || x_cascaded_table(n).error_status);
16309: asn_debug.put_line('return message of RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS = ' || x_cascaded_table(n).error_message);
16310: END IF;
16311:
16304: x_cascaded_table(n).error_message := l_att_rec.error_record.error_message;
16305:
16306: IF (g_asn_debug = 'Y') THEN
16307: asn_debug.put_line('After calling new API RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16308: asn_debug.put_line('return status of RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS = ' || x_cascaded_table(n).error_status);
16309: asn_debug.put_line('return message of RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS = ' || x_cascaded_table(n).error_message);
16310: END IF;
16311:
16312:
16305:
16306: IF (g_asn_debug = 'Y') THEN
16307: asn_debug.put_line('After calling new API RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16308: asn_debug.put_line('return status of RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS = ' || x_cascaded_table(n).error_status);
16309: asn_debug.put_line('return message of RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS = ' || x_cascaded_table(n).error_message);
16310: END IF;
16311:
16312:
16313: /*If call fails*/
16311:
16312:
16313: /*If call fails*/
16314: IF x_cascaded_table(n).error_status IN ('U' ,'E') THEN
16315: IF (g_asn_debug = 'Y') THEN
16316: asn_debug.put_line('RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS call failed');
16317: END IF;
16318:
16319: /*log error in po_interface_errors*/
16312:
16313: /*If call fails*/
16314: IF x_cascaded_table(n).error_status IN ('U' ,'E') THEN
16315: IF (g_asn_debug = 'Y') THEN
16316: asn_debug.put_line('RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS call failed');
16317: END IF;
16318:
16319: /*log error in po_interface_errors*/
16320: rcv_error_pkg.log_interface_message(
16329: x_cascaded_table(n).secondary_unit_of_measure := l_att_rec.secondary_unit_of_measure;
16330: x_cascaded_table(n).secondary_uom_code := l_att_rec.secondary_uom_code;
16331: x_cascaded_table(n).secondary_quantity := l_att_rec.secondary_quantity;
16332:
16333: IF (g_asn_debug = 'Y') THEN
16334: asn_debug.put_line('populating the return values from RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16335: asn_debug.put_line('secondary unit_of_measure = ' || x_cascaded_table(n).secondary_unit_of_measure);
16336: asn_debug.put_line('Secondary Quantity = ' ||x_cascaded_table(n).secondary_quantity );
16337: asn_debug.put_line('Secondary_uom_code = ' ||x_cascaded_table(n).secondary_uom_code);
16330: x_cascaded_table(n).secondary_uom_code := l_att_rec.secondary_uom_code;
16331: x_cascaded_table(n).secondary_quantity := l_att_rec.secondary_quantity;
16332:
16333: IF (g_asn_debug = 'Y') THEN
16334: asn_debug.put_line('populating the return values from RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16335: asn_debug.put_line('secondary unit_of_measure = ' || x_cascaded_table(n).secondary_unit_of_measure);
16336: asn_debug.put_line('Secondary Quantity = ' ||x_cascaded_table(n).secondary_quantity );
16337: asn_debug.put_line('Secondary_uom_code = ' ||x_cascaded_table(n).secondary_uom_code);
16338: END IF;
16331: x_cascaded_table(n).secondary_quantity := l_att_rec.secondary_quantity;
16332:
16333: IF (g_asn_debug = 'Y') THEN
16334: asn_debug.put_line('populating the return values from RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16335: asn_debug.put_line('secondary unit_of_measure = ' || x_cascaded_table(n).secondary_unit_of_measure);
16336: asn_debug.put_line('Secondary Quantity = ' ||x_cascaded_table(n).secondary_quantity );
16337: asn_debug.put_line('Secondary_uom_code = ' ||x_cascaded_table(n).secondary_uom_code);
16338: END IF;
16339:
16332:
16333: IF (g_asn_debug = 'Y') THEN
16334: asn_debug.put_line('populating the return values from RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16335: asn_debug.put_line('secondary unit_of_measure = ' || x_cascaded_table(n).secondary_unit_of_measure);
16336: asn_debug.put_line('Secondary Quantity = ' ||x_cascaded_table(n).secondary_quantity );
16337: asn_debug.put_line('Secondary_uom_code = ' ||x_cascaded_table(n).secondary_uom_code);
16338: END IF;
16339:
16340:
16333: IF (g_asn_debug = 'Y') THEN
16334: asn_debug.put_line('populating the return values from RCV_TRANSACTIONS_INTERFACE_SV1.VALIDATE_SECONDARY_PARAMETERS');
16335: asn_debug.put_line('secondary unit_of_measure = ' || x_cascaded_table(n).secondary_unit_of_measure);
16336: asn_debug.put_line('Secondary Quantity = ' ||x_cascaded_table(n).secondary_quantity );
16337: asn_debug.put_line('Secondary_uom_code = ' ||x_cascaded_table(n).secondary_uom_code);
16338: END IF;
16339:
16340:
16341: /* INVCONV ,qc_grade not handled here */
16401: WHEN NO_DATA_FOUND THEN
16402: l_interface_qty := 0;
16403: END;
16404:
16405: IF (g_asn_debug = 'Y') THEN
16406: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16407: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16408: asn_debug.put_line('get_interface_qty l_parent_uom ' || l_parent_uom);
16409: asn_debug.put_line('get_interface_qty l_interface_qty ' || l_interface_qty);
16402: l_interface_qty := 0;
16403: END;
16404:
16405: IF (g_asn_debug = 'Y') THEN
16406: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16407: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16408: asn_debug.put_line('get_interface_qty l_parent_uom ' || l_parent_uom);
16409: asn_debug.put_line('get_interface_qty l_interface_qty ' || l_interface_qty);
16410: END IF;
16403: END;
16404:
16405: IF (g_asn_debug = 'Y') THEN
16406: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16407: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16408: asn_debug.put_line('get_interface_qty l_parent_uom ' || l_parent_uom);
16409: asn_debug.put_line('get_interface_qty l_interface_qty ' || l_interface_qty);
16410: END IF;
16411:
16404:
16405: IF (g_asn_debug = 'Y') THEN
16406: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16407: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16408: asn_debug.put_line('get_interface_qty l_parent_uom ' || l_parent_uom);
16409: asn_debug.put_line('get_interface_qty l_interface_qty ' || l_interface_qty);
16410: END IF;
16411:
16412: IF ( x_cascaded_table(n).transaction_type = 'CORRECT'
16405: IF (g_asn_debug = 'Y') THEN
16406: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16407: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16408: asn_debug.put_line('get_interface_qty l_parent_uom ' || l_parent_uom);
16409: asn_debug.put_line('get_interface_qty l_interface_qty ' || l_interface_qty);
16410: END IF;
16411:
16412: IF ( x_cascaded_table(n).transaction_type = 'CORRECT'
16413: AND SIGN(x_cascaded_table(n).quantity) = 1) THEN --{
16434: ELSE --}{
16435: x_interface_qty := l_interface_qty;
16436: END IF; --}
16437:
16438: IF (g_asn_debug = 'Y') THEN
16439: asn_debug.put_line('get_interface_qty x_interface_qty ' || x_interface_qty);
16440: END IF;
16441:
16442: x_interface_qty := NVL(x_interface_qty, 0);
16435: x_interface_qty := l_interface_qty;
16436: END IF; --}
16437:
16438: IF (g_asn_debug = 'Y') THEN
16439: asn_debug.put_line('get_interface_qty x_interface_qty ' || x_interface_qty);
16440: END IF;
16441:
16442: x_interface_qty := NVL(x_interface_qty, 0);
16443: EXCEPTION
16481: WHEN NO_DATA_FOUND THEN
16482: l_interface_amt := 0;
16483: END;
16484:
16485: IF (g_asn_debug = 'Y') THEN
16486: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16487: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16488: asn_debug.put_line('get_interface_amt l_interface_amt ' || l_interface_amt);
16489: END IF;
16482: l_interface_amt := 0;
16483: END;
16484:
16485: IF (g_asn_debug = 'Y') THEN
16486: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16487: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16488: asn_debug.put_line('get_interface_amt l_interface_amt ' || l_interface_amt);
16489: END IF;
16490:
16483: END;
16484:
16485: IF (g_asn_debug = 'Y') THEN
16486: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16487: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16488: asn_debug.put_line('get_interface_amt l_interface_amt ' || l_interface_amt);
16489: END IF;
16490:
16491: IF ( x_cascaded_table(n).transaction_type = 'CORRECT'
16484:
16485: IF (g_asn_debug = 'Y') THEN
16486: asn_debug.put_line('get_interface_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16487: asn_debug.put_line('get_interface_qty l_parent_trx_type ' || l_parent_trx_type);
16488: asn_debug.put_line('get_interface_amt l_interface_amt ' || l_interface_amt);
16489: END IF;
16490:
16491: IF ( x_cascaded_table(n).transaction_type = 'CORRECT'
16492: AND SIGN(x_cascaded_table(n).amount) = 1) THEN --{
16504: ELSE --}{
16505: x_interface_amt := l_interface_amt;
16506: END IF; --}
16507:
16508: IF (g_asn_debug = 'Y') THEN
16509: asn_debug.put_line('get_interface_amt x_interface_amt ' || x_interface_amt);
16510: END IF;
16511:
16512: x_interface_amt := NVL(x_interface_amt, 0);
16505: x_interface_amt := l_interface_amt;
16506: END IF; --}
16507:
16508: IF (g_asn_debug = 'Y') THEN
16509: asn_debug.put_line('get_interface_amt x_interface_amt ' || x_interface_amt);
16510: END IF;
16511:
16512: x_interface_amt := NVL(x_interface_amt, 0);
16513: EXCEPTION
16529: BEGIN
16530: /* Update interface_available_qty for the current rti row. */
16531: x_cascaded_table(n).interface_available_qty := x_cascaded_table(n).quantity;
16532:
16533: IF (g_asn_debug = 'Y') THEN
16534: asn_debug.put_line('update_interace_qty x_interface_qty ' || x_cascaded_table(n).interface_available_qty);
16535: END IF;
16536:
16537: /* Update interface_available_qty in the parent rti row */
16530: /* Update interface_available_qty for the current rti row. */
16531: x_cascaded_table(n).interface_available_qty := x_cascaded_table(n).quantity;
16532:
16533: IF (g_asn_debug = 'Y') THEN
16534: asn_debug.put_line('update_interace_qty x_interface_qty ' || x_cascaded_table(n).interface_available_qty);
16535: END IF;
16536:
16537: /* Update interface_available_qty in the parent rti row */
16538: BEGIN
16549: */
16550: NULL;
16551: END;
16552:
16553: IF (g_asn_debug = 'Y') THEN
16554: asn_debug.put_line('update_interace_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16555: asn_debug.put_line('update_interace_qty l_parent_trx_type ' || l_parent_trx_type);
16556: END IF;
16557:
16550: NULL;
16551: END;
16552:
16553: IF (g_asn_debug = 'Y') THEN
16554: asn_debug.put_line('update_interace_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16555: asn_debug.put_line('update_interace_qty l_parent_trx_type ' || l_parent_trx_type);
16556: END IF;
16557:
16558: IF (x_cascaded_table(n).transaction_type = 'CORRECT') THEN --{
16551: END;
16552:
16553: IF (g_asn_debug = 'Y') THEN
16554: asn_debug.put_line('update_interace_qty l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16555: asn_debug.put_line('update_interace_qty l_parent_trx_type ' || l_parent_trx_type);
16556: END IF;
16557:
16558: IF (x_cascaded_table(n).transaction_type = 'CORRECT') THEN --{
16559: UPDATE rcv_transactions_interface rti
16577: WHERE rti.interface_transaction_id = l_grandparent_interface_trx_id;
16578: END IF;
16579: END IF; --}
16580:
16581: IF (g_asn_debug = 'Y') THEN
16582: asn_debug.put_line('update_interace_qty calling update_total_transaction_qty ');
16583: END IF;
16584:
16585: /* Update temp table with the correct quantity*/
16578: END IF;
16579: END IF; --}
16580:
16581: IF (g_asn_debug = 'Y') THEN
16582: asn_debug.put_line('update_interace_qty calling update_total_transaction_qty ');
16583: END IF;
16584:
16585: /* Update temp table with the correct quantity*/
16586: update_total_transaction_qty(x_cascaded_table(n).interface_transaction_id,
16612: BEGIN
16613: /* Update interface_available_qty for the current rti row. */
16614: x_cascaded_table(n).interface_available_amt := x_cascaded_table(n).amount;
16615:
16616: IF (g_asn_debug = 'Y') THEN
16617: asn_debug.put_line('update_interace_qty x_interface_amt ' || x_cascaded_table(n).interface_available_amt);
16618: END IF;
16619:
16620: /* Update interface_available_qty in the parent rti row */
16613: /* Update interface_available_qty for the current rti row. */
16614: x_cascaded_table(n).interface_available_amt := x_cascaded_table(n).amount;
16615:
16616: IF (g_asn_debug = 'Y') THEN
16617: asn_debug.put_line('update_interace_qty x_interface_amt ' || x_cascaded_table(n).interface_available_amt);
16618: END IF;
16619:
16620: /* Update interface_available_qty in the parent rti row */
16621: BEGIN
16632: */
16633: NULL;
16634: END;
16635:
16636: IF (g_asn_debug = 'Y') THEN
16637: asn_debug.put_line('update_interface_amt l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16638: asn_debug.put_line('update_interface_amt l_parent_trx_type ' || l_parent_trx_type);
16639: END IF;
16640:
16633: NULL;
16634: END;
16635:
16636: IF (g_asn_debug = 'Y') THEN
16637: asn_debug.put_line('update_interface_amt l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16638: asn_debug.put_line('update_interface_amt l_parent_trx_type ' || l_parent_trx_type);
16639: END IF;
16640:
16641: IF (x_cascaded_table(n).transaction_type = 'CORRECT') THEN --{
16634: END;
16635:
16636: IF (g_asn_debug = 'Y') THEN
16637: asn_debug.put_line('update_interface_amt l_grandparent_interface_trx_id ' || l_grandparent_interface_trx_id);
16638: asn_debug.put_line('update_interface_amt l_parent_trx_type ' || l_parent_trx_type);
16639: END IF;
16640:
16641: IF (x_cascaded_table(n).transaction_type = 'CORRECT') THEN --{
16642: UPDATE rcv_transactions_interface rti
16660: WHERE rti.interface_transaction_id = l_grandparent_interface_trx_id;
16661: END IF;
16662: END IF; --}
16663:
16664: IF (g_asn_debug = 'Y') THEN
16665: asn_debug.put_line('update_interface_amt calling update_total_transaction_amt ');
16666: END IF;
16667:
16668: /* Update temp table with the correct quantity */
16661: END IF;
16662: END IF; --}
16663:
16664: IF (g_asn_debug = 'Y') THEN
16665: asn_debug.put_line('update_interface_amt calling update_total_transaction_amt ');
16666: END IF;
16667:
16668: /* Update temp table with the correct quantity */
16669: update_total_transaction_amt(x_cascaded_table(n).interface_transaction_id,
16700:
16701: /* Insert into temp table since we need to update this value
16702: * when we process children.
16703: */
16704: IF (g_asn_debug = 'Y') THEN
16705: asn_debug.put_line('update_total_transaction_qty p_parent_transaction_id ' || p_parent_transaction_id);
16706: asn_debug.put_line('update_total_transaction_qty child count ' || l_child_count);
16707: asn_debug.put_line('update_total_transaction_qty p_primary_quantity ' || p_primary_quantity);
16708: END IF;
16701: /* Insert into temp table since we need to update this value
16702: * when we process children.
16703: */
16704: IF (g_asn_debug = 'Y') THEN
16705: asn_debug.put_line('update_total_transaction_qty p_parent_transaction_id ' || p_parent_transaction_id);
16706: asn_debug.put_line('update_total_transaction_qty child count ' || l_child_count);
16707: asn_debug.put_line('update_total_transaction_qty p_primary_quantity ' || p_primary_quantity);
16708: END IF;
16709:
16702: * when we process children.
16703: */
16704: IF (g_asn_debug = 'Y') THEN
16705: asn_debug.put_line('update_total_transaction_qty p_parent_transaction_id ' || p_parent_transaction_id);
16706: asn_debug.put_line('update_total_transaction_qty child count ' || l_child_count);
16707: asn_debug.put_line('update_total_transaction_qty p_primary_quantity ' || p_primary_quantity);
16708: END IF;
16709:
16710: /* Bug 3459152.
16703: */
16704: IF (g_asn_debug = 'Y') THEN
16705: asn_debug.put_line('update_total_transaction_qty p_parent_transaction_id ' || p_parent_transaction_id);
16706: asn_debug.put_line('update_total_transaction_qty child count ' || l_child_count);
16707: asn_debug.put_line('update_total_transaction_qty p_primary_quantity ' || p_primary_quantity);
16708: END IF;
16709:
16710: /* Bug 3459152.
16711: * We need to update interface_transaction_qty for SHIP transaction
16714: */
16715: IF ( ( p_parent_transaction_id IS NULL
16716: AND p_transaction_type IN('RECEIVE', 'SHIP'))
16717: OR (p_parent_transaction_id IS NOT NULL)) THEN --{
16718: IF (g_asn_debug = 'Y') THEN
16719: asn_debug.put_line('update_total_transaction_qty updating rti row with parent' || p_interface_transaction_id || ',quantity ' || p_primary_quantity);
16720: END IF;
16721:
16722: x_interface_transaction_qty := p_primary_quantity;
16715: IF ( ( p_parent_transaction_id IS NULL
16716: AND p_transaction_type IN('RECEIVE', 'SHIP'))
16717: OR (p_parent_transaction_id IS NOT NULL)) THEN --{
16718: IF (g_asn_debug = 'Y') THEN
16719: asn_debug.put_line('update_total_transaction_qty updating rti row with parent' || p_interface_transaction_id || ',quantity ' || p_primary_quantity);
16720: END IF;
16721:
16722: x_interface_transaction_qty := p_primary_quantity;
16723: RETURN;
16723: RETURN;
16724: END IF; --}
16725:
16726: IF (p_parent_interface_txn_id IS NOT NULL) THEN --{
16727: IF (g_asn_debug = 'Y') THEN
16728: asn_debug.put_line('update_total_transaction_qty parent_interface_txn_id is not null ');
16729: asn_debug.put_line('update_total_transaction_qty p_primary_quantity ' || p_primary_quantity);
16730: END IF;
16731:
16724: END IF; --}
16725:
16726: IF (p_parent_interface_txn_id IS NOT NULL) THEN --{
16727: IF (g_asn_debug = 'Y') THEN
16728: asn_debug.put_line('update_total_transaction_qty parent_interface_txn_id is not null ');
16729: asn_debug.put_line('update_total_transaction_qty p_primary_quantity ' || p_primary_quantity);
16730: END IF;
16731:
16732: SELECT parent_transaction_id
16725:
16726: IF (p_parent_interface_txn_id IS NOT NULL) THEN --{
16727: IF (g_asn_debug = 'Y') THEN
16728: asn_debug.put_line('update_total_transaction_qty parent_interface_txn_id is not null ');
16729: asn_debug.put_line('update_total_transaction_qty p_primary_quantity ' || p_primary_quantity);
16730: END IF;
16731:
16732: SELECT parent_transaction_id
16733: INTO l_grand_parent_id
16733: INTO l_grand_parent_id
16734: FROM rcv_transactions_interface
16735: WHERE interface_transaction_id = p_parent_interface_txn_id;
16736:
16737: IF (g_asn_debug = 'Y') THEN
16738: asn_debug.put_line('update_total_transaction_qty l_grand_parent_id ' || l_grand_parent_id);
16739: END IF;
16740:
16741: IF ( (l_grand_parent_id IS NOT NULL)
16734: FROM rcv_transactions_interface
16735: WHERE interface_transaction_id = p_parent_interface_txn_id;
16736:
16737: IF (g_asn_debug = 'Y') THEN
16738: asn_debug.put_line('update_total_transaction_qty l_grand_parent_id ' || l_grand_parent_id);
16739: END IF;
16740:
16741: IF ( (l_grand_parent_id IS NOT NULL)
16742: AND (p_transaction_type = 'CORRECT')) THEN
16774:
16775: /* Insert into temp table since we need to update this value
16776: * when we process children.
16777: */
16778: IF (g_asn_debug = 'Y') THEN
16779: asn_debug.put_line('update_total_transaction_amt p_parent_transaction_id ' || p_parent_transaction_id);
16780: asn_debug.put_line('update_total_transaction_amt child count ' || l_child_count);
16781: asn_debug.put_line('update_total_transaction_amt p_primary_quantity ' || p_amount);
16782: END IF;
16775: /* Insert into temp table since we need to update this value
16776: * when we process children.
16777: */
16778: IF (g_asn_debug = 'Y') THEN
16779: asn_debug.put_line('update_total_transaction_amt p_parent_transaction_id ' || p_parent_transaction_id);
16780: asn_debug.put_line('update_total_transaction_amt child count ' || l_child_count);
16781: asn_debug.put_line('update_total_transaction_amt p_primary_quantity ' || p_amount);
16782: END IF;
16783:
16776: * when we process children.
16777: */
16778: IF (g_asn_debug = 'Y') THEN
16779: asn_debug.put_line('update_total_transaction_amt p_parent_transaction_id ' || p_parent_transaction_id);
16780: asn_debug.put_line('update_total_transaction_amt child count ' || l_child_count);
16781: asn_debug.put_line('update_total_transaction_amt p_primary_quantity ' || p_amount);
16782: END IF;
16783:
16784: IF ( ( p_parent_transaction_id IS NULL
16777: */
16778: IF (g_asn_debug = 'Y') THEN
16779: asn_debug.put_line('update_total_transaction_amt p_parent_transaction_id ' || p_parent_transaction_id);
16780: asn_debug.put_line('update_total_transaction_amt child count ' || l_child_count);
16781: asn_debug.put_line('update_total_transaction_amt p_primary_quantity ' || p_amount);
16782: END IF;
16783:
16784: IF ( ( p_parent_transaction_id IS NULL
16785: AND p_transaction_type IN('RECEIVE', 'SHIP'))
16783:
16784: IF ( ( p_parent_transaction_id IS NULL
16785: AND p_transaction_type IN('RECEIVE', 'SHIP'))
16786: OR (p_parent_transaction_id IS NOT NULL)) THEN --{
16787: IF (g_asn_debug = 'Y') THEN
16788: asn_debug.put_line('update_total_transaction_amt updating rti row with parent' || p_interface_transaction_id || ',amount ' || p_amount);
16789: END IF;
16790:
16791: x_interface_transaction_amt := p_amount;
16784: IF ( ( p_parent_transaction_id IS NULL
16785: AND p_transaction_type IN('RECEIVE', 'SHIP'))
16786: OR (p_parent_transaction_id IS NOT NULL)) THEN --{
16787: IF (g_asn_debug = 'Y') THEN
16788: asn_debug.put_line('update_total_transaction_amt updating rti row with parent' || p_interface_transaction_id || ',amount ' || p_amount);
16789: END IF;
16790:
16791: x_interface_transaction_amt := p_amount;
16792: RETURN;
16792: RETURN;
16793: END IF; --}
16794:
16795: IF (p_parent_interface_txn_id IS NOT NULL) THEN --{
16796: IF (g_asn_debug = 'Y') THEN
16797: asn_debug.put_line('update_total_transaction_amt parent_interface_txn_id is not null ');
16798: asn_debug.put_line('update_total_transaction_amt p_amount ' || p_amount);
16799: END IF;
16800:
16793: END IF; --}
16794:
16795: IF (p_parent_interface_txn_id IS NOT NULL) THEN --{
16796: IF (g_asn_debug = 'Y') THEN
16797: asn_debug.put_line('update_total_transaction_amt parent_interface_txn_id is not null ');
16798: asn_debug.put_line('update_total_transaction_amt p_amount ' || p_amount);
16799: END IF;
16800:
16801: SELECT parent_transaction_id
16794:
16795: IF (p_parent_interface_txn_id IS NOT NULL) THEN --{
16796: IF (g_asn_debug = 'Y') THEN
16797: asn_debug.put_line('update_total_transaction_amt parent_interface_txn_id is not null ');
16798: asn_debug.put_line('update_total_transaction_amt p_amount ' || p_amount);
16799: END IF;
16800:
16801: SELECT parent_transaction_id
16802: INTO l_grand_parent_id
16802: INTO l_grand_parent_id
16803: FROM rcv_transactions_interface
16804: WHERE interface_transaction_id = p_parent_interface_txn_id;
16805:
16806: IF (g_asn_debug = 'Y') THEN
16807: asn_debug.put_line('update_total_transaction_amt l_grand_parent_id ' || l_grand_parent_id);
16808: END IF;
16809:
16810: IF ( (l_grand_parent_id IS NOT NULL)
16803: FROM rcv_transactions_interface
16804: WHERE interface_transaction_id = p_parent_interface_txn_id;
16805:
16806: IF (g_asn_debug = 'Y') THEN
16807: asn_debug.put_line('update_total_transaction_amt l_grand_parent_id ' || l_grand_parent_id);
16808: END IF;
16809:
16810: IF ( (l_grand_parent_id IS NOT NULL)
16811: AND (p_transaction_type = 'CORRECT')) THEN
16849: * quantity based POs. We will have po_line_id at
16850: * this point since we would have derived it in
16851: * derive_po_line_info.
16852: */
16853: IF (g_asn_debug = 'Y') THEN
16854: asn_debug.put_line('po_line_id '
16855: ||x_cascaded_table(n).po_line_id);
16856: asn_debug.put_line('po_line_location_id '
16857: ||x_cascaded_table(n).po_line_location_id);
16850: * this point since we would have derived it in
16851: * derive_po_line_info.
16852: */
16853: IF (g_asn_debug = 'Y') THEN
16854: asn_debug.put_line('po_line_id '
16855: ||x_cascaded_table(n).po_line_id);
16856: asn_debug.put_line('po_line_location_id '
16857: ||x_cascaded_table(n).po_line_location_id);
16858: asn_debug.put_line('shipment_num '
16852: */
16853: IF (g_asn_debug = 'Y') THEN
16854: asn_debug.put_line('po_line_id '
16855: ||x_cascaded_table(n).po_line_id);
16856: asn_debug.put_line('po_line_location_id '
16857: ||x_cascaded_table(n).po_line_location_id);
16858: asn_debug.put_line('shipment_num '
16859: ||x_cascaded_table(n).document_shipment_line_num);
16860: END IF;
16854: asn_debug.put_line('po_line_id '
16855: ||x_cascaded_table(n).po_line_id);
16856: asn_debug.put_line('po_line_location_id '
16857: ||x_cascaded_table(n).po_line_location_id);
16858: asn_debug.put_line('shipment_num '
16859: ||x_cascaded_table(n).document_shipment_line_num);
16860: END IF;
16861:
16862: IF(x_cascaded_table(n).po_line_id IS NOT NULL)
16876: and pl.po_line_id = pll.po_line_id
16877: and pll.line_location_id =x_cascaded_table(n).po_line_location_id;
16878: exception
16879: when no_data_found then
16880: IF (g_asn_debug = 'Y') THEN
16881: asn_debug.put_line('NO data found in derive_match_basis '
16882: ||'for PO shipments with line and line_loc_id info');
16883: END IF;
16884: x_cascaded_table(n).error_status :=
16877: and pll.line_location_id =x_cascaded_table(n).po_line_location_id;
16878: exception
16879: when no_data_found then
16880: IF (g_asn_debug = 'Y') THEN
16881: asn_debug.put_line('NO data found in derive_match_basis '
16882: ||'for PO shipments with line and line_loc_id info');
16883: END IF;
16884: x_cascaded_table(n).error_status :=
16885: rcv_error_pkg.g_ret_sts_unexp_error;
16889: x_progress);
16890: x_cascaded_table(n).error_message :=
16891: rcv_error_pkg.get_last_message;
16892: when others then
16893: IF (g_asn_debug = 'Y') THEN
16894: asn_debug.put_line('when others in derive_match_basis '
16895: ||'for PO shipments with line and line_loc_id info');
16896: END IF;
16897: x_cascaded_table(n).error_status :=
16890: x_cascaded_table(n).error_message :=
16891: rcv_error_pkg.get_last_message;
16892: when others then
16893: IF (g_asn_debug = 'Y') THEN
16894: asn_debug.put_line('when others in derive_match_basis '
16895: ||'for PO shipments with line and line_loc_id info');
16896: END IF;
16897: x_cascaded_table(n).error_status :=
16898: rcv_error_pkg.g_ret_sts_unexp_error;
16920: and pll.shipment_num =
16921: x_cascaded_table(n).document_shipment_line_num;
16922: exception
16923: when too_many_rows then
16924: IF (g_asn_debug = 'Y') THEN
16925: asn_debug.put_line('too many rows in derive_match_basis ' ||'for PO shipments with line and ship info');
16926: END IF;
16927: x_cascaded_table(n).error_status :=
16928: rcv_error_pkg.g_ret_sts_unexp_error;
16921: x_cascaded_table(n).document_shipment_line_num;
16922: exception
16923: when too_many_rows then
16924: IF (g_asn_debug = 'Y') THEN
16925: asn_debug.put_line('too many rows in derive_match_basis ' ||'for PO shipments with line and ship info');
16926: END IF;
16927: x_cascaded_table(n).error_status :=
16928: rcv_error_pkg.g_ret_sts_unexp_error;
16929: rcv_error_pkg.set_sql_error_message(
16932: x_progress);
16933: x_cascaded_table(n).error_message :=
16934: rcv_error_pkg.get_last_message;
16935: when no_data_found then
16936: IF (g_asn_debug = 'Y') THEN
16937: asn_debug.put_line('NO data found in derive_match_basis ' ||'for PO shipments with line and ship info');
16938: END IF;
16939: x_cascaded_table(n).error_status :=
16940: rcv_error_pkg.g_ret_sts_unexp_error;
16933: x_cascaded_table(n).error_message :=
16934: rcv_error_pkg.get_last_message;
16935: when no_data_found then
16936: IF (g_asn_debug = 'Y') THEN
16937: asn_debug.put_line('NO data found in derive_match_basis ' ||'for PO shipments with line and ship info');
16938: END IF;
16939: x_cascaded_table(n).error_status :=
16940: rcv_error_pkg.g_ret_sts_unexp_error;
16941: rcv_error_pkg.set_sql_error_message(
16944: x_progress);
16945: x_cascaded_table(n).error_message :=
16946: rcv_error_pkg.get_last_message;
16947: when others then
16948: IF (g_asn_debug = 'Y') THEN
16949: asn_debug.put_line('when others in derive_match_basis '
16950: ||'for PO shipments with line and ship info');
16951: END IF;
16952: x_cascaded_table(n).error_status :=
16945: x_cascaded_table(n).error_message :=
16946: rcv_error_pkg.get_last_message;
16947: when others then
16948: IF (g_asn_debug = 'Y') THEN
16949: asn_debug.put_line('when others in derive_match_basis '
16950: ||'for PO shipments with line and ship info');
16951: END IF;
16952: x_cascaded_table(n).error_status :=
16953: rcv_error_pkg.g_ret_sts_unexp_error;
16969: FROM po_lines_all
16970: WHERE po_line_id = x_cascaded_table(n).po_line_id;
16971: exception
16972: when no_data_found then
16973: IF (g_asn_debug = 'Y') THEN
16974: asn_debug.put_line('NO data found in derive_match_basis '
16975: ||'for PO shipments with line info');
16976: END IF;
16977: x_cascaded_table(n).error_status :=
16970: WHERE po_line_id = x_cascaded_table(n).po_line_id;
16971: exception
16972: when no_data_found then
16973: IF (g_asn_debug = 'Y') THEN
16974: asn_debug.put_line('NO data found in derive_match_basis '
16975: ||'for PO shipments with line info');
16976: END IF;
16977: x_cascaded_table(n).error_status :=
16978: rcv_error_pkg.g_ret_sts_unexp_error;
16982: x_progress);
16983: x_cascaded_table(n).error_message :=
16984: rcv_error_pkg.get_last_message;
16985: when others then
16986: IF (g_asn_debug = 'Y') THEN
16987: asn_debug.put_line('when others in derive_match_basis '
16988: ||'for PO shipments with line info');
16989: END IF;
16990: x_cascaded_table(n).error_status :=
16983: x_cascaded_table(n).error_message :=
16984: rcv_error_pkg.get_last_message;
16985: when others then
16986: IF (g_asn_debug = 'Y') THEN
16987: asn_debug.put_line('when others in derive_match_basis '
16988: ||'for PO shipments with line info');
16989: END IF;
16990: x_cascaded_table(n).error_status :=
16991: rcv_error_pkg.g_ret_sts_unexp_error;
17001: x_cascaded_table(n).matching_basis := 'QUANTITY';
17002: x_cascaded_table(n).purchase_basis := 'GOODS';
17003: END IF;
17004:
17005: IF (g_asn_debug = 'Y') THEN
17006: asn_debug.put_line('matching_basis ' ||
17007: x_cascaded_table(n).matching_basis);
17008: END IF;
17009: EXCEPTION
17002: x_cascaded_table(n).purchase_basis := 'GOODS';
17003: END IF;
17004:
17005: IF (g_asn_debug = 'Y') THEN
17006: asn_debug.put_line('matching_basis ' ||
17007: x_cascaded_table(n).matching_basis);
17008: END IF;
17009: EXCEPTION
17010: WHEN OTHERS THEN
17032: l_deliver_to_person_id NUMBER;
17033: l_distribution_count NUMBER;
17034: BEGIN
17035: --At this point po_distribution_id or po_line_location_id would have been derived or defaulted.
17036: IF (g_asn_debug = 'Y') THEN
17037: asn_debug.put_line('Inside get_deliver_to_person_from_po...');
17038: END IF;
17039: IF (x_cascaded_table(n).po_distribution_id is not null) THEN
17040: IF (g_asn_debug = 'Y') THEN
17033: l_distribution_count NUMBER;
17034: BEGIN
17035: --At this point po_distribution_id or po_line_location_id would have been derived or defaulted.
17036: IF (g_asn_debug = 'Y') THEN
17037: asn_debug.put_line('Inside get_deliver_to_person_from_po...');
17038: END IF;
17039: IF (x_cascaded_table(n).po_distribution_id is not null) THEN
17040: IF (g_asn_debug = 'Y') THEN
17041: asn_debug.put_line('Inside pod is not null..pod value :'||x_cascaded_table(n).po_distribution_id);
17036: IF (g_asn_debug = 'Y') THEN
17037: asn_debug.put_line('Inside get_deliver_to_person_from_po...');
17038: END IF;
17039: IF (x_cascaded_table(n).po_distribution_id is not null) THEN
17040: IF (g_asn_debug = 'Y') THEN
17041: asn_debug.put_line('Inside pod is not null..pod value :'||x_cascaded_table(n).po_distribution_id);
17042: END IF;
17043:
17044: BEGIN
17037: asn_debug.put_line('Inside get_deliver_to_person_from_po...');
17038: END IF;
17039: IF (x_cascaded_table(n).po_distribution_id is not null) THEN
17040: IF (g_asn_debug = 'Y') THEN
17041: asn_debug.put_line('Inside pod is not null..pod value :'||x_cascaded_table(n).po_distribution_id);
17042: END IF;
17043:
17044: BEGIN
17045: select deliver_to_person_id
17047: from po_distributions_all
17048: where po_distribution_id = x_cascaded_table(n).po_distribution_id;
17049:
17050: x_cascaded_table(n).deliver_to_person_id := l_deliver_to_person_id;
17051: IF (g_asn_debug = 'Y') THEN
17052: asn_debug.put_line('defaulted deliver_to_person_id as:'||l_deliver_to_person_id);
17053: END IF;
17054: EXCEPTION
17055: WHEN OTHERS then
17048: where po_distribution_id = x_cascaded_table(n).po_distribution_id;
17049:
17050: x_cascaded_table(n).deliver_to_person_id := l_deliver_to_person_id;
17051: IF (g_asn_debug = 'Y') THEN
17052: asn_debug.put_line('defaulted deliver_to_person_id as:'||l_deliver_to_person_id);
17053: END IF;
17054: EXCEPTION
17055: WHEN OTHERS then
17056: IF (g_asn_debug = 'Y') THEN
17052: asn_debug.put_line('defaulted deliver_to_person_id as:'||l_deliver_to_person_id);
17053: END IF;
17054: EXCEPTION
17055: WHEN OTHERS then
17056: IF (g_asn_debug = 'Y') THEN
17057: asn_debug.put_line('Exception occured while getting deliver_to_person_id thru pod');
17058: END IF;
17059: END;
17060: ELSIF (x_cascaded_table(n).po_line_location_id is not null) THEN
17053: END IF;
17054: EXCEPTION
17055: WHEN OTHERS then
17056: IF (g_asn_debug = 'Y') THEN
17057: asn_debug.put_line('Exception occured while getting deliver_to_person_id thru pod');
17058: END IF;
17059: END;
17060: ELSIF (x_cascaded_table(n).po_line_location_id is not null) THEN
17061: IF (g_asn_debug = 'Y') THEN
17057: asn_debug.put_line('Exception occured while getting deliver_to_person_id thru pod');
17058: END IF;
17059: END;
17060: ELSIF (x_cascaded_table(n).po_line_location_id is not null) THEN
17061: IF (g_asn_debug = 'Y') THEN
17062: asn_debug.put_line('Inside poll not null..poll value :'||x_cascaded_table(n).po_line_location_id);
17063: END IF;
17064:
17065: BEGIN
17058: END IF;
17059: END;
17060: ELSIF (x_cascaded_table(n).po_line_location_id is not null) THEN
17061: IF (g_asn_debug = 'Y') THEN
17062: asn_debug.put_line('Inside poll not null..poll value :'||x_cascaded_table(n).po_line_location_id);
17063: END IF;
17064:
17065: BEGIN
17066: select count(po_distribution_id)
17067: into l_distribution_count
17068: from po_distributions_all
17069: where line_location_id = x_cascaded_table(n).po_line_location_id;
17070:
17071: IF (g_asn_debug = 'Y') THEN
17072: asn_debug.put_line('Inside poll not null..l_distribution_count:'||l_distribution_count);
17073: END IF;
17074:
17075: IF l_distribution_count = 1 THEN
17068: from po_distributions_all
17069: where line_location_id = x_cascaded_table(n).po_line_location_id;
17070:
17071: IF (g_asn_debug = 'Y') THEN
17072: asn_debug.put_line('Inside poll not null..l_distribution_count:'||l_distribution_count);
17073: END IF;
17074:
17075: IF l_distribution_count = 1 THEN
17076: select deliver_to_person_id
17078: from po_distributions_all
17079: where line_location_id = x_cascaded_table(n).po_line_location_id;
17080:
17081: x_cascaded_table(n).deliver_to_person_id := l_deliver_to_person_id;
17082: IF (g_asn_debug = 'Y') THEN
17083: asn_debug.put_line('defaulted deliver_to_person_id as:'||l_deliver_to_person_id);
17084: END IF;
17085: ELSE--l_distribution_count = 1
17086: IF (g_asn_debug = 'Y') THEN
17079: where line_location_id = x_cascaded_table(n).po_line_location_id;
17080:
17081: x_cascaded_table(n).deliver_to_person_id := l_deliver_to_person_id;
17082: IF (g_asn_debug = 'Y') THEN
17083: asn_debug.put_line('defaulted deliver_to_person_id as:'||l_deliver_to_person_id);
17084: END IF;
17085: ELSE--l_distribution_count = 1
17086: IF (g_asn_debug = 'Y') THEN
17087: asn_debug.put_line('deliver_to_person_id not defalued as poll has multiple distributions');
17082: IF (g_asn_debug = 'Y') THEN
17083: asn_debug.put_line('defaulted deliver_to_person_id as:'||l_deliver_to_person_id);
17084: END IF;
17085: ELSE--l_distribution_count = 1
17086: IF (g_asn_debug = 'Y') THEN
17087: asn_debug.put_line('deliver_to_person_id not defalued as poll has multiple distributions');
17088: END IF;
17089: END IF;--l_distribution_count = 1
17090: EXCEPTION
17083: asn_debug.put_line('defaulted deliver_to_person_id as:'||l_deliver_to_person_id);
17084: END IF;
17085: ELSE--l_distribution_count = 1
17086: IF (g_asn_debug = 'Y') THEN
17087: asn_debug.put_line('deliver_to_person_id not defalued as poll has multiple distributions');
17088: END IF;
17089: END IF;--l_distribution_count = 1
17090: EXCEPTION
17091: WHEN OTHERS then
17088: END IF;
17089: END IF;--l_distribution_count = 1
17090: EXCEPTION
17091: WHEN OTHERS then
17092: IF (g_asn_debug = 'Y') THEN
17093: asn_debug.put_line('Exception occured while getting deliver_to_person_id thru poll');
17094: END IF;
17095: END;
17096: END IF;--(x_cascaded_table(n).po_distribution_id is not null)
17089: END IF;--l_distribution_count = 1
17090: EXCEPTION
17091: WHEN OTHERS then
17092: IF (g_asn_debug = 'Y') THEN
17093: asn_debug.put_line('Exception occured while getting deliver_to_person_id thru poll');
17094: END IF;
17095: END;
17096: END IF;--(x_cascaded_table(n).po_distribution_id is not null)
17097: END get_deliver_to_person_from_po;
17110: into l_parent_deliver_to_person_id
17111: from rcv_transactions
17112: where transaction_id = x_cascaded_table(n).parent_transaction_id;
17113:
17114: IF (g_asn_debug = 'Y') THEN
17115: asn_debug.put_line('Got deliver_to_person_id of parent txn as:'||l_parent_deliver_to_person_id);
17116: END IF;
17117: return l_parent_deliver_to_person_id;
17118: EXCEPTION
17111: from rcv_transactions
17112: where transaction_id = x_cascaded_table(n).parent_transaction_id;
17113:
17114: IF (g_asn_debug = 'Y') THEN
17115: asn_debug.put_line('Got deliver_to_person_id of parent txn as:'||l_parent_deliver_to_person_id);
17116: END IF;
17117: return l_parent_deliver_to_person_id;
17118: EXCEPTION
17119: WHEN OTHERS then
17116: END IF;
17117: return l_parent_deliver_to_person_id;
17118: EXCEPTION
17119: WHEN OTHERS then
17120: IF (g_asn_debug = 'Y') THEN
17121: asn_debug.put_line('Exception occured in get_deliver_to_person_from_rt');
17122: END IF;
17123: return null;
17124: END get_deliver_to_person_from_rt;
17117: return l_parent_deliver_to_person_id;
17118: EXCEPTION
17119: WHEN OTHERS then
17120: IF (g_asn_debug = 'Y') THEN
17121: asn_debug.put_line('Exception occured in get_deliver_to_person_from_rt');
17122: END IF;
17123: return null;
17124: END get_deliver_to_person_from_rt;
17125:
17138: into l_parent_deliver_to_person_id
17139: from rcv_transactions_interface
17140: where interface_transaction_id = x_cascaded_table(n).parent_transaction_id;
17141:
17142: IF (g_asn_debug = 'Y') THEN
17143: asn_debug.put_line('Got deliver_to_person_id of parent txn as:'||l_parent_deliver_to_person_id);
17144: END IF;
17145: return l_parent_deliver_to_person_id;
17146: EXCEPTION
17139: from rcv_transactions_interface
17140: where interface_transaction_id = x_cascaded_table(n).parent_transaction_id;
17141:
17142: IF (g_asn_debug = 'Y') THEN
17143: asn_debug.put_line('Got deliver_to_person_id of parent txn as:'||l_parent_deliver_to_person_id);
17144: END IF;
17145: return l_parent_deliver_to_person_id;
17146: EXCEPTION
17147: WHEN OTHERS then
17144: END IF;
17145: return l_parent_deliver_to_person_id;
17146: EXCEPTION
17147: WHEN OTHERS then
17148: IF (g_asn_debug = 'Y') THEN
17149: asn_debug.put_line('Exception occured in get_deliver_to_person_from_rti');
17150: END IF;
17151: return null;
17152: END get_deliver_to_person_from_rti;
17145: return l_parent_deliver_to_person_id;
17146: EXCEPTION
17147: WHEN OTHERS then
17148: IF (g_asn_debug = 'Y') THEN
17149: asn_debug.put_line('Exception occured in get_deliver_to_person_from_rti');
17150: END IF;
17151: return null;
17152: END get_deliver_to_person_from_rti;
17153:
17182: l_functional_currency cst_organization_definitions.currency_code%type;
17183: l_po_currency po_headers_all.currency_code%type;
17184:
17185: BEGIN
17186: IF (g_asn_debug = 'Y') THEN
17187: asn_debug.put_line('In validate_lcm_line');
17188: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
17189: asn_debug.put_line('x_cascaded_table(n).transaction_type ' || x_cascaded_table(n).transaction_type);
17190: END IF;
17183: l_po_currency po_headers_all.currency_code%type;
17184:
17185: BEGIN
17186: IF (g_asn_debug = 'Y') THEN
17187: asn_debug.put_line('In validate_lcm_line');
17188: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
17189: asn_debug.put_line('x_cascaded_table(n).transaction_type ' || x_cascaded_table(n).transaction_type);
17190: END IF;
17191:
17184:
17185: BEGIN
17186: IF (g_asn_debug = 'Y') THEN
17187: asn_debug.put_line('In validate_lcm_line');
17188: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
17189: asn_debug.put_line('x_cascaded_table(n).transaction_type ' || x_cascaded_table(n).transaction_type);
17190: END IF;
17191:
17192: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
17185: BEGIN
17186: IF (g_asn_debug = 'Y') THEN
17187: asn_debug.put_line('In validate_lcm_line');
17188: asn_debug.put_line('x_cascaded_table(n).error_status ' || x_cascaded_table(n).error_status);
17189: asn_debug.put_line('x_cascaded_table(n).transaction_type ' || x_cascaded_table(n).transaction_type);
17190: END IF;
17191:
17192: IF (x_cascaded_table(n).error_status NOT IN('S', 'W')) THEN
17193: RETURN;
17195:
17196: l_pre_rcv_flag := rcv_table_functions.is_pre_rcv_org(x_cascaded_table(n).to_organization_id);
17197: l_lcm_shipment_flag := rcv_table_functions.is_lcm_shipment (x_cascaded_table(n).po_line_location_id);
17198:
17199: IF (g_asn_debug = 'Y') THEN
17200: asn_debug.put_line('x_cascaded_table(n).to_organization_id ' || x_cascaded_table(n).to_organization_id);
17201: asn_debug.put_line('l_pre_rcv_flag => ' || l_pre_rcv_flag);
17202: asn_debug.put_line('x_cascaded_table(n).po_line_location_id ' || x_cascaded_table(n).po_line_location_id);
17203: asn_debug.put_line('l_lcm_shipment_flag => ' || l_lcm_shipment_flag);
17196: l_pre_rcv_flag := rcv_table_functions.is_pre_rcv_org(x_cascaded_table(n).to_organization_id);
17197: l_lcm_shipment_flag := rcv_table_functions.is_lcm_shipment (x_cascaded_table(n).po_line_location_id);
17198:
17199: IF (g_asn_debug = 'Y') THEN
17200: asn_debug.put_line('x_cascaded_table(n).to_organization_id ' || x_cascaded_table(n).to_organization_id);
17201: asn_debug.put_line('l_pre_rcv_flag => ' || l_pre_rcv_flag);
17202: asn_debug.put_line('x_cascaded_table(n).po_line_location_id ' || x_cascaded_table(n).po_line_location_id);
17203: asn_debug.put_line('l_lcm_shipment_flag => ' || l_lcm_shipment_flag);
17204: asn_debug.put_line('x_asn_type => ' || x_asn_type);
17197: l_lcm_shipment_flag := rcv_table_functions.is_lcm_shipment (x_cascaded_table(n).po_line_location_id);
17198:
17199: IF (g_asn_debug = 'Y') THEN
17200: asn_debug.put_line('x_cascaded_table(n).to_organization_id ' || x_cascaded_table(n).to_organization_id);
17201: asn_debug.put_line('l_pre_rcv_flag => ' || l_pre_rcv_flag);
17202: asn_debug.put_line('x_cascaded_table(n).po_line_location_id ' || x_cascaded_table(n).po_line_location_id);
17203: asn_debug.put_line('l_lcm_shipment_flag => ' || l_lcm_shipment_flag);
17204: asn_debug.put_line('x_asn_type => ' || x_asn_type);
17205: END IF;
17198:
17199: IF (g_asn_debug = 'Y') THEN
17200: asn_debug.put_line('x_cascaded_table(n).to_organization_id ' || x_cascaded_table(n).to_organization_id);
17201: asn_debug.put_line('l_pre_rcv_flag => ' || l_pre_rcv_flag);
17202: asn_debug.put_line('x_cascaded_table(n).po_line_location_id ' || x_cascaded_table(n).po_line_location_id);
17203: asn_debug.put_line('l_lcm_shipment_flag => ' || l_lcm_shipment_flag);
17204: asn_debug.put_line('x_asn_type => ' || x_asn_type);
17205: END IF;
17206:
17199: IF (g_asn_debug = 'Y') THEN
17200: asn_debug.put_line('x_cascaded_table(n).to_organization_id ' || x_cascaded_table(n).to_organization_id);
17201: asn_debug.put_line('l_pre_rcv_flag => ' || l_pre_rcv_flag);
17202: asn_debug.put_line('x_cascaded_table(n).po_line_location_id ' || x_cascaded_table(n).po_line_location_id);
17203: asn_debug.put_line('l_lcm_shipment_flag => ' || l_lcm_shipment_flag);
17204: asn_debug.put_line('x_asn_type => ' || x_asn_type);
17205: END IF;
17206:
17207: IF (l_lcm_shipment_flag = 'Y') THEN
17200: asn_debug.put_line('x_cascaded_table(n).to_organization_id ' || x_cascaded_table(n).to_organization_id);
17201: asn_debug.put_line('l_pre_rcv_flag => ' || l_pre_rcv_flag);
17202: asn_debug.put_line('x_cascaded_table(n).po_line_location_id ' || x_cascaded_table(n).po_line_location_id);
17203: asn_debug.put_line('l_lcm_shipment_flag => ' || l_lcm_shipment_flag);
17204: asn_debug.put_line('x_asn_type => ' || x_asn_type);
17205: END IF;
17206:
17207: IF (l_lcm_shipment_flag = 'Y') THEN
17208:
17208:
17209: IF (x_cascaded_table(n).transaction_type not in ('SHIP','RECEIVE')) THEN
17210: IF (x_cascaded_table(n).lcm_shipment_line_id IS NULL) THEN
17211: --
17212: asn_debug.put_line('Error: lcm_shipment_line_id should not be null ');
17213: x_cascaded_table(n).error_status := 'E';
17214: rcv_error_pkg.set_error_message('PO_PDOI_COLUMN_NOT_NULL', x_cascaded_table(n).error_message);
17215: rcv_error_pkg.set_token('COLUMN_NAME', 'LCM_SHIPMENT_LINE_ID');
17216: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'LCM_SHIPMENT_LINE_ID',FALSE);
17220: END IF;
17221: IF (l_pre_rcv_flag = 'Y') THEN
17222: IF (x_asn_type = 'ASN') THEN
17223: --
17224: asn_debug.put_line('Error: ' || x_asn_type || ' is not supported as the org is pre-receive enabled ');
17225: x_cascaded_table(n).error_status := 'E';
17226: rcv_error_pkg.set_error_message('RCV_ASN_IMPORT_NOT_ALLOWED', x_cascaded_table(n).error_message);
17227: rcv_error_pkg.set_token('ASN_TYPE',x_asn_type);
17228: rcv_error_pkg.set_token('ORG_ID',x_cascaded_table(n).to_organization_id);
17231: --
17232: END IF;
17233: IF (x_cascaded_table(n).lcm_shipment_line_id IS NULL) THEN
17234: --
17235: asn_debug.put_line('Error: lcm_shipment_line_id should not be null ');
17236: x_cascaded_table(n).error_status := 'E';
17237: rcv_error_pkg.set_error_message('PO_PDOI_COLUMN_NOT_NULL', x_cascaded_table(n).error_message);
17238: rcv_error_pkg.set_token('COLUMN_NAME', 'LCM_SHIPMENT_LINE_ID');
17239: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'LCM_SHIPMENT_LINE_ID',FALSE);
17239: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'LCM_SHIPMENT_LINE_ID',FALSE);
17240: RETURN;
17241: --
17242: END IF;
17243: IF (g_asn_debug = 'Y') THEN
17244: asn_debug.put_line('x_cascaded_table(n).lcm_shipment_line_id => ' || x_cascaded_table(n).lcm_shipment_line_id);
17245: END IF;
17246: IF (x_cascaded_table(n).unit_landed_cost IS NULL) THEN
17247: --
17240: RETURN;
17241: --
17242: END IF;
17243: IF (g_asn_debug = 'Y') THEN
17244: asn_debug.put_line('x_cascaded_table(n).lcm_shipment_line_id => ' || x_cascaded_table(n).lcm_shipment_line_id);
17245: END IF;
17246: IF (x_cascaded_table(n).unit_landed_cost IS NULL) THEN
17247: --
17248: asn_debug.put_line('Error: unit_landed_cost should not be null ');
17244: asn_debug.put_line('x_cascaded_table(n).lcm_shipment_line_id => ' || x_cascaded_table(n).lcm_shipment_line_id);
17245: END IF;
17246: IF (x_cascaded_table(n).unit_landed_cost IS NULL) THEN
17247: --
17248: asn_debug.put_line('Error: unit_landed_cost should not be null ');
17249: x_cascaded_table(n).error_status := 'E';
17250: rcv_error_pkg.set_error_message('PO_PDOI_COLUMN_NOT_NULL', x_cascaded_table(n).error_message);
17251: rcv_error_pkg.set_token('COLUMN_NAME', 'UNIT_LANDED_COST');
17252: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'UNIT_LANDED_COST',FALSE);
17252: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'UNIT_LANDED_COST',FALSE);
17253: RETURN;
17254: --
17255: END IF;
17256: IF (g_asn_debug = 'Y') THEN
17257: asn_debug.put_line('x_cascaded_table(n).unit_landed_cost => ' || x_cascaded_table(n).unit_landed_cost);
17258: END IF;
17259: IF (x_asn_type = 'LCM') THEN /* LCM import */
17260: --
17253: RETURN;
17254: --
17255: END IF;
17256: IF (g_asn_debug = 'Y') THEN
17257: asn_debug.put_line('x_cascaded_table(n).unit_landed_cost => ' || x_cascaded_table(n).unit_landed_cost);
17258: END IF;
17259: IF (x_asn_type = 'LCM') THEN /* LCM import */
17260: --
17261: SELECT count(1)
17263: FROM rcv_shipment_lines
17264: WHERE lcm_shipment_line_id is not null
17265: AND lcm_shipment_line_id = x_cascaded_table(n).lcm_shipment_line_id;
17266:
17267: asn_debug.put_line('Checking RSL: l_lsl_exists => ' || l_lsl_exists, null, 14);
17268:
17269: IF (l_lsl_exists = 0) THEN
17270: SELECT count(1)
17271: INTO l_lsl_exists
17274: AND lcm_shipment_line_id = x_cascaded_table(n).lcm_shipment_line_id
17275: AND processing_status_code = 'RUNNING'
17276: AND interface_transaction_id <> x_cascaded_table(n).interface_transaction_id;
17277:
17278: asn_debug.put_line('Checking RTI: l_lsl_exists => ' || l_lsl_exists, null, 14);
17279: END IF;
17280:
17281: IF (l_lsl_exists > 0) THEN
17282: --
17279: END IF;
17280:
17281: IF (l_lsl_exists > 0) THEN
17282: --
17283: asn_debug.put_line('Error: Duplicate lcm_shipment_line_id');
17284: x_cascaded_table(n).error_status := 'E';
17285: rcv_error_pkg.set_error_message('RCV_DUP_LCM_SHIPMENT_LINE', x_cascaded_table(n).error_message);
17286: rcv_error_pkg.set_token('VALUE', x_cascaded_table(n).lcm_shipment_line_id);
17287: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'LCM_SHIPMENT_LINE_ID',FALSE);
17303: WHERE rsl.shipment_line_id = x_cascaded_table(n).shipment_line_id;
17304: --
17305: IF (l_rsl_qty <> x_cascaded_table(n).quantity) THEN
17306: --
17307: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17308: asn_debug.put_line('l_rsl_qty => ' || l_rsl_qty, null, 14);
17309: asn_debug.put_line('x_cascaded_table(n).quantity => ' || x_cascaded_table(n).quantity, null, 14);
17310: asn_debug.put_line('Error: Partial receipt not allowed');
17311: x_cascaded_table(n).error_status := 'E';
17304: --
17305: IF (l_rsl_qty <> x_cascaded_table(n).quantity) THEN
17306: --
17307: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17308: asn_debug.put_line('l_rsl_qty => ' || l_rsl_qty, null, 14);
17309: asn_debug.put_line('x_cascaded_table(n).quantity => ' || x_cascaded_table(n).quantity, null, 14);
17310: asn_debug.put_line('Error: Partial receipt not allowed');
17311: x_cascaded_table(n).error_status := 'E';
17312: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17305: IF (l_rsl_qty <> x_cascaded_table(n).quantity) THEN
17306: --
17307: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17308: asn_debug.put_line('l_rsl_qty => ' || l_rsl_qty, null, 14);
17309: asn_debug.put_line('x_cascaded_table(n).quantity => ' || x_cascaded_table(n).quantity, null, 14);
17310: asn_debug.put_line('Error: Partial receipt not allowed');
17311: x_cascaded_table(n).error_status := 'E';
17312: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17313: rcv_error_pkg.set_token('COLUMN', 'QUANTITY');
17306: --
17307: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17308: asn_debug.put_line('l_rsl_qty => ' || l_rsl_qty, null, 14);
17309: asn_debug.put_line('x_cascaded_table(n).quantity => ' || x_cascaded_table(n).quantity, null, 14);
17310: asn_debug.put_line('Error: Partial receipt not allowed');
17311: x_cascaded_table(n).error_status := 'E';
17312: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17313: rcv_error_pkg.set_token('COLUMN', 'QUANTITY');
17314: rcv_error_pkg.set_token('ROI_VALUE', x_cascaded_table(n).quantity);
17318: --
17319: END IF;
17320: IF (l_rsl_uom <> x_cascaded_table(n).unit_of_measure) THEN
17321: --
17322: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17323: asn_debug.put_line('l_rsl_uom => ' || l_rsl_uom, null, 14);
17324: asn_debug.put_line('x_cascaded_table(n).unit_of_measure => ' || x_cascaded_table(n).unit_of_measure, null, 14);
17325: asn_debug.put_line('Error: Partial receipt not allowed');
17326: x_cascaded_table(n).error_status := 'E';
17319: END IF;
17320: IF (l_rsl_uom <> x_cascaded_table(n).unit_of_measure) THEN
17321: --
17322: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17323: asn_debug.put_line('l_rsl_uom => ' || l_rsl_uom, null, 14);
17324: asn_debug.put_line('x_cascaded_table(n).unit_of_measure => ' || x_cascaded_table(n).unit_of_measure, null, 14);
17325: asn_debug.put_line('Error: Partial receipt not allowed');
17326: x_cascaded_table(n).error_status := 'E';
17327: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17320: IF (l_rsl_uom <> x_cascaded_table(n).unit_of_measure) THEN
17321: --
17322: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17323: asn_debug.put_line('l_rsl_uom => ' || l_rsl_uom, null, 14);
17324: asn_debug.put_line('x_cascaded_table(n).unit_of_measure => ' || x_cascaded_table(n).unit_of_measure, null, 14);
17325: asn_debug.put_line('Error: Partial receipt not allowed');
17326: x_cascaded_table(n).error_status := 'E';
17327: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17328: rcv_error_pkg.set_token('COLUMN', 'UNIT_OF_MEASURE');
17321: --
17322: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17323: asn_debug.put_line('l_rsl_uom => ' || l_rsl_uom, null, 14);
17324: asn_debug.put_line('x_cascaded_table(n).unit_of_measure => ' || x_cascaded_table(n).unit_of_measure, null, 14);
17325: asn_debug.put_line('Error: Partial receipt not allowed');
17326: x_cascaded_table(n).error_status := 'E';
17327: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17328: rcv_error_pkg.set_token('COLUMN', 'UNIT_OF_MEASURE');
17329: rcv_error_pkg.set_token('ROI_VALUE', x_cascaded_table(n).unit_of_measure);
17335: -- Bug 7607281
17336: IF(x_cascaded_table(n).mobile_txn<>'Y') THEN
17337: IF (nvl (l_sec_rsl_qty, -99) <> nvl(x_cascaded_table(n).secondary_quantity,-99)) THEN
17338: --
17339: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17340: asn_debug.put_line('l_sec_rsl_qty => ' || l_sec_rsl_qty, null, 14);
17341: asn_debug.put_line('x_cascaded_table(n).secondary_quantity => ' || x_cascaded_table(n).secondary_quantity, null, 14);
17342: asn_debug.put_line('Error: Partial receipt not allowed');
17343: x_cascaded_table(n).error_status := 'E';
17336: IF(x_cascaded_table(n).mobile_txn<>'Y') THEN
17337: IF (nvl (l_sec_rsl_qty, -99) <> nvl(x_cascaded_table(n).secondary_quantity,-99)) THEN
17338: --
17339: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17340: asn_debug.put_line('l_sec_rsl_qty => ' || l_sec_rsl_qty, null, 14);
17341: asn_debug.put_line('x_cascaded_table(n).secondary_quantity => ' || x_cascaded_table(n).secondary_quantity, null, 14);
17342: asn_debug.put_line('Error: Partial receipt not allowed');
17343: x_cascaded_table(n).error_status := 'E';
17344: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17337: IF (nvl (l_sec_rsl_qty, -99) <> nvl(x_cascaded_table(n).secondary_quantity,-99)) THEN
17338: --
17339: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17340: asn_debug.put_line('l_sec_rsl_qty => ' || l_sec_rsl_qty, null, 14);
17341: asn_debug.put_line('x_cascaded_table(n).secondary_quantity => ' || x_cascaded_table(n).secondary_quantity, null, 14);
17342: asn_debug.put_line('Error: Partial receipt not allowed');
17343: x_cascaded_table(n).error_status := 'E';
17344: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17345: rcv_error_pkg.set_token('COLUMN', 'SECONDARY_QUANTITY');
17338: --
17339: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17340: asn_debug.put_line('l_sec_rsl_qty => ' || l_sec_rsl_qty, null, 14);
17341: asn_debug.put_line('x_cascaded_table(n).secondary_quantity => ' || x_cascaded_table(n).secondary_quantity, null, 14);
17342: asn_debug.put_line('Error: Partial receipt not allowed');
17343: x_cascaded_table(n).error_status := 'E';
17344: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17345: rcv_error_pkg.set_token('COLUMN', 'SECONDARY_QUANTITY');
17346: rcv_error_pkg.set_token('ROI_VALUE', x_cascaded_table(n).secondary_quantity);
17351: END IF;
17352: --
17353: IF (nvl(l_sec_rsl_uom,'-99') <> nvl(x_cascaded_table(n).secondary_unit_of_measure,'-99')) THEN
17354: --
17355: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17356: asn_debug.put_line('l_sec_rsl_uom => ' || l_sec_rsl_uom, null, 14);
17357: asn_debug.put_line('x_cascaded_table(n).secondary_unit_of_measure => ' || x_cascaded_table(n).secondary_unit_of_measure, null, 14);
17358: asn_debug.put_line('Error: Partial receipt not allowed');
17359: x_cascaded_table(n).error_status := 'E';
17352: --
17353: IF (nvl(l_sec_rsl_uom,'-99') <> nvl(x_cascaded_table(n).secondary_unit_of_measure,'-99')) THEN
17354: --
17355: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17356: asn_debug.put_line('l_sec_rsl_uom => ' || l_sec_rsl_uom, null, 14);
17357: asn_debug.put_line('x_cascaded_table(n).secondary_unit_of_measure => ' || x_cascaded_table(n).secondary_unit_of_measure, null, 14);
17358: asn_debug.put_line('Error: Partial receipt not allowed');
17359: x_cascaded_table(n).error_status := 'E';
17360: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17353: IF (nvl(l_sec_rsl_uom,'-99') <> nvl(x_cascaded_table(n).secondary_unit_of_measure,'-99')) THEN
17354: --
17355: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17356: asn_debug.put_line('l_sec_rsl_uom => ' || l_sec_rsl_uom, null, 14);
17357: asn_debug.put_line('x_cascaded_table(n).secondary_unit_of_measure => ' || x_cascaded_table(n).secondary_unit_of_measure, null, 14);
17358: asn_debug.put_line('Error: Partial receipt not allowed');
17359: x_cascaded_table(n).error_status := 'E';
17360: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17361: rcv_error_pkg.set_token('COLUMN', 'SECONDARY_UNIT_OF_MEASURE');
17354: --
17355: asn_debug.put_line('x_cascaded_table(n).shipment_line_id => ' || x_cascaded_table(n).shipment_line_id, null, 14);
17356: asn_debug.put_line('l_sec_rsl_uom => ' || l_sec_rsl_uom, null, 14);
17357: asn_debug.put_line('x_cascaded_table(n).secondary_unit_of_measure => ' || x_cascaded_table(n).secondary_unit_of_measure, null, 14);
17358: asn_debug.put_line('Error: Partial receipt not allowed');
17359: x_cascaded_table(n).error_status := 'E';
17360: rcv_error_pkg.set_error_message('RCV_INVALID_ROI_VALUE', x_cascaded_table(n).error_message);
17361: rcv_error_pkg.set_token('COLUMN', 'SECONDARY_UNIT_OF_MEASURE');
17362: rcv_error_pkg.set_token('ROI_VALUE', x_cascaded_table(n).secondary_unit_of_measure);
17376: AND cod.organization_id = x_cascaded_table(n).to_organization_id
17377: AND poh.po_header_id = x_cascaded_table(n).po_header_id;
17378:
17379: IF (l_functional_currency = l_po_currency) THEN
17380: IF (g_asn_debug = 'Y') THEN
17381: asn_debug.put_line('Returning since PO uses functional currency');
17382: END IF;
17383: RETURN;
17384: END IF;
17377: AND poh.po_header_id = x_cascaded_table(n).po_header_id;
17378:
17379: IF (l_functional_currency = l_po_currency) THEN
17380: IF (g_asn_debug = 'Y') THEN
17381: asn_debug.put_line('Returning since PO uses functional currency');
17382: END IF;
17383: RETURN;
17384: END IF;
17385: -- Bug 10357707: End
17397: x_currency_conversion_type => x_currency_conversion_type,
17398: x_currency_conversion_date => l_lcm_date,
17399: x_currency_conversion_rate => x_currency_conversion_rate );
17400:
17401: asn_debug.put_line('x_return_status : ' || x_return_status);
17402: asn_debug.put_line('x_currency_code : ' || x_currency_code);
17403: asn_debug.put_line('x_currency_conversion_type : ' || x_currency_conversion_type);
17404: asn_debug.put_line('l_lcm_date : ' || l_lcm_date);
17405: asn_debug.put_line('x_currency_conversion_rate : ' || x_currency_conversion_rate);
17398: x_currency_conversion_date => l_lcm_date,
17399: x_currency_conversion_rate => x_currency_conversion_rate );
17400:
17401: asn_debug.put_line('x_return_status : ' || x_return_status);
17402: asn_debug.put_line('x_currency_code : ' || x_currency_code);
17403: asn_debug.put_line('x_currency_conversion_type : ' || x_currency_conversion_type);
17404: asn_debug.put_line('l_lcm_date : ' || l_lcm_date);
17405: asn_debug.put_line('x_currency_conversion_rate : ' || x_currency_conversion_rate);
17406:
17399: x_currency_conversion_rate => x_currency_conversion_rate );
17400:
17401: asn_debug.put_line('x_return_status : ' || x_return_status);
17402: asn_debug.put_line('x_currency_code : ' || x_currency_code);
17403: asn_debug.put_line('x_currency_conversion_type : ' || x_currency_conversion_type);
17404: asn_debug.put_line('l_lcm_date : ' || l_lcm_date);
17405: asn_debug.put_line('x_currency_conversion_rate : ' || x_currency_conversion_rate);
17406:
17407: IF (x_return_status <> 'S') THEN
17400:
17401: asn_debug.put_line('x_return_status : ' || x_return_status);
17402: asn_debug.put_line('x_currency_code : ' || x_currency_code);
17403: asn_debug.put_line('x_currency_conversion_type : ' || x_currency_conversion_type);
17404: asn_debug.put_line('l_lcm_date : ' || l_lcm_date);
17405: asn_debug.put_line('x_currency_conversion_rate : ' || x_currency_conversion_rate);
17406:
17407: IF (x_return_status <> 'S') THEN
17408: raise fnd_api.g_exc_error;
17401: asn_debug.put_line('x_return_status : ' || x_return_status);
17402: asn_debug.put_line('x_currency_code : ' || x_currency_code);
17403: asn_debug.put_line('x_currency_conversion_type : ' || x_currency_conversion_type);
17404: asn_debug.put_line('l_lcm_date : ' || l_lcm_date);
17405: asn_debug.put_line('x_currency_conversion_rate : ' || x_currency_conversion_rate);
17406:
17407: IF (x_return_status <> 'S') THEN
17408: raise fnd_api.g_exc_error;
17409: END IF;
17440: END IF;
17441: ELSE
17442: IF (x_asn_type = 'LCM') THEN
17443: --
17444: asn_debug.put_line('Error: Non-lcm shipment line cannot be attached to an LCM shipment');
17445: x_cascaded_table(n).error_status := 'E';
17446: rcv_error_pkg.set_error_message('RCV_INVALID_LCM_SHIPMENT', x_cascaded_table(n).error_message);
17447: rcv_error_pkg.set_token('SHIPMENT', x_header_record.header_record.shipment_num);
17448: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'PO_LINE_LOCATION_ID',FALSE);
17450: --
17451: END IF;
17452: IF (x_cascaded_table(n).lcm_shipment_line_id IS NOT NULL) THEN
17453: --
17454: asn_debug.put_line('Error: lcm_shipment_line_id should be null for a non-lcm shipment');
17455: x_cascaded_table(n).error_status := 'E';
17456: rcv_error_pkg.set_error_message('PO_PDOI_COLUMN_NULL', x_cascaded_table(n).error_message);
17457: rcv_error_pkg.set_token('COLUMN_NAME', 'LCM_SHIPMENT_LINE_ID');
17458: rcv_error_pkg.set_token('VALUE', x_cascaded_table(n).lcm_shipment_line_id);
17462: END IF;
17463:
17464: END IF;
17465:
17466: IF (g_asn_debug = 'Y') THEN
17467: asn_debug.put_line('Exitting validate_lcm_line');
17468: END IF;
17469:
17470: EXCEPTION
17463:
17464: END IF;
17465:
17466: IF (g_asn_debug = 'Y') THEN
17467: asn_debug.put_line('Exitting validate_lcm_line');
17468: END IF;
17469:
17470: EXCEPTION
17471: WHEN OTHERS THEN
17473: rcv_error_pkg.set_sql_error_message('validate_lcm_line' , '000');
17474: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
17475: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'LCM_SHIPMENT_LINE_ID',FALSE);
17476:
17477: IF (g_asn_debug = 'Y') THEN
17478: asn_debug.put_line('Unexpected exception in validate_lcm_line: ' || SQLERRM);
17479: END IF;
17480:
17481: END validate_lcm_line;
17474: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
17475: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,'LCM_SHIPMENT_LINE_ID',FALSE);
17476:
17477: IF (g_asn_debug = 'Y') THEN
17478: asn_debug.put_line('Unexpected exception in validate_lcm_line: ' || SQLERRM);
17479: END IF;
17480:
17481: END validate_lcm_line;
17482:
17492: INTO l_count
17493: FROM rcv_transactions
17494: WHERE source_transaction_num = x_cascaded_table(n).source_transaction_num;
17495:
17496: asn_debug.put_line('RT l_count : ' || l_count);
17497:
17498: IF (l_count = 0) then
17499:
17500: SELECT count(1)
17503: WHERE source_transaction_num = x_cascaded_table(n).source_transaction_num
17504: AND processing_status_code = 'RUNNING'
17505: AND interface_transaction_id <> x_cascaded_table(n).interface_transaction_id;
17506:
17507: asn_debug.put_line('RTI l_count : ' || l_count);
17508: END IF;
17509:
17510: IF (l_count >0 ) then
17511: rcv_error_pkg.set_error_message('RCV_DUP_SRC_TRANSACTION');
17516: END IF;
17517: End IF;
17518: EXCEPTION
17519: WHEN OTHERS then
17520: IF (g_asn_debug = 'Y') THEN
17521: asn_debug.put_line('Exception in the validate_src_txn');
17522: END IF;
17523: END validate_src_txn;
17524:
17517: End IF;
17518: EXCEPTION
17519: WHEN OTHERS then
17520: IF (g_asn_debug = 'Y') THEN
17521: asn_debug.put_line('Exception in the validate_src_txn');
17522: END IF;
17523: END validate_src_txn;
17524:
17525: --
17558:
17559: x_is_clm_po := 'N';
17560: x_partial_funded_flag := 'N';
17561:
17562: IF (g_asn_debug = 'Y') THEN
17563: asn_debug.put_line('before calling po_clm_intg_grp.is_clm_po()');
17564: END IF;
17565:
17566: x_is_clm_po := po_clm_intg_grp.is_clm_po(p_po_header_id => NULL,
17559: x_is_clm_po := 'N';
17560: x_partial_funded_flag := 'N';
17561:
17562: IF (g_asn_debug = 'Y') THEN
17563: asn_debug.put_line('before calling po_clm_intg_grp.is_clm_po()');
17564: END IF;
17565:
17566: x_is_clm_po := po_clm_intg_grp.is_clm_po(p_po_header_id => NULL,
17567: p_po_line_id => NULL,
17567: p_po_line_id => NULL,
17568: p_po_line_location_id => x_cascaded_table(n).po_line_location_id,
17569: p_po_distribution_id => x_cascaded_table(n).po_distribution_id);
17570:
17571: IF (g_asn_debug = 'Y') THEN
17572: asn_debug.put_line('p_po_line_location_id : ' || x_cascaded_table(n).po_line_location_id);
17573: asn_debug.put_line('p_po_distribution_id : ' || x_cascaded_table(n).po_distribution_id);
17574: asn_debug.put_line('x_is_clm_po: ' || x_is_clm_po);
17575: END IF;
17568: p_po_line_location_id => x_cascaded_table(n).po_line_location_id,
17569: p_po_distribution_id => x_cascaded_table(n).po_distribution_id);
17570:
17571: IF (g_asn_debug = 'Y') THEN
17572: asn_debug.put_line('p_po_line_location_id : ' || x_cascaded_table(n).po_line_location_id);
17573: asn_debug.put_line('p_po_distribution_id : ' || x_cascaded_table(n).po_distribution_id);
17574: asn_debug.put_line('x_is_clm_po: ' || x_is_clm_po);
17575: END IF;
17576:
17569: p_po_distribution_id => x_cascaded_table(n).po_distribution_id);
17570:
17571: IF (g_asn_debug = 'Y') THEN
17572: asn_debug.put_line('p_po_line_location_id : ' || x_cascaded_table(n).po_line_location_id);
17573: asn_debug.put_line('p_po_distribution_id : ' || x_cascaded_table(n).po_distribution_id);
17574: asn_debug.put_line('x_is_clm_po: ' || x_is_clm_po);
17575: END IF;
17576:
17577: IF x_is_clm_po = 'Y' THEN
17570:
17571: IF (g_asn_debug = 'Y') THEN
17572: asn_debug.put_line('p_po_line_location_id : ' || x_cascaded_table(n).po_line_location_id);
17573: asn_debug.put_line('p_po_distribution_id : ' || x_cascaded_table(n).po_distribution_id);
17574: asn_debug.put_line('x_is_clm_po: ' || x_is_clm_po);
17575: END IF;
17576:
17577: IF x_is_clm_po = 'Y' THEN
17578:
17575: END IF;
17576:
17577: IF x_is_clm_po = 'Y' THEN
17578:
17579: IF (g_asn_debug = 'Y') THEN
17580: asn_debug.put_line('before calling po_clm_intg_grp.get_funding_info()');
17581: END IF;
17582:
17583: po_clm_intg_grp.get_funding_info(p_po_header_id => NULL,
17576:
17577: IF x_is_clm_po = 'Y' THEN
17578:
17579: IF (g_asn_debug = 'Y') THEN
17580: asn_debug.put_line('before calling po_clm_intg_grp.get_funding_info()');
17581: END IF;
17582:
17583: po_clm_intg_grp.get_funding_info(p_po_header_id => NULL,
17584: p_po_line_id => NULL,
17603: x_quantity_cancelled => l_quantity_cancelled,
17604: x_amount_cancelled => l_amount_cancelled,
17605: x_return_status => l_return_status_clm);
17606:
17607: IF (g_asn_debug = 'Y') THEN
17608: asn_debug.put_line('x_partial_funded_flag : ' || x_partial_funded_flag);
17609: END IF;
17610:
17611: IF p_validate_type = 'QUANTITY' THEN
17604: x_amount_cancelled => l_amount_cancelled,
17605: x_return_status => l_return_status_clm);
17606:
17607: IF (g_asn_debug = 'Y') THEN
17608: asn_debug.put_line('x_partial_funded_flag : ' || x_partial_funded_flag);
17609: END IF;
17610:
17611: IF p_validate_type = 'QUANTITY' THEN
17612: ASN_DEBug.put_line('l_quantity_funded: ' || l_quantity_funded);
17608: asn_debug.put_line('x_partial_funded_flag : ' || x_partial_funded_flag);
17609: END IF;
17610:
17611: IF p_validate_type = 'QUANTITY' THEN
17612: ASN_DEBug.put_line('l_quantity_funded: ' || l_quantity_funded);
17613: asn_debug.put_line('l_quantity_received : ' || l_quantity_received);
17614: asn_debug.put_line('l_quantity_delivered : ' || l_quantity_delivered);
17615: asn_debug.put_line('l_quantity_cancelled: ' || l_quantity_cancelled);
17616: ELSE
17609: END IF;
17610:
17611: IF p_validate_type = 'QUANTITY' THEN
17612: ASN_DEBug.put_line('l_quantity_funded: ' || l_quantity_funded);
17613: asn_debug.put_line('l_quantity_received : ' || l_quantity_received);
17614: asn_debug.put_line('l_quantity_delivered : ' || l_quantity_delivered);
17615: asn_debug.put_line('l_quantity_cancelled: ' || l_quantity_cancelled);
17616: ELSE
17617: asn_debug.put_line('l_amount_funded: ' || l_amount_funded);
17610:
17611: IF p_validate_type = 'QUANTITY' THEN
17612: ASN_DEBug.put_line('l_quantity_funded: ' || l_quantity_funded);
17613: asn_debug.put_line('l_quantity_received : ' || l_quantity_received);
17614: asn_debug.put_line('l_quantity_delivered : ' || l_quantity_delivered);
17615: asn_debug.put_line('l_quantity_cancelled: ' || l_quantity_cancelled);
17616: ELSE
17617: asn_debug.put_line('l_amount_funded: ' || l_amount_funded);
17618: asn_debug.put_line('l_amount_received : ' || l_amount_received);
17611: IF p_validate_type = 'QUANTITY' THEN
17612: ASN_DEBug.put_line('l_quantity_funded: ' || l_quantity_funded);
17613: asn_debug.put_line('l_quantity_received : ' || l_quantity_received);
17614: asn_debug.put_line('l_quantity_delivered : ' || l_quantity_delivered);
17615: asn_debug.put_line('l_quantity_cancelled: ' || l_quantity_cancelled);
17616: ELSE
17617: asn_debug.put_line('l_amount_funded: ' || l_amount_funded);
17618: asn_debug.put_line('l_amount_received : ' || l_amount_received);
17619: asn_debug.put_line('l_amount_delivered : ' || l_amount_delivered);
17613: asn_debug.put_line('l_quantity_received : ' || l_quantity_received);
17614: asn_debug.put_line('l_quantity_delivered : ' || l_quantity_delivered);
17615: asn_debug.put_line('l_quantity_cancelled: ' || l_quantity_cancelled);
17616: ELSE
17617: asn_debug.put_line('l_amount_funded: ' || l_amount_funded);
17618: asn_debug.put_line('l_amount_received : ' || l_amount_received);
17619: asn_debug.put_line('l_amount_delivered : ' || l_amount_delivered);
17620: asn_debug.put_line('l_amount_cancelled: ' || l_amount_cancelled);
17621: END IF;
17614: asn_debug.put_line('l_quantity_delivered : ' || l_quantity_delivered);
17615: asn_debug.put_line('l_quantity_cancelled: ' || l_quantity_cancelled);
17616: ELSE
17617: asn_debug.put_line('l_amount_funded: ' || l_amount_funded);
17618: asn_debug.put_line('l_amount_received : ' || l_amount_received);
17619: asn_debug.put_line('l_amount_delivered : ' || l_amount_delivered);
17620: asn_debug.put_line('l_amount_cancelled: ' || l_amount_cancelled);
17621: END IF;
17622:
17615: asn_debug.put_line('l_quantity_cancelled: ' || l_quantity_cancelled);
17616: ELSE
17617: asn_debug.put_line('l_amount_funded: ' || l_amount_funded);
17618: asn_debug.put_line('l_amount_received : ' || l_amount_received);
17619: asn_debug.put_line('l_amount_delivered : ' || l_amount_delivered);
17620: asn_debug.put_line('l_amount_cancelled: ' || l_amount_cancelled);
17621: END IF;
17622:
17623: END IF;
17616: ELSE
17617: asn_debug.put_line('l_amount_funded: ' || l_amount_funded);
17618: asn_debug.put_line('l_amount_received : ' || l_amount_received);
17619: asn_debug.put_line('l_amount_delivered : ' || l_amount_delivered);
17620: asn_debug.put_line('l_amount_cancelled: ' || l_amount_cancelled);
17621: END IF;
17622:
17623: END IF;
17624:
17629: x_cascaded_table(n).error_message := rcv_error_pkg.get_last_message;
17630: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,
17631: 'po_line_location_id',
17632: FALSE);
17633: IF (g_asn_debug = 'Y') THEN
17634: asn_debug.put_line('Unexpected exception in get_clm_info: ' ||
17635: SQLERRM);
17636: END IF;
17637: END get_clm_info;
17630: rcv_error_pkg.log_interface_message(x_cascaded_table(n).error_status,
17631: 'po_line_location_id',
17632: FALSE);
17633: IF (g_asn_debug = 'Y') THEN
17634: asn_debug.put_line('Unexpected exception in get_clm_info: ' ||
17635: SQLERRM);
17636: END IF;
17637: END get_clm_info;
17638: --
17650: RETURN;
17651: END IF;
17652:
17653: x_error_status := rcv_error_pkg.g_ret_sts_error;
17654: asn_debug.put_line('Before rcv_roi_transaction.validate_shipment_source');
17655: asn_debug.put_line('shipment_line_id: '||x_cascaded_table(n).shipment_line_id);
17656:
17657: IF x_cascaded_table(n).shipment_line_id IS NOT NULL THEN
17658: SELECT mmt_transaction_id
17651: END IF;
17652:
17653: x_error_status := rcv_error_pkg.g_ret_sts_error;
17654: asn_debug.put_line('Before rcv_roi_transaction.validate_shipment_source');
17655: asn_debug.put_line('shipment_line_id: '||x_cascaded_table(n).shipment_line_id);
17656:
17657: IF x_cascaded_table(n).shipment_line_id IS NOT NULL THEN
17658: SELECT mmt_transaction_id
17659: INTO l_mmt_transaction_id
17671: RAISE e_validation_error;
17672: END IF;
17673: END IF;
17674: END IF;
17675: asn_debug.put_line('after rcv_roi_transaction.validate_shipment_source');
17676: EXCEPTION
17677: WHEN rcv_error_pkg.e_fatal_error THEN
17678: NULL;
17679: WHEN e_validation_error THEN