PACKAGE BODY: APPS.CN_CONC_PRG

Source

1 PACKAGE BODY cn_conc_prg AS
2 -- $Header: cncpsubb.pls 115.2 99/07/16 07:05:39 porting shi $
3   PROCEDURE submit_request (x_ruleset_id   IN   cn_rulesets.ruleset_id%TYPE,
4                             x_spool_path   IN   VARCHAR2,
5                             x_request_id    OUT  NUMBER) IS
6 
7     l_request_id                 NUMBER;
8 
9   BEGIN
10     l_request_id := FND_REQUEST.SUBMIT_REQUEST('CN', 'CN_CL_RULES_INSTALL',
11                          '', '', FALSE,
12                          x_spool_path||'cn_clsfn_'||to_char(x_ruleset_id),
13                          to_char(x_ruleset_id), chr(0),
14                          '', '', '', '', '', '', '', '', '', '',
15                          '', '', '', '', '', '', '', '', '', '',
16                          '', '', '', '', '', '', '', '', '', '',
17                          '', '', '', '', '', '', '', '', '', '',
18                          '', '', '', '', '', '', '', '', '', '',
19                          '', '', '', '', '', '', '', '', '', '',
20                          '', '', '', '', '', '', '', '', '', '',
21                          '', '', '', '', '', '', '', '', '', '',
22                          '', '', '', '', '', '', '', '', '', '',
23                          '', '', '', '', '', '', '');
24     IF l_request_id <> 0 THEN
25       commit;
26     END IF;
27     x_request_id := l_request_id;
28   END submit_request;
29 END cn_conc_prg;