The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
ITEM_RESIDUAL_ID,
ORIG_ITEM_RESIDUAL_ID,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
INVENTORY_ITEM_ID,
ORGANIZATION_ID,
CATEGORY_ID,
CATEGORY_SET_ID,
RESI_CATEGORY_SET_ID,
CATEGORY_TYPE_CODE,
RESIDUAL_TYPE_CODE,
CURRENCY_CODE,
STS_CODE,
EFFECTIVE_FROM_DATE,
EFFECTIVE_TO_DATE,
ORG_ID
FROM OKL_FE_ITEM_RESIDUAL_ALL WHERE OKL_FE_ITEM_RESIDUAL_ALL.item_residual_id=p_id;
l_irh_rec.LAST_UPDATED_BY,
l_irh_rec.LAST_UPDATE_DATE,
l_irh_rec.LAST_UPDATE_LOGIN,
l_irh_rec.INVENTORY_ITEM_ID,
l_irh_rec.ORGANIZATION_ID,
l_irh_rec.CATEGORY_ID,
l_irh_rec.CATEGORY_SET_ID,
l_irh_rec.RESI_CATEGORY_SET_ID,
l_irh_rec.CATEGORY_TYPE_CODE,
l_irh_rec.RESIDUAL_TYPE_CODE,
l_irh_rec.CURRENCY_CODE,
l_irh_rec.STS_CODE,
l_irh_rec.EFFECTIVE_FROM_DATE,
l_irh_rec.EFFECTIVE_TO_DATE,
l_irh_rec.ORG_ID;
SELECT
ITEM_RESIDUAL_ID
, ORIG_ITEM_RESIDUAL_ID
, OBJECT_VERSION_NUMBER
, CREATED_BY
, CREATION_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, INVENTORY_ITEM_ID
, ORGANIZATION_ID
, CATEGORY_ID
, CATEGORY_SET_ID
, RESI_CATEGORY_SET_ID
, CATEGORY_TYPE_CODE
, RESIDUAL_TYPE_CODE
, CURRENCY_CODE
, STS_CODE
, EFFECTIVE_FROM_DATE
, EFFECTIVE_TO_DATE
, ORG_ID
FROM
OKL_FE_ITEM_RESIDUAL_ALL IRH
WHERE
IRH.ITEM_RESIDUAL_ID = p_id;
, l_irhv_rec.last_updated_by
, l_irhv_rec.last_update_date
, l_irhv_rec.last_update_login
, l_irhv_rec.inventory_item_id
, l_irhv_rec.organization_id
, l_irhv_rec.category_id
, l_irhv_rec.category_set_id
, l_irhv_rec.resi_category_set_id
, l_irhv_rec.category_type_code
, l_irhv_rec.residual_type_code
, l_irhv_rec.currency_code
, l_irhv_rec.sts_code
, l_irhv_rec.effective_from_date
, l_irhv_rec.effective_to_date
, l_irhv_rec.org_id;
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;
IF (l_irhv_rec.LAST_UPDATED_BY=OKL_API.G_MISS_NUM) THEN
l_irhv_rec.LAST_UPDATED_BY:=NULL;
IF (l_irhv_rec.LAST_UPDATE_DATE=OKL_API.G_MISS_DATE) THEN
l_irhv_rec.LAST_UPDATE_DATE:=NULL;
IF (l_irhv_rec.LAST_UPDATE_LOGIN=OKL_API.G_MISS_NUM) THEN
l_irhv_rec.LAST_UPDATE_LOGIN:=NULL;
SELECT
FND.MEANING
FROM
FND_LOOKUPS FND
WHERE
FND.LOOKUP_TYPE = p_lookup_type
AND FND.LOOKUP_CODE = p_lookup_code;
SELECT
IRHV.ITEM_RESIDUAL_ID
FROM
OKL_FE_ITEM_RESIDUAL IRHV
-- , OKL_SYSTEM_PARAMS_ALL_V SYSOP
WHERE
IRHV.INVENTORY_ITEM_ID = p_inventory_item_id
AND IRHV.ORGANIZATION_ID = p_organization_id
AND IRHV.CATEGORY_SET_ID = p_category_set_id
AND IRHV.RESIDUAL_TYPE_CODE = p_residual_type_code
AND NVL(IRHV.CURRENCY_CODE,'NONE') = NVL(p_currency_code,'NONE')
-- AND SYSOP.CATEGORY_SET_ID = IRHV.CATEGORY_SET_ID
; -- end of cursor get_residual_items
SELECT
IRHV.ITEM_RESIDUAL_ID
FROM
OKL_FE_ITEM_RESIDUAL IRHV
-- , OKL_SYSTEM_PARAMS_ALL_V SYSOP
WHERE
IRHV.CATEGORY_ID = p_category_id
AND IRHV.CATEGORY_SET_ID = p_category_set_id
AND IRHV.RESIDUAL_TYPE_CODE = p_residual_type_code
AND NVL(IRHV.CURRENCY_CODE,'NONE') = NVL(p_currency_code,'NONE')
-- AND SYSOP.CATEGORY_SET_ID = IRHV.CATEGORY_SET_ID
; -- end of cursor get_residual_categories
SELECT
IRHV.ITEM_RESIDUAL_ID
FROM
OKL_FE_ITEM_RESIDUAL IRHV
-- , OKL_SYSTEM_PARAMS_ALL_V SYSOP
WHERE
IRHV.RESI_CATEGORY_SET_ID = p_resi_category_set_id
AND IRHV.RESIDUAL_TYPE_CODE = p_residual_type_code
AND NVL(IRHV.CURRENCY_CODE,'NONE') = NVL(p_currency_code,'NONE')
-- AND SYSOP.CATEGORY_SET_ID = IRHV.CATEGORY_SET_ID
; -- end of cursor get_residual_rcs
PROCEDURE insert_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irh_rec IN okl_irh_rec,
x_irh_rec OUT NOCOPY okl_irh_rec)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='insert_row';
INSERT INTO OKL_FE_ITEM_RESIDUAL_ALL(
ITEM_RESIDUAL_ID,
ORIG_ITEM_RESIDUAL_ID,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
INVENTORY_ITEM_ID,
ORGANIZATION_ID,
CATEGORY_ID,
CATEGORY_SET_ID,
RESI_CATEGORY_SET_ID,
CATEGORY_TYPE_CODE,
RESIDUAL_TYPE_CODE,
CURRENCY_CODE,
STS_CODE,
EFFECTIVE_FROM_DATE,
EFFECTIVE_TO_DATE,
ORG_ID)
VALUES (
l_irh_rec.ITEM_RESIDUAL_ID,
l_irh_rec.ORIG_ITEM_RESIDUAL_ID,
l_irh_rec.OBJECT_VERSION_NUMBER,
l_irh_rec.CREATED_BY,
l_irh_rec.CREATION_DATE,
l_irh_rec.LAST_UPDATED_BY,
l_irh_rec.LAST_UPDATE_DATE,
l_irh_rec.LAST_UPDATE_LOGIN,
l_irh_rec.INVENTORY_ITEM_ID,
l_irh_rec.ORGANIZATION_ID,
l_irh_rec.CATEGORY_ID,
l_irh_rec.CATEGORY_SET_ID,
l_irh_rec.RESI_CATEGORY_SET_ID,
l_irh_rec.CATEGORY_TYPE_CODE,
l_irh_rec.RESIDUAL_TYPE_CODE,
l_irh_rec.CURRENCY_CODE,
l_irh_rec.STS_CODE,
l_irh_rec.EFFECTIVE_FROM_DATE,
l_irh_rec.EFFECTIVE_TO_DATE,
l_irh_rec.ORG_ID);
END insert_row;
PROCEDURE insert_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irhv_rec IN okl_irhv_rec,
x_irhv_rec OUT NOCOPY okl_irhv_rec)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='v_insert_row';
l_irhv_rec.LAST_UPDATE_DATE := SYSDATE;
l_irhv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_irhv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
insert_row(
p_api_version,
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
l_irhrec,
lx_irh_rec);
END insert_row;
PROCEDURE insert_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irhv_tbl IN okl_irhv_tbl,
x_irhv_tbl OUT NOCOPY okl_irhv_tbl)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='v_insert_row';
insert_row (p_api_version => p_api_version,
p_init_msg_list => OKL_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_irhv_rec => p_irhv_tbl(i),
x_irhv_rec => x_irhv_tbl(i));
END insert_row;
SELECT OBJECT_VERSION_NUMBER
FROM OKL_FE_ITEM_RESIDUAL_ALL
WHERE ITEM_RESIDUAL_ID = p_def_irh_rec.item_residual_id
AND OBJECT_VERSION_NUMBER = p_def_irh_rec.object_version_number
FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
SELECT OBJECT_VERSION_NUMBER
FROM OKL_FE_ITEM_RESIDUAL_ALL
WHERE item_residual_id = p_def_irh_rec.item_residual_id;
OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
PROCEDURE update_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irh_rec IN okl_irh_rec,
x_irh_rec OUT NOCOPY okl_irh_rec)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='update_row';
UPDATE OKL_FE_ITEM_RESIDUAL_ALL
SET
ITEM_RESIDUAL_ID= l_def_irh_rec.ITEM_RESIDUAL_ID,
ORIG_ITEM_RESIDUAL_ID = l_def_irh_rec.ORIG_ITEM_RESIDUAL_ID,
OBJECT_VERSION_NUMBER= l_def_irh_rec.OBJECT_VERSION_NUMBER+1,
CREATED_BY= l_def_irh_rec.CREATED_BY,
CREATION_DATE= l_def_irh_rec.CREATION_DATE,
LAST_UPDATED_BY= l_def_irh_rec.LAST_UPDATED_BY,
LAST_UPDATE_DATE= l_def_irh_rec.LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN= l_def_irh_rec.LAST_UPDATE_LOGIN,
INVENTORY_ITEM_ID= l_def_irh_rec.INVENTORY_ITEM_ID,
ORGANIZATION_ID= l_def_irh_rec.ORGANIZATION_ID,
CATEGORY_ID= l_def_irh_rec.CATEGORY_ID,
CATEGORY_SET_ID= l_def_irh_rec.CATEGORY_SET_ID,
RESI_CATEGORY_SET_ID= l_def_irh_rec.RESI_CATEGORY_SET_ID,
CATEGORY_TYPE_CODE= l_def_irh_rec.CATEGORY_TYPE_CODE,
RESIDUAL_TYPE_CODE= l_def_irh_rec.RESIDUAL_TYPE_CODE,
CURRENCY_CODE= l_def_irh_rec.CURRENCY_CODE,
STS_CODE= l_def_irh_rec.STS_CODE,
EFFECTIVE_FROM_DATE= l_def_irh_rec.EFFECTIVE_FROM_DATE,
EFFECTIVE_TO_DATE= l_def_irh_rec.EFFECTIVE_TO_DATE,
ORG_ID= l_def_irh_rec.ORG_ID
WHERE ITEM_RESIDUAL_ID = l_def_irh_rec.ITEM_RESIDUAL_ID;
END update_row;
PROCEDURE update_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irhv_rec IN okl_irhv_rec,
x_irhv_rec OUT NOCOPY okl_irhv_rec)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='v_insert_row';
l_irhv_rec .LAST_UPDATE_DATE := SYSDATE;
l_irhv_rec .LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_irhv_rec .LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
IF (x_irhv_rec.LAST_UPDATED_BY IS NULL)
THEN
x_irhv_rec.LAST_UPDATED_BY:=l_irhv_rec.LAST_UPDATED_BY;
IF (x_irhv_rec.LAST_UPDATE_DATE IS NULL)
THEN
x_irhv_rec.LAST_UPDATE_DATE:=l_irhv_rec.LAST_UPDATE_DATE;
IF (x_irhv_rec.LAST_UPDATE_LOGIN IS NULL)
THEN
x_irhv_rec.LAST_UPDATE_LOGIN:=l_irhv_rec.LAST_UPDATE_LOGIN;
update_row(
p_api_version,
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
l_irhrec,
lx_irh_rec);
END update_row;
PROCEDURE update_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irhv_tbl IN okl_irhv_tbl,
x_irhv_tbl OUT NOCOPY okl_irhv_tbl)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='v_update_row';
update_row (p_api_version => p_api_version,
p_init_msg_list => OKL_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_irhv_rec => p_irhv_tbl(i),
x_irhv_rec => x_irhv_tbl(i));
END update_row;
PROCEDURE delete_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irh_rec IN okl_irh_rec)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='delete_row';
DELETE FROM OKL_FE_ITEM_RESIDUAL_ALL
WHERE ITEM_RESIDUAL_ID=l_irh_rec.item_residual_id;
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irhv_rec IN okl_irhv_rec)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='v_delete_row';
delete_row(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_irhrec);
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_irhv_tbl IN okl_irhv_tbl)IS
l_api_version CONSTANT NUMBER:=1;
l_api_name CONSTANT VARCHAR2(30):='v_delete_row';
delete_row (p_api_version => p_api_version,
p_init_msg_list => OKL_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_irhv_rec => p_irhv_tbl(i));
END delete_row;