147: SELECT category_flex_structure
148: INTO h_cat_struct_id
149: FROM fa_system_controls;
150:
151: fnd_message.set_name('OFA','FA_ASSET_MAINT_PURARG_LIST');
152: fnd_message.set_token('SCHID', argument1, FALSE);
153: fnd_message.set_token('FROM_ASSET', argument2, FALSE);
154: fnd_message.set_token('TO_ASSET', argument3,FALSE);
155: fnd_message.set_token('FROM_DATE', fnd_date.date_to_chardate(
148: INTO h_cat_struct_id
149: FROM fa_system_controls;
150:
151: fnd_message.set_name('OFA','FA_ASSET_MAINT_PURARG_LIST');
152: fnd_message.set_token('SCHID', argument1, FALSE);
153: fnd_message.set_token('FROM_ASSET', argument2, FALSE);
154: fnd_message.set_token('TO_ASSET', argument3,FALSE);
155: fnd_message.set_token('FROM_DATE', fnd_date.date_to_chardate(
156: fnd_date.canonical_to_date(argument4)),FALSE);
149: FROM fa_system_controls;
150:
151: fnd_message.set_name('OFA','FA_ASSET_MAINT_PURARG_LIST');
152: fnd_message.set_token('SCHID', argument1, FALSE);
153: fnd_message.set_token('FROM_ASSET', argument2, FALSE);
154: fnd_message.set_token('TO_ASSET', argument3,FALSE);
155: fnd_message.set_token('FROM_DATE', fnd_date.date_to_chardate(
156: fnd_date.canonical_to_date(argument4)),FALSE);
157: fnd_message.set_token('TO_DATE', fnd_date.date_to_chardate(
150:
151: fnd_message.set_name('OFA','FA_ASSET_MAINT_PURARG_LIST');
152: fnd_message.set_token('SCHID', argument1, FALSE);
153: fnd_message.set_token('FROM_ASSET', argument2, FALSE);
154: fnd_message.set_token('TO_ASSET', argument3,FALSE);
155: fnd_message.set_token('FROM_DATE', fnd_date.date_to_chardate(
156: fnd_date.canonical_to_date(argument4)),FALSE);
157: fnd_message.set_token('TO_DATE', fnd_date.date_to_chardate(
158: fnd_date.canonical_to_date(argument5)),FALSE);
151: fnd_message.set_name('OFA','FA_ASSET_MAINT_PURARG_LIST');
152: fnd_message.set_token('SCHID', argument1, FALSE);
153: fnd_message.set_token('FROM_ASSET', argument2, FALSE);
154: fnd_message.set_token('TO_ASSET', argument3,FALSE);
155: fnd_message.set_token('FROM_DATE', fnd_date.date_to_chardate(
156: fnd_date.canonical_to_date(argument4)),FALSE);
157: fnd_message.set_token('TO_DATE', fnd_date.date_to_chardate(
158: fnd_date.canonical_to_date(argument5)),FALSE);
159: -- fa_rx_shared_pkg.concat_category(h_cat_struct_id,to_number(argument6),
153: fnd_message.set_token('FROM_ASSET', argument2, FALSE);
154: fnd_message.set_token('TO_ASSET', argument3,FALSE);
155: fnd_message.set_token('FROM_DATE', fnd_date.date_to_chardate(
156: fnd_date.canonical_to_date(argument4)),FALSE);
157: fnd_message.set_token('TO_DATE', fnd_date.date_to_chardate(
158: fnd_date.canonical_to_date(argument5)),FALSE);
159: -- fa_rx_shared_pkg.concat_category(h_cat_struct_id,to_number(argument6),
160: -- h_concat_string,h_cat_segs);
161: fnd_message.set_token('CAT',argument6,FALSE);
157: fnd_message.set_token('TO_DATE', fnd_date.date_to_chardate(
158: fnd_date.canonical_to_date(argument5)),FALSE);
159: -- fa_rx_shared_pkg.concat_category(h_cat_struct_id,to_number(argument6),
160: -- h_concat_string,h_cat_segs);
161: fnd_message.set_token('CAT',argument6,FALSE);
162: fnd_message.set_token('STAT',argument7,FALSE);
163: h_mesg_str := fnd_message.get;
164: fa_rx_conc_mesg_pkg.log(h_mesg_str);
165: fa_rx_conc_mesg_pkg.log('');
158: fnd_date.canonical_to_date(argument5)),FALSE);
159: -- fa_rx_shared_pkg.concat_category(h_cat_struct_id,to_number(argument6),
160: -- h_concat_string,h_cat_segs);
161: fnd_message.set_token('CAT',argument6,FALSE);
162: fnd_message.set_token('STAT',argument7,FALSE);
163: h_mesg_str := fnd_message.get;
164: fa_rx_conc_mesg_pkg.log(h_mesg_str);
165: fa_rx_conc_mesg_pkg.log('');
166:
159: -- fa_rx_shared_pkg.concat_category(h_cat_struct_id,to_number(argument6),
160: -- h_concat_string,h_cat_segs);
161: fnd_message.set_token('CAT',argument6,FALSE);
162: fnd_message.set_token('STAT',argument7,FALSE);
163: h_mesg_str := fnd_message.get;
164: fa_rx_conc_mesg_pkg.log(h_mesg_str);
165: fa_rx_conc_mesg_pkg.log('');
166:
167:
178: h_to_asset_number := argument3;
179: h_arg_exist := TRUE;
180: elsif ((argument2 is NULL and argument3 is not NULL) or
181: (argument2 is not NULL and argument3 is NULL)) then
182: fnd_message.set_name('OFA','FA_ASSET_MAINT_WRONG_PARAM');
183: h_mesg_str := fnd_message.get;
184: fa_rx_conc_mesg_pkg.log(h_mesg_str);
185: fa_rx_conc_mesg_pkg.log('');
186: fa_rx_conc_mesg_pkg.out(h_mesg_str);
179: h_arg_exist := TRUE;
180: elsif ((argument2 is NULL and argument3 is not NULL) or
181: (argument2 is not NULL and argument3 is NULL)) then
182: fnd_message.set_name('OFA','FA_ASSET_MAINT_WRONG_PARAM');
183: h_mesg_str := fnd_message.get;
184: fa_rx_conc_mesg_pkg.log(h_mesg_str);
185: fa_rx_conc_mesg_pkg.log('');
186: fa_rx_conc_mesg_pkg.out(h_mesg_str);
187: fa_rx_conc_mesg_pkg.out('');
195: h_to_date := fnd_date.canonical_to_date(argument5);
196: h_arg_exist := TRUE;
197: elsif ((argument4 is NULL and argument5 is not NULL) or
198: (argument4 is not NULL and argument5 is NULL)) then
199: fnd_message.set_name('OFA','FA_ASSET_MAINT_WRONG_PARAM');
200: h_mesg_str := fnd_message.get;
201: fa_rx_conc_mesg_pkg.log(h_mesg_str);
202: fa_rx_conc_mesg_pkg.log('');
203: fa_rx_conc_mesg_pkg.out(h_mesg_str);
196: h_arg_exist := TRUE;
197: elsif ((argument4 is NULL and argument5 is not NULL) or
198: (argument4 is not NULL and argument5 is NULL)) then
199: fnd_message.set_name('OFA','FA_ASSET_MAINT_WRONG_PARAM');
200: h_mesg_str := fnd_message.get;
201: fa_rx_conc_mesg_pkg.log(h_mesg_str);
202: fa_rx_conc_mesg_pkg.log('');
203: fa_rx_conc_mesg_pkg.out(h_mesg_str);
204: fa_rx_conc_mesg_pkg.out('');
216: h_arg_exist := TRUE;
217: end if;
218:
219: if (NOT h_arg_exist) then
220: fnd_message.set_name('OFA','FA_ASSET_MAINT_WRONG_PARAM');
221: h_mesg_str := fnd_message.get;
222: fa_rx_conc_mesg_pkg.log(h_mesg_str);
223: fa_rx_conc_mesg_pkg.log('');
224: fa_rx_conc_mesg_pkg.out(h_mesg_str);
217: end if;
218:
219: if (NOT h_arg_exist) then
220: fnd_message.set_name('OFA','FA_ASSET_MAINT_WRONG_PARAM');
221: h_mesg_str := fnd_message.get;
222: fa_rx_conc_mesg_pkg.log(h_mesg_str);
223: fa_rx_conc_mesg_pkg.log('');
224: fa_rx_conc_mesg_pkg.out(h_mesg_str);
225: fa_rx_conc_mesg_pkg.out('');
246: and ad.asset_category_id = nvl(h_category_id,ad.asset_category_id)
247: and ad.asset_id = me.asset_id);
248:
249:
250: fnd_message.set_name('OFA', 'FA_SHARED_END_SUCCESS');
251: fnd_message.set_token('PROGRAM',h_progname,FALSE);
252: h_mesg_str := fnd_message.get;
253: fa_rx_conc_mesg_pkg.log(h_mesg_str);
254: fa_rx_conc_mesg_pkg.log('');
247: and ad.asset_id = me.asset_id);
248:
249:
250: fnd_message.set_name('OFA', 'FA_SHARED_END_SUCCESS');
251: fnd_message.set_token('PROGRAM',h_progname,FALSE);
252: h_mesg_str := fnd_message.get;
253: fa_rx_conc_mesg_pkg.log(h_mesg_str);
254: fa_rx_conc_mesg_pkg.log('');
255: fa_rx_conc_mesg_pkg.out(h_mesg_str);
248:
249:
250: fnd_message.set_name('OFA', 'FA_SHARED_END_SUCCESS');
251: fnd_message.set_token('PROGRAM',h_progname,FALSE);
252: h_mesg_str := fnd_message.get;
253: fa_rx_conc_mesg_pkg.log(h_mesg_str);
254: fa_rx_conc_mesg_pkg.log('');
255: fa_rx_conc_mesg_pkg.out(h_mesg_str);
256:
260: when prog_failed then
261: if (savepoint_set) then
262: rollback to savepoint asset_maint;
263: end if;
264: fnd_message.set_name('OFA', 'FA_SHARED_END_WITH_ERROR');
265: fnd_message.set_token('PROGRAM',h_progname,FALSE);
266: h_mesg_str := fnd_message.get;
267: fa_rx_conc_mesg_pkg.log(h_mesg_str);
268: fa_rx_conc_mesg_pkg.out(h_mesg_str);
261: if (savepoint_set) then
262: rollback to savepoint asset_maint;
263: end if;
264: fnd_message.set_name('OFA', 'FA_SHARED_END_WITH_ERROR');
265: fnd_message.set_token('PROGRAM',h_progname,FALSE);
266: h_mesg_str := fnd_message.get;
267: fa_rx_conc_mesg_pkg.log(h_mesg_str);
268: fa_rx_conc_mesg_pkg.out(h_mesg_str);
269: retcode := 2;
262: rollback to savepoint asset_maint;
263: end if;
264: fnd_message.set_name('OFA', 'FA_SHARED_END_WITH_ERROR');
265: fnd_message.set_token('PROGRAM',h_progname,FALSE);
266: h_mesg_str := fnd_message.get;
267: fa_rx_conc_mesg_pkg.log(h_mesg_str);
268: fa_rx_conc_mesg_pkg.out(h_mesg_str);
269: retcode := 2;
270:
271: when others then
272: if (savepoint_set) then
273: rollback to savepoint asset_maint;
274: end if;
275: fnd_message.set_name('OFA',h_mesg_name);
276: fnd_message.set_token('TABLE','FA_MAINT_EVENTS',FALSE);
277: h_mesg_str := fnd_message.get;
278: fa_rx_conc_mesg_pkg.log(h_mesg_str);
279: fa_rx_conc_mesg_pkg.log('');
272: if (savepoint_set) then
273: rollback to savepoint asset_maint;
274: end if;
275: fnd_message.set_name('OFA',h_mesg_name);
276: fnd_message.set_token('TABLE','FA_MAINT_EVENTS',FALSE);
277: h_mesg_str := fnd_message.get;
278: fa_rx_conc_mesg_pkg.log(h_mesg_str);
279: fa_rx_conc_mesg_pkg.log('');
280:
273: rollback to savepoint asset_maint;
274: end if;
275: fnd_message.set_name('OFA',h_mesg_name);
276: fnd_message.set_token('TABLE','FA_MAINT_EVENTS',FALSE);
277: h_mesg_str := fnd_message.get;
278: fa_rx_conc_mesg_pkg.log(h_mesg_str);
279: fa_rx_conc_mesg_pkg.log('');
280:
281: fnd_message.set_name('OFA', 'FA_SHARED_END_WITH_ERROR');
277: h_mesg_str := fnd_message.get;
278: fa_rx_conc_mesg_pkg.log(h_mesg_str);
279: fa_rx_conc_mesg_pkg.log('');
280:
281: fnd_message.set_name('OFA', 'FA_SHARED_END_WITH_ERROR');
282: fnd_message.set_token('PROGRAM',h_progname,FALSE);
283: h_mesg_str := fnd_message.get;
284: fa_rx_conc_mesg_pkg.log(h_mesg_str);
285: fa_rx_conc_mesg_pkg.out(h_mesg_str);
278: fa_rx_conc_mesg_pkg.log(h_mesg_str);
279: fa_rx_conc_mesg_pkg.log('');
280:
281: fnd_message.set_name('OFA', 'FA_SHARED_END_WITH_ERROR');
282: fnd_message.set_token('PROGRAM',h_progname,FALSE);
283: h_mesg_str := fnd_message.get;
284: fa_rx_conc_mesg_pkg.log(h_mesg_str);
285: fa_rx_conc_mesg_pkg.out(h_mesg_str);
286: retcode := 2;
279: fa_rx_conc_mesg_pkg.log('');
280:
281: fnd_message.set_name('OFA', 'FA_SHARED_END_WITH_ERROR');
282: fnd_message.set_token('PROGRAM',h_progname,FALSE);
283: h_mesg_str := fnd_message.get;
284: fa_rx_conc_mesg_pkg.log(h_mesg_str);
285: fa_rx_conc_mesg_pkg.out(h_mesg_str);
286: retcode := 2;
287: