Price List 使用API导入Demo

PriceList导入有一些需要注意的地方，有些字段如果不赋值，请给他对应的系统默认值，例如行表上的LIST_LINE_NO字段，如果没有指定值，写成：

v_pricing_attr_tbl(1) :=FND_API.G_MISS_CHAR;否则在程序中会报主键唯一的错误，需要你人为给它一个值.

如果要导入attribute，由于界面行视图qp_list_lines_v是由qp_list_lines，qp_pricing_attributes两表关联。导入时，需要先导入两条attribute,只是一条attribute中的pricing_attribute_context,pricing_attribute,pricing_attr_value_from,pricing_attr_value_to,pricing_attribute_datatype,comparison_operator_code为空，表示给行使用。

SET SERVEROUTPUT ON;/*beginfnd_global.APPS_INITIALIZE(user_id=> 0,resp_id => 50702,resp_appl_id =>660 );  mo_global.init('M');end;*/DECLARE  v_return_status             VARCHAR2(1) := NULL;  v_msg_count                 NUMBER      := 0;  v_msg_data                  VARCHAR2 (2000);  v_price_list_rec            qp_price_list_pub.price_list_rec_type;  v_price_list_val_rec        qp_price_list_pub.price_list_val_rec_type;  v_price_list_line_tbl       qp_price_list_pub.price_list_line_tbl_type;  v_price_list_line_val_tbl   qp_price_list_pub.price_list_line_val_tbl_type;  v_qualifiers_tbl            qp_qualifier_rules_pub.qualifiers_tbl_type;  v_qualifiers_val_tbl        qp_qualifier_rules_pub.qualifiers_val_tbl_type;  v_pricing_attr_tbl          qp_price_list_pub.pricing_attr_tbl_type;  v_pricing_attr_val_tbl      qp_price_list_pub.pricing_attr_val_tbl_type;  ppr_price_list_rec          qp_price_list_pub.price_list_rec_type;  ppr_price_list_val_rec      qp_price_list_pub.price_list_val_rec_type;  ppr_price_list_line_tbl     qp_price_list_pub.price_list_line_tbl_type;  ppr_price_list_line_val_tbl qp_price_list_pub.price_list_line_val_tbl_type;  ppr_qualifiers_tbl          qp_qualifier_rules_pub.qualifiers_tbl_type;  ppr_qualifiers_val_tbl      qp_qualifier_rules_pub.qualifiers_val_tbl_type;  ppr_pricing_attr_tbl        qp_price_list_pub.pricing_attr_tbl_type;  ppr_pricing_attr_val_tbl    qp_price_list_pub.pricing_attr_val_tbl_type;BEGIN  fnd_global.APPS_INITIALIZE(user_id=> 2411,resp_id => 51081,resp_appl_id =>20003 );    v_price_list_rec.list_header_id             := qp_list_headers_b_s.nextval;  v_price_list_rec.name := 'rer11';  v_price_list_rec.currency_code := 'USD';  v_price_list_rec.list_type_code             := 'PRL';  v_price_list_rec.operation                  := 'CREATE';--qp_globals.g_opr_create;  v_price_list_rec.ROUNDING_FACTOR := -2;  v_price_list_rec.CURRENCY_HEADER_ID := 7004;  v_price_list_rec.GLOBAL_FLAG := 'N';  v_price_list_rec.ACTIVE_FLAG := 'Y';  v_price_list_rec.SOURCE_SYSTEM_CODE := 'QP';  v_price_list_rec.PTE_CODE := 'ORDFUL';     v_price_list_line_tbl(1).list_header_id     := qp_list_headers_b_s.currval;  v_price_list_line_tbl(1).list_line_id       := qp_list_lines_s.nextval;  v_price_list_line_tbl(1).list_line_type_code:= 'PLL';  v_price_list_line_tbl(1).operation          := 'CREATE';--qp_globals.g_opr_create;  v_price_list_line_tbl(1).operand            := 10;  v_price_list_line_tbl(1).arithmetic_operator:= 'UNIT_PRICE';  v_price_list_line_tbl(1).start_date_active  := sysdate;  v_price_list_line_tbl(1).PRIMARY_UOM_FLAG := 'Y';  v_price_list_line_tbl(1).ARITHMETIC_OPERATOR := 'UNIT_PRICE';  v_price_list_line_tbl(1).MODIFIER_LEVEL_CODE := 'LINE';  v_price_list_line_tbl(1).AUTOMATIC_FLAG := 'Y';  v_price_list_line_tbl(1).LIST_LINE_NO := 1;   v_pricing_attr_tbl(1).pricing_attribute_id  := qp_pricing_attributes_s.nextval;  v_pricing_attr_tbl(1).list_line_id          := qp_list_lines_s.currval;  v_pricing_attr_tbl(1).product_attribute_context := 'ITEM';  v_pricing_attr_tbl(1).product_attribute     := 'PRICING_ATTRIBUTE1';  v_pricing_attr_tbl(1).product_attr_value    := '55775';  v_pricing_attr_tbl(1).product_uom_code      := 'UN';     v_pricing_attr_tbl(1).excluder_flag         := 'N';   v_pricing_attr_tbl(1).attribute_grouping_no := 1;  v_pricing_attr_tbl(1).price_list_line_index := 1;  v_pricing_attr_tbl(1).operation             := 'CREATE';--qp_globals.g_opr_create;  v_pricing_attr_tbl(1).pricing_attribute_context := 'OTA';  v_pricing_attr_tbl(1).pricing_attribute := 'PRICING_ATTRIBUTE1';  v_pricing_attr_tbl(1).pricing_attr_value_from := 1;  v_pricing_attr_tbl(1).pricing_attr_value_to := 2;  v_pricing_attr_tbl(1).pricing_phase_id := 1;  --------------------------------------------------------------------------  /*v_pricing_attr_tbl(2).pricing_attribute_id  := qp_pricing_attributes_s.nextval;  v_pricing_attr_tbl(2).list_line_id          := qp_list_lines_s.currval;  v_pricing_attr_tbl(2).product_attribute_context := 'ITEM';  v_pricing_attr_tbl(2).product_attribute     := 'PRICING_ATTRIBUTE1';  v_pricing_attr_tbl(2).product_attr_value    := '2600';  v_pricing_attr_tbl(2).product_uom_code      := 'Ea';     v_pricing_attr_tbl(2).excluder_flag         := 'N';   v_pricing_attr_tbl(2).attribute_grouping_no := 1;  v_pricing_attr_tbl(2).price_list_line_index := 1;  v_pricing_attr_tbl(2).operation             := 'CREATE';--qp_globals.g_opr_create;  v_pricing_attr_tbl(2).pricing_attribute_context := 'OTA';  v_pricing_attr_tbl(2).pricing_attribute := 'PRICING_ATTRIBUTE1';  v_pricing_attr_tbl(2).pricing_attr_value_from := 1;  v_pricing_attr_tbl(2).pricing_attr_value_to := 2;*/  ----------------------------------------------------------------------------  v_pricing_attr_tbl(2).pricing_attribute_id  := qp_pricing_attributes_s.nextval;  v_pricing_attr_tbl(2).list_line_id          := qp_list_lines_s.currval;  v_pricing_attr_tbl(2).product_attribute_context := 'ITEM';  v_pricing_attr_tbl(2).product_attribute     := 'PRICING_ATTRIBUTE1';  v_pricing_attr_tbl(2).product_attr_value    := '55775';  v_pricing_attr_tbl(2).product_uom_code      := 'UN';     v_pricing_attr_tbl(2).excluder_flag         := 'N';   v_pricing_attr_tbl(2).attribute_grouping_no := 1;  v_pricing_attr_tbl(2).price_list_line_index := 1;  v_pricing_attr_tbl(2).operation             := 'CREATE';--qp_globals.g_opr_create;  v_pricing_attr_tbl(1).pricing_phase_id := 1;     dbms_output.put_line('Calling API to Enter Item Into Price List');   qp_price_list_pub.process_price_list      (       p_api_version_number => 1      ,p_init_msg_list      => fnd_api.g_true      ,p_return_values      => fnd_api.g_false      ,p_commit             => fnd_api.g_false      ,x_return_status      => v_return_status      ,x_msg_count          => v_msg_count      ,x_msg_data           => v_msg_data      ,p_price_list_rec     => v_price_list_rec      ,p_price_list_line_tbl=> v_price_list_line_tbl      ,p_pricing_attr_tbl   => v_pricing_attr_tbl      ,x_price_list_rec     => ppr_price_list_rec      ,x_price_list_val_rec => ppr_price_list_val_rec      ,x_price_list_line_tbl=> ppr_price_list_line_tbl      ,x_qualifiers_tbl     => ppr_qualifiers_tbl      ,x_qualifiers_val_tbl => ppr_qualifiers_val_tbl      ,x_pricing_attr_tbl   => ppr_pricing_attr_tbl      ,x_pricing_attr_val_tbl    => ppr_pricing_attr_val_tbl      ,x_price_list_line_val_tbl => ppr_price_list_line_val_tbl      );      DBMS_OUTPUT.PUT_LINE(v_return_status);    IF v_return_status = fnd_api.g_ret_sts_success THEN      --COMMIT;      DBMS_OUTPUT.put_line ('The Item loading into the price list is Sucessfull');    ELSE      DBMS_OUTPUT.put_line ('The Item loading into the price list Failed');      ROLLBACK;      FOR i IN 1 .. v_msg_count      LOOP        v_msg_data := oe_msg_pub.get( p_msg_index => i, p_encoded => 'F');        dbms_output.put_line( i|| ') '|| v_msg_data);      END LOOP;    END IF; END;