The following lines contain the word 'select', 'insert', 'update' or 'delete':
IF NOT QP_GLOBALS.Equal(p_SEG_rec.last_updated_by,p_old_SEG_rec.last_updated_by)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_SEG_UTIL.G_LAST_UPDATED_BY;
IF NOT QP_GLOBALS.Equal(p_SEG_rec.last_update_date,p_old_SEG_rec.last_update_date)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_SEG_UTIL.G_LAST_UPDATE_DATE;
IF NOT QP_GLOBALS.Equal(p_SEG_rec.last_update_login,p_old_SEG_rec.last_update_login)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_SEG_UTIL.G_LAST_UPDATE_LOGIN;
IF NOT QP_GLOBALS.Equal(p_SEG_rec.program_update_date,p_old_SEG_rec.program_update_date)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_SEG_UTIL.G_PROGRAM_UPDATE_DATE;
ELSIF p_attr_id = G_LAST_UPDATED_BY THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_SEG_UTIL.G_LAST_UPDATED_BY;
ELSIF p_attr_id = G_LAST_UPDATE_DATE THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_SEG_UTIL.G_LAST_UPDATE_DATE;
ELSIF p_attr_id = G_LAST_UPDATE_LOGIN THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_SEG_UTIL.G_LAST_UPDATE_LOGIN;
ELSIF p_attr_id = G_PROGRAM_UPDATE_DATE THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_SEG_UTIL.G_PROGRAM_UPDATE_DATE;
IF NOT QP_GLOBALS.Equal(p_SEG_rec.last_updated_by,p_old_SEG_rec.last_updated_by)
THEN
NULL;
IF NOT QP_GLOBALS.Equal(p_SEG_rec.last_update_date,p_old_SEG_rec.last_update_date)
THEN
NULL;
IF NOT QP_GLOBALS.Equal(p_SEG_rec.last_update_login,p_old_SEG_rec.last_update_login)
THEN
NULL;
IF NOT QP_GLOBALS.Equal(p_SEG_rec.program_update_date,p_old_SEG_rec.program_update_date)
THEN
NULL;
IF l_SEG_rec.last_updated_by = FND_API.G_MISS_NUM THEN
l_SEG_rec.last_updated_by := p_old_SEG_rec.last_updated_by;
IF l_SEG_rec.last_update_date = FND_API.G_MISS_DATE THEN
l_SEG_rec.last_update_date := p_old_SEG_rec.last_update_date;
IF l_SEG_rec.last_update_login = FND_API.G_MISS_NUM THEN
l_SEG_rec.last_update_login := p_old_SEG_rec.last_update_login;
IF l_SEG_rec.program_update_date = FND_API.G_MISS_DATE THEN
l_SEG_rec.program_update_date := p_old_SEG_rec.program_update_date;
IF l_SEG_rec.last_updated_by = FND_API.G_MISS_NUM THEN
l_SEG_rec.last_updated_by := NULL;
IF l_SEG_rec.last_update_date = FND_API.G_MISS_DATE THEN
l_SEG_rec.last_update_date := NULL;
IF l_SEG_rec.last_update_login = FND_API.G_MISS_NUM THEN
l_SEG_rec.last_update_login := NULL;
IF l_SEG_rec.program_update_date = FND_API.G_MISS_DATE THEN
l_SEG_rec.program_update_date := NULL;
PROCEDURE Update_Row
( p_SEG_rec IN QP_Attributes_PUB.Seg_Rec_Type
)
IS
l_prc_context_code varchar2(30);
UPDATE QP_SEGMENTS_b
SET ATTRIBUTE1 = p_SEG_rec.attribute1
, ATTRIBUTE10 = p_SEG_rec.attribute10
, ATTRIBUTE11 = p_SEG_rec.attribute11
, ATTRIBUTE12 = p_SEG_rec.attribute12
, ATTRIBUTE13 = p_SEG_rec.attribute13
, ATTRIBUTE14 = p_SEG_rec.attribute14
, ATTRIBUTE15 = p_SEG_rec.attribute15
, ATTRIBUTE2 = p_SEG_rec.attribute2
, ATTRIBUTE3 = p_SEG_rec.attribute3
, ATTRIBUTE4 = p_SEG_rec.attribute4
, ATTRIBUTE5 = p_SEG_rec.attribute5
, ATTRIBUTE6 = p_SEG_rec.attribute6
, ATTRIBUTE7 = p_SEG_rec.attribute7
, ATTRIBUTE8 = p_SEG_rec.attribute8
, ATTRIBUTE9 = p_SEG_rec.attribute9
, AVAILABILITY_IN_BASIC = p_SEG_rec.availability_in_basic
, CONTEXT = p_SEG_rec.context
, CREATED_BY = p_SEG_rec.created_by
, CREATION_DATE = p_SEG_rec.creation_date
, LAST_UPDATED_BY = p_SEG_rec.last_updated_by
, LAST_UPDATE_DATE = p_SEG_rec.last_update_date
, LAST_UPDATE_LOGIN = p_SEG_rec.last_update_login
, PRC_CONTEXT_ID = p_SEG_rec.prc_context_id
, PROGRAM_APPLICATION_ID = p_SEG_rec.program_application_id
, PROGRAM_ID = p_SEG_rec.program_id
, PROGRAM_UPDATE_DATE = p_SEG_rec.program_update_date
, SEEDED_FLAG = p_SEG_rec.seeded_flag
, SEEDED_FORMAT_TYPE = p_SEG_rec.seeded_format_type
, SEEDED_PRECEDENCE = p_SEG_rec.seeded_precedence
, SEEDED_VALUESET_ID = p_SEG_rec.seeded_valueset_id
, SEGMENT_code = p_SEG_rec.segment_code
, SEGMENT_ID = p_SEG_rec.segment_id
, APPLICATION_ID = p_SEG_rec.application_id
, SEGMENT_MAPPING_COLUMN = p_SEG_rec.segment_mapping_column
, USER_FORMAT_TYPE = p_SEG_rec.user_format_type
, USER_PRECEDENCE = p_SEG_rec.user_precedence
, USER_VALUESET_ID = p_SEG_rec.user_valueset_id
, REQUIRED_FLAG = p_SEG_rec.required_flag
, PARTY_HIERARCHY_ENABLED_FLAG = p_SEG_rec.party_hierarchy_enabled_flag -- Added for TCA
WHERE SEGMENT_ID = p_SEG_rec.segment_id ;
UPDATE qp_segments_tl
SET CREATED_BY = p_SEG_rec.created_by
, CREATION_DATE = p_SEG_rec.creation_date
, LAST_UPDATED_BY = p_SEG_rec.last_updated_by
, LAST_UPDATE_DATE = p_SEG_rec.last_update_date
, LAST_UPDATE_LOGIN = p_SEG_rec.last_update_login
, seeded_segment_name = p_SEG_rec.seeded_segment_name
, user_segment_name = p_SEG_rec.user_segment_name
, seeded_description = p_SEG_rec.seeded_description
, user_description = p_SEG_rec.user_description
, SOURCE_LANG = userenv('LANG')
WHERE segment_id = p_SEG_rec.segment_id and
userenv('LANG') in (LANGUAGE, SOURCE_LANG);
select prc_context_type,
prc_context_code
into l_prc_context_type,
l_prc_context_code
from qp_prc_contexts_b
where prc_context_id = p_SEG_rec.prc_context_id;
select *
into l_seg_flex_row
from fnd_descr_flex_column_usages
where application_id = 661 and
descriptive_flexfield_name = 'QP_ATTR_DEFNS_PRICING' and
descriptive_flex_context_code = l_prc_context_code and
application_column_name = p_SEG_rec.segment_mapping_column and
rownum = 1;
FND_DESCR_FLEX_COL_USAGE_PKG.UPDATE_ROW(
X_APPLICATION_ID => 661,
X_DESCRIPTIVE_FLEXFIELD_NAME => 'QP_ATTR_DEFNS_PRICING',
X_DESCRIPTIVE_FLEX_CONTEXT_COD => l_prc_context_code,
X_APPLICATION_COLUMN_NAME => p_SEG_rec.segment_mapping_column,
X_END_USER_COLUMN_NAME => p_SEG_rec.segment_code,
X_COLUMN_SEQ_NUM => p_SEG_rec.user_precedence,
X_ENABLED_FLAG => l_seg_flex_row.enabled_flag,
X_REQUIRED_FLAG => NVL(p_SEG_rec.required_flag, 'N'),
X_SECURITY_ENABLED_FLAG => l_seg_flex_row.security_enabled_flag,
X_DISPLAY_FLAG => l_seg_flex_row.display_flag,
X_DISPLAY_SIZE => l_seg_flex_row.display_size,
X_MAXIMUM_DESCRIPTION_LEN => l_seg_flex_row.maximum_description_len,
X_CONCATENATION_DESCRIPTION_LE => l_seg_flex_row.concatenation_description_len,
X_FLEX_VALUE_SET_ID => p_SEG_rec.user_valueset_id,
X_RANGE_CODE => l_seg_flex_row.range_code,
X_DEFAULT_TYPE => l_seg_flex_row.default_type,
X_DEFAULT_VALUE => l_seg_flex_row.default_value,
X_RUNTIME_PROPERTY_FUNCTION => l_seg_flex_row.runtime_property_function,
X_SRW_PARAM => l_seg_flex_row.srw_param,
X_FORM_LEFT_PROMPT => p_SEG_rec.user_segment_name,
X_FORM_ABOVE_PROMPT => p_SEG_rec.user_segment_name,
X_DESCRIPTION => p_SEG_rec.user_segment_name,
X_LAST_UPDATE_DATE => p_SEG_rec.LAST_UPDATE_DATE,
X_LAST_UPDATED_BY => p_SEG_rec.LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN => p_SEG_rec.LAST_UPDATE_LOGIN);
, 'Update_Row'
);
END Update_Row;
PROCEDURE Insert_Row
( p_SEG_rec IN QP_Attributes_PUB.Seg_Rec_Type
)
IS
l_row_id varchar2(25);
select prc_context_type,
prc_context_code
into l_prc_context_type,
l_prc_context_code
from qp_prc_contexts_b
where prc_context_id = p_SEG_rec.prc_context_id;
select 's'
into attr_in_ff_exists
from fnd_descr_flex_column_usages
where application_id = 661 and
descriptive_flexfield_name = 'QP_ATTR_DEFNS_PRICING' and
descriptive_flex_context_code = l_prc_context_code and
end_user_column_name = p_SEG_rec.segment_code and
rownum = 1;
INSERT INTO QP_SEGMENTS_b
( ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, AVAILABILITY_IN_BASIC
, CONTEXT
, CREATED_BY
, CREATION_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PRC_CONTEXT_ID
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, SEEDED_FLAG
, SEEDED_FORMAT_TYPE
, SEEDED_PRECEDENCE
, SEEDED_VALUESET_ID
, SEGMENT_code
, SEGMENT_ID
, APPLICATION_ID
, SEGMENT_MAPPING_COLUMN
, USER_FORMAT_TYPE
, USER_PRECEDENCE
, USER_VALUESET_ID
, REQUIRED_FLAG
, PARTY_HIERARCHY_ENABLED_FLAG -- Added for TCA
)
VALUES
( p_SEG_rec.attribute1
, p_SEG_rec.attribute10
, p_SEG_rec.attribute11
, p_SEG_rec.attribute12
, p_SEG_rec.attribute13
, p_SEG_rec.attribute14
, p_SEG_rec.attribute15
, p_SEG_rec.attribute2
, p_SEG_rec.attribute3
, p_SEG_rec.attribute4
, p_SEG_rec.attribute5
, p_SEG_rec.attribute6
, p_SEG_rec.attribute7
, p_SEG_rec.attribute8
, p_SEG_rec.attribute9
, p_SEG_rec.availability_in_basic
, p_SEG_rec.context
, p_SEG_rec.created_by
, p_SEG_rec.creation_date
, p_SEG_rec.last_updated_by
, p_SEG_rec.last_update_date
, p_SEG_rec.last_update_login
, p_SEG_rec.prc_context_id
, p_SEG_rec.program_application_id
, p_SEG_rec.program_id
, p_SEG_rec.program_update_date
, p_SEG_rec.seeded_flag
, p_SEG_rec.seeded_format_type
, p_SEG_rec.seeded_precedence
, p_SEG_rec.seeded_valueset_id
, p_SEG_rec.segment_code
, p_SEG_rec.segment_id
, p_SEG_rec.application_id
, p_SEG_rec.segment_mapping_column
, p_SEG_rec.user_format_type
, p_SEG_rec.user_precedence
, p_SEG_rec.user_valueset_id
, p_SEG_rec.required_flag
, p_SEG_rec.party_hierarchy_enabled_flag --Added for TCA
);
INSERT INTO QP_segments_tl
( CREATED_BY
, CREATION_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, segment_id
, seeded_segment_name
, user_segment_name
, seeded_description
, user_description
, language
, source_lang
)
SELECT p_SEG_rec.created_by
, p_SEG_rec.creation_date
, p_SEG_rec.last_updated_by
, p_SEG_rec.last_update_date
, p_SEG_rec.last_update_login
, p_SEG_rec.segment_id
, p_SEG_rec.seeded_segment_name
, p_SEG_rec.user_segment_name
, p_SEG_rec.seeded_description
, p_SEG_rec.user_description
, L.language_code
, userenv('LANG')
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
( select NULL
from qp_segments_tl T
where T.segment_id = p_SEG_rec.segment_id
and T.LANGUAGE = L.LANGUAGE_CODE );
select prc_context_type,
prc_context_code
into l_prc_context_type,
l_prc_context_code
from qp_prc_contexts_b
where prc_context_id = p_SEG_rec.prc_context_id;
FND_DESCR_FLEX_COL_USAGE_PKG.INSERT_ROW(
X_ROWID => l_row_id,
X_APPLICATION_ID => 661,
X_DESCRIPTIVE_FLEXFIELD_NAME => 'QP_ATTR_DEFNS_PRICING',
X_DESCRIPTIVE_FLEX_CONTEXT_COD => l_prc_context_code,
X_APPLICATION_COLUMN_NAME => p_SEG_rec.segment_mapping_column,
X_END_USER_COLUMN_NAME => p_SEG_rec.segment_code,
X_COLUMN_SEQ_NUM => p_SEG_rec.user_precedence,
X_ENABLED_FLAG => 'Y',
X_REQUIRED_FLAG => NVL(p_SEG_rec.required_flag, 'N'),
X_SECURITY_ENABLED_FLAG => 'N',
X_DISPLAY_FLAG => 'Y',
X_DISPLAY_SIZE => 35,
X_MAXIMUM_DESCRIPTION_LEN => 50,
X_CONCATENATION_DESCRIPTION_LE => 25,
X_FLEX_VALUE_SET_ID => p_SEG_rec.user_valueset_id,
X_RANGE_CODE => null,
X_DEFAULT_TYPE => null,
X_DEFAULT_VALUE => null,
X_RUNTIME_PROPERTY_FUNCTION => null,
X_SRW_PARAM => null,
X_FORM_LEFT_PROMPT => p_SEG_rec.user_segment_name,
X_FORM_ABOVE_PROMPT => p_SEG_rec.user_segment_name,
X_DESCRIPTION => p_SEG_rec.user_segment_name,
X_CREATION_DATE => p_SEG_rec.CREATION_DATE,
X_CREATED_BY => p_SEG_rec.CREATED_BY,
X_LAST_UPDATE_DATE => p_SEG_rec.LAST_UPDATE_DATE,
X_LAST_UPDATED_BY => p_SEG_rec.LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN => p_SEG_rec.LAST_UPDATE_LOGIN);
, 'Insert_Row'
);
END Insert_Row;
PROCEDURE Delete_Row
( p_segment_id IN NUMBER
)
IS
l_prc_context_type varchar2(30);
select a.prc_context_type,
a.prc_context_code,
b.segment_code,
b.seeded_flag
into l_prc_context_type,
l_prc_context_code,
l_segment_code,
l_seeded_flag
from qp_prc_contexts_b a,
qp_segments_b b
where a.prc_context_id = b.prc_context_id and
b.segment_id = p_segment_id;
DELETE FROM QP_SEGMENTS_b
WHERE SEGMENT_ID = p_segment_id ;
DELETE FROM QP_SEGMENTS_tl
WHERE SEGMENT_ID = p_segment_id ;
fnd_flex_dsc_api.delete_segment(
APPL_SHORT_NAME => 'QP',
FLEXFIELD_NAME => 'QP_ATTR_DEFNS_PRICING',
CONTEXT => l_prc_context_code,
SEGMENT => l_segment_code);
, 'Delete_Row'
);
END Delete_Row;
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, AVAILABILITY_IN_BASIC
, CONTEXT
, CREATED_BY
, CREATION_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PRC_CONTEXT_ID
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, SEEDED_FLAG
, SEEDED_FORMAT_TYPE
, SEEDED_PRECEDENCE
, SEEDED_SEGMENT_NAME
, SEEDED_DESCRIPTION
, SEEDED_VALUESET_ID
, SEGMENT_code
, SEGMENT_ID
, APPLICATION_ID
, SEGMENT_MAPPING_COLUMN
, USER_FORMAT_TYPE
, USER_PRECEDENCE
, USER_SEGMENT_NAME
, USER_DESCRIPTION
, USER_VALUESET_ID
, REQUIRED_FLAG
, PARTY_HIERARCHY_ENABLED_FLAG -- Added for TCA
FROM QP_SEGMENTS_V
WHERE ( SEGMENT_ID = p_segment_id
)
OR ( PRC_CONTEXT_ID = p_prc_context_id
);
l_SEG_rec.last_updated_by := l_implicit_rec.LAST_UPDATED_BY;
l_SEG_rec.last_update_date := l_implicit_rec.LAST_UPDATE_DATE;
l_SEG_rec.last_update_login := l_implicit_rec.LAST_UPDATE_LOGIN;
l_SEG_rec.program_update_date := l_implicit_rec.PROGRAM_UPDATE_DATE;
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, AVAILABILITY_IN_BASIC
, CONTEXT
, CREATED_BY
, CREATION_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PRC_CONTEXT_ID
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, SEEDED_FLAG
, SEEDED_FORMAT_TYPE
, SEEDED_PRECEDENCE
, SEEDED_SEGMENT_NAME
, SEEDED_DESCRIPTION
, SEEDED_VALUESET_ID
, SEGMENT_code
, SEGMENT_ID
, APPLICATION_ID
, SEGMENT_MAPPING_COLUMN
, USER_FORMAT_TYPE
, USER_PRECEDENCE
, USER_SEGMENT_NAME
, USER_DESCRIPTION
, USER_VALUESET_ID
, REQUIRED_FLAG
, PARTY_HIERARCHY_ENABLED_FLAG --Added for TCA
INTO l_SEG_rec.attribute1
, l_SEG_rec.attribute10
, l_SEG_rec.attribute11
, l_SEG_rec.attribute12
, l_SEG_rec.attribute13
, l_SEG_rec.attribute14
, l_SEG_rec.attribute15
, l_SEG_rec.attribute2
, l_SEG_rec.attribute3
, l_SEG_rec.attribute4
, l_SEG_rec.attribute5
, l_SEG_rec.attribute6
, l_SEG_rec.attribute7
, l_SEG_rec.attribute8
, l_SEG_rec.attribute9
, l_SEG_rec.availability_in_basic
, l_SEG_rec.context
, l_SEG_rec.created_by
, l_SEG_rec.creation_date
, l_SEG_rec.last_updated_by
, l_SEG_rec.last_update_date
, l_SEG_rec.last_update_login
, l_SEG_rec.prc_context_id
, l_SEG_rec.program_application_id
, l_SEG_rec.program_id
, l_SEG_rec.program_update_date
, l_SEG_rec.seeded_flag
, l_SEG_rec.seeded_format_type
, l_SEG_rec.seeded_precedence
, l_SEG_rec.seeded_segment_name
, l_SEG_rec.seeded_description
, l_SEG_rec.seeded_valueset_id
, l_SEG_rec.segment_code
, l_SEG_rec.segment_id
, l_SEG_rec.application_id
, l_SEG_rec.segment_mapping_column
, l_SEG_rec.user_format_type
, l_SEG_rec.user_precedence
, l_SEG_rec.user_segment_name
, l_SEG_rec.user_description
, l_SEG_rec.user_valueset_id
, l_SEG_rec.required_flag
, l_SEG_rec.party_hierarchy_enabled_flag -- Added for TCA
FROM QP_SEGMENTS_V
WHERE SEGMENT_ID = p_SEG_rec.segment_id
FOR UPDATE NOWAIT;
AND QP_GLOBALS.Equal(p_SEG_rec.last_updated_by,
l_SEG_rec.last_updated_by)
AND QP_GLOBALS.Equal(p_SEG_rec.last_update_date,
l_SEG_rec.last_update_date)
AND QP_GLOBALS.Equal(p_SEG_rec.last_update_login,
l_SEG_rec.last_update_login)
AND QP_GLOBALS.Equal(p_SEG_rec.prc_context_id,
l_SEG_rec.prc_context_id)
AND QP_GLOBALS.Equal(p_SEG_rec.program_application_id,
l_SEG_rec.program_application_id)
AND QP_GLOBALS.Equal(p_SEG_rec.program_id,
l_SEG_rec.program_id)
AND QP_GLOBALS.Equal(p_SEG_rec.program_update_date,
l_SEG_rec.program_update_date)
AND QP_GLOBALS.Equal(p_SEG_rec.seeded_flag,
l_SEG_rec.seeded_flag)
AND QP_GLOBALS.Equal(p_SEG_rec.seeded_format_type,
l_SEG_rec.seeded_format_type)
AND QP_GLOBALS.Equal(p_SEG_rec.seeded_precedence,
l_SEG_rec.seeded_precedence)
AND QP_GLOBALS.Equal(p_SEG_rec.seeded_segment_name,
l_SEG_rec.seeded_segment_name)
AND QP_GLOBALS.Equal(p_SEG_rec.seeded_valueset_id,
l_SEG_rec.seeded_valueset_id)
AND QP_GLOBALS.Equal(p_SEG_rec.segment_code,
l_SEG_rec.segment_code)
AND QP_GLOBALS.Equal(p_SEG_rec.segment_id,
l_SEG_rec.segment_id)
AND QP_GLOBALS.Equal(p_SEG_rec.application_id,
l_SEG_rec.application_id)
AND QP_GLOBALS.Equal(p_SEG_rec.segment_mapping_column,
l_SEG_rec.segment_mapping_column)
AND QP_GLOBALS.Equal(p_SEG_rec.user_format_type,
l_SEG_rec.user_format_type)
AND QP_GLOBALS.Equal(p_SEG_rec.user_precedence,
l_SEG_rec.user_precedence)
AND QP_GLOBALS.Equal(p_SEG_rec.user_segment_name,
l_SEG_rec.user_segment_name)
AND QP_GLOBALS.Equal( p_SEG_rec.seeded_description,
l_SEG_rec.seeded_description)
AND QP_GLOBALS.Equal( p_SEG_rec.user_description,
l_SEG_rec.user_description)
AND QP_GLOBALS.Equal(p_SEG_rec.user_valueset_id,
l_SEG_rec.user_valueset_id)
AND QP_GLOBALS.Equal(p_SEG_rec.required_flag,
l_SEG_rec.required_flag)
-- Added for TCA
AND QP_GLOBALS.Equal(p_SEG_rec.party_hierarchy_enabled_flag,
l_SEG_rec.party_hierarchy_enabled_flag)
THEN
-- Row has not changed. Set out parameter.
x_SEG_rec := l_SEG_rec;
FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_DELETED');