The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'x'
FROM ahl_pc_headers_b pch, ahl_pc_nodes_b pcn
WHERE pcn.pc_node_id = p_x_mel_cdl_header_rec.pc_node_id AND
pch.pc_header_id = pcn.pc_header_id AND
pch.primary_flag = 'Y' AND
pch.association_type_flag = 'U' AND
pch.status = 'COMPLETE';
SELECT 'x'
FROM ahl_mel_cdl_headers
WHERE pc_node_id = p_x_mel_cdl_header_rec.pc_node_id AND
mel_cdl_type_code = p_x_mel_cdl_header_rec.mel_cdl_type_code;
SELECT ahl_mel_cdl_headers_s.NEXTVAL INTO p_x_mel_cdl_header_rec.mel_cdl_header_id FROM DUAL;
INSERT INTO ahl_mel_cdl_headers
(
MEL_CDL_HEADER_ID,
OBJECT_VERSION_NUMBER,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
PC_NODE_ID,
MEL_CDL_TYPE_CODE,
STATUS_CODE,
REVISION,
VERSION_NUMBER,
REVISION_DATE,
EXPIRED_DATE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
)
VALUES
(
p_x_mel_cdl_header_rec.mel_cdl_header_id,
p_x_mel_cdl_header_rec.OBJECT_VERSION_NUMBER,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.login_id,
p_x_mel_cdl_header_rec.PC_NODE_ID,
p_x_mel_cdl_header_rec.MEL_CDL_TYPE_CODE,
p_x_mel_cdl_header_rec.STATUS_CODE,
p_x_mel_cdl_header_rec.REVISION,
p_x_mel_cdl_header_rec.VERSION_NUMBER,
p_x_mel_cdl_header_rec.REVISION_DATE,
p_x_mel_cdl_header_rec.EXPIRED_DATE,
p_x_mel_cdl_header_rec.ATTRIBUTE_CATEGORY,
p_x_mel_cdl_header_rec.ATTRIBUTE1,
p_x_mel_cdl_header_rec.ATTRIBUTE2,
p_x_mel_cdl_header_rec.ATTRIBUTE3,
p_x_mel_cdl_header_rec.ATTRIBUTE4,
p_x_mel_cdl_header_rec.ATTRIBUTE5,
p_x_mel_cdl_header_rec.ATTRIBUTE6,
p_x_mel_cdl_header_rec.ATTRIBUTE7,
p_x_mel_cdl_header_rec.ATTRIBUTE8,
p_x_mel_cdl_header_rec.ATTRIBUTE9,
p_x_mel_cdl_header_rec.ATTRIBUTE10,
p_x_mel_cdl_header_rec.ATTRIBUTE11,
p_x_mel_cdl_header_rec.ATTRIBUTE12,
p_x_mel_cdl_header_rec.ATTRIBUTE13,
p_x_mel_cdl_header_rec.ATTRIBUTE14,
p_x_mel_cdl_header_rec.ATTRIBUTE15
)
RETURNING MEL_CDL_HEADER_ID INTO p_x_mel_cdl_header_rec.mel_cdl_header_id;
PROCEDURE Update_Mel_Cdl
(
-- Standard IN params
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_default IN VARCHAR2 := FND_API.G_FALSE,
p_module_type IN VARCHAR2 := NULL,
-- Standard OUT params
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
-- Procedure IN, OUT, IN/OUT params
p_x_mel_cdl_header_rec IN OUT NOCOPY Header_Rec_Type
)
IS
-- Declare local variables
l_api_name CONSTANT VARCHAR2(30) := 'Update_Mel_Cdl';
SELECT object_version_number,
mel_cdl_type_code,
pc_node_id,
version_number,
status_code,
revision_date
FROM ahl_mel_cdl_headers
WHERE mel_cdl_header_id = p_x_mel_cdl_header_rec.mel_cdl_header_id
FOR UPDATE OF object_version_number NOWAIT;
SELECT 'x'
FROM ahl_mel_cdl_headers
WHERE pc_node_id = p_x_mel_cdl_header_rec.pc_node_id AND
mel_cdl_type_code = p_x_mel_cdl_header_rec.mel_cdl_type_code;
SELECT revision_date
FROM ahl_mel_cdl_headers
WHERE pc_node_id = p_x_mel_cdl_header_rec.pc_node_id AND
mel_cdl_type_code = p_x_mel_cdl_header_rec.mel_cdl_type_code AND
version_number = p_x_mel_cdl_header_rec.version_number - 1;
SAVEPOINT Update_Mel_Cdl_SP;
UPDATE ahl_mel_cdl_headers
SET OBJECT_VERSION_NUMBER = p_x_mel_cdl_header_rec.object_version_number,
LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = fnd_global.user_id,
LAST_UPDATE_LOGIN = fnd_global.login_id,
MEL_CDL_TYPE_CODE = p_x_mel_cdl_header_rec.mel_cdl_type_code,
STATUS_CODE = p_x_mel_cdl_header_rec.status_code,
REVISION = p_x_mel_cdl_header_rec.revision,
REVISION_DATE = p_x_mel_cdl_header_rec.revision_date,
EXPIRED_DATE = p_x_mel_cdl_header_rec.expired_date,
ATTRIBUTE_CATEGORY = p_x_mel_cdl_header_rec.attribute_category,
ATTRIBUTE1 = p_x_mel_cdl_header_rec.attribute1,
ATTRIBUTE2 = p_x_mel_cdl_header_rec.attribute2,
ATTRIBUTE3 = p_x_mel_cdl_header_rec.attribute3,
ATTRIBUTE4 = p_x_mel_cdl_header_rec.attribute4,
ATTRIBUTE5 = p_x_mel_cdl_header_rec.attribute5,
ATTRIBUTE6 = p_x_mel_cdl_header_rec.attribute6,
ATTRIBUTE7 = p_x_mel_cdl_header_rec.attribute7,
ATTRIBUTE8 = p_x_mel_cdl_header_rec.attribute8,
ATTRIBUTE9 = p_x_mel_cdl_header_rec.attribute9,
ATTRIBUTE10 = p_x_mel_cdl_header_rec.attribute10,
ATTRIBUTE11 = p_x_mel_cdl_header_rec.attribute11,
ATTRIBUTE12 = p_x_mel_cdl_header_rec.attribute12,
ATTRIBUTE13 = p_x_mel_cdl_header_rec.attribute13,
ATTRIBUTE14 = p_x_mel_cdl_header_rec.attribute14,
ATTRIBUTE15 = p_x_mel_cdl_header_rec.attribute15
WHERE MEL_CDL_HEADER_ID = p_x_mel_cdl_header_rec.mel_cdl_header_id;
'Updated MEL/CDL [mel_cdl_header_id='||p_x_mel_cdl_header_rec.MEL_CDL_HEADER_ID||'][pc_node_id='||p_x_mel_cdl_header_rec.PC_NODE_ID||'][mel_cdl_type_code='||p_x_mel_cdl_header_rec.MEL_CDL_TYPE_CODE||']'
);
Rollback to Update_Mel_Cdl_SP;
Rollback to Update_Mel_Cdl_SP;
Rollback to Update_Mel_Cdl_SP;
p_procedure_name => 'Update_Mel_Cdl',
p_error_text => SUBSTR(SQLERRM,1,240)
);
END Update_Mel_Cdl;
PROCEDURE Delete_Mel_Cdl
(
-- Standard IN params
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_default IN VARCHAR2 := FND_API.G_FALSE,
p_module_type IN VARCHAR2 := NULL,
-- Standard OUT params
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
-- Procedure IN, OUT, IN/OUT params
p_mel_cdl_header_id IN NUMBER,
p_mel_cdl_object_version IN NUMBER
)
IS
-- Declare local variables
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Mel_Cdl';
SELECT status_code
FROM ahl_mel_cdl_headers
WHERE mel_cdl_header_id = p_mel_cdl_header_id;
SELECT note.jtf_note_id
FROM ahl_mel_cdl_ata_sequences ata, jtf_notes_b note
WHERE ata.mel_cdl_header_id = p_mel_cdl_header_id AND
ata.mel_cdl_ata_sequence_id = note.source_object_id AND
note.source_object_code = 'AHL_MEL_CDL';
SAVEPOINT Delete_Mel_Cdl_SP;
CAC_NOTES_PVT.delete_note
(
note_rec.jtf_note_id,
x_return_status,
x_msg_count,
x_msg_data
);
'All JTF notes associated with ATA sequences deleted'
);
DELETE FROM ahl_mel_cdl_relationships
WHERE ata_sequence_id IN
(
SELECT mel_cdl_ata_sequence_id
FROM ahl_mel_cdl_ata_sequences
WHERE mel_cdl_header_id = p_mel_cdl_header_id
);
'All ATA relationships associated with ATA sequences deleted'
);
DELETE FROM ahl_mel_cdl_mo_procedures
WHERE ata_sequence_id IN
(
SELECT mel_cdl_ata_sequence_id
FROM ahl_mel_cdl_ata_sequences
WHERE mel_cdl_header_id = p_mel_cdl_header_id
);
'All MO procedures associated with ATA sequences deleted'
);
DELETE FROM ahl_mel_cdl_ata_sequences
WHERE mel_cdl_header_id = p_mel_cdl_header_id;
'All ATA sequences deleted'
);
DELETE FROM ahl_mel_cdl_headers
WHERE mel_cdl_header_id = p_mel_cdl_header_id;
'Deleted MEL/CDL [mel_cdl_header_id='||p_mel_cdl_header_id||'] and all its associations'
);
Rollback to Delete_Mel_Cdl_SP;
Rollback to Delete_Mel_Cdl_SP;
Rollback to Delete_Mel_Cdl_SP;
p_procedure_name => 'Delete_Mel_Cdl',
p_error_text => SUBSTR(SQLERRM,1,240)
);
END Delete_Mel_Cdl;
SELECT pc_node_id,
mel_cdl_type_code,
status_code,
version_number,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15
FROM ahl_mel_cdl_headers
WHERE mel_cdl_header_id = p_mel_cdl_header_id;
SELECT mel_cdl_ata_sequence_id,
repair_category_id,
ata_code,
installed_number,
dispatch_number,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15
FROM ahl_mel_cdl_ata_sequences
WHERE mel_cdl_header_id = p_mel_cdl_header_id;
SELECT jtf_note_id,
parent_note_id,
notes,
notes_detail, -- the CLOB field
note_status,
note_type,
entered_by,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15
FROM jtf_notes_vl
WHERE source_object_id = p_ata_sequence_id AND
source_object_code = 'AHL_MEL_CDL';
SELECT mo.mel_cdl_mo_procedure_id,
mo.mr_header_id,
mo.attribute_category,
mo.attribute1,
mo.attribute2,
mo.attribute3,
mo.attribute4,
mo.attribute5,
mo.attribute6,
mo.attribute7,
mo.attribute8,
mo.attribute9,
mo.attribute10,
mo.attribute11,
mo.attribute12,
mo.attribute13,
mo.attribute14,
mo.attribute15
FROM ahl_mel_cdl_mo_procedures mo, ahl_mr_headers_app_v mrh
WHERE mo.mr_header_id = mrh.mr_header_id and
mrh.mr_status_code = 'COMPLETE' and
trunc(sysdate) between trunc(mrh.effective_from) and trunc(nvl(effective_to, sysdate + 1)) and
mo.ata_sequence_id = p_ata_sequence_id;
SELECT mel_cdl_relationship_id,
related_ata_sequence_id,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15
FROM ahl_mel_cdl_relationships
WHERE ata_sequence_id = p_ata_sequence_id;
SELECT nvl(max(version_number), 1)
INTO l_max_rev
FROM ahl_mel_cdl_headers
WHERE pc_node_id = l_mel_cdl_rec.pc_node_id AND
mel_cdl_type_code = l_mel_cdl_rec.mel_cdl_type_code;
INSERT INTO ahl_mel_cdl_headers
(
MEL_CDL_HEADER_ID,
OBJECT_VERSION_NUMBER,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
PC_NODE_ID,
MEL_CDL_TYPE_CODE,
STATUS_CODE,
REVISION,
VERSION_NUMBER,
REVISION_DATE,
EXPIRED_DATE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
)
VALUES
(
ahl_mel_cdl_headers_s.NEXTVAL,
1,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.login_id,
l_mel_cdl_rec.PC_NODE_ID,
l_mel_cdl_rec.MEL_CDL_TYPE_CODE,
'DRAFT',
to_char(l_mel_cdl_rec.version_number + 1),
l_mel_cdl_rec.version_number + 1,
sysdate,
null,
l_mel_cdl_rec.ATTRIBUTE_CATEGORY,
l_mel_cdl_rec.ATTRIBUTE1,
l_mel_cdl_rec.ATTRIBUTE2,
l_mel_cdl_rec.ATTRIBUTE3,
l_mel_cdl_rec.ATTRIBUTE4,
l_mel_cdl_rec.ATTRIBUTE5,
l_mel_cdl_rec.ATTRIBUTE6,
l_mel_cdl_rec.ATTRIBUTE7,
l_mel_cdl_rec.ATTRIBUTE8,
l_mel_cdl_rec.ATTRIBUTE9,
l_mel_cdl_rec.ATTRIBUTE10,
l_mel_cdl_rec.ATTRIBUTE11,
l_mel_cdl_rec.ATTRIBUTE12,
l_mel_cdl_rec.ATTRIBUTE13,
l_mel_cdl_rec.ATTRIBUTE14,
l_mel_cdl_rec.ATTRIBUTE15
)
RETURNING mel_cdl_header_id INTO x_new_mel_cdl_header_id;
INSERT INTO ahl_mel_cdl_ata_sequences
(
MEL_CDL_ATA_SEQUENCE_ID,
OBJECT_VERSION_NUMBER,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
MEL_CDL_HEADER_ID,
REPAIR_CATEGORY_ID,
ATA_CODE,
INSTALLED_NUMBER,
DISPATCH_NUMBER,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
)
VALUES
(
ahl_mel_cdl_ata_sequences_s.nextval,
1,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.login_id,
x_new_mel_cdl_header_id,
l_ata_rec.REPAIR_CATEGORY_ID,
l_ata_rec.ATA_CODE,
l_ata_rec.INSTALLED_NUMBER,
l_ata_rec.DISPATCH_NUMBER,
l_ata_rec.ATTRIBUTE_CATEGORY,
l_ata_rec.ATTRIBUTE1,
l_ata_rec.ATTRIBUTE2,
l_ata_rec.ATTRIBUTE3,
l_ata_rec.ATTRIBUTE4,
l_ata_rec.ATTRIBUTE5,
l_ata_rec.ATTRIBUTE6,
l_ata_rec.ATTRIBUTE7,
l_ata_rec.ATTRIBUTE8,
l_ata_rec.ATTRIBUTE9,
l_ata_rec.ATTRIBUTE10,
l_ata_rec.ATTRIBUTE11,
l_ata_rec.ATTRIBUTE12,
l_ata_rec.ATTRIBUTE13,
l_ata_rec.ATTRIBUTE14,
l_ata_rec.ATTRIBUTE15
)
RETURNING mel_cdl_ata_sequence_id INTO l_old_new_ata_tbl(l_ata_rec_idx).new_object_id;
p_last_update_date => sysdate,
p_last_updated_by => fnd_global.user_id,
p_last_update_login => fnd_global.login_id,
x_jtf_note_id => l_new_note_id,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
);
INSERT INTO ahl_mel_cdl_mo_procedures
(
MEL_CDL_MO_PROCEDURE_ID,
OBJECT_VERSION_NUMBER,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
ATA_SEQUENCE_ID,
MR_HEADER_ID,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
)
VALUES
(
ahl_mel_cdl_mo_procedures_s.nextval,
1,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.login_id,
l_old_new_ata_tbl(l_ata_rec_idx).new_object_id,
l_mo_proc_rec.MR_HEADER_ID,
l_mo_proc_rec.ATTRIBUTE_CATEGORY,
l_mo_proc_rec.ATTRIBUTE1,
l_mo_proc_rec.ATTRIBUTE2,
l_mo_proc_rec.ATTRIBUTE3,
l_mo_proc_rec.ATTRIBUTE4,
l_mo_proc_rec.ATTRIBUTE5,
l_mo_proc_rec.ATTRIBUTE6,
l_mo_proc_rec.ATTRIBUTE7,
l_mo_proc_rec.ATTRIBUTE8,
l_mo_proc_rec.ATTRIBUTE9,
l_mo_proc_rec.ATTRIBUTE10,
l_mo_proc_rec.ATTRIBUTE11,
l_mo_proc_rec.ATTRIBUTE12,
l_mo_proc_rec.ATTRIBUTE13,
l_mo_proc_rec.ATTRIBUTE14,
l_mo_proc_rec.ATTRIBUTE15
);
INSERT INTO ahl_mel_cdl_relationships
(
MEL_CDL_RELATIONSHIP_ID,
OBJECT_VERSION_NUMBER,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
ATA_SEQUENCE_ID,
RELATED_ATA_SEQUENCE_ID,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
)
VALUES
(
ahl_mel_cdl_relationships_s.nextval,
1,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
fnd_global.login_id,
l_old_new_ata_tbl(l_ata_rec_idx).new_object_id,
--priyan
--Fix for Bug #5468974
--l_ata_rel_rec.RELATED_ATA_SEQUENCE_ID,
l_rel_ata_seq_id,
l_ata_rel_rec.ATTRIBUTE_CATEGORY,
l_ata_rel_rec.ATTRIBUTE1,
l_ata_rel_rec.ATTRIBUTE2,
l_ata_rel_rec.ATTRIBUTE3,
l_ata_rel_rec.ATTRIBUTE4,
l_ata_rel_rec.ATTRIBUTE5,
l_ata_rel_rec.ATTRIBUTE6,
l_ata_rel_rec.ATTRIBUTE7,
l_ata_rel_rec.ATTRIBUTE8,
l_ata_rel_rec.ATTRIBUTE9,
l_ata_rel_rec.ATTRIBUTE10,
l_ata_rel_rec.ATTRIBUTE11,
l_ata_rel_rec.ATTRIBUTE12,
l_ata_rel_rec.ATTRIBUTE13,
l_ata_rel_rec.ATTRIBUTE14,
l_ata_rel_rec.ATTRIBUTE15
);
SELECT object_version_number,
pc_node_id,
mel_cdl_type_code,
status_code,
version_number,
revision,
revision_date
FROM ahl_mel_cdl_headers
WHERE mel_cdl_header_id = p_mel_cdl_header_id
FOR UPDATE OF object_version_number NOWAIT;
SELECT 'x'
FROM ahl_mel_cdl_headers
WHERE pc_node_id = p_pc_node_id AND
mel_cdl_type_code = p_mel_cdl_type_code AND
revision = p_revision AND
mel_cdl_header_id <> p_mel_cdl_header_id;
SELECT mel_cdl_header_id,
revision_date
FROM ahl_mel_cdl_headers
WHERE pc_node_id = p_pc_node_id AND
mel_cdl_type_code = p_mel_cdl_type AND
version_number = p_version_number - 1;
UPDATE ahl_mel_cdl_headers
SET status_code = 'APPROVAL_PENDING',
object_version_number = p_mel_cdl_object_version + 1,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE mel_cdl_header_id = p_mel_cdl_header_id;
UPDATE ahl_mel_cdl_headers
SET status_code = 'COMPLETE',
object_version_number = p_mel_cdl_object_version + 1,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE mel_cdl_header_id = p_mel_cdl_header_id;
UPDATE ahl_mel_cdl_headers
SET expired_date = l_prev_expired_date,
object_version_number = object_version_number + 1,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE mel_cdl_header_id = l_prev_mel_cdl_header_id;
SELECT object_version_number
FROM ahl_mel_cdl_headers
WHERE mel_cdl_header_id = p_mel_cdl_header_id;
SELECT 'x'
FROM ahl_mel_cdl_headers
WHERE pc_node_id = p_x_mel_cdl_header_rec.pc_node_id AND
mel_cdl_type_code = p_x_mel_cdl_header_rec.mel_cdl_type_code AND
revision = p_x_mel_cdl_header_rec.revision AND
mel_cdl_header_id <> nvl(p_x_mel_cdl_header_rec.mel_cdl_header_id, -1);