[Home] [Help]
1659: END IF;
1660:
1661: ELSIF p_line_rec.ato_line_id is not null
1662: AND NOT(p_line_rec.ato_line_id = p_line_rec.line_id
1663: AND p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1664: OE_GLOBALS.G_ITEM_OPTION))
1665: THEN
1666:
1667: IF l_debug_level > 0 THEN
1683:
1684:
1685: IF ((p_line_rec.ato_line_id is not null AND
1686: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
1687: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1688: OE_GLOBALS.G_ITEM_OPTION)))
1689: OR (p_line_rec.line_id = p_line_rec.top_model_line_id))
1690: AND NOT (OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510'
1691: AND MSC_ATP_GLOBAL.GET_APS_VERSION = 10 )
1893: p_old_line_rec => p_old_line_rec)
1894: AND OE_GLOBALS.Equal(p_line_rec.override_atp_date_code,
1895: p_old_line_rec.override_atp_date_code)
1896: AND p_line_rec.ordered_quantity = p_old_line_rec.ordered_quantity
1897: AND (p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD OR
1898: nvl(p_line_rec.model_remnant_flag,'N') = 'Y') THEN
1899:
1900: IF l_debug_level > 0 THEN
1901: oe_debug_pub.add( 'ARRIVAL_SET_ID : ' || P_LINE_REC.ARRIVAL_SET_ID || ':' || P_LINE_REC.SHIP_SET_ID , 2 ) ;
2698: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
2699: IF (p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE)
2700: AND (p_line_rec.ato_line_id IS NOT NULL AND
2701: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
2702: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
2703: OE_GLOBALS.G_ITEM_OPTION))) THEN
2704: x_atp_rec.ato_delete_flag(I) := 'Y';
2705: IF l_debug_level > 0 THEN
2706: oe_debug_pub.add( 'ATO DELETE FLAG : '
3079:
3080: -- Item Substitution Code.
3081:
3082: -- Sunbstitution will be supported only for
3083: -- Standard not ATO item.
3084: -- Before booking
3085: -- Non internal order item
3086: -- Not on split line
3087:
3120:
3121: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
3122:
3123: -- Bug fix 2331427
3124: IF p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD
3125: AND p_line_rec.ato_line_id is null
3126: AND ( NVL(p_line_rec.booked_flag,'N') = 'N' OR
3127: ( NVL(p_line_rec.booked_flag,'N') = 'Y' and
3128: NOT INV_GMI_RSV_BRANCH.Process_Branch(p_organization_id => p_line_rec.ship_from_org_id) and
3177:
3178:
3179: IF(p_line_rec.ato_line_id IS NOT NULL AND
3180: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
3181: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
3182: OE_GLOBALS.G_ITEM_OPTION))) THEN
3183:
3184: x_atp_rec.config_item_line_id(I) := p_config_line_id ;
3185:
3195:
3196:
3197: IF p_line_rec.ato_line_id = p_line_rec.line_id AND
3198: (p_line_rec.item_type_code in ('MODEL','CLASS') OR
3199: (p_line_rec.item_type_code in ('STANDARD','OPTION') AND
3200: l_inv_ctp = '5')) THEN
3201:
3202: l_explode := TRUE;
3203: -- Added this code to fix bug 1998613.
3216:
3217: END IF;
3218: IF l_explode THEN
3219: -- If the line scheduled is an ATO Model, call ATO's API
3220: -- to get the Standard Mandatory Components
3221:
3222: IF l_debug_level > 0 THEN
3223: oe_debug_pub.add('ATO ITEM TYPE: '||P_LINE_REC.ITEM_TYPE_CODE,3);
3224: END IF;
3222: IF l_debug_level > 0 THEN
3223: oe_debug_pub.add('ATO ITEM TYPE: '||P_LINE_REC.ITEM_TYPE_CODE,3);
3224: END IF;
3225:
3226: IF p_line_rec.item_type_code = 'STANDARD' AND
3227: x_atp_rec.ship_set_name(I) is NULL THEN
3228:
3229: IF l_debug_level > 0 THEN
3230: oe_debug_pub.add( 'ASSIGNING SHIP SET FOR ATO ITEM ' , 3 ) ;
3232: x_atp_rec.Ship_Set_Name(I) := p_line_rec.ato_line_id;
3233:
3234: END IF;
3235:
3236: IF p_line_rec.item_type_code = 'STANDARD' THEN
3237:
3238: IF l_debug_level > 0 THEN
3239: oe_debug_pub.add( 'ASSIGNING WAREHOUSE AND ITEM ' , 3 ) ;
3240: END IF;
3407: x_atp_rec.atp_lead_time(I) := 0;
3408: x_atp_rec.oe_flag(I) := l_oe_flag;
3409:
3410: -- As part of the bug fix 2910899, OM will indicate and remember the
3411: -- Standard Madatory record positions using vendor_name. This will be
3412: -- used in the load_results procedure to bypass the SMC records.
3413:
3414: x_atp_rec.vendor_name(I) := 'SMC';
3415: IF l_debug_level > 0 THEN
3736: IF l_config_count > 0
3737: AND p_line_tbl(cnt).ato_line_id is not null
3738: AND p_line_tbl(cnt).ato_line_id <> l_ato_line_id
3739: AND NOT(p_line_tbl(cnt).ato_line_id = p_line_tbl(cnt).line_id
3740: AND (p_line_tbl(cnt).item_type_code = OE_GLOBALS.G_ITEM_STANDARD
3741: OR p_line_tbl(cnt).item_type_code = OE_GLOBALS.G_ITEM_OPTION))
3742: THEN
3743:
3744: l_ato_line_id := p_line_tbl(cnt).ato_line_id;
5187: END IF;
5188:
5189:
5190: -- As part of the bug fix 2910899, OM will indicate and remember the
5191: -- Standard Madatory record positions using vendor_name. This will be
5192: -- used in the load_results procedure to bypass the SMC records.
5193: -- Increment and skip the smc records.
5194:
5195: IF I < p_x_line_tbl.count AND
6341: -- l_qty2_to_reserve := nvl(p_x_line_rec.ordered_quantity2, 0) - -- need to test if this falls over
6342: -- nvl(l_old_reserved_quantity2,0);
6343: -- It is dangerous to compute secondary quantity to reserve based on
6344: -- ordered_quantity2 minus reserved_quantity2 as above.
6345: -- This is because ordered_quantity 2 always reflects a standard conversion from ordered_quantity
6346: -- whereas reserved_quantity2 may be the result of one or more lot specific calculations
6347: -- Combining values from these different conversion rates may not give the correct result.
6348: -- Better to compute the secondary to reserve by converting l_qty_to_reserve
6349: IF p_x_line_rec.ordered_quantity_uom2 is not null and
7504: -- l_qty2_to_reserve := -- INVCONV
7505: -- nvl(p_x_line_rec.ordered_quantity2, 0) - NVL(p_x_line_rec.reserved_quantity2,0);
7506: -- It is dangerous to compute secondary quantity to reserve based on
7507: -- ordered_quantity2 minus reserved_quantity2 as above.
7508: -- This is because ordered_quantity2 always reflects a standard conversion from ordered_quantity
7509: -- whereas reserved_quantity2 may be the result of one or more lot specific calculations
7510: -- Combining values from these different conversion rates may not give the correct result.
7511: -- Better to compute the secondary to reserve by converting l_qty_to_reserve
7512: IF p_x_line_rec.ordered_quantity_uom2 is not null and
8361:
8362: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
8363: ELSIF p_x_line_rec.ato_line_id is not null
8364: AND NOT(p_x_line_rec.ato_line_id =p_x_line_rec.line_id
8365: AND p_x_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
8366: OE_GLOBALS.G_ITEM_OPTION))
8367: THEN
8368:
8369: Update oe_order_lines_all
8621: ,x_return_status => x_return_status);
8622:
8623: ELSE
8624: IF l_debug_level > 0 THEN
8625: oe_debug_pub.add( 'NEW SCHEDULING STANDARD LINE ' , 1 ) ;
8626: END IF;
8627:
8628: Process_request( p_old_line_rec => l_old_line_rec,
8629: p_caller => p_caller,
8951: AND OESCH_AUTO_SCH_FLAG = 'Y') THEN
8952:
8953: IF (p_line_rec.top_model_line_id is null OR
8954: p_line_rec.top_model_line_id = FND_API.G_MISS_NUM) AND
8955: p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD
8956: THEN
8957: IF l_debug_level > 0 THEN
8958: oe_debug_pub.add( 'AUTO SCHEDULE IS TRUE' , 4 ) ;
8959: oe_debug_pub.add( '6663462 : Delay Scheduling : ' || l_delayed_schedule , 4 ) ;
9316: Procedure Name : Validate_Line
9317: Description : Validates a line before scheduling.
9318: It will make sure the required attributes are the
9319: there on the line.
9320: Only standard lines can be scheduled.Service lines
9321: return lines cannot be scheduled.
9322: IF the profile OE:Schedule Line on Hold is set to 'Y'
9323: we will perform scheduling on lines on hold. If it is
9324: set to 'N', we will not perform scheduling.
9783: END IF;
9784: x_return_status := FND_API.G_RET_STS_ERROR;
9785: END IF;
9786:
9787: -- An item with this schedling level MUST be a Standard
9788: -- Item, and NOT be a part of an ATO
9789: IF l_debug_level > 0 THEN
9790: oe_debug_pub.add( 'CHECKING THAT IT IS A STANDARD ITEM...' , 1 ) ;
9791: END IF;
9786:
9787: -- An item with this schedling level MUST be a Standard
9788: -- Item, and NOT be a part of an ATO
9789: IF l_debug_level > 0 THEN
9790: oe_debug_pub.add( 'CHECKING THAT IT IS A STANDARD ITEM...' , 1 ) ;
9791: END IF;
9792: IF (p_line_rec.item_type_code <> 'STANDARD'
9793: OR p_line_rec.ato_line_id is not null) THEN
9794:
9788: -- Item, and NOT be a part of an ATO
9789: IF l_debug_level > 0 THEN
9790: oe_debug_pub.add( 'CHECKING THAT IT IS A STANDARD ITEM...' , 1 ) ;
9791: END IF;
9792: IF (p_line_rec.item_type_code <> 'STANDARD'
9793: OR p_line_rec.ato_line_id is not null) THEN
9794:
9795: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
9796: FND_MESSAGE.SET_TOKEN('LTYPE',
9808: IF l_debug_level > 0 THEN
9809: oe_debug_pub.add( 'CHECKING FOR NO SETS...' , 1 ) ;
9810: END IF;
9811: /* Commenting for Standalone project.
9812: -- We will now allow standard lines into sets.
9813: IF (p_line_rec.ship_set_id is not null OR
9814: P_line_rec.arrival_set_id is not null)THEN
9815:
9816: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
9923:
9924: IF p_line_rec.ato_line_id is not null AND
9925: NOT(p_line_rec.ato_line_id = p_line_rec.line_id AND
9926: p_line_rec.item_type_code IN ( OE_GLOBALS.G_ITEM_OPTION,
9927: OE_GLOBALS.G_ITEM_STANDARD))
9928: THEN
9929:
9930: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510'
9931: AND MSC_ATP_GLOBAL.GET_APS_VERSION = 10 THEN
9997: -- Added for 3451987
9998: IF NVL(FND_PROFILE.VALUE('ONT_SCH_ATO_ITEM_WO_BOM'), 'N') = 'N' THEN
9999: -- Added this part of validation to fix bug 2051855
10000: IF p_line_rec.ato_line_id = p_line_rec.line_id
10001: AND p_line_rec.item_type_code in ('STANDARD','OPTION')
10002: AND fnd_profile.value('INV_CTP') = '5'THEN
10003:
10004: l_org_id := OE_Sys_Parameters.VALUE('MASTER_ORGANIZATION_ID');
10005:
10551: to schedule a SINGLE LINE (a set or a parent line is scheduled
10552: in different procedure). The single line could be a part
10553: of the set which is getting scheduled independently
10554: (because there was not change in the set related attribute),
10555: or it could be just a simple standard line which does not
10556: belong to any set.
10557:
10558: --------------------------------------------------------------------- */
10559: Procedure Process_request(p_old_line_rec IN OE_ORDER_PUB.line_rec_type,
10931: the availability of the items, we also need to find out nocopy
10932:
10933: the amount of time it takes to build those items.
10934: This procedure gives the time it takes to build the ATO.
10935: It is standard formula which is used. The value is derived
10936: from the ATO model. Thus all options for a given model
10937: will have the same Lead Time.
10938: ----------------------------------------------------------------------------- */
10939: FUNCTION Get_Lead_Time
13135:
13136: l_local_line_tbl.delete;
13137:
13138: ELSIF p_x_line_tbl(I).ato_line_id is not null
13139: AND p_x_line_tbl(I).item_type_code <> 'STANDARD'
13140: AND nvl(p_x_line_tbl(I).model_remnant_flag,'N') = 'N' THEN
13141:
13142: Begin
13143:
13896: OR p_sch_set_tbl(I).param3 IS NOT NULL
13897: OR (p_sch_set_tbl(I).param4 = 'Y'
13898: AND nvl(p_sch_set_tbl(I).param5,'N') = 'N')
13899: OR (p_sch_set_tbl(I).param7 IS NOT NULL
13900: AND p_sch_set_tbl(I).param8 <> 'STANDARD'
13901: AND nvl(p_sch_set_tbl(I).param5,'N') = 'N') THEN -- 4421848: added remnant flag check
13902:
13903: oe_debug_pub.add('Belongs to Set',2);
13904: l_line_tbl(I).line_id := p_sch_set_tbl(I).entity_id;
13911: l_line_tbl(I).ato_line_id := p_sch_set_tbl(I).param7;
13912: l_line_tbl(I).item_type_code := p_sch_set_tbl(I).param8;
13913:
13914: ELSE
13915: -- Standard or independent line.
13916: oe_debug_pub.add('Independent or remnant line',2);
13917:
13918: OE_Line_Util.Query_Row(p_line_id => p_sch_set_tbl(I).entity_id,
13919: x_line_rec => l_line_rec);
15143: END IF;
15144: -- Pack-J changes
15145: IF l_ato_line_id is not null AND
15146: NOT (l_ato_line_id = l_line_id AND
15147: l_item_type_code in ('STANDARD','OPTION'))
15148: THEN
15149:
15150: l_ato_model_line_id := l_ato_line_id;
15151:
15471:
15472: -- Pack-J changes
15473: IF l_ato_line_id is not null AND
15474: NOT (l_ato_line_id = l_line_id AND
15475: l_item_type_code in ('STANDARD','OPTION'))
15476: THEN
15477:
15478: l_ato_model_line_id := l_ato_line_id;
15479: