[Home] [Help]
1339: --
1340: l_unit_meas_lookup_code MTL_UNITS_OF_MEASURE.UNIT_OF_MEASURE%TYPE := NULL;
1341: x_secondary_unit_of_measure MTL_UNITS_OF_MEASURE.UNIT_OF_MEASURE%TYPE := NULL;
1342: x_secondary_uom_code MTL_UNITS_OF_MEASURE.UOM_CODE%TYPE := NULL;
1343: x_secondary_quantity PO_LINES_ALL.SECONDARY_QUANTITY%TYPE := NULL;
1344: --
1345:
1346: --
1347: l_line_value_basis PO_LINE_LOCATIONS_ALL.value_basis%type;
1347: l_line_value_basis PO_LINE_LOCATIONS_ALL.value_basis%type;
1348: l_line_matching_basis PO_LINE_LOCATIONS_ALL.matching_basis%type;
1349: --
1350:
1351: l_clm_delivery_event_code po_lines_all.clm_delivery_event_code%type;
1352:
1353: BEGIN
1354:
1355: l_progress := '000';
1388: clm_delivery_event_code
1389: into l_item_id, l_unit_meas_lookup_code,
1390: l_line_value_basis, l_line_matching_basis,
1391: l_clm_delivery_event_code
1392: from po_lines_all
1393: where po_line_id=x_po_shipment_record.po_line_id;
1394:
1395: -- CONSIGNED FPI START
1396: -- Bug Fix for #2697755: COPY PO WITH CONSIGNED SHIPMENT LINE FAILS
2916: IF (Nvl(x_po_line_record.CLM_OPTION_INDICATOR,' ') LIKE 'B') THEN
2917:
2918: SELECT Decode(Count(po_line_id),0,NULL,'B')
2919: INTO x_po_line_record.CLM_OPTION_INDICATOR
2920: FROM po_lines_all
2921: WHERE po_header_id = x_from_po_header_id
2922: AND CLM_BASE_LINE_NUM =x_orig_po_line_id
2923: AND Nvl(CLM_EXERCISED_FLAG,'N') = 'N' ;
2924:
3325: l_internal_return_code NUMBER := NULL;
3326: l_return_status VARCHAR2(1);
3327:
3328: --
3329: l_line_id PO_LINES_ALL.po_line_id%TYPE;
3330: l_line_num PO_LINES_ALL.line_num%TYPE;
3331: l_line_location_id PO_LINE_LOCATIONS_ALL.line_location_id%TYPE;
3332: l_shipment_num PO_LINE_LOCATIONS_ALL.shipment_num%TYPE;
3333: l_distribution_type PO_DISTRIBUTIONS_ALL.distribution_type%TYPE;
3326: l_return_status VARCHAR2(1);
3327:
3328: --
3329: l_line_id PO_LINES_ALL.po_line_id%TYPE;
3330: l_line_num PO_LINES_ALL.line_num%TYPE;
3331: l_line_location_id PO_LINE_LOCATIONS_ALL.line_location_id%TYPE;
3332: l_shipment_num PO_LINE_LOCATIONS_ALL.shipment_num%TYPE;
3333: l_distribution_type PO_DISTRIBUTIONS_ALL.distribution_type%TYPE;
3334:
4659: l_api_name CONSTANT varchar2(30) := 'COPY_UDA_ATTRS';
4660: l_log_head CONSTANT VARCHAR2(100) := 'po_copydoc_s1';
4661: l_pk_col_name VARCHAR2(200);
4662:
4663: l_clm_delivery_event_code po_lines_all.clm_delivery_event_code%type;
4664:
4665: BEGIN
4666: l_progress := '8880';
4667: PO_DEBUG.debug_stmt(l_log_head || l_api_name, l_progress, 'Starting code for UDA Submission check');
4716: ELSIF p_level = 'LINE' THEN
4717:
4718: IF PO_CLM_CLO_UTIL.Isclminstalled THEN
4719:
4720: UPDATE PO_LINES_ALL
4721: SET uda_template_id = x_po_line_record.uda_template_id,
4722: clm_min_total_amount = x_po_line_record.clm_min_total_amount,
4723: clm_max_total_amount = x_po_line_record.clm_max_total_amount,
4724: clm_min_total_quantity = x_po_line_record.clm_min_total_quantity,
4740:
4741:
4742: SELECT UDA_TEMPLATE_ID
4743: INTO l_template_id
4744: FROM po_lines_all
4745: WHERE PO_LINE_ID = p_from_pk_value;
4746:
4747: IF l_template_id IS NULL THEN
4748: RETURN;
4759: -- Update POP Dates only if delivery event is not used.
4760:
4761: SELECT pl.CLM_DELIVERY_EVENT_CODE
4762: INTO l_clm_delivery_event_code
4763: FROM po_lines_all pl, po_line_locations_all pll
4764: WHERE pll.LINE_LOCATION_ID = p_from_pk_value
4765: AND pll.po_line_id = pl.po_line_id;
4766:
4767: UPDATE PO_LINE_LOCATIONS_ALL