Process_Order API Error

Question

Hi to all,
I want to create a new Sales Order using PL/SQL, so i used the process_order API to achieve this.
I first set the client info using fnd_client_info.set_org_context(82) and then set the initialization parameters using fnd_global.apps_initilize (1090,21623,660).
To get the initialization parameters i used this query:
select fu.user_Id ,
fur.responsibility_Id,
fur.responsibility_application_Id,
frt.responsibility_name
from fnd_user fu,
fnd_responsibility_tl frt,
fnd_user_resp_groups fur
where user_name = '<USER>'
and fu.user_Id = fur.user_Id
and fur.responsibility_Id = frt.responsibility_Id
order by fur.responsibility_Id
I then called my api but i get errors, such as ORA-01403: no data found and ORA-06512 at APPS.OE_ORDER_CACHE and ORA-01403 no data found in Package OE_ORDER_UTIL Procedure GET_ATTRIBUTE_NAME.
Below is my code:
BEGIN
     fnd_client_info.set_org_context(82);
     fnd_global.apps_initialize(1090,21623,660); -- pass in user_id, responsibility_id, and application_id     
END;
DECLARE
--for get order
x_return_status VARCHAR2(1000);
x_msg_count NUMBER(20);
x_msg_data VARCHAR2(1000);
x_header_rec Oe_Order_Pub.Header_Rec_Type;
x_header_val_rec Oe_Order_Pub.Header_Val_Rec_Type;
x_Header_Adj_tbl Oe_Order_Pub.Header_Adj_Tbl_Type;
x_Header_Adj_val_tbl Oe_Order_Pub.Header_Adj_Val_Tbl_Type;
x_Header_price_Att_tbl Oe_Order_Pub.Header_Price_Att_Tbl_Type;
x_Header_Adj_Att_tbl Oe_Order_Pub.Header_Adj_Att_Tbl_Type;
x_Header_Adj_Assoc_tbl Oe_Order_Pub.Header_Adj_Assoc_Tbl_Type;
x_Header_Scredit_tbl Oe_Order_Pub.Header_Scredit_Tbl_Type;
x_Header_Scredit_val_tbl Oe_Order_Pub.Header_Scredit_Val_Tbl_Type;
x_line_tbl Oe_Order_Pub.Line_Tbl_Type;
x_line_val_tbl Oe_Order_Pub.Line_Val_Tbl_Type;
x_Line_Adj_tbl Oe_Order_Pub.Line_Adj_Tbl_Type;
x_Line_Adj_val_tbl Oe_Order_Pub.Line_Adj_Val_Tbl_Type;
x_Line_price_Att_tbl Oe_Order_Pub.Line_Price_Att_Tbl_Type;
x_Line_Adj_Att_tbl Oe_Order_Pub.Line_Adj_Att_Tbl_Type;
x_Line_Adj_Assoc_tbl Oe_Order_Pub.Line_Adj_Assoc_Tbl_Type;
x_Line_Scredit_tbl Oe_Order_Pub.Line_Scredit_Tbl_Type;
x_Line_Scredit_val_tbl Oe_Order_Pub.Line_Scredit_Val_Tbl_Type;
x_Lot_Serial_tbl Oe_Order_Pub.Lot_Serial_Tbl_Type;
x_Lot_Serial_val_tbl Oe_Order_Pub.Lot_Serial_Val_Tbl_Type;
--for adding a new line to process order
x_header_rec2 Oe_Order_Pub.Header_Rec_Type;
x_line_tbl2 Oe_Order_Pub.Line_Tbl_Type;
x_action_request_tbl Oe_Order_Pub.Request_Tbl_Type;
--for getting messages
v_msg_data VARCHAR2(8000);
v_msg_index_out NUMBER(10);
CCIDGOOD varchar2(1);
X_RETURN_CCID number;
X_CONCAT_SEGS varchar2(250);
X_CONCAT_IDS varchar2(250);
X_CONCAT_DESCRS varchar2(250);
-- X_MSG_COUNT number;
X_ERRMSG varchar2(1000);
X_ORDER_LINE_ID number;
X_FLEX_NUMBER number;
X_DEBUG_FILE varchar2(100);
x_fnd_debug varchar2(32000);
x_status boolean;
p_ship_from number;
BEGIN
fnd_global.apps_initialize(1318,21623,660); pass in user_id, responsibility_id, and application_id
--dbms_application_info.SET_CLIENT_INFO('82');
fnd_global.apps_initialize(1090,21623,660); pass in user_id, responsibility_id, and application_id
oe_debug_pub.initialize;
X_DEBUG_FILE := OE_DEBUG_PUB.Set_Debug_Mode('TABLE');
oe_debug_pub.SetDebugLevel(1); -- Use 5 for the most debuging output, I warn you its a lot of data
Oe_Msg_Pub.initialize;
-- Setting Up the Header Record
-- initialize record to (a record template?)
x_header_rec2 := OE_ORDER_PUB.G_MISS_HEADER_REC;
-- required attributes (e.g. Order Type and Customer)
x_header_rec2.order_type_id := 1001; -- You need a valid Order_Type
x_header_rec2.sold_to_org_id := 1049; -- You need to have a valid Org_id for your Customer AR_CUSTOMERS_V.CUSTOMER_ID
--x_header_rec2.invoice_to_org_id := 1025;
x_header_rec2.ship_to_org_id := 1040; -- You need to have a valid SHIP_TO_ORG_ID
--x_header_rec2.ship_from_org_id := 207;
--x_header_rec2.sold_from_org_id := 204;
--x_header_rec2.payment_term_id := 1020;
x_header_rec2.cust_po_number := 'PONUMBERORDER';
-- Pricing
--x_header_rec2.price_list_id := 6041;
-- Null attribute: no defaulting for freight terms
-- check biz rules on this, copied from sample code
--x_header_rec2.freight_terms_code := NULL;
-- Indicates to process order that a new header is being created
x_header_rec2.operation := OE_GLOBALS.G_OPR_CREATE;
-- FIRST LINE RECORD
--x_line_tbl2(1) := Oe_Order_Pub.G_MISS_LINE_REC;
-- x_line_tbl2(1).inventory_item_id := 3178; -- Your INVENTORY_ITEM_ID VALUE goes here
--x_line_tbl2(1).ordered_quantity := 2;
--x_line_tbl2(1).operation := Oe_Globals.G_OPR_CREATE;
IF TRUE THEN -- enable/disable toggle for Process_Order
Oe_Order_Pub.Process_Order
( 1
, Fnd_Api.G_FALSE
, Fnd_Api.G_FALSE
, Fnd_Api.G_FALSE
, x_return_status
, x_msg_count
, x_msg_data
--IN PARAMETERS
, p_line_tbl => x_line_tbl2
, p_header_rec => x_header_rec2
--OUT PARAMETERS
, x_header_rec => x_header_rec
, x_header_val_rec => x_header_val_rec
, x_Header_Adj_tbl => x_Header_Adj_tbl
, x_Header_Adj_val_tbl => x_Header_Adj_val_tbl
, x_Header_price_Att_tbl => x_Header_price_Att_tbl
, x_Header_Adj_Att_tbl => x_Header_Adj_Att_tbl
, x_Header_Adj_Assoc_tbl => x_Header_Adj_Assoc_tbl
, x_Header_Scredit_tbl => x_Header_Scredit_tbl
, x_Header_Scredit_val_tbl => x_Header_Scredit_val_tbl
, x_line_tbl => x_line_tbl
, x_line_val_tbl => x_line_val_tbl
, x_Line_Adj_tbl => x_Line_Adj_tbl
, x_Line_Adj_val_tbl => x_Line_Adj_val_tbl
, x_Line_price_Att_tbl => x_Line_price_Att_tbl
, x_Line_Adj_Att_tbl => x_Line_Adj_Att_tbl
, x_Line_Adj_Assoc_tbl => x_Line_Adj_Assoc_tbl
, x_Line_Scredit_tbl => x_Line_Scredit_tbl
, x_Line_Scredit_val_tbl => x_Line_Scredit_val_tbl
, x_Lot_Serial_tbl => x_Lot_Serial_tbl
, x_Lot_Serial_val_tbl => x_Lot_Serial_val_tbl
, x_action_request_tbl => x_action_request_tbl
COMMIT;
DBMS_OUTPUT.PUT_LINE('process ORDER ret status IS: ' || x_return_status);
DBMS_OUTPUT.PUT_LINE('process ORDER msg data IS: ' || x_msg_data);
DBMS_OUTPUT.PUT_LINE('process ORDER msg COUNT IS: ' || x_msg_count);
DBMS_OUTPUT.PUT_LINE('header.order_number IS: ' || x_header_rec.order_number);
DBMS_OUTPUT.PUT_LINE('header.return_status IS: ' || x_header_rec.return_status);
DBMS_OUTPUT.PUT_LINE('header.booked_flag IS: ' || x_header_rec.booked_flag);
DBMS_OUTPUT.PUT_LINE('header.header_id IS: ' || x_header_rec.header_id);
DBMS_OUTPUT.PUT_LINE('header.order_source_id IS: ' || x_header_rec.order_source_id);
DBMS_OUTPUT.PUT_LINE('header.flow_status_code IS: ' || x_header_rec.flow_status_code);
END IF;
FOR i IN 1 .. x_msg_count LOOP
Oe_Msg_Pub.get(
p_msg_index => i
,p_encoded => Fnd_Api.G_FALSE
,p_data => v_msg_data
,p_msg_index_out => v_msg_index_out);
DBMS_OUTPUT.PUT_LINE('message is: ' || v_msg_data);
DBMS_OUTPUT.PUT_LINE('message index is: ' || v_msg_index_out);
END LOOP;
DBMS_OUTPUT.PUT_LINE('oe_msg_pub.count_msg = ' || Oe_Msg_Pub.count_msg);
DBMS_OUTPUT.PUT_LINE('****************************************************');
DBMS_OUTPUT.PUT_LINE('* OUTPUT FROM OM: DEBUG LEVEL PROFILE SETTING *');
DBMS_OUTPUT.PUT_LINE('****************************************************');
for i in 1..OE_DEBUG_PUB.g_debug_count loop
dbms_output.put_line(OE_DEBUG_PUB.G_debug_tbl(i));
end loop;
OE_DEBUG_PUB.DEBUG_OFF;
DBMS_OUTPUT.PUT_LINE('****************************************************');
DBMS_OUTPUT.PUT_LINE('* SUMMARY OF RETURNED RESULTS *');
DBMS_OUTPUT.PUT_LINE('****************************************************');
DBMS_OUTPUT.PUT_LINE('Output Parameters: ');
DBMS_OUTPUT.PUT_LINE('Debug = ' || OE_DEBUG_PUB.G_DEBUG);
DBMS_OUTPUT.PUT_LINE('Debug Level = ' || to_char(OE_DEBUG_PUB.G_DEBUG_LEVEL));
DBMS_OUTPUT.PUT_LINE('Debug File = ' || OE_DEBUG_PUB.G_DIR||'/'||
OE_DEBUG_PUB.G_FILE);
DBMS_OUTPUT.PUT_LINE('X_RETURN_CCID = ' || to_char(X_RETURN_CCID));
DBMS_OUTPUT.PUT_LINE('X_CONCAT_SEGS = ' || X_CONCAT_SEGS);
DBMS_OUTPUT.PUT_LINE('X_CONCAT_IDS = ' || X_CONCAT_IDS);
DBMS_OUTPUT.PUT_LINE('X_CONCAT_DESCRS = ' || X_CONCAT_DESCRS);
DBMS_OUTPUT.PUT_LINE('X_ERRMSG = ' || X_ERRMSG);
DBMS_OUTPUT.PUT_LINE('****************************************************');
END;
Please someone help me as i am stuck for days and i need to complete this as soon as possible.
Thanks
Antonis

Answer 1

Antonis,
I am using following process which is working fine
create or replace procedure tnq_so_import_api ( retcode number,errbuff
varchar2)
is
--gmigapi.item_rec_typ;
l_header_rec OE_Order_PUB.Header_Rec_Type;
l_line_tbl OE_Order_PUB.Line_Rec_Type;
l_line_adj_tbl OE_Order_PUB.Line_Adj_Rec_Type;
l_header_scr_tbl OE_Order_PUB.Header_Scredit_Tbl_Type;
l_header_adj_tbl OE_Order_PUB.Header_Adj_Val_Tbl_Type;
l_line_scredit_tbl OE_Order_PUB.Line_Scredit_Rec_Type;
l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;
l_msg_count NUMBER;
l_msg_data VARCHAR2 (10000);
begin --@1
-- SETTING UP THE HEADER RECORD
-- Initialize record to missing
l_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
-- Required attributes (e.g. Order Type and Customer)
l_header_rec.order_type_id := 1000;
l_header_rec.sold_to_org_id := 100;
-- Other attributes
l_header_rec.price_list_id := 10;
-- Null attribute: no defaulting for freight terms
l_header_rec.freight_terms_code := NULL;
-- Indicates to process order that a new header is being created
l_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
-- FIRST LINE RECORD
-- Initialize record to missing
l_line_tbl := OE_ORDER_PUB.G_MISS_LINE_REC;
-- Line attributes
l_line_tbl.inventory_item_id := 311;
l_line_tbl.ordered_quantity := 1;
l_line_tbl.operation := OE_GLOBALS.G_OPR_CREATE;
-- SECOND LINE RECORD
-- Initialize record to missing
--l_line_tbl(2) := OE_ORDER_PUB.G_MISS_LINE_REC;
-- Line attributes
--l_line_tbl(2).inventory_item_id := 312;
--l_line_tbl(2).ordered_quantity := 2;
--l_line_tbl(2).operation := OE_GLOBALS.G_OPR_CREATE;
-- CALL TO PROCESS ORDER
OE_Order_PUB.Process_Order
( -- Passing just the entity records that are a part of this order
p_header_rec => l_header_rec
     ,p_line_tbl => l_line_tbl
     ,p_line_adj_tbl => l_line_adj_tbl
     -- OUT variables
     ,x_header_rec => l_header_rec
     ,x_header_scredit_tbl => l_header_scr_tbl
     ,x_header_adj_tbl => l_header_adj_tbl
     ,x_line_tbl => l_line_tbl
     ,x_line_scredit_tbl => l_line_scredit_tbl
     ,x_line_adj_tbl => l_line_adj_tbl
     ,x_return_status => l_return_status
     ,x_msg_count => l_msg_count
     ,x_msg_data => l_msg_data
OE_Order_PUB.Process_Order
( -- Passing just the entity records that are a part of this order
p_api_version_number IN NUMBER
, p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
, p_return_values IN VARCHAR2 := FND_API.G_FALSE
, p_action_commit IN VARCHAR2 := FND_API.G_FALSE
, x_return_status OUT VARCHAR2
, x_msg_count OUT NUMBER
, x_msg_data OUT VARCHAR2
, p_header_rec IN Header_Rec_Type :=
G_MISS_HEADER_REC
, p_old_header_rec IN Header_Rec_Type :=
G_MISS_HEADER_REC
, p_header_val_rec IN Header_Val_Rec_Type :=
G_MISS_HEADER_VAL_REC
, p_old_header_val_rec IN Header_Val_Rec_Type :=
G_MISS_HEADER_VAL_REC
, p_Header_Adj_tbl IN Header_Adj_Tbl_Type :=
G_MISS_HEADER_ADJ_TBL
, p_old_Header_Adj_tbl IN Header_Adj_Tbl_Type :=
G_MISS_HEADER_ADJ_TBL
, p_Header_Adj_val_tbl IN Header_Adj_Val_Tbl_Type :=
G_MISS_HEADER_ADJ_VAL_TBL
, p_old_Header_Adj_val_tbl IN Header_Adj_Val_Tbl_Type :=
G_MISS_HEADER_ADJ_VAL_TBL
, p_Header_price_Att_tbl IN Header_Price_Att_Tbl_Type :=
G_MISS_HEADER_PRICE_ATT_TBL
, p_old_Header_Price_Att_tbl IN Header_Price_Att_Tbl_Type :=
G_MISS_HEADER_PRICE_ATT_TBL
, p_Header_Adj_Att_tbl IN Header_Adj_Att_Tbl_Type :=
G_MISS_HEADER_ADJ_ATT_TBL
, p_old_Header_Adj_Att_tbl IN Header_Adj_Att_Tbl_Type :=
G_MISS_HEADER_ADJ_ATT_TBL
, p_Header_Adj_Assoc_tbl IN Header_Adj_Assoc_Tbl_Type :=
G_MISS_HEADER_ADJ_ASSOC_TBL
, p_old_Header_Adj_Assoc_tbl IN Header_Adj_Assoc_Tbl_Type :=
G_MISS_HEADER_ADJ_ASSOC_TBL
, p_Header_Scredit_tbl IN Header_Scredit_Tbl_Type :=
G_MISS_HEADER_SCREDIT_TBL
, p_old_Header_Scredit_tbl IN Header_Scredit_Tbl_Type :=
G_MISS_HEADER_SCREDIT_TBL
, p_Header_Scredit_val_tbl IN Header_Scredit_Val_Tbl_Type :=
G_MISS_HEADER_SCREDIT_VAL_TBL
, p_old_Header_Scredit_val_tbl IN Header_Scredit_Val_Tbl_Type :=
G_MISS_HEADER_SCREDIT_VAL_TBL
, p_line_tbl IN Line_Tbl_Type :=
G_MISS_LINE_TBL
, p_old_line_tbl IN Line_Tbl_Type :=
G_MISS_LINE_TBL
, p_line_val_tbl IN Line_Val_Tbl_Type :=
G_MISS_LINE_VAL_TBL
, p_old_line_val_tbl IN Line_Val_Tbl_Type :=
G_MISS_LINE_VAL_TBL
, p_Line_Adj_tbl IN Line_Adj_Tbl_Type :=
G_MISS_LINE_ADJ_TBL
, p_old_Line_Adj_tbl IN Line_Adj_Tbl_Type :=
G_MISS_LINE_ADJ_TBL
, p_Line_Adj_val_tbl IN Line_Adj_Val_Tbl_Type :=
G_MISS_LINE_ADJ_VAL_TBL
, p_old_Line_Adj_val_tbl IN Line_Adj_Val_Tbl_Type :=
G_MISS_LINE_ADJ_VAL_TBL
, p_Line_price_Att_tbl IN Line_Price_Att_Tbl_Type :=
G_MISS_LINE_PRICE_ATT_TBL
, p_old_Line_Price_Att_tbl IN Line_Price_Att_Tbl_Type :=
G_MISS_LINE_PRICE_ATT_TBL
, p_Line_Adj_Att_tbl IN Line_Adj_Att_Tbl_Type :=
G_MISS_LINE_ADJ_ATT_TBL
, p_old_Line_Adj_Att_tbl IN Line_Adj_Att_Tbl_Type :=
G_MISS_LINE_ADJ_ATT_TBL
, p_Line_Adj_Assoc_tbl IN Line_Adj_Assoc_Tbl_Type :=
G_MISS_LINE_ADJ_ASSOC_TBL
, p_old_Line_Adj_Assoc_tbl IN Line_Adj_Assoc_Tbl_Type :=
G_MISS_LINE_ADJ_ASSOC_TBL
, p_Line_Scredit_tbl IN Line_Scredit_Tbl_Type :=
G_MISS_LINE_SCREDIT_TBL
, p_old_Line_Scredit_tbl IN Line_Scredit_Tbl_Type :=
G_MISS_LINE_SCREDIT_TBL
, p_Line_Scredit_val_tbl IN Line_Scredit_Val_Tbl_Type :=
G_MISS_LINE_SCREDIT_VAL_TBL
, p_old_Line_Scredit_val_tbl IN Line_Scredit_Val_Tbl_Type :=
G_MISS_LINE_SCREDIT_VAL_TBL
, p_Lot_Serial_tbl IN Lot_Serial_Tbl_Type :=
G_MISS_LOT_SERIAL_TBL
, p_old_Lot_Serial_tbl IN Lot_Serial_Tbl_Type :=
G_MISS_LOT_SERIAL_TBL
, p_Lot_Serial_val_tbl IN Lot_Serial_Val_Tbl_Type :=
G_MISS_LOT_SERIAL_VAL_TBL
, p_old_Lot_Serial_val_tbl IN Lot_Serial_Val_Tbl_Type :=
G_MISS_LOT_SERIAL_VAL_TBL
, p_action_request_tbl     IN Request_Tbl_Type :=
                         G_MISS_REQUEST_TBL
, x_header_rec OUT Header_Rec_Type
, x_header_val_rec OUT Header_Val_Rec_Type
, x_Header_Adj_tbl OUT Header_Adj_Tbl_Type
, x_Header_Adj_val_tbl OUT Header_Adj_Val_Tbl_Type
, x_Header_price_Att_tbl OUT Header_Price_Att_Tbl_Type
, x_Header_Adj_Att_tbl OUT Header_Adj_Att_Tbl_Type
, x_Header_Adj_Assoc_tbl OUT Header_Adj_Assoc_Tbl_Type
, x_Header_Scredit_tbl OUT Header_Scredit_Tbl_Type
, x_Header_Scredit_val_tbl OUT Header_Scredit_Val_Tbl_Type
, x_line_tbl OUT Line_Tbl_Type
, x_line_val_tbl OUT Line_Val_Tbl_Type
, x_Line_Adj_tbl OUT Line_Adj_Tbl_Type
, x_Line_Adj_val_tbl OUT Line_Adj_Val_Tbl_Type
, x_Line_price_Att_tbl OUT Line_Price_Att_Tbl_Type
, x_Line_Adj_Att_tbl OUT Line_Adj_Att_Tbl_Type
, x_Line_Adj_Assoc_tbl OUT Line_Adj_Assoc_Tbl_Type
, x_Line_Scredit_tbl OUT Line_Scredit_Tbl_Type
, x_Line_Scredit_val_tbl OUT Line_Scredit_Val_Tbl_Type
, x_Lot_Serial_tbl OUT Lot_Serial_Tbl_Type
, x_Lot_Serial_val_tbl OUT Lot_Serial_Val_Tbl_Type
, x_action_request_tbl     OUT Request_Tbl_Type
--For bug 3390458
, p_rtrim_data IN Varchar2 :='N'
-- Retrieve messages
if l_msg_count > 0 then
for l_index in 1..l_msg_count loop
     l_msg_data := oe_msg_pub.get(p_msg_index => l_index, p_encoded => 'F');
end loop;
end if;
-- Check the return status
if l_return_status = FND_API.G_RET_STS_SUCCESS then
DBMS_OUTPUT.put_line ('Return Status =' || l_msg_data ||' Success ');
else
DBMS_OUTPUT.put_line ('Return Status =' || l_msg_data ||' Failure ');
end if;
exception --@1
when others then
fnd_file.put_line(fnd_file.log,' Exception others in main procedure @1
:'||sqlerrm);
end tnq_so_import_api;
Check if you can get any help from this
*** Regards
Narender