Oracle EBS 提交子请求

示例来源于MOS，按需修改使用。

源码：

CREATE OR REPLACE PROCEDURE parent2 (   errbuf  OUT VARCHAR2,   retcode OUT NUMBER ) IS   i        NUMBER;   req_data VARCHAR2(10);   r        NUMBER; BEGIN   --   -- Read the value from REQUEST_DATA.  If this is the   -- first run of the program, then this value will be   -- null.   -- Otherwise, this will be the value that we passed to   -- SET_REQ_GLOBALS on the previous run.   --   req_data := fnd_conc_global.request_data;   --   -- If this is the first run, we'll set i = 1.   -- Otherwise, we'll set i = request_data + 1, and we'll   -- exit if we're done.   --   IF (req_data IS NOT NULL) THEN     i := to_number(req_data);     i := i + 1;     IF (i < 1