[Home] [Help]
PACKAGE BODY: APPS.FUN_RULE_DETAILS_PUB_W
Source
1 package body fun_rule_details_pub_w as
2 /* $Header: FUNXTMRULRDTRWB.pls 120.0 2005/06/20 04:30:03 ammishra noship $ */
3 procedure create_rule_detail(p_init_msg_list VARCHAR2
4 , p1_a0 NUMBER
5 , p1_a1 NUMBER
6 , p1_a2 VARCHAR2
7 , p1_a3 NUMBER
8 , p1_a4 VARCHAR2
9 , p1_a5 VARCHAR2
10 , p1_a6 NUMBER
11 , p1_a7 VARCHAR2
12 , p1_a8 DATE
13 , p1_a9 NUMBER
14 , p1_a10 DATE
15 , p1_a11 NUMBER
16 , p1_a12 NUMBER
17 , p1_a13 VARCHAR2
18 , x_rule_detail_id out nocopy NUMBER
19 , x_return_status out nocopy VARCHAR2
20 , x_msg_count out nocopy NUMBER
21 , x_msg_data out nocopy VARCHAR2
22 )
23
24 as
25 ddp_rule_detail_rec fun_rule_details_pub.rule_details_rec_type;
26 ddindx binary_integer; indx binary_integer;
27 begin
28
29 -- copy data to the local IN or IN-OUT args, if any
30
31 ddp_rule_detail_rec.rule_detail_id := p1_a0;
32 ddp_rule_detail_rec.rule_object_id := p1_a1;
33 ddp_rule_detail_rec.rule_name := p1_a2;
34 ddp_rule_detail_rec.seq := p1_a3;
35 ddp_rule_detail_rec.operator := p1_a4;
36 ddp_rule_detail_rec.enabled_flag := p1_a5;
37 ddp_rule_detail_rec.result_application_id := p1_a6;
38 ddp_rule_detail_rec.result_value := p1_a7;
39 ddp_rule_detail_rec.creation_date := p1_a8;
40 ddp_rule_detail_rec.created_by := p1_a9;
41 ddp_rule_detail_rec.last_update_date := p1_a10;
42 ddp_rule_detail_rec.last_updated_by := p1_a11;
43 ddp_rule_detail_rec.last_update_login := p1_a12;
44 ddp_rule_detail_rec.created_by_module := p1_a13;
45
46
47
48
49
50 -- here's the delegated call to the old PL/SQL routine
51 fun_rule_details_pub.create_rule_detail(p_init_msg_list,
52 ddp_rule_detail_rec,
53 x_rule_detail_id,
54 x_return_status,
55 x_msg_count,
56 x_msg_data);
57
58 -- copy data back from the local variables to OUT or IN-OUT args, if any
59
60
61
62
63
64 end;
65
66 procedure update_rule_detail(p_init_msg_list VARCHAR2
67 , p1_a0 NUMBER
68 , p1_a1 NUMBER
69 , p1_a2 VARCHAR2
70 , p1_a3 NUMBER
71 , p1_a4 VARCHAR2
72 , p1_a5 VARCHAR2
73 , p1_a6 NUMBER
74 , p1_a7 VARCHAR2
75 , p1_a8 DATE
76 , p1_a9 NUMBER
77 , p1_a10 DATE
78 , p1_a11 NUMBER
79 , p1_a12 NUMBER
80 , p1_a13 VARCHAR2
81 , p_object_version_number in out nocopy NUMBER
82 , x_return_status out nocopy VARCHAR2
83 , x_msg_count out nocopy NUMBER
84 , x_msg_data out nocopy VARCHAR2
85 )
86
87 as
88 ddp_rule_detail_rec fun_rule_details_pub.rule_details_rec_type;
89 ddindx binary_integer; indx binary_integer;
90 begin
91
92 -- copy data to the local IN or IN-OUT args, if any
93
94 ddp_rule_detail_rec.rule_detail_id := p1_a0;
95 ddp_rule_detail_rec.rule_object_id := p1_a1;
96 ddp_rule_detail_rec.rule_name := p1_a2;
97 ddp_rule_detail_rec.seq := p1_a3;
98 ddp_rule_detail_rec.operator := p1_a4;
99 ddp_rule_detail_rec.enabled_flag := p1_a5;
100 ddp_rule_detail_rec.result_application_id := p1_a6;
101 ddp_rule_detail_rec.result_value := p1_a7;
102 ddp_rule_detail_rec.creation_date := p1_a8;
103 ddp_rule_detail_rec.created_by := p1_a9;
104 ddp_rule_detail_rec.last_update_date := p1_a10;
105 ddp_rule_detail_rec.last_updated_by := p1_a11;
106 ddp_rule_detail_rec.last_update_login := p1_a12;
107 ddp_rule_detail_rec.created_by_module := p1_a13;
108
109
110
111
112
113 -- here's the delegated call to the old PL/SQL routine
114 fun_rule_details_pub.update_rule_detail(p_init_msg_list,
115 ddp_rule_detail_rec,
116 p_object_version_number,
117 x_return_status,
118 x_msg_count,
119 x_msg_data);
120
121 -- copy data back from the local variables to OUT or IN-OUT args, if any
122
123
124
125
126
127 end;
128
129 procedure get_rule_detail_rec(p_init_msg_list VARCHAR2
130 , p_rule_detail_id NUMBER
131 , p_rule_object_id NUMBER
132 , p3_a0 out nocopy NUMBER
133 , p3_a1 out nocopy NUMBER
134 , p3_a2 out nocopy VARCHAR2
135 , p3_a3 out nocopy NUMBER
136 , p3_a4 out nocopy VARCHAR2
137 , p3_a5 out nocopy VARCHAR2
138 , p3_a6 out nocopy NUMBER
139 , p3_a7 out nocopy VARCHAR2
140 , p3_a8 out nocopy DATE
141 , p3_a9 out nocopy NUMBER
142 , p3_a10 out nocopy DATE
143 , p3_a11 out nocopy NUMBER
144 , p3_a12 out nocopy NUMBER
145 , p3_a13 out nocopy VARCHAR2
146 , x_return_status out nocopy VARCHAR2
147 , x_msg_count out nocopy NUMBER
148 , x_msg_data out nocopy VARCHAR2
149 )
150
151 as
152 ddx_rule_detail_rec fun_rule_details_pub.rule_details_rec_type;
153 ddindx binary_integer; indx binary_integer;
154 begin
155
156 -- copy data to the local IN or IN-OUT args, if any
157
158
159
160
161
162
163
164 -- here's the delegated call to the old PL/SQL routine
165 fun_rule_details_pub.get_rule_detail_rec(p_init_msg_list,
166 p_rule_detail_id,
167 p_rule_object_id,
168 ddx_rule_detail_rec,
169 x_return_status,
170 x_msg_count,
171 x_msg_data);
172
173 -- copy data back from the local variables to OUT or IN-OUT args, if any
174
175
176
177 p3_a0 := ddx_rule_detail_rec.rule_detail_id;
178 p3_a1 := ddx_rule_detail_rec.rule_object_id;
179 p3_a2 := ddx_rule_detail_rec.rule_name;
180 p3_a3 := ddx_rule_detail_rec.seq;
181 p3_a4 := ddx_rule_detail_rec.operator;
182 p3_a5 := ddx_rule_detail_rec.enabled_flag;
183 p3_a6 := ddx_rule_detail_rec.result_application_id;
184 p3_a7 := ddx_rule_detail_rec.result_value;
185 p3_a8 := ddx_rule_detail_rec.creation_date;
186 p3_a9 := ddx_rule_detail_rec.created_by;
187 p3_a10 := ddx_rule_detail_rec.last_update_date;
188 p3_a11 := ddx_rule_detail_rec.last_updated_by;
189 p3_a12 := ddx_rule_detail_rec.last_update_login;
190 p3_a13 := ddx_rule_detail_rec.created_by_module;
191
192
193
194 end;
195
196 end fun_rule_details_pub_w;