MRP_ATP_PUB.call_atp sample

Question

Hi,
We need a code for API usage of MRP_ATP_PUB.call_atp. We got one from the metalink, but its given example of only 1 item being passed.
When we pass group of items, its giving us error of ATP Processing, where as when we pass those items individually, it works out fine.
Any help in this regard is highly appreciated.
Thanks and Regards,
Amit

Answer 1

We are on R12 (12.1.1).
Though we are not getting error, but here are the details.
As per the example files of the API, we are using BULK COLLECT to collect all the items (Model + Option + Item) in the p_atp_rec (input to the API).
Though in the output variable x_atp_rec it is giving us result of only first item that we are passing whereas rest of the items details (schedule ship date etc) are not getting in the output.
Below is the BULK COLLECT we are using with all the parameters. Please note that we are not passing order info to the API. But as per the notes on metalink its not mandatory so should not be an issue.
select
a.Inventory_Item_Id ,
a.segment1 ,
100, --Quantity_Ordered          ,
'EA', --Quantity_UOM              ,
TO_DATE('02-MAY-2011') , --Requested_Ship_Date       ,
--100, --Action                    ,
NULL, Instance_Id ,
NULL, Source_Organization_id ,
--'N', --OE_Flag                   ,
--0, --Insert_Flag               ,
--1, --Attribute_04          ,
--600027019, --Customer_Id ,             
--600042515, --Customer_Site_Id          ,
--660, --Calling_Module            ,
NULL, --Row_Id                    ,
NULL, --Organization_Id           ,
NULL, --order_number              ,
OE_ORDER_LINES_S.nextval, --identifier               ,
NULL, --destination_time_zone     ,
NULL, --demand_class              ,
NULL, --validation_org            ,
--1, --included_item_flag        , 
NULL, --old_source_organization_id,
NULL, --old_demand_class          ,
NULL --override_flag
--b.component_sequence_id
BULK COLLECT INTO
l_atp_rec.Inventory_Item_Id ,
l_atp_rec.Inventory_Item_Name ,
l_atp_rec.Quantity_Ordered ,
l_atp_rec.Quantity_UOM ,
l_atp_rec.Requested_Ship_Date ,
--l_atp_rec.Action                    ,
--l_atp_rec.Instance_Id               ,
--l_atp_rec.Source_Organization_id    ,
--l_atp_rec.OE_Flag                   ,
--l_atp_rec.Insert_Flag               ,
--l_atp_rec.Attribute_04,
--l_atp_rec.Customer_Id               ,
--l_atp_rec.Customer_Site_Id          ,
--l_atp_rec.Calling_Module            ,
l_atp_rec.Row_Id ,
l_atp_rec.Organization_Id ,
l_atp_rec.order_number ,
l_atp_rec.identifier ,
l_atp_rec.destination_time_zone ,
l_atp_rec.demand_class ,
l_atp_rec.validation_org ,
--l_atp_rec.included_item_flag        , 
l_atp_rec.old_source_organization_id,
l_atp_rec.old_demand_class ,
l_atp_rec.override_flag          
--l_atp_rec.component_sequence_id
FROM
mtl_system_items_b a
--BOM_INVENTORY_COMPONENTS b,
--BOM_BILL_OF_MATERIALS c
where a.segment1 in ('XCDE400-2-500SXA-K9','XCDE PWR OPT','XCAB-9K12A-NA','XCDE EXPAND','XCDAOND-MGT')
--and c.organization_id = a.organization_id
--and b.bill_sequence_id = c.bill_sequence_id
--and c.assembly_item_id = a.inventory_item_id
and a.organization_id = 1;
l_atp_rec.OE_Flag(1) := 'N';
l_atp_rec.Calling_Module(1) := 660;
l_atp_rec.Attribute_04(1) := 1;
l_atp_rec.action(1) := 100;
l_atp_rec.included_item_flag(1) := 1;
l_atp_rec.Customer_Id(1) := 600027024; --600027019;
l_atp_rec.Customer_Site_Id(1) := 600042524; --600042515;
l_atp_rec.Insert_Flag(1) := 0;
Please let me know if something is incorrect in this call.
Thanks and Regards,
Amit