The following lines contain the word 'select', 'insert', 'update' or 'delete':
IF NOT QP_GLOBALS.Equal(p_FNA_rec.last_updated_by,p_old_FNA_rec.last_updated_by)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FNA_UTIL.G_LAST_UPDATED_BY;
IF NOT QP_GLOBALS.Equal(p_FNA_rec.last_update_date,p_old_FNA_rec.last_update_date)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FNA_UTIL.G_LAST_UPDATE_DATE;
IF NOT QP_GLOBALS.Equal(p_FNA_rec.last_update_login,p_old_FNA_rec.last_update_login)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FNA_UTIL.G_LAST_UPDATE_LOGIN;
IF NOT QP_GLOBALS.Equal(p_FNA_rec.program_update_date,p_old_FNA_rec.program_update_date)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := QP_FNA_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_FNA_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_FNA_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_FNA_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_FNA_UTIL.G_PROGRAM_UPDATE_DATE;
Warn_Disable_Delete_Fna
( p_action => 'DISABLE'
, p_called_from_ui => p_called_from_ui
, p_functional_area_id => p_FNA_rec.functional_area_id
, p_pte_ss_id => p_FNA_rec.pte_source_system_id
);
IF NOT QP_GLOBALS.Equal(p_FNA_rec.last_updated_by,p_old_FNA_rec.last_updated_by)
THEN
NULL;
IF NOT QP_GLOBALS.Equal(p_FNA_rec.last_update_date,p_old_FNA_rec.last_update_date)
THEN
NULL;
IF NOT QP_GLOBALS.Equal(p_FNA_rec.last_update_login,p_old_FNA_rec.last_update_login)
THEN
NULL;
IF NOT QP_GLOBALS.Equal(p_FNA_rec.program_update_date,p_old_FNA_rec.program_update_date)
THEN
NULL;
IF l_FNA_rec.last_updated_by = FND_API.G_MISS_NUM THEN
l_FNA_rec.last_updated_by := p_old_FNA_rec.last_updated_by;
IF l_FNA_rec.last_update_date = FND_API.G_MISS_DATE THEN
l_FNA_rec.last_update_date := p_old_FNA_rec.last_update_date;
IF l_FNA_rec.last_update_login = FND_API.G_MISS_NUM THEN
l_FNA_rec.last_update_login := p_old_FNA_rec.last_update_login;
IF l_FNA_rec.program_update_date = FND_API.G_MISS_DATE THEN
l_FNA_rec.program_update_date := p_old_FNA_rec.program_update_date;
IF l_FNA_rec.last_updated_by = FND_API.G_MISS_NUM THEN
l_FNA_rec.last_updated_by := NULL;
IF l_FNA_rec.last_update_date = FND_API.G_MISS_DATE THEN
l_FNA_rec.last_update_date := NULL;
IF l_FNA_rec.last_update_login = FND_API.G_MISS_NUM THEN
l_FNA_rec.last_update_login := NULL;
IF l_FNA_rec.program_update_date = FND_API.G_MISS_DATE THEN
l_FNA_rec.program_update_date := NULL;
PROCEDURE Update_Row
( p_FNA_rec IN QP_Attr_Map_PUB.Fna_Rec_Type
)
IS
BEGIN
UPDATE QP_SOURCESYSTEM_FNAREA_MAP
SET ATTRIBUTE1 = p_FNA_rec.attribute1
, ATTRIBUTE10 = p_FNA_rec.attribute10
, ATTRIBUTE11 = p_FNA_rec.attribute11
, ATTRIBUTE12 = p_FNA_rec.attribute12
, ATTRIBUTE13 = p_FNA_rec.attribute13
, ATTRIBUTE14 = p_FNA_rec.attribute14
, ATTRIBUTE15 = p_FNA_rec.attribute15
, ATTRIBUTE2 = p_FNA_rec.attribute2
, ATTRIBUTE3 = p_FNA_rec.attribute3
, ATTRIBUTE4 = p_FNA_rec.attribute4
, ATTRIBUTE5 = p_FNA_rec.attribute5
, ATTRIBUTE6 = p_FNA_rec.attribute6
, ATTRIBUTE7 = p_FNA_rec.attribute7
, ATTRIBUTE8 = p_FNA_rec.attribute8
, ATTRIBUTE9 = p_FNA_rec.attribute9
, CONTEXT = p_FNA_rec.context
, CREATED_BY = p_FNA_rec.created_by
, CREATION_DATE = p_FNA_rec.creation_date
, ENABLED_FLAG = p_FNA_rec.enabled_flag
, FUNCTIONAL_AREA_ID = p_FNA_rec.functional_area_id
, LAST_UPDATED_BY = p_FNA_rec.last_updated_by
, LAST_UPDATE_DATE = p_FNA_rec.last_update_date
, LAST_UPDATE_LOGIN = p_FNA_rec.last_update_login
, PROGRAM_APPLICATION_ID = p_FNA_rec.program_application_id
, PROGRAM_ID = p_FNA_rec.program_id
, PROGRAM_UPDATE_DATE = p_FNA_rec.program_update_date
, PTE_SOURCESYSTEM_FNAREA_ID = p_FNA_rec.pte_sourcesystem_fnarea_id
, PTE_SOURCE_SYSTEM_ID = p_FNA_rec.pte_source_system_id
, REQUEST_ID = p_FNA_rec.request_id
, SEEDED_FLAG = p_FNA_rec.seeded_flag
WHERE PTE_SOURCESYSTEM_FNAREA_ID = p_FNA_rec.pte_sourcesystem_fnarea_id
;
, 'Update_Row'
);
END Update_Row;
PROCEDURE Insert_Row
( p_FNA_rec IN QP_Attr_Map_PUB.Fna_Rec_Type
)
IS
BEGIN
INSERT INTO QP_SOURCESYSTEM_FNAREA_MAP
( ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, CONTEXT
, CREATED_BY
, CREATION_DATE
, ENABLED_FLAG
, FUNCTIONAL_AREA_ID
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, PTE_SOURCESYSTEM_FNAREA_ID
, PTE_SOURCE_SYSTEM_ID
, REQUEST_ID
, SEEDED_FLAG
)
VALUES
( p_FNA_rec.attribute1
, p_FNA_rec.attribute10
, p_FNA_rec.attribute11
, p_FNA_rec.attribute12
, p_FNA_rec.attribute13
, p_FNA_rec.attribute14
, p_FNA_rec.attribute15
, p_FNA_rec.attribute2
, p_FNA_rec.attribute3
, p_FNA_rec.attribute4
, p_FNA_rec.attribute5
, p_FNA_rec.attribute6
, p_FNA_rec.attribute7
, p_FNA_rec.attribute8
, p_FNA_rec.attribute9
, p_FNA_rec.context
, p_FNA_rec.created_by
, p_FNA_rec.creation_date
, p_FNA_rec.enabled_flag
, p_FNA_rec.functional_area_id
, p_FNA_rec.last_updated_by
, p_FNA_rec.last_update_date
, p_FNA_rec.last_update_login
, p_FNA_rec.program_application_id
, p_FNA_rec.program_id
, p_FNA_rec.program_update_date
, p_FNA_rec.pte_sourcesystem_fnarea_id
, p_FNA_rec.pte_source_system_id
, p_FNA_rec.request_id
, p_FNA_rec.seeded_flag
);
, 'Insert_Row'
);
END Insert_Row;
PROCEDURE Delete_Row
( p_pte_sourcesystem_fnarea_id IN NUMBER
)
IS
BEGIN
DELETE FROM QP_SOURCESYSTEM_FNAREA_MAP
WHERE PTE_SOURCESYSTEM_FNAREA_ID = p_pte_sourcesystem_fnarea_id
;
, 'Delete_Row'
);
END Delete_Row;
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, CONTEXT
, CREATED_BY
, CREATION_DATE
, ENABLED_FLAG
, FUNCTIONAL_AREA_ID
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, PTE_SOURCESYSTEM_FNAREA_ID
, PTE_SOURCE_SYSTEM_ID
, REQUEST_ID
, SEEDED_FLAG
FROM QP_SOURCESYSTEM_FNAREA_MAP
WHERE ( PTE_SOURCESYSTEM_FNAREA_ID = p_pte_sourcesystem_fnarea_id
)
OR ( PTE_SOURCE_SYSTEM_ID = p_pte_source_system_id
);
l_FNA_rec.last_updated_by := l_implicit_rec.LAST_UPDATED_BY;
l_FNA_rec.last_update_date := l_implicit_rec.LAST_UPDATE_DATE;
l_FNA_rec.last_update_login := l_implicit_rec.LAST_UPDATE_LOGIN;
l_FNA_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
, CONTEXT
, CREATED_BY
, CREATION_DATE
, ENABLED_FLAG
, FUNCTIONAL_AREA_ID
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, PTE_SOURCESYSTEM_FNAREA_ID
, PTE_SOURCE_SYSTEM_ID
, REQUEST_ID
, SEEDED_FLAG
INTO l_FNA_rec.attribute1
, l_FNA_rec.attribute10
, l_FNA_rec.attribute11
, l_FNA_rec.attribute12
, l_FNA_rec.attribute13
, l_FNA_rec.attribute14
, l_FNA_rec.attribute15
, l_FNA_rec.attribute2
, l_FNA_rec.attribute3
, l_FNA_rec.attribute4
, l_FNA_rec.attribute5
, l_FNA_rec.attribute6
, l_FNA_rec.attribute7
, l_FNA_rec.attribute8
, l_FNA_rec.attribute9
, l_FNA_rec.context
, l_FNA_rec.created_by
, l_FNA_rec.creation_date
, l_FNA_rec.enabled_flag
, l_FNA_rec.functional_area_id
, l_FNA_rec.last_updated_by
, l_FNA_rec.last_update_date
, l_FNA_rec.last_update_login
, l_FNA_rec.program_application_id
, l_FNA_rec.program_id
, l_FNA_rec.program_update_date
, l_FNA_rec.pte_sourcesystem_fnarea_id
, l_FNA_rec.pte_source_system_id
, l_FNA_rec.request_id
, l_FNA_rec.seeded_flag
FROM QP_SOURCESYSTEM_FNAREA_MAP
WHERE PTE_SOURCESYSTEM_FNAREA_ID = p_FNA_rec.pte_sourcesystem_fnarea_id
FOR UPDATE NOWAIT;
AND QP_GLOBALS.Equal(p_FNA_rec.last_updated_by,
l_FNA_rec.last_updated_by)
AND QP_GLOBALS.Equal(p_FNA_rec.last_update_date,
l_FNA_rec.last_update_date)
AND QP_GLOBALS.Equal(p_FNA_rec.last_update_login,
l_FNA_rec.last_update_login)
AND QP_GLOBALS.Equal(p_FNA_rec.program_application_id,
l_FNA_rec.program_application_id)
AND QP_GLOBALS.Equal(p_FNA_rec.program_id,
l_FNA_rec.program_id)
AND QP_GLOBALS.Equal(p_FNA_rec.program_update_date,
l_FNA_rec.program_update_date)
AND QP_GLOBALS.Equal(p_FNA_rec.pte_sourcesystem_fnarea_id,
l_FNA_rec.pte_sourcesystem_fnarea_id)
AND QP_GLOBALS.Equal(p_FNA_rec.pte_source_system_id,
l_FNA_rec.pte_source_system_id)
AND QP_GLOBALS.Equal(p_FNA_rec.request_id,
l_FNA_rec.request_id)
AND QP_GLOBALS.Equal(p_FNA_rec.seeded_flag,
l_FNA_rec.seeded_flag)
THEN
-- Row has not changed. Set out parameter.
x_FNA_rec := l_FNA_rec;
FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_DELETED');
PROCEDURE Warn_Disable_Delete_Fna
( p_action IN VARCHAR2
, p_called_from_ui IN VARCHAR2
, p_functional_area_id NUMBER
, p_pte_ss_id IN NUMBER)
IS
l_action VARCHAR2(40);
IF p_action = 'DELETE' OR
p_action = 'DISABLE' THEN
IF p_called_from_ui = 'Y' THEN
l_msg_name := 'QP_WARN_DISABLE_FUNC_AREA_UI';
select pte_code, application_short_name
into l_pte, l_ss
from qp_pte_source_systems
where pte_source_system_id = p_pte_ss_id;
select functional_area_desc
into l_fna_desc
from qp_fass_v
where functional_area_id = p_functional_area_id;
END Warn_Disable_Delete_Fna;