145: FOR cur_row in c_link_rows LOOP
146:
147: if (reachable(cur_row.operation_seq_num, cur_row.next_network_op_seq_num)) then
148: l_error_exists := true;
149: fnd_message.set_name('WIP', 'WIP_INV_OP_LINK');
150: fnd_message.set_token('INTERFACE', to_char(cur_row.interface_id));
151: wip_interface_err_Utils.add_error(p_interface_id => cur_row.interface_id,
152: p_text => substr(fnd_message.get,1,500),
153: p_error_type => wip_jdi_utils.msg_error);
146:
147: if (reachable(cur_row.operation_seq_num, cur_row.next_network_op_seq_num)) then
148: l_error_exists := true;
149: fnd_message.set_name('WIP', 'WIP_INV_OP_LINK');
150: fnd_message.set_token('INTERFACE', to_char(cur_row.interface_id));
151: wip_interface_err_Utils.add_error(p_interface_id => cur_row.interface_id,
152: p_text => substr(fnd_message.get,1,500),
153: p_error_type => wip_jdi_utils.msg_error);
154: end if;
148: l_error_exists := true;
149: fnd_message.set_name('WIP', 'WIP_INV_OP_LINK');
150: fnd_message.set_token('INTERFACE', to_char(cur_row.interface_id));
151: wip_interface_err_Utils.add_error(p_interface_id => cur_row.interface_id,
152: p_text => substr(fnd_message.get,1,500),
153: p_error_type => wip_jdi_utils.msg_error);
154: end if;
155:
156: END LOOP;
200: Open c_invalid_op_seq_num;
201: fetch c_invalid_op_seq_num into l_op_seq_num;
202: if c_invalid_op_seq_num%FOUND then
203: l_error_exists := true;
204: fnd_message.set_name('WIP', 'WIP_OP_DOES_NOT_EXIST');
205: fnd_message.set_token('INTERFACE', to_char(l_op_seq_num));
206: wip_interface_err_Utils.add_error(p_interface_id => l_op_seq_num,
207: p_text => substr(fnd_message.get,1,500),
208: p_error_type => wip_jdi_utils.msg_error);
201: fetch c_invalid_op_seq_num into l_op_seq_num;
202: if c_invalid_op_seq_num%FOUND then
203: l_error_exists := true;
204: fnd_message.set_name('WIP', 'WIP_OP_DOES_NOT_EXIST');
205: fnd_message.set_token('INTERFACE', to_char(l_op_seq_num));
206: wip_interface_err_Utils.add_error(p_interface_id => l_op_seq_num,
207: p_text => substr(fnd_message.get,1,500),
208: p_error_type => wip_jdi_utils.msg_error);
209: end if;
203: l_error_exists := true;
204: fnd_message.set_name('WIP', 'WIP_OP_DOES_NOT_EXIST');
205: fnd_message.set_token('INTERFACE', to_char(l_op_seq_num));
206: wip_interface_err_Utils.add_error(p_interface_id => l_op_seq_num,
207: p_text => substr(fnd_message.get,1,500),
208: p_error_type => wip_jdi_utils.msg_error);
209: end if;
210: close c_invalid_op_seq_num;
211:
341: AND substitution_type = p_subst_type;
342:
343: if (nvl(l_completed, 'N') = 'Y' and nvl(l_prev_op_complete,'N') = 'N') then
344: l_error_exists := true;
345: FND_MESSAGE.SET_NAME('EAM', 'EAM_OP_TO_COMPLETE');
346: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
347: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
348: p_text => substr(fnd_message.get,1,500),
349: p_error_type => wip_jdi_utils.msg_error);
342:
343: if (nvl(l_completed, 'N') = 'Y' and nvl(l_prev_op_complete,'N') = 'N') then
344: l_error_exists := true;
345: FND_MESSAGE.SET_NAME('EAM', 'EAM_OP_TO_COMPLETE');
346: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
347: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
348: p_text => substr(fnd_message.get,1,500),
349: p_error_type => wip_jdi_utils.msg_error);
350:
344: l_error_exists := true;
345: FND_MESSAGE.SET_NAME('EAM', 'EAM_OP_TO_COMPLETE');
346: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
347: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
348: p_text => substr(fnd_message.get,1,500),
349: p_error_type => wip_jdi_utils.msg_error);
350:
351: end if;
352:
351: end if;
352:
353: if (nvl(l_prev_op_complete,'N') = 'Y') then
354: l_error_exists := true;
355: FND_MESSAGE.SET_NAME('EAM', 'EAM_OP_FROM_COMPLETE');
356: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
357: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
358: p_text => substr(fnd_message.get,1,500),
359: p_error_type => wip_jdi_utils.msg_error);
352:
353: if (nvl(l_prev_op_complete,'N') = 'Y') then
354: l_error_exists := true;
355: FND_MESSAGE.SET_NAME('EAM', 'EAM_OP_FROM_COMPLETE');
356: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
357: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
358: p_text => substr(fnd_message.get,1,500),
359: p_error_type => wip_jdi_utils.msg_error);
360:
354: l_error_exists := true;
355: FND_MESSAGE.SET_NAME('EAM', 'EAM_OP_FROM_COMPLETE');
356: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
357: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
358: p_text => substr(fnd_message.get,1,500),
359: p_error_type => wip_jdi_utils.msg_error);
360:
361: end if;
362:
361: end if;
362:
363: if (l_next_op_start_date < l_previous_op_completion_date ) then
364: l_error_exists := true;
365: FND_MESSAGE.SET_NAME('EAM', 'EAM_DEP_OP_START_DATE_INVALID');
366: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
367: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
368: p_text => substr(fnd_message.get,1,500),
369: p_error_type => wip_jdi_utils.msg_error);
362:
363: if (l_next_op_start_date < l_previous_op_completion_date ) then
364: l_error_exists := true;
365: FND_MESSAGE.SET_NAME('EAM', 'EAM_DEP_OP_START_DATE_INVALID');
366: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
367: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
368: p_text => substr(fnd_message.get,1,500),
369: p_error_type => wip_jdi_utils.msg_error);
370: end if;
364: l_error_exists := true;
365: FND_MESSAGE.SET_NAME('EAM', 'EAM_DEP_OP_START_DATE_INVALID');
366: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
367: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
368: p_text => substr(fnd_message.get,1,500),
369: p_error_type => wip_jdi_utils.msg_error);
370: end if;
371: end if;
372:
387: END Loop;
388: /*
389: wip_interface_err_Utils.load_errors;
390:
391: fnd_message.set_name('WIP', 'WIP_OP_LINK_NOT_FOUND');
392: fnd_message.set_token('INTERFACE', 4567);
393: insert into wip_interface_errors (
394: interface_id,
395: error_type,
388: /*
389: wip_interface_err_Utils.load_errors;
390:
391: fnd_message.set_name('WIP', 'WIP_OP_LINK_NOT_FOUND');
392: fnd_message.set_token('INTERFACE', 4567);
393: insert into wip_interface_errors (
394: interface_id,
395: error_type,
396: error,
398: creation_date
399: ) values (
400: 4567,
401: 1,
402: substr(fnd_message.get,1,500),
403: sysdate,
404: sysdate
405: );
406: commit;
437: fetch c_op_link_rows into l_interface_id;
438: if (p_subst_type = WIP_JOB_DETAILS.WIP_DELETE) then
439: if c_op_link_rows%NOTFOUND then
440: l_error_exists := true;
441: fnd_message.set_name('WIP', 'WIP_OP_LINK_NOT_FOUND');
442: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
443: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
444: p_text => substr(fnd_message.get,1,500),
445: p_error_type => wip_jdi_utils.msg_error);
438: if (p_subst_type = WIP_JOB_DETAILS.WIP_DELETE) then
439: if c_op_link_rows%NOTFOUND then
440: l_error_exists := true;
441: fnd_message.set_name('WIP', 'WIP_OP_LINK_NOT_FOUND');
442: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
443: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
444: p_text => substr(fnd_message.get,1,500),
445: p_error_type => wip_jdi_utils.msg_error);
446: end if;
440: l_error_exists := true;
441: fnd_message.set_name('WIP', 'WIP_OP_LINK_NOT_FOUND');
442: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
443: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
444: p_text => substr(fnd_message.get,1,500),
445: p_error_type => wip_jdi_utils.msg_error);
446: end if;
447: elsif (p_subst_type = WIP_JOB_DETAILS.WIP_ADD) then
448: if c_op_link_rows%FOUND then
446: end if;
447: elsif (p_subst_type = WIP_JOB_DETAILS.WIP_ADD) then
448: if c_op_link_rows%FOUND then
449: l_error_exists := true;
450: fnd_message.set_name('WIP', 'WIP_OP_LINK_EXISTS');
451: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
452: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
453: p_text => substr(fnd_message.get,1,500),
454: p_error_type => wip_jdi_utils.msg_error);
447: elsif (p_subst_type = WIP_JOB_DETAILS.WIP_ADD) then
448: if c_op_link_rows%FOUND then
449: l_error_exists := true;
450: fnd_message.set_name('WIP', 'WIP_OP_LINK_EXISTS');
451: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
452: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
453: p_text => substr(fnd_message.get,1,500),
454: p_error_type => wip_jdi_utils.msg_error);
455: end if;
449: l_error_exists := true;
450: fnd_message.set_name('WIP', 'WIP_OP_LINK_EXISTS');
451: fnd_message.set_token('INTERFACE', to_char(l_interface_id));
452: wip_interface_err_Utils.add_error(p_interface_id => l_interface_id,
453: p_text => substr(fnd_message.get,1,500),
454: p_error_type => wip_jdi_utils.msg_error);
455: end if;
456: end if;
457: close c_op_link_rows;