6: c_ENTITY_TYPE_LINE CONSTANT VARCHAR2(30) := PO_VALIDATIONS.C_ENTITY_TYPE_LINE;
7:
8: c_FIXED_PRICE CONSTANT VARCHAR2(30) := 'FIXED PRICE';
9: c_RATE CONSTANT VARCHAR2(30) := 'RATE';
10: c_STANDARD CONSTANT VARCHAR2(30) := 'STANDARD';
11: c_PREPAYMENT CONSTANT VARCHAR2(30) := 'PREPAYMENT'; --
12: c_DELIVERY CONSTANT VARCHAR2(30) := 'DELIVERY'; --
13:
14: -- Constants for column names
502: END promise_date_open_period_check;
503:
504:
505: -------------------------------------------------------------------------
506: -- For Standard POs, verifies that the ship-to-org id is not null.
507: -------------------------------------------------------------------------
508: PROCEDURE ship_to_org_null_check(
509: p_line_loc_id_tbl IN PO_TBL_NUMBER
510: , p_ship_to_org_id_tbl IN PO_TBL_NUMBER
538: l_count := 0;
539:
540: --
541: FOR i IN 1 .. l_input_size LOOP
542: IF (p_shipment_type_tbl(i) IN (c_STANDARD, c_PREPAYMENT)) THEN
543: l_count := l_count + 1;
544: l_line_loc_id_tbl(l_count) := p_line_loc_id_tbl(i);
545: l_ship_to_org_id_tbl(l_count) := p_ship_to_org_id_tbl(i);
546: END IF;
570:
571: END ship_to_org_null_check;
572:
573: -------------------------------------------------------------------------
574: -- For Standard POs, verifies that the ship-to-org id is not null
575: -------------------------------------------------------------------------
576: PROCEDURE ship_to_loc_null_check(
577: p_line_loc_id_tbl IN PO_TBL_NUMBER
578: , p_ship_to_loc_id_tbl IN PO_TBL_NUMBER
606: l_count := 0;
607:
608: --
609: FOR i IN 1 .. l_input_size LOOP
610: IF (p_shipment_type_tbl(i) IN (c_STANDARD, c_PREPAYMENT)) THEN
611: l_count := l_count + 1;
612: l_line_loc_id_tbl(l_count) := p_line_loc_id_tbl(i);
613: l_ship_to_loc_id_tbl(l_count) := p_ship_to_loc_id_tbl(i);
614: END IF;
894: l_count := 0;
895:
896: --
897: FOR i IN 1 .. l_input_size LOOP
898: IF (p_shipment_type_tbl(i) IN (c_STANDARD, c_PREPAYMENT)
899: AND p_value_basis_tbl(i) NOT IN (c_RATE,c_FIXED_PRICE)
900: )
901: THEN
902: l_count := l_count + 1;
1004: FROM
1005: PO_LINE_LOCATIONS_ALL PLL
1006: WHERE
1007: PLL.line_location_id = p_line_loc_id_tbl(i)
1008: AND PLL.shipment_type IN (c_STANDARD, c_PREPAYMENT) --
1010: -- Quantity is being reduced below the current transaction quantity:
1011: AND p_quantity_tbl(i) < PLL.quantity
1012: AND p_quantity_tbl(i) < GREATEST(NVL(PLL.quantity_received, 0),
1076: l_count := 0;
1077:
1078: --
1079: FOR i IN 1 .. l_input_size LOOP
1080: IF (p_shipment_type_tbl(i) IN (c_STANDARD, c_PREPAYMENT)
1081: AND p_value_basis_tbl(i) IN (c_RATE,c_FIXED_PRICE)
1082: )
1083: THEN
1084: l_count := l_count + 1;
1183: FROM
1184: PO_LINE_LOCATIONS_ALL PLL
1185: WHERE
1186: PLL.line_location_id = p_line_loc_id_tbl(i)
1187: AND PLL.shipment_type IN (c_STANDARD, c_PREPAYMENT) --
1189: -- Amount is being reduced below the current transaction amount:
1190: AND p_amount_tbl(i) < PLL.amount
1191: AND p_amount_tbl(i) < GREATEST(NVL(PLL.amount_received, 0),