[Home] [Help]
398: lorder_no oe_order_headers_all.order_number%type;
399: lheader_id oe_order_headers_all.header_id%type;
400: lplanner_code fnd_user.user_name%type; -- Modified by Renga on 11/24/04
401: --for bug 4026568
402: lOrg_id mtl_system_items.organization_id%type;
403: lStmtNumber number;
404: lResv_exists boolean;
405: lato_item_flag varchar2(1) := 'N';
406:
717: -- If the item is non atpable then scheduling will not catch. So we are validating here
718:
719: select option_specific_sourced
720: into l_option_specific
721: from mtl_system_items msi
722: where msi.inventory_item_id = lconfig_id
723: and rownum = 1;
724:
725: If l_option_specific is not null Then
1326:
1327: litem_key varchar2(100);
1328: luser_key varchar2(100);
1329: lcustomer_name varchar2(400);
1330: litem_name mtl_system_items_kfv.concatenated_segments%type; --OPM
1331: lreq_date date;
1332: lssd_date date;
1333: lsad_date date;
1334: lord_qty number;
1392: -- bug 7447357.pdube Mon Oct 20 04:03:59 PDT 2008
1393: -- Introdcued this to get a unique user name
1394: CURSOR get_buyer_user_name(inv_item_id NUMBER,ship_org_id NUMBER) IS
1395: SELECT FU.user_name
1396: FROM MTL_SYSTEM_ITEMS MTI,
1397: PO_BUYERS_ALL_V PBAV,
1398: FND_USER FU
1399: WHERE MTI.inventory_item_id = inv_item_id
1400: AND MTI.organization_id = ship_org_id
1405: -- bug 7447357.pdube Tue Oct 21 04:31:34 PDT 2008
1406: -- Introdcued this to get a unique user name
1407: CURSOR get_planner_user_name(inv_item_id NUMBER,ship_org_id NUMBER) IS
1408: SELECT u.user_name
1409: FROM mtl_system_items_vl item,
1410: mtl_planners p,
1411: fnd_user u
1412: WHERE item.inventory_item_id = inv_item_id
1413: and item.organization_id = ship_org_id
1528:
1529: lstmt := 25; --OPM
1530: SELECT concatenated_segments
1531: INTO litem_name
1532: FROM mtl_system_items_kfv
1533: WHERE inventory_item_id = pconfig_id
1534: AND organization_id = lship_org_id;
1535:
1536: -- Get the customer name from ra_customers_view
1567: end loop;
1568:
1569:
1570: -- In the case of Buy ATo item we need to send the notification to the
1571: -- Buyer . Get the buyer info from Mtl_system_items
1572: IF pmlmo_flag = 'B' THEN
1573:
1574: IF PG_DEBUG <> 0 THEN
1575: oe_debug_pub.add('start_work_flow: ' || 'Getting buyer info..',1);
1583: -- Bug 7447357.pdube Mon Oct 20 04:26:25 PDT 2008.
1584: -- getting the value for user_name in the variable.
1585: /*SELECT u.user_name
1586: INTO lplanner_code
1587: FROM MTL_SYSTEM_ITEMS A,
1588: PO_BUYERS_ALL_V B,
1589: FND_USER U
1590: WHERE a.inventory_item_id = linv_item_id
1591: AND a.organization_id = lship_org_id
1645: -- Bug 7447357.pdube Tue Oct 21 04:31:34 PDT 2008.
1646: -- getting the value for user_name in the variable.
1647: /*SELECT u.user_name
1648: INTO lplanner_code
1649: FROM mtl_system_items_vl item
1650: ,mtl_planners p
1651: ,fnd_user u
1652: WHERE item.inventory_item_id = linv_item_id
1653: and item.organization_id = lship_org_id
2191:
2192:
2193:
2194: PROCEDURE Is_item_ML_OR_MO(
2195: pInventory_item_id IN mtl_system_items.inventory_item_id%type,
2196: pOrg_id IN mtl_system_items.organization_id%type,
2197: x_result OUT NOCOPY Varchar2,
2198: x_source_type OUT NOCOPY Number,
2199: x_return_status OUT NOCOPY Varchar2,
2192:
2193:
2194: PROCEDURE Is_item_ML_OR_MO(
2195: pInventory_item_id IN mtl_system_items.inventory_item_id%type,
2196: pOrg_id IN mtl_system_items.organization_id%type,
2197: x_result OUT NOCOPY Varchar2,
2198: x_source_type OUT NOCOPY Number,
2199: x_return_status OUT NOCOPY Varchar2,
2200: x_msg_count OUT NOCOPY Number,
2292: SELECT 'Y'
2293: INTO x_result
2294: FROM BOM_BILL_OF_MATERIALS BOM,
2295: BOM_INVENTORY_COMPONENTS BIC,
2296: MTL_SYSTEM_ITEMS MTL
2297: WHERE BOM.Assembly_item_id = pInventory_item_id
2298: AND BOM.Organization_id = pOrg_id
2299: AND BOM.Bill_sequence_id = BIC.Bill_sequence_id
2300: AND BIC.Bom_item_type = 4 --- Standard item