[Home] [Help]
156: );
157:
158: ---------------------------------------------------------------
159: -- Purpose:
160: -- Insert ams_dm_source with the parties and
161: -- their respective target values, if the
162: -- operation is model building.
163: -- Parameter:
164: --
218:
219:
220: ---------------------------------------------------------------
221: -- Purpose:
222: -- Update ams_dm_source with the target value of the
223: -- parties selected for model training.
224: -- Parameter:
225: --
226: ---------------------------------------------------------------
679: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
680: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
681: END IF;
682:
683: -- Insert into ams_dm_source a distinct set of parties
684: -- with target values where applicable. If a party has
685: -- different target values, the positive takes precedence.
686: populate_source (
687: p_arc_object_for => p_arc_object,
1483: -- Initialize API return status to SUCCESS
1484: x_return_status := FND_API.G_RET_STS_SUCCESS;
1485:
1486: -- purge the existing records
1487: DELETE /*+ index(AMS_DM_SOURCE AMS_DM_SOURCE_U2) */ FROM ams_dm_source
1488: WHERE arc_used_for_object = p_arc_object_for
1489: AND used_for_object_id = p_object_for_id;
1490:
1491: -- get the target value if model building
1685: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1686: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1687: END IF;
1688:
1689: -- ASSUMPTION: source_id only comes from ams_dm_source_s
1690:
1691: --added rosharma 20-aug-2003 bug # 3102421
1692: BEGIN
1693: --end add rosharma 20-aug-2003 bug # 3102421
1690:
1691: --added rosharma 20-aug-2003 bug # 3102421
1692: BEGIN
1693: --end add rosharma 20-aug-2003 bug # 3102421
1694: INSERT INTO ams_dm_source (
1695: source_id,
1696: last_update_date,
1697: last_updated_by,
1698: creation_date,
1703: used_for_object_id,
1704: party_id,
1705: target_value
1706: )
1707: SELECT ams_dm_source_s.NEXTVAL,
1708: SYSDATE,
1709: l_concUserId,
1710: SYSDATE,
1711: l_userId,
1778: END IF;
1779: END IF;
1780: END IF;
1781:
1782: --kbasavar contents of ams_dm_org_contacts will be synchronized with the organizations in ams_dm_source
1783: IF l_is_b2b AND l_model_type='CUSTOMER_PROFITABILITY' AND p_seeded_data_source THEN
1784: -- DELETE FROM ams_dm_org_contacts_stg
1785: -- DELETE FROM ams_dm_orgcont_stg_gt
1786: DELETE FROM ams_dm_org_contacts
1881: -- NOTE
1882: -- The original table and process design for data mining data preparation
1883: -- used binary targets, so a Y/N binary set was used. After design was
1884: -- completed, we found out the ODM engine could only handle numeric target
1885: -- values, so the value in ams_dm_source contains 0/1. We convert the Y/N
1886: -- into 0/1 in populate_source().
1887: --
1888: -- History
1889: -- 16-Feb-2001 choang Created.
2463: l_seeded_flag := TRUE;
2464: END IF;
2465:
2466: IF l_object_rec.model_type = 'LOYALTY' THEN
2467: UPDATE /*+ index(t AMS_DM_SOURCE_U2) */ ams_dm_source t
2468: SET target_value = (SELECT L_POSITIVE_TARGET_VALUE
2469: FROM dual
2470: WHERE EXISTS (SELECT 1
2471: FROM hz_cust_accounts c, hz_suspension_activity s
2475: ))
2476: WHERE arc_used_for_object = p_object_type
2477: AND used_for_object_id = p_object_id;
2478: ELSIF l_object_rec.model_type IN ('EMAIL', 'DIRECTMAIL', 'TELEMARKETING') THEN
2479: UPDATE /*+ index(t AMS_DM_SOURCE_U2) */ ams_dm_source t
2480: SET target_value = (SELECT L_POSITIVE_TARGET_VALUE
2481: FROM dual
2482: WHERE EXISTS (SELECT 1
2483: FROM ams_campaign_schedules_b c,
2507: AMS_Utility_PVT.error_message ('AMS_DM_UNSUPPORTED_MODEL', 'MODEL_TYPE', l_object_rec.model_type);
2508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2509: END IF;
2510:
2511: UPDATE /*+ index(AMS_DM_SOURCE AMS_DM_SOURCE_U2) */ ams_dm_source
2512: SET target_value = L_NEGATIVE_TARGET_VALUE
2513: WHERE arc_used_for_object = p_object_type
2514: AND used_for_object_id = p_object_id
2515: AND target_value IS NULL;