129: raise;
130: end;
131:
132:
133: procedure pbc_ari (p_balance_category_id in pay_balance_categories_f.balance_category_id%type,
134: p_user_category_name_n in pay_balance_categories_f.user_category_name%type,
135: p_user_category_name_o in pay_balance_categories_f.user_category_name%type) IS
136: l_proc varchar2(30) ;
137: l_count binary_integer;
130: end;
131:
132:
133: procedure pbc_ari (p_balance_category_id in pay_balance_categories_f.balance_category_id%type,
134: p_user_category_name_n in pay_balance_categories_f.user_category_name%type,
135: p_user_category_name_o in pay_balance_categories_f.user_category_name%type) IS
136: l_proc varchar2(30) ;
137: l_count binary_integer;
138:
131:
132:
133: procedure pbc_ari (p_balance_category_id in pay_balance_categories_f.balance_category_id%type,
134: p_user_category_name_n in pay_balance_categories_f.user_category_name%type,
135: p_user_category_name_o in pay_balance_categories_f.user_category_name%type) IS
136: l_proc varchar2(30) ;
137: l_count binary_integer;
138:
139: begin
154:
155: end;
156:
157:
158: procedure pbc_brd (p_balance_category_id in pay_balance_categories_f.balance_category_id%type) IS
159: l_proc varchar2(30) ;
160: l_count binary_integer;
161: begin
162: l_proc := 'pbc_brd' ;
174: end;
175:
176: procedure pbc_asi IS
177: l_proc varchar2(30) ;
178: cursor c_pbc ( p_balance_category_id pay_balance_categories_f.balance_category_id%type)
179: is
180: select 1
181: from pay_balance_categories_f b
182: where b.balance_category_id = p_balance_category_id
177: l_proc varchar2(30) ;
178: cursor c_pbc ( p_balance_category_id pay_balance_categories_f.balance_category_id%type)
179: is
180: select 1
181: from pay_balance_categories_f b
182: where b.balance_category_id = p_balance_category_id
183: and not exists
184: -- this is the first insert ; there is no corresponding row in tl table
185: ( select 1
182: where b.balance_category_id = p_balance_category_id
183: and not exists
184: -- this is the first insert ; there is no corresponding row in tl table
185: ( select 1
186: from pay_balance_categories_f_tl tl
187: where tl.balance_category_id = p_balance_category_id ) ;
188: rec_pbc c_pbc%rowtype;
189: begin
190: l_proc := 'pbc_asi' ;
211:
212:
213: procedure pbc_asd IS
214: l_proc varchar2(30) ;
215: cursor c_pbc_del ( p_balance_category_id pay_balance_categories_f.balance_category_id%type )
216: is
217: select 1
218: from pay_balance_categories_f_tl p
219: where p.balance_category_id = p_balance_category_id
214: l_proc varchar2(30) ;
215: cursor c_pbc_del ( p_balance_category_id pay_balance_categories_f.balance_category_id%type )
216: is
217: select 1
218: from pay_balance_categories_f_tl p
219: where p.balance_category_id = p_balance_category_id
220: and not exists
221: ( select 1
222: from pay_balance_categories_f p1
218: from pay_balance_categories_f_tl p
219: where p.balance_category_id = p_balance_category_id
220: and not exists
221: ( select 1
222: from pay_balance_categories_f p1
223: where p1.balance_category_id = p_balance_category_id
224:
225: );
226: rec_pbc c_pbc_del%rowtype;