PA_核准资金

PA 核准资金，创建完项目事件、协议、核准资金后，运行“PRC：生成单个项目的原始发票” 或“PRC：生成一个项目范围的原始发票”，可以生成应付发票。

DECLARE 
    l_err_code NUMBER;
    l_status   VARCHAR2(250);
BEGIN

    fnd_global.apps_initialize(user_id      => 0
                              ,resp_id      => 20432
                              ,resp_appl_id => 275);

    pa_baseline_funding_pkg.create_budget_baseline(p_project_id => 3001
                                                  ,x_err_code   => l_err_code
                                                  ,x_status     => l_status);

    dbms_output.put_line('l_err_code :=' || l_err_code);
    dbms_output.put_line('l_status :=' || l_status);
    dbms_output.put_line('l_msg_count :=' || fnd_msg_pub.count_msg);

    IF l_err_code <> '0' THEN
        dbms_output.put_line('error_msg = ' || l_err_code);
        IF fnd_msg_pub.count_msg >= 0 THEN
            FOR i IN 1 .. fnd_msg_pub.count_msg LOOP
                dbms_output.put_line('eror_message[' || i || ']:' || substr(fnd_msg_pub.get(fnd_msg_pub.g_next
                                                                                           ,fnd_api.g_false)
                                                                           ,1
                                                                           ,250));
            END LOOP;
        END IF;
        fnd_msg_pub.Delete_Msg;
    END IF;
END;

标签：code,err,fnd,核准,pub,put,PA,msg,资金
来源： https://blog.csdn.net/longtimetoc/article/details/111935785