[Home] [Help]
4511: END IF;
4512: -- End Changes
4513:
4514: IF p_eco_rec.transaction_type = Eng_Globals.G_OPR_CREATE THEN
4515: SELECT eng_change_subjects_s.nextval INTO l_change_subject_unexp_rec.change_subject_id
4516: FROM SYS.DUAL;
4517:
4518:
4519:
4516: FROM SYS.DUAL;
4517:
4518:
4519:
4520: Insert into eng_change_subjects
4521: (CHANGE_SUBJECT_ID,
4522: CHANGE_ID,
4523: CHANGE_LINE_ID,
4524: ENTITY_NAME,
4562:
4563:
4564:
4565: IF l_parent_entity_name = 'EGO_ITEM' THEN
4566: Insert into eng_change_subjects
4567: (CHANGE_SUBJECT_ID,
4568: CHANGE_ID,
4569: CHANGE_LINE_ID,
4570: ENTITY_NAME,
4584: PROGRAM_ID,
4585: PROGRAM_APPLICATION_ID,
4586: PROGRAM_UPDATE_DATE)
4587: values
4588: (eng_change_subjects_s.nextval,
4589: l_change_subject_unexp_rec.change_id,
4590: null,
4591: l_parent_entity_name, -- bug 3572698
4592: l_change_subject_unexp_rec.pk1_value,
4607: elsif l_parent_entity_name = 'EGO_CATALOG_GROUP' THEN
4608: OPEN getcataloggroupid(l_change_subject_unexp_rec.pk1_value,
4609: l_change_subject_unexp_rec.pk2_value);
4610: FETCH getcataloggroupid into l_item_catalog_group_id;
4611: Insert into eng_change_subjects
4612: (CHANGE_SUBJECT_ID,
4613: CHANGE_ID,
4614: CHANGE_LINE_ID,
4615: ENTITY_NAME,
4629: PROGRAM_ID,
4630: PROGRAM_APPLICATION_ID,
4631: PROGRAM_UPDATE_DATE)
4632: values
4633: (eng_change_subjects_s.nextval,
4634: l_change_subject_unexp_rec.change_id,
4635: null,
4636: l_parent_entity_name, -- bug 3572698
4637: l_item_catalog_group_id,
4650: l_prog_appid,
4651: l_prog_id,sysdate);
4652: END IF;
4653: ELSIF p_eco_rec.transaction_type = Eng_Globals.G_OPR_UPDATE THEN
4654: UPDATE eng_change_subjects SET
4655: pk1_value = l_change_subject_unexp_rec.pk1_value,
4656: pk2_value = l_change_subject_unexp_rec.pk2_value,
4657: pk3_value = l_change_subject_unexp_rec.pk3_value
4658: WHERE change_id = l_change_subject_unexp_rec.change_id
4659: AND subject_level = 1
4660: AND change_line_id is null;
4661:
4662: IF l_parent_entity_name = 'EGO_ITEM' THEN
4663: UPDATE eng_change_subjects SET
4664: pk1_value = l_change_subject_unexp_rec.pk1_value,
4665: pk2_value = l_change_subject_unexp_rec.pk2_value
4666: WHERE change_id = l_change_subject_unexp_rec.change_id
4667: AND subject_level = 2
4670: l_parent_entity_name = 'EGO_CATALOG_GROUP' THEN
4671: OPEN getcataloggroupid(l_change_subject_unexp_rec.pk1_value,
4672: l_change_subject_unexp_rec.pk2_value);
4673: FETCH getcataloggroupid into l_item_catalog_group_id;
4674: UPDATE eng_change_subjects SET
4675: pk1_value = l_item_catalog_group_id
4676: WHERE change_id = l_change_subject_unexp_rec.change_id
4677: AND subject_level = 2
4678: AND change_line_id is null;
4677: AND subject_level = 2
4678: AND change_line_id is null;
4679: END IF;
4680: ELSE
4681: DELETE FROM eng_change_subjects
4682: WHERE change_line_id is null
4683: AND change_id = p_ECO_Unexp_Rec.change_id;
4684: END IF; -- if CREATE
4685: