The following lines contain the word 'select', 'insert', 'update' or 'delete':
DELETE FROM OKC_TIME_CODE_UNITS_TL T
WHERE NOT EXISTS (
SELECT NULL
FROM OKC_TIME_CODE_UNITS_B B
WHERE B.uom_code = T.uom_code
AND B.TCE_CODE = T.TCE_CODE
);
UPDATE OKC_TIME_CODE_UNITS_TL T SET (
SHORT_DESCRIPTION,
DESCRIPTION,
COMMENTS) = (SELECT
B.SHORT_DESCRIPTION,
B.DESCRIPTION,
B.COMMENTS
FROM OKC_TIME_CODE_UNITS_TL B
WHERE B.uom_code = T.uom_code
AND B.TCE_CODE = T.TCE_CODE
AND B.LANGUAGE = T.SOURCE_LANG)
WHERE (
T.uom_code,
T.TCE_CODE,
T.LANGUAGE)
IN (SELECT
SUBT.uom_code,
SUBT.TCE_CODE,
SUBT.LANGUAGE
FROM OKC_TIME_CODE_UNITS_TL SUBB, OKC_TIME_CODE_UNITS_TL SUBT
WHERE SUBB.uom_code = SUBT.uom_code
AND SUBB.TCE_CODE = SUBT.TCE_CODE
AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
AND (SUBB.SHORT_DESCRIPTION <> SUBT.SHORT_DESCRIPTION
OR SUBB.DESCRIPTION <> SUBT.DESCRIPTION
OR SUBB.COMMENTS <> SUBT.COMMENTS
OR (SUBB.SHORT_DESCRIPTION IS NULL AND SUBT.SHORT_DESCRIPTION IS NOT NULL)
OR (SUBB.SHORT_DESCRIPTION IS NOT NULL AND SUBT.SHORT_DESCRIPTION IS NULL)
OR (SUBB.DESCRIPTION IS NULL AND SUBT.DESCRIPTION IS NOT NULL)
OR (SUBB.DESCRIPTION IS NOT NULL AND SUBT.DESCRIPTION IS NULL)
OR (SUBB.COMMENTS IS NULL AND SUBT.COMMENTS IS NOT NULL)
OR (SUBB.COMMENTS IS NOT NULL AND SUBT.COMMENTS IS NULL)
));
INSERT INTO OKC_TIME_CODE_UNITS_TL (
uom_code,
TCE_CODE,
LANGUAGE,
SOURCE_LANG,
SFWT_FLAG,
SHORT_DESCRIPTION,
DESCRIPTION,
COMMENTS,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN)
SELECT
B.uom_code,
B.TCE_CODE,
L.LANGUAGE_CODE,
B.SOURCE_LANG,
B.SFWT_FLAG,
B.SHORT_DESCRIPTION,
B.DESCRIPTION,
B.COMMENTS,
B.CREATED_BY,
B.CREATION_DATE,
B.LAST_UPDATED_BY,
B.LAST_UPDATE_DATE,
B.LAST_UPDATE_LOGIN
FROM OKC_TIME_CODE_UNITS_TL B, FND_LANGUAGES L
WHERE L.INSTALLED_FLAG IN ('I', 'B')
AND B.LANGUAGE = USERENV('LANG')
AND NOT EXISTS(
SELECT NULL
FROM OKC_TIME_CODE_UNITS_TL T
WHERE T.uom_code = B.uom_code
AND T.TCE_CODE = B.TCE_CODE
AND T.LANGUAGE = L.LANGUAGE_CODE
);
SELECT
TCE_CODE,
uom_code,
QUANTITY,
ACTIVE_FLAG,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
FROM Okc_Time_Code_Units_B
WHERE okc_time_code_units_b.uom_code = p_uom_code
AND okc_time_code_units_b.tce_code = p_tce_code;
l_tcu_rec.LAST_UPDATED_BY,
l_tcu_rec.LAST_UPDATE_DATE,
l_tcu_rec.LAST_UPDATE_LOGIN,
l_tcu_rec.ATTRIBUTE_CATEGORY,
l_tcu_rec.ATTRIBUTE1,
l_tcu_rec.ATTRIBUTE2,
l_tcu_rec.ATTRIBUTE3,
l_tcu_rec.ATTRIBUTE4,
l_tcu_rec.ATTRIBUTE5,
l_tcu_rec.ATTRIBUTE6,
l_tcu_rec.ATTRIBUTE7,
l_tcu_rec.ATTRIBUTE8,
l_tcu_rec.ATTRIBUTE9,
l_tcu_rec.ATTRIBUTE10,
l_tcu_rec.ATTRIBUTE11,
l_tcu_rec.ATTRIBUTE12,
l_tcu_rec.ATTRIBUTE13,
l_tcu_rec.ATTRIBUTE14,
l_tcu_rec.ATTRIBUTE15;
SELECT
uom_code,
TCE_CODE,
LANGUAGE,
SOURCE_LANG,
SFWT_FLAG,
SHORT_DESCRIPTION,
DESCRIPTION,
COMMENTS,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
FROM Okc_Time_Code_Units_Tl
WHERE okc_time_code_units_tl.uom_code = p_uom_code
AND okc_time_code_units_tl.tce_code = p_tce_code
AND okc_time_code_units_tl.language = p_language;
l_okc_time_code_units_tl_rec.LAST_UPDATED_BY,
l_okc_time_code_units_tl_rec.LAST_UPDATE_DATE,
l_okc_time_code_units_tl_rec.LAST_UPDATE_LOGIN;
SELECT
uom_code,
TCE_CODE,
OBJECT_VERSION_NUMBER,
SFWT_FLAG,
QUANTITY,
ACTIVE_FLAG,
SHORT_DESCRIPTION,
DESCRIPTION,
COMMENTS,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
FROM Okc_Time_Code_Units_V
WHERE okc_time_code_units_v.tce_code = p_tce_code
AND okc_time_code_units_v.uom_code = p_uom_code;
l_tcuv_rec.LAST_UPDATED_BY,
l_tcuv_rec.LAST_UPDATE_DATE,
l_tcuv_rec.LAST_UPDATE_LOGIN;
IF (l_tcuv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
l_tcuv_rec.last_updated_by := NULL;
IF (l_tcuv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
l_tcuv_rec.last_update_date := NULL;
IF (l_tcuv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
l_tcuv_rec.last_update_login := NULL;
SELECT '1'
FROM OKX_Units_Of_Measure_v
WHERE uom_code = p_uom_code;
SELECT '1'
FROM okc_timeunit_v
WHERE uom_code = p_uom_code
AND active_flag = 'Y';
SELECT '1'
FROM OKX_Units_Of_Measure_v
WHERE uom_code = p_uom_code
AND (trunc(disable_date) > trunc(sysdate) or
disable_date is NULL);
SELECT 1
FROM okc_time_code_units_b
WHERE tce_code = p_tce_code
AND uom_code = p_uom_code;
SELECT 1
FROM okc_time_code_units_b
WHERE uom_code = p_uom_code
AND quantity = p_quantity;
p_to.last_updated_by := p_from.last_updated_by;
p_to.last_update_date := p_from.last_update_date;
p_to.last_update_login := p_from.last_update_login;
p_to.last_updated_by := p_from.last_updated_by;
p_to.last_update_date := p_from.last_update_date;
p_to.last_update_login := p_from.last_update_login;
p_to.last_updated_by := p_from.last_updated_by;
p_to.last_update_date := p_from.last_update_date;
p_to.last_update_login := p_from.last_update_login;
p_to.last_updated_by := p_from.last_updated_by;
p_to.last_update_date := p_from.last_update_date;
p_to.last_update_login := p_from.last_update_login;
PROCEDURE insert_row(
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcu_rec IN tcu_rec_type,
x_tcu_rec OUT NOCOPY tcu_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
INSERT INTO OKC_TIME_CODE_UNITS_B(
tce_code,
uom_code,
quantity,
active_flag,
object_version_number,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15)
VALUES (
l_tcu_rec.tce_code,
l_tcu_rec.uom_code,
l_tcu_rec.quantity,
l_tcu_rec.active_flag,
l_tcu_rec.object_version_number,
l_tcu_rec.created_by,
l_tcu_rec.creation_date,
l_tcu_rec.last_updated_by,
l_tcu_rec.last_update_date,
l_tcu_rec.last_update_login,
l_tcu_rec.attribute_category,
l_tcu_rec.attribute1,
l_tcu_rec.attribute2,
l_tcu_rec.attribute3,
l_tcu_rec.attribute4,
l_tcu_rec.attribute5,
l_tcu_rec.attribute6,
l_tcu_rec.attribute7,
l_tcu_rec.attribute8,
l_tcu_rec.attribute9,
l_tcu_rec.attribute10,
l_tcu_rec.attribute11,
l_tcu_rec.attribute12,
l_tcu_rec.attribute13,
l_tcu_rec.attribute14,
l_tcu_rec.attribute15);
END insert_row;
PROCEDURE insert_row(
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_okc_time_code_units_tl_rec IN OkcTimeCodeUnitsTlRecType,
x_okc_time_code_units_tl_rec OUT NOCOPY OkcTimeCodeUnitsTlRecType) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
SELECT *
FROM FND_LANGUAGES
WHERE INSTALLED_FLAG IN ('I', 'B');
INSERT INTO OKC_TIME_CODE_UNITS_TL(
uom_code,
tce_code,
language,
source_lang,
sfwt_flag,
short_description,
description,
comments,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login)
VALUES (
l_okc_time_code_units_tl_rec.uom_code,
l_okc_time_code_units_tl_rec.tce_code,
l_okc_time_code_units_tl_rec.language,
l_okc_time_code_units_tl_rec.source_lang,
l_okc_time_code_units_tl_rec.sfwt_flag,
l_okc_time_code_units_tl_rec.short_description,
l_okc_time_code_units_tl_rec.description,
l_okc_time_code_units_tl_rec.comments,
l_okc_time_code_units_tl_rec.created_by,
l_okc_time_code_units_tl_rec.creation_date,
l_okc_time_code_units_tl_rec.last_updated_by,
l_okc_time_code_units_tl_rec.last_update_date,
l_okc_time_code_units_tl_rec.last_update_login);
END insert_row;
PROCEDURE insert_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcuv_rec IN tcuv_rec_type,
x_tcuv_rec OUT NOCOPY tcuv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
l_tcuv_rec.LAST_UPDATE_DATE := l_tcuv_rec.CREATION_DATE;
l_tcuv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_tcuv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
insert_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_tcu_rec,
lx_tcu_rec
);
insert_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_okc_time_code_units_tl_rec,
lx_okc_time_code_units_tl_rec
);
END insert_row;
PROCEDURE insert_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcuv_tbl IN tcuv_tbl_type,
x_tcuv_tbl OUT NOCOPY tcuv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
insert_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_tcuv_rec => p_tcuv_tbl(i),
x_tcuv_rec => x_tcuv_tbl(i));
END insert_row;
SELECT OBJECT_VERSION_NUMBER
FROM OKC_TIME_CODE_UNITS_B
WHERE uom_code = p_tcu_rec.uom_code
AND TCE_CODE = p_tcu_rec.tce_code
AND OBJECT_VERSION_NUMBER = p_tcu_rec.object_version_number
FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
SELECT OBJECT_VERSION_NUMBER
FROM OKC_TIME_CODE_UNITS_B
WHERE uom_code = p_tcu_rec.uom_code
AND TCE_CODE = p_tcu_rec.tce_code;
OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
SELECT uom_code
FROM OKC_TIME_CODE_UNITS_TL
WHERE uom_code = p_okc_time_code_units_tl_rec.uom_code
AND TCE_CODE = p_okc_time_code_units_tl_rec.tce_code
FOR UPDATE NOWAIT;
OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
PROCEDURE update_row(
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcu_rec IN tcu_rec_type,
x_tcu_rec OUT NOCOPY tcu_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
IF (x_tcu_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_tcu_rec.last_updated_by := l_tcu_rec.last_updated_by;
IF (x_tcu_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_tcu_rec.last_update_date := l_tcu_rec.last_update_date;
IF (x_tcu_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_tcu_rec.last_update_login := l_tcu_rec.last_update_login;
UPDATE OKC_TIME_CODE_UNITS_B
SET QUANTITY = l_def_tcu_rec.quantity,
ACTIVE_FLAG = l_def_tcu_rec.active_flag,
OBJECT_VERSION_NUMBER = l_def_tcu_rec.object_version_number,
CREATED_BY = l_def_tcu_rec.created_by,
CREATION_DATE = l_def_tcu_rec.creation_date,
LAST_UPDATED_BY = l_def_tcu_rec.last_updated_by,
LAST_UPDATE_DATE = l_def_tcu_rec.last_update_date,
LAST_UPDATE_LOGIN = l_def_tcu_rec.last_update_login,
ATTRIBUTE_CATEGORY = l_def_tcu_rec.attribute_category,
ATTRIBUTE1 = l_def_tcu_rec.attribute1,
ATTRIBUTE2 = l_def_tcu_rec.attribute2,
ATTRIBUTE3 = l_def_tcu_rec.attribute3,
ATTRIBUTE4 = l_def_tcu_rec.attribute4,
ATTRIBUTE5 = l_def_tcu_rec.attribute5,
ATTRIBUTE6 = l_def_tcu_rec.attribute6,
ATTRIBUTE7 = l_def_tcu_rec.attribute7,
ATTRIBUTE8 = l_def_tcu_rec.attribute8,
ATTRIBUTE9 = l_def_tcu_rec.attribute9,
ATTRIBUTE10 = l_def_tcu_rec.attribute10,
ATTRIBUTE11 = l_def_tcu_rec.attribute11,
ATTRIBUTE12 = l_def_tcu_rec.attribute12,
ATTRIBUTE13 = l_def_tcu_rec.attribute13,
ATTRIBUTE14 = l_def_tcu_rec.attribute14,
ATTRIBUTE15 = l_def_tcu_rec.attribute15
WHERE uom_code = l_def_tcu_rec.uom_code
AND TCE_CODE = l_def_tcu_rec.tce_code;
END update_row;
PROCEDURE update_row(
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_okc_time_code_units_tl_rec IN OkcTimeCodeUnitsTlRecType,
x_okc_time_code_units_tl_rec OUT NOCOPY OkcTimeCodeUnitsTlRecType) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
IF (x_okc_time_code_units_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_okc_time_code_units_tl_rec.last_updated_by := l_okc_time_code_units_tl_rec.last_updated_by;
IF (x_okc_time_code_units_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_okc_time_code_units_tl_rec.last_update_date := l_okc_time_code_units_tl_rec.last_update_date;
IF (x_okc_time_code_units_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_okc_time_code_units_tl_rec.last_update_login := l_okc_time_code_units_tl_rec.last_update_login;
UPDATE OKC_TIME_CODE_UNITS_TL
SET SHORT_DESCRIPTION = ldefokctimecodeunitstlrec.short_description,
DESCRIPTION = ldefokctimecodeunitstlrec.description,
COMMENTS = ldefokctimecodeunitstlrec.comments,
CREATED_BY = ldefokctimecodeunitstlrec.created_by,
CREATION_DATE = ldefokctimecodeunitstlrec.creation_date,
LAST_UPDATED_BY = ldefokctimecodeunitstlrec.last_updated_by,
LAST_UPDATE_DATE = ldefokctimecodeunitstlrec.last_update_date,
LAST_UPDATE_LOGIN = ldefokctimecodeunitstlrec.last_update_login
WHERE uom_code = ldefokctimecodeunitstlrec.uom_code
AND TCE_CODE = ldefokctimecodeunitstlrec.tce_code
AND SOURCE_LANG = USERENV('LANG');
UPDATE OKC_TIME_CODE_UNITS_TL
SET SFWT_FLAG = 'Y'
WHERE uom_code = ldefokctimecodeunitstlrec.uom_code
AND TCE_CODE = ldefokctimecodeunitstlrec.tce_code
AND SOURCE_LANG <> USERENV('LANG');
END update_row;
PROCEDURE update_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcuv_rec IN tcuv_rec_type,
x_tcuv_rec OUT NOCOPY tcuv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
l_tcuv_rec.LAST_UPDATE_DATE := SYSDATE;
l_tcuv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_tcuv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
IF (x_tcuv_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_tcuv_rec.last_updated_by := l_tcuv_rec.last_updated_by;
IF (x_tcuv_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_tcuv_rec.last_update_date := l_tcuv_rec.last_update_date;
IF (x_tcuv_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_tcuv_rec.last_update_login := l_tcuv_rec.last_update_login;
update_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_okc_time_code_units_tl_rec,
lx_okc_time_code_units_tl_rec
);
update_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_tcu_rec,
lx_tcu_rec
);
END update_row;
PROCEDURE update_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcuv_tbl IN tcuv_tbl_type,
x_tcuv_tbl OUT NOCOPY tcuv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
update_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_tcuv_rec => p_tcuv_tbl(i),
x_tcuv_rec => x_tcuv_tbl(i));
END update_row;
PROCEDURE delete_row(
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcu_rec IN tcu_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
DELETE FROM OKC_TIME_CODE_UNITS_B
WHERE uom_code = l_tcu_rec.uom_code AND
TCE_CODE = l_tcu_rec.tce_code;
END delete_row;
PROCEDURE delete_row(
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_okc_time_code_units_tl_rec IN OkcTimeCodeUnitsTlRecType) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
DELETE FROM OKC_TIME_CODE_UNITS_TL
WHERE uom_code = l_okc_time_code_units_tl_rec.uom_code AND
TCE_CODE = l_okc_time_code_units_tl_rec.tce_code;
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcuv_rec IN tcuv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
delete_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_okc_time_code_units_tl_rec
);
delete_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_tcu_rec
);
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_tcuv_tbl IN tcuv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
delete_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_tcuv_rec => p_tcuv_tbl(i));
END delete_row;