1
Download Oracle® Order Management
Transcript
Agreements Public Application Program Interface
in_price_list_line_tbl QP_PRICE_LIST_PUB.Price_List_Line_Tbl_Type;
in_price_list_line_val_tbl QP_PRICE_LIST_PUB.Price_List_Line_Val_Tbl_Type;
in_pricing_attr_tbl QP_PRICE_LIST_PUB.Pricing_Attr_Tbl_Type;
in_pricing_attr_val_tbl QP_PRICE_LIST_PUB.Pricing_Attr_Val_Tbl_Type;
out_Agreement_rec
OE_Pricing_Cont_PUB.Agreement_Rec_Type;
out_Agreement_val_rec
OE_Pricing_Cont_PUB.Agreement_Val_Rec_Type;
out_price_list_rec QP_PRICE_LIST_PUB.Price_List_Rec_Type;
out_price_list_val_rec QP_PRICE_LIST_PUB.Price_List_Val_Rec_Type;
out_price_list_line_tbl QP_PRICE_LIST_PUB.Price_List_Line_Tbl_Type;
out_price_list_line_val_tbl QP_PRICE_LIST_PUB.Price_List_Line_Val_Tbl_Type;
out_pricing_attr_tbl QP_PRICE_LIST_PUB.Pricing_Attr_Tbl_Type;
out_pricing_attr_val_tbl QP_PRICE_LIST_PUB.Pricing_Attr_Val_Tbl_Type;
K number := 1;
j number := 1;
begin
dbms_output.put_line('Creating an Agreement record');
--Creating an Agreement record
in_Agreement_rec.name :='TESTING 2001';
in_Agreement_rec.creation_date :=sysdate;
in_Agreement_rec.created_by := 1001;
in_Agreement_rec.last_update_date := sysdate;
in_Agreement_rec.last_updated_by := 9001;
in_Agreement_rec.agreement_type_code := 'STANDARD';
in_Agreement_rec.agreement_num := '88';
in_Agreement_rec.revision := '1';
in_Agreement_rec.revision_date := sysdate;
in_Agreement_rec.term_id := 1000;
in_Agreement_rec.OVERRIDE_IRULE_FLAG := 'Y';
in_Agreement_rec.OVERRIDE_ARULE_FLAG := 'Y';
in_Agreement_rec.agreement_id := FND_API.G_MISS_NUM;
in_Agreement_rec.operation
:= QP_GLOBALS.G_OPR_CREATE;
/* set the list_header_id to g_miss_num */
in_price_list_rec.list_header_id := FND_API.G_MISS_NUM;
in_price_list_rec.name := 'Sample1-1028 -8987';
in_price_list_rec.list_type_code := 'AGR';
in_price_list_rec.description := 'Sample price list 8987';
in_price_list_rec.currency_code := 'USD';
Oracle Advanced Pricing Open Interfaces 5-23
