zoukankan      html  css  js  c++  java
  • Oracle AP更新供应商

    /*l_return_status:S
    l_msg_count:0
    l_msg_data:
    l_vendor_id:133003
    l_party_id:236055
     */
    DECLARE
       l_return_status VARCHAR2(1);
       l_msg_count     NUMBER;
       l_msg_data      VARCHAR2(1000);
       l_vendor_rec    ap_vendor_pub_pkg.r_vendor_rec_type;
       l_vendor_id     NUMBER;
       l_party_id      NUMBER;
    BEGIN
       fnd_global.apps_initialize(167050728200);
       mo_global.init('SQLAP');
       --
       l_vendor_rec.vendor_name             := 'DDDDD';
       l_vendor_rec.enabled_flag            := 'Y';
       l_vendor_rec.vendor_type_lookup_code := 'VENDOR';
       l_vendor_rec.vat_code                := 'CN_VAT_IN_17';
       l_vendor_rec.vat_registration_num    := '12332111';
    
       --- hz_organization_profiles.incorp_year
       ap_vendor_pub_pkg.update_vendor(p_api_version      => 1.0,
                                       p_init_msg_list    => fnd_api.g_true,
                                       p_commit           => fnd_api.g_false,
                                       p_validation_level => fnd_api.g_valid_level_full,
                                       x_return_status    => l_return_status,
                                       x_msg_count        => l_msg_count,
                                       x_msg_data         => l_msg_data,
                                       p_vendor_rec       => l_vendor_rec,
                                       x_vendor_id        => l_vendor_id);
       dbms_output.put_line('l_return_status:' || l_return_status);
       dbms_output.put_line('l_msg_count:' || l_msg_count);
       dbms_output.put_line('l_msg_data:' || l_msg_data);
       dbms_output.put_line('l_vendor_id:' || l_vendor_id);
       dbms_output.put_line('l_party_id:' || l_party_id);
       dbms_output.put_line(fnd_msg_pub.get_detail(1'F'));
    END; 
    土豆君
  • 相关阅读:
    望图知意BlogPatrol又挂了
    看你知道不知道之-制作数据字典
    mount: none already mounted or /cgroup busy
    [zz]OpenStack中虚拟机的监控
    guestfs
    Ubuntu 10.04 wine 中运行某个门
    [zz]Wine完全使用指南——从基本到高级
    [zz]史上最快消息内核——ZeroMQ
    [zz]OpenStack Compute(Nova)功能分析
    [zz][技术] 完美使用 WINE 来运行 RTX ,QQ
  • 原文地址:https://www.cnblogs.com/jenrry/p/10006808.html
Copyright © 2011-2022 走看看