232:
233: if (events_table(i).maintenance_date is not null) then
234:
235: h_maint_date := events_table(i).maintenance_date;
236: insert_to_fa_maint_events(h_asset_id,
237: h_book_type_code,
238: events_table(i),
239: h_maint_date,
240: h_succeed);
249:
250: h_maint_date := h_start_date;
251: WHILE (h_maint_date <= h_end_date) LOOP
252:
253: insert_to_fa_maint_events(h_asset_id,
254: h_book_type_code,
255: events_table(i),
256: h_maint_date,
257: h_succeed);
331:
332: begin
333: fnd_message.set_name('OFA', p_msg_name);
334: if (p_msg_name = 'FA_SHARED_INSERT_FAILED') then
335: fnd_message.set_token('TABLE','FA_MAINT_EVENTS',FALSE);
336: end if;
337: h_mesg_str := fnd_message.get;
338: fa_rx_conc_mesg_pkg.log(h_mesg_str);
339: fa_rx_conc_mesg_pkg.log('');
404:
405: end load_events_records;
406:
407:
408: procedure insert_to_fa_maint_events(
409: p_asset_id in number,
410: p_book_type_code in varchar2,
411: p_event_rec in event_rec_type,
412: p_maint_date in date,
418: begin
419:
420: p_succeed := TRUE;
421:
422: insert into fa_maint_events
423: (asset_event_id,
424: asset_id,
425: event_name,
426: description,
453: attribute14,
454: attribute15,
455: attribute_category)
456: values
457: (fa_maint_events_s.nextval,
458: p_asset_id,
459: p_event_rec.event_name,
460: p_event_rec.description,
461: p_event_rec.frequency_in_days,
491: exception
492: when others then
493: p_succeed := FALSE;
494:
495: end insert_to_fa_maint_events;
496:
497: END FA_MAINTENANCE_PKG;