[Home] [Help]
1707: END IF;
1708:
1709: ELSIF p_line_rec.ato_line_id is not null
1710: AND NOT(p_line_rec.ato_line_id = p_line_rec.line_id
1711: AND p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1712: OE_GLOBALS.G_ITEM_OPTION,
1713: OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
1714: THEN
1715:
1732:
1733:
1734: IF ((p_line_rec.ato_line_id is not null AND
1735: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
1736: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1737: OE_GLOBALS.G_ITEM_OPTION,
1738: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
1739: OR (p_line_rec.line_id = p_line_rec.top_model_line_id))
1740: AND NOT (OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510'
1956: p_old_line_rec => p_old_line_rec)
1957: AND OE_GLOBALS.Equal(p_line_rec.override_atp_date_code,
1958: p_old_line_rec.override_atp_date_code)
1959: AND p_line_rec.ordered_quantity = p_old_line_rec.ordered_quantity
1960: AND (p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD OR
1961: nvl(p_line_rec.model_remnant_flag,'N') = 'Y') THEN
1962:
1963: IF l_debug_level > 0 THEN
1964: oe_debug_pub.add( 'ARRIVAL_SET_ID : ' || P_LINE_REC.ARRIVAL_SET_ID || ':' || P_LINE_REC.SHIP_SET_ID , 2 ) ;
3585: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
3586: IF (p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE)
3587: AND (p_line_rec.ato_line_id IS NOT NULL AND
3588: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
3589: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
3590: OE_GLOBALS.G_ITEM_OPTION,
3591: OE_GLOBALS.G_ITEM_INCLUDED))) THEN --9775352
3592: x_atp_rec.ato_delete_flag(I) := 'Y';
3593: IF l_debug_level > 0 THEN
3977:
3978: -- Item Substitution Code.
3979:
3980: -- Sunbstitution will be supported only for
3981: -- Standard not ATO item.
3982: -- Before booking
3983: -- Non internal order item
3984: -- Not on split line
3985:
4023:
4024: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
4025:
4026: -- Bug fix 2331427
4027: IF p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD
4028: AND p_line_rec.ato_line_id is null
4029: AND ( NVL(p_line_rec.booked_flag,'N') = 'N' OR
4030: ( NVL(p_line_rec.booked_flag,'N') = 'Y' and
4031: NOT INV_GMI_RSV_BRANCH.Process_Branch(p_organization_id => p_line_rec.ship_from_org_id) and
4082:
4083:
4084: IF(p_line_rec.ato_line_id IS NOT NULL AND
4085: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
4086: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
4087: OE_GLOBALS.G_ITEM_OPTION,
4088: OE_GLOBALS.G_ITEM_INCLUDED))) THEN --9775352
4089:
4090: x_atp_rec.config_item_line_id(I) := p_config_line_id ;
4101:
4102:
4103: IF p_line_rec.ato_line_id = p_line_rec.line_id AND
4104: (p_line_rec.item_type_code in ('MODEL','CLASS') OR
4105: (p_line_rec.item_type_code in ('STANDARD','OPTION','INCLUDED') AND --9775352
4106: l_inv_ctp = '5')) THEN
4107:
4108: l_explode := TRUE;
4109: -- Added this code to fix bug 1998613.
4122:
4123: END IF;
4124: IF l_explode THEN
4125: -- If the line scheduled is an ATO Model, call ATO's API
4126: -- to get the Standard Mandatory Components
4127:
4128: IF l_debug_level > 0 THEN
4129: oe_debug_pub.add('ATO ITEM TYPE: '||P_LINE_REC.ITEM_TYPE_CODE,3);
4130: END IF;
4128: IF l_debug_level > 0 THEN
4129: oe_debug_pub.add('ATO ITEM TYPE: '||P_LINE_REC.ITEM_TYPE_CODE,3);
4130: END IF;
4131:
4132: IF p_line_rec.item_type_code = 'STANDARD' AND
4133: x_atp_rec.ship_set_name(I) is NULL THEN
4134:
4135: IF l_debug_level > 0 THEN
4136: oe_debug_pub.add( 'ASSIGNING SHIP SET FOR ATO ITEM ' , 3 ) ;
4138: x_atp_rec.Ship_Set_Name(I) := p_line_rec.ato_line_id;
4139:
4140: END IF;
4141:
4142: IF p_line_rec.item_type_code = 'STANDARD' THEN
4143:
4144: IF l_debug_level > 0 THEN
4145: oe_debug_pub.add( 'ASSIGNING WAREHOUSE AND ITEM ' , 3 ) ;
4146: END IF;
4313: x_atp_rec.atp_lead_time(I) := 0;
4314: x_atp_rec.oe_flag(I) := l_oe_flag;
4315:
4316: -- As part of the bug fix 2910899, OM will indicate and remember the
4317: -- Standard Madatory record positions using vendor_name. This will be
4318: -- used in the load_results procedure to bypass the SMC records.
4319:
4320: x_atp_rec.vendor_name(I) := 'SMC';
4321: IF l_debug_level > 0 THEN
4654: IF l_config_count > 0
4655: AND p_line_tbl(cnt).ato_line_id is not null
4656: AND p_line_tbl(cnt).ato_line_id <> l_ato_line_id
4657: AND NOT(p_line_tbl(cnt).ato_line_id = p_line_tbl(cnt).line_id
4658: AND (p_line_tbl(cnt).item_type_code = OE_GLOBALS.G_ITEM_STANDARD
4659: OR p_line_tbl(cnt).item_type_code = OE_GLOBALS.G_ITEM_OPTION
4660: OR p_line_tbl(cnt).item_type_code = OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
4661: THEN
4662:
4821: IF l_om_auto_split <> 'N' --New profile
4822: AND p_x_line_rec.order_source_id <> 10 --exluded internal order lines
4823: AND p_x_line_rec.source_type_code <> 'EXTERNAL' --external lines are not qualified
4824: AND l_sch_action = OESCH_ACT_SCHEDULE --only for schedule
4825: AND p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD --only for standard item
4826: AND (p_x_line_rec.top_model_line_id IS NULL
4827: OR p_x_line_rec.top_model_line_id = FND_API.G_MISS_NUM
4828: ) --models are excluded
4829: AND (p_x_line_rec.split_action_code <> 'SPLIT' --Do not auto split during a Split
6260: END IF;
6261:
6262:
6263: -- As part of the bug fix 2910899, OM will indicate and remember the
6264: -- Standard Madatory record positions using vendor_name. This will be
6265: -- used in the load_results procedure to bypass the SMC records.
6266: -- Increment and skip the smc records.
6267:
6268: IF I < p_x_line_tbl.count AND
7614: -- l_qty2_to_reserve := nvl(p_x_line_rec.ordered_quantity2, 0) - -- need to test if this falls over
7615: -- nvl(l_old_reserved_quantity2,0);
7616: -- It is dangerous to compute secondary quantity to reserve based on
7617: -- ordered_quantity2 minus reserved_quantity2 as above.
7618: -- This is because ordered_quantity 2 always reflects a standard conversion from ordered_quantity
7619: -- whereas reserved_quantity2 may be the result of one or more lot specific calculations
7620: -- Combining values from these different conversion rates may not give the correct result.
7621: -- Better to compute the secondary to reserve by converting l_qty_to_reserve
7622: IF p_x_line_rec.ordered_quantity_uom2 is not null and
8800: -- l_qty2_to_reserve := -- INVCONV
8801: -- nvl(p_x_line_rec.ordered_quantity2, 0) - NVL(p_x_line_rec.reserved_quantity2,0);
8802: -- It is dangerous to compute secondary quantity to reserve based on
8803: -- ordered_quantity2 minus reserved_quantity2 as above.
8804: -- This is because ordered_quantity2 always reflects a standard conversion from ordered_quantity
8805: -- whereas reserved_quantity2 may be the result of one or more lot specific calculations
8806: -- Combining values from these different conversion rates may not give the correct result.
8807: -- Better to compute the secondary to reserve by converting l_qty_to_reserve
8808: IF p_x_line_rec.ordered_quantity_uom2 is not null and
9709:
9710: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
9711: ELSIF p_x_line_rec.ato_line_id is not null
9712: AND NOT(p_x_line_rec.ato_line_id =p_x_line_rec.line_id
9713: AND p_x_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
9714: OE_GLOBALS.G_ITEM_OPTION,
9715: OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
9716: THEN
9717:
10080: ,x_return_status => x_return_status);
10081:
10082: ELSE
10083: IF l_debug_level > 0 THEN
10084: oe_debug_pub.add( 'NEW SCHEDULING STANDARD LINE ' , 1 ) ;
10085: END IF;
10086:
10087: Process_request( p_old_line_rec => l_old_line_rec,
10088: p_caller => p_caller,
10447: AND OESCH_AUTO_SCH_FLAG = 'Y') THEN
10448:
10449: IF (p_line_rec.top_model_line_id is null OR
10450: p_line_rec.top_model_line_id = FND_API.G_MISS_NUM) AND
10451: p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD
10452: THEN
10453: IF l_debug_level > 0 THEN
10454: oe_debug_pub.add( 'AUTO SCHEDULE IS TRUE' , 4 ) ;
10455: oe_debug_pub.add( '6663462 : Delay Scheduling : ' || l_delayed_schedule , 4 ) ;
10848: Procedure Name : Validate_Line
10849: Description : Validates a line before scheduling.
10850: It will make sure the required attributes are the
10851: there on the line.
10852: Only standard lines can be scheduled.Service lines
10853: return lines cannot be scheduled.
10854: IF the profile OE:Schedule Line on Hold is set to 'Y'
10855: we will perform scheduling on lines on hold. If it is
10856: set to 'N', we will not perform scheduling.
11315: END IF;
11316: x_return_status := FND_API.G_RET_STS_ERROR;
11317: END IF;
11318:
11319: -- An item with this schedling level MUST be a Standard
11320: -- Item, and NOT be a part of an ATO
11321: IF l_debug_level > 0 THEN
11322: oe_debug_pub.add( 'CHECKING THAT IT IS A STANDARD ITEM...' , 1 ) ;
11323: END IF;
11318:
11319: -- An item with this schedling level MUST be a Standard
11320: -- Item, and NOT be a part of an ATO
11321: IF l_debug_level > 0 THEN
11322: oe_debug_pub.add( 'CHECKING THAT IT IS A STANDARD ITEM...' , 1 ) ;
11323: END IF;
11324: IF (p_line_rec.item_type_code <> 'STANDARD'
11325: OR p_line_rec.ato_line_id is not null) THEN
11326:
11320: -- Item, and NOT be a part of an ATO
11321: IF l_debug_level > 0 THEN
11322: oe_debug_pub.add( 'CHECKING THAT IT IS A STANDARD ITEM...' , 1 ) ;
11323: END IF;
11324: IF (p_line_rec.item_type_code <> 'STANDARD'
11325: OR p_line_rec.ato_line_id is not null) THEN
11326:
11327: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
11328: FND_MESSAGE.SET_TOKEN('LTYPE',
11340: IF l_debug_level > 0 THEN
11341: oe_debug_pub.add( 'CHECKING FOR NO SETS...' , 1 ) ;
11342: END IF;
11343: /* Commenting for Standalone project.
11344: -- We will now allow standard lines into sets.
11345: IF (p_line_rec.ship_set_id is not null OR
11346: P_line_rec.arrival_set_id is not null)THEN
11347:
11348: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
11504:
11505: IF p_line_rec.ato_line_id is not null AND
11506: NOT(p_line_rec.ato_line_id = p_line_rec.line_id AND
11507: p_line_rec.item_type_code IN ( OE_GLOBALS.G_ITEM_OPTION,
11508: OE_GLOBALS.G_ITEM_STANDARD,
11509: OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
11510: THEN
11511:
11512: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510'
11579: -- Added for 3451987
11580: IF NVL(FND_PROFILE.VALUE('ONT_SCH_ATO_ITEM_WO_BOM'), 'N') = 'N' THEN
11581: -- Added this part of validation to fix bug 2051855
11582: IF p_line_rec.ato_line_id = p_line_rec.line_id
11583: AND p_line_rec.item_type_code in ('STANDARD','OPTION','INCLUDED') --9775352
11584: AND fnd_profile.value('INV_CTP') = '5'THEN
11585:
11586: l_org_id := OE_Sys_Parameters.VALUE('MASTER_ORGANIZATION_ID');
11587:
12133: to schedule a SINGLE LINE (a set or a parent line is scheduled
12134: in different procedure). The single line could be a part
12135: of the set which is getting scheduled independently
12136: (because there was not change in the set related attribute),
12137: or it could be just a simple standard line which does not
12138: belong to any set.
12139:
12140: --------------------------------------------------------------------- */
12141: Procedure Process_request(p_old_line_rec IN OE_ORDER_PUB.line_rec_type,
12406: */
12407:
12408: --Bug 12641867
12409: IF p_x_line_rec.ato_line_id IS NOT NULL
12410: AND p_x_line_rec.item_type_code = 'STANDARD'
12411: AND nvl(p_x_line_rec.booked_flag, 'N') = 'Y'
12412: AND p_sch_action IN (OESCH_ACT_RESCHEDULE,OESCH_ACT_RESERVE) THEN
12413:
12414: SELECT shipping_interfaced_flag,firm_demand_flag,lock_control
12538: the availability of the items, we also need to find out nocopy
12539:
12540: the amount of time it takes to build those items.
12541: This procedure gives the time it takes to build the ATO.
12542: It is standard formula which is used. The value is derived
12543: from the ATO model. Thus all options for a given model
12544: will have the same Lead Time.
12545: ----------------------------------------------------------------------------- */
12546: FUNCTION Get_Lead_Time
15149:
15150: l_local_line_tbl.delete;
15151:
15152: ELSIF p_x_line_tbl(I).ato_line_id is not null
15153: AND p_x_line_tbl(I).item_type_code <> 'STANDARD'
15154: AND nvl(p_x_line_tbl(I).model_remnant_flag,'N') = 'N' THEN
15155:
15156: Begin
15157:
15679:
15680: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN --8706868
15681: -- get the latest picture.9662817
15682: FOR I in 1..p_x_line_tbl.count LOOP
15683: IF p_x_line_tbl(I).item_type_code <> 'STANDARD' THEN --AND
15684: --p_x_line_tbl(I).schedule_status_code is not null THEN
15685: IF l_debug_level > 0 THEN
15686: oe_debug_pub.add( 'LINE: ' || P_X_LINE_TBL ( I ) .LINE_ID , 1 ) ;
15687: END IF;
15693: END IF;
15694: END LOOP;
15695: FOR I in 1..p_x_line_tbl.count LOOP
15696: /* --9615081
15697: IF p_x_line_tbl(I).item_type_code <> 'STANDARD' THEN --AND
15698: --p_x_line_tbl(I).schedule_status_code is not null THEN
15699: IF l_debug_level > 0 THEN
15700: oe_debug_pub.add( 'LINE: ' || P_X_LINE_TBL ( I ) .LINE_ID , 1 ) ;
15701: END IF;
16369: OR p_sch_set_tbl(I).param3 IS NOT NULL
16370: OR (p_sch_set_tbl(I).param4 = 'Y'
16371: AND nvl(p_sch_set_tbl(I).param5,'N') = 'N')
16372: OR (p_sch_set_tbl(I).param7 IS NOT NULL
16373: AND p_sch_set_tbl(I).param8 <> 'STANDARD'
16374: AND nvl(p_sch_set_tbl(I).param5,'N') = 'N'
16375: AND p_sch_set_tbl(I).param9 = OE_GLOBALS.G_SOURCE_INTERNAL --added for bug 12757660
16376: ) THEN -- 4421848: added remnant flag check
16377:
16386: l_line_tbl(I).ato_line_id := p_sch_set_tbl(I).param7;
16387: l_line_tbl(I).item_type_code := p_sch_set_tbl(I).param8;
16388:
16389: ELSE
16390: -- Standard or independent line.
16391: oe_debug_pub.add('Independent or remnant line',2);
16392:
16393: OE_Line_Util.Query_Row(p_line_id => p_sch_set_tbl(I).entity_id,
16394: x_line_rec => l_line_rec);
17690: END IF;
17691: -- Pack-J changes
17692: IF l_ato_line_id is not null AND
17693: NOT (l_ato_line_id = l_line_id AND
17694: l_item_type_code in ('STANDARD','OPTION','INCLUDED')) --9775352
17695: THEN
17696:
17697: l_ato_model_line_id := l_ato_line_id;
17698:
18018:
18019: -- Pack-J changes
18020: IF l_ato_line_id is not null AND
18021: NOT (l_ato_line_id = l_line_id AND
18022: l_item_type_code in ('STANDARD','OPTION','INCLUDED'))
18023: --9775352
18024: THEN
18025:
18026: l_ato_model_line_id := l_ato_line_id;
18742: /*----------------------------------------------------------------------------------
18743: * PROCEDURE res_against_req_po
18744: * Added for ER 9224462. This API will validate if there are any reservations of a
18745: * line against a REQ or PO. If it has, p_result will return 1, else return 0.
18746: * This API has standard signature as required by Processing Constraints framework,
18747: * for API based Validation template. Based on this API a Validation template will
18748: * be created.
18749: * ---------------------------------------------------------------------------------*/
18750: PROCEDURE res_against_req_po