368: (p_api_version IN NUMBER, -- required
369: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
370: p_commit IN VARCHAR2 := FND_API.G_FALSE,
371: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
372: p_dimension_id IN CN_HEAD_HIERARCHIES.DIMENSION_ID%TYPE,
373: p_name IN CN_HEAD_HIERARCHIES.NAME%TYPE,
374: --R12 MOAC Changes--Start
375: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
376: --R12 MOAC Changes--End
369: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
370: p_commit IN VARCHAR2 := FND_API.G_FALSE,
371: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
372: p_dimension_id IN CN_HEAD_HIERARCHIES.DIMENSION_ID%TYPE,
373: p_name IN CN_HEAD_HIERARCHIES.NAME%TYPE,
374: --R12 MOAC Changes--Start
375: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
376: --R12 MOAC Changes--End
377: x_return_status OUT NOCOPY VARCHAR2,
371: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
372: p_dimension_id IN CN_HEAD_HIERARCHIES.DIMENSION_ID%TYPE,
373: p_name IN CN_HEAD_HIERARCHIES.NAME%TYPE,
374: --R12 MOAC Changes--Start
375: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
376: --R12 MOAC Changes--End
377: x_return_status OUT NOCOPY VARCHAR2,
378: x_msg_count OUT NOCOPY NUMBER,
379: x_msg_data OUT NOCOPY VARCHAR2,
376: --R12 MOAC Changes--End
377: x_return_status OUT NOCOPY VARCHAR2,
378: x_msg_count OUT NOCOPY NUMBER,
379: x_msg_data OUT NOCOPY VARCHAR2,
380: x_head_hierarchy_id OUT NOCOPY CN_HEAD_HIERARCHIES.HEAD_HIERARCHY_ID%TYPE) IS
381:
382: l_api_name CONSTANT VARCHAR2(30) := 'Create_Head_Hierarchy';
383: l_api_version CONSTANT NUMBER := 1.0;
384: l_rowid ROWID;
405:
406: -- API body
407:
408: -- validate name is unique
409: select count(1) into l_count from cn_head_hierarchies
410: where name = p_name and dimension_id = p_dimension_id
411: --R12 MOAC Changes--Start
412: and org_id = p_org_id ;
413: --R12 MOAC Changes--End
418: RAISE FND_API.G_EXC_ERROR;
419: end if;
420:
421: -- call the original forms API (CNDIHY.fmb -> CNDIHY2s/b.pls)
422: x_head_hierarchy_id := CN_HEAD_HIERARCHIES_ALL_PKG.Default_Header;
423: cn_head_hierarchies_all_pkg.insert_row
424: (X_ROWID => l_rowid,
425: X_HEAD_HIERARCHY_ID => x_head_hierarchy_id,
426: X_DIMENSION_ID => p_dimension_id,
419: end if;
420:
421: -- call the original forms API (CNDIHY.fmb -> CNDIHY2s/b.pls)
422: x_head_hierarchy_id := CN_HEAD_HIERARCHIES_ALL_PKG.Default_Header;
423: cn_head_hierarchies_all_pkg.insert_row
424: (X_ROWID => l_rowid,
425: X_HEAD_HIERARCHY_ID => x_head_hierarchy_id,
426: X_DIMENSION_ID => p_dimension_id,
427: X_DESCRIPTION => NULL, -- description not used
482: (p_api_version IN NUMBER, -- required
483: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
484: p_commit IN VARCHAR2 := FND_API.G_FALSE,
485: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
486: p_head_hierarchy_id IN CN_HEAD_HIERARCHIES.HEAD_HIERARCHY_ID%TYPE,
487: p_name IN CN_HEAD_HIERARCHIES.NAME%TYPE,
488: p_object_version_number IN OUT NOCOPY CN_HEAD_HIERARCHIES.OBJECT_VERSION_NUMBER%TYPE,
489: --R12 MOAC Changes--Start
490: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
483: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
484: p_commit IN VARCHAR2 := FND_API.G_FALSE,
485: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
486: p_head_hierarchy_id IN CN_HEAD_HIERARCHIES.HEAD_HIERARCHY_ID%TYPE,
487: p_name IN CN_HEAD_HIERARCHIES.NAME%TYPE,
488: p_object_version_number IN OUT NOCOPY CN_HEAD_HIERARCHIES.OBJECT_VERSION_NUMBER%TYPE,
489: --R12 MOAC Changes--Start
490: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
491: --R12 MOAC Changes--End
484: p_commit IN VARCHAR2 := FND_API.G_FALSE,
485: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
486: p_head_hierarchy_id IN CN_HEAD_HIERARCHIES.HEAD_HIERARCHY_ID%TYPE,
487: p_name IN CN_HEAD_HIERARCHIES.NAME%TYPE,
488: p_object_version_number IN OUT NOCOPY CN_HEAD_HIERARCHIES.OBJECT_VERSION_NUMBER%TYPE,
489: --R12 MOAC Changes--Start
490: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
491: --R12 MOAC Changes--End
492: x_return_status OUT NOCOPY VARCHAR2,
486: p_head_hierarchy_id IN CN_HEAD_HIERARCHIES.HEAD_HIERARCHY_ID%TYPE,
487: p_name IN CN_HEAD_HIERARCHIES.NAME%TYPE,
488: p_object_version_number IN OUT NOCOPY CN_HEAD_HIERARCHIES.OBJECT_VERSION_NUMBER%TYPE,
489: --R12 MOAC Changes--Start
490: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
491: --R12 MOAC Changes--End
492: x_return_status OUT NOCOPY VARCHAR2,
493: x_msg_count OUT NOCOPY NUMBER,
494: x_msg_data OUT NOCOPY VARCHAR2) IS
498: l_count NUMBER;
499:
500: cursor c is
501: select object_version_number, description, dimension_id
502: from cn_head_hierarchies
503: where head_hierarchy_id = p_head_hierarchy_id
504: --R12 MOAC Changes--Start
505: and org_id = p_org_id;
506: --R12 MOAC Changes--End
547: end if;
548: -- END LOCK ROW --
549:
550: -- validate name is unique
551: select count(1) into l_count from cn_head_hierarchies
552: where name = p_name and dimension_id = tlinfo.dimension_id
553: --R12 MOAC Changes--Start
554: and org_id = p_org_id
555: --R12 MOAC Changes--End
559: FND_MSG_PUB.ADD;
560: RAISE FND_API.G_EXC_ERROR;
561: end if;
562:
563: cn_head_hierarchies_all_pkg.update_row
564: (X_HEAD_HIERARCHY_ID => p_head_hierarchy_id,
565: X_DIMENSION_ID => tlinfo.dimension_id, -- leave unchanged
566: X_DESCRIPTION => tlinfo.description, -- leave unchanged
567: X_NAME => p_name,
621: (p_api_version IN NUMBER, -- required
622: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
623: p_commit IN VARCHAR2 := FND_API.G_FALSE,
624: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
625: p_head_hierarchy_id IN CN_HEAD_HIERARCHIES.HEAD_HIERARCHY_ID%TYPE,
626: --R12 MOAC Changes--Start
627: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
628: --R12 MOAC Changes--End
629: x_return_status OUT NOCOPY VARCHAR2,
623: p_commit IN VARCHAR2 := FND_API.G_FALSE,
624: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
625: p_head_hierarchy_id IN CN_HEAD_HIERARCHIES.HEAD_HIERARCHY_ID%TYPE,
626: --R12 MOAC Changes--Start
627: p_org_id IN CN_HEAD_HIERARCHIES.ORG_ID%TYPE,
628: --R12 MOAC Changes--End
629: x_return_status OUT NOCOPY VARCHAR2,
630: x_msg_count OUT NOCOPY NUMBER,
631: x_msg_data OUT NOCOPY VARCHAR2) IS
653: x_return_status := FND_API.G_RET_STS_SUCCESS;
654:
655: -- API body
656: -- call the original forms API (CNDIHY.fmb -> CNDIHY2s/b.pls)
657: cn_head_hierarchies_all_pkg.delete_row (p_head_hierarchy_id,
658: --R12 MOAC Changes--Start
659: p_org_id);
660: --R12 MOAC Changes--End
661: -- End of API body.
1447: M.START_DATE START_DATE,
1448: M.END_DATE END_DATE,
1449: m.dim_hierarchy_id
1450: FROM cn_dimensions d, cn_objects o1, cn_objects o2, cn_objects o3,
1451: cn_head_hierarchies h, cn_dim_hierarchies m
1452: WHERE o1.dimension_id = d.dimension_id
1453: AND o1.table_id = d.source_table_id
1454: AND o1.object_type = 'COL'
1455: AND o1.primary_key = 'Y'