The following lines contain the word 'select', 'insert', 'update' or 'delete':
| PROCEDURE Insert_Row |
+=======================================================================*/
PROCEDURE Insert_Row
(
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,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_row_id IN OUT NOCOPY VARCHAR2,
p_org_id NUMBER,
p_cc_num_method VARCHAR2,
p_cc_num_datatype VARCHAR2,
p_cc_next_num NUMBER,
p_cc_prefix VARCHAR2,
p_default_rate_type VARCHAR2,
p_enforce_vendor_hold_flag VARCHAR2,
p_last_update_date DATE,
p_last_updated_by NUMBER,
p_last_update_login NUMBER,
p_created_by NUMBER,
p_creation_date DATE
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
SELECT ROWID
FROM IGC_CC_SYSTEM_OPTIONS_ALL
WHERE org_id = p_org_id;
SAVEPOINT Insert_Row_Pvt;
INSERT INTO IGC_CC_SYSTEM_OPTIONS_ALL
(
org_id,
cc_num_method,
cc_num_datatype,
cc_next_num,
cc_prefix,
default_rate_type,
enforce_vendor_hold_flag,
last_update_date,
last_updated_by,
last_update_login,
creation_date,
created_by
)
VALUES
(
p_org_id,
p_cc_num_method,
p_cc_num_datatype,
p_cc_next_num,
p_cc_prefix,
p_default_rate_type,
p_enforce_vendor_hold_flag,
p_last_update_date,
p_last_updated_by,
p_last_update_login,
p_creation_date,
p_created_by
);
ROLLBACK TO Insert_Row_Pvt ;
ROLLBACK TO Insert_Row_Pvt ;
ROLLBACK TO Insert_Row_Pvt ;
END Insert_Row;
SELECT *
FROM IGC_CC_SYSTEM_OPTIONS_ALL
WHERE ROWID = p_row_id
FOR UPDATE NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
| PROCEDURE Update_Row |
+==========================================================================*/
PROCEDURE Update_Row
(
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,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_row_id IN OUT NOCOPY VARCHAR2,
p_org_id NUMBER,
p_cc_num_method VARCHAR2,
p_cc_num_datatype VARCHAR2,
p_cc_next_num NUMBER,
p_cc_prefix VARCHAR2,
p_default_rate_type VARCHAR2,
p_enforce_vendor_hold_flag VARCHAR2,
p_last_update_date DATE,
p_last_updated_by NUMBER,
p_last_update_login NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
SAVEPOINT Update_Row_Pvt;
UPDATE IGC_CC_SYSTEM_OPTIONS_ALL
SET
org_id = p_org_id,
cc_num_method = p_cc_num_method,
cc_num_datatype = p_cc_num_datatype,
cc_next_num = p_cc_next_num,
cc_prefix = p_cc_prefix,
default_rate_type = p_default_rate_type,
enforce_vendor_hold_flag = p_enforce_vendor_hold_flag,
last_update_date = p_last_update_date,
last_updated_by = p_last_updated_by,
last_update_login = p_last_update_login
WHERE ROWID = p_row_id;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
END Update_Row;
| PROCEDURE Delete_Row |
+==========================================================================*/
PROCEDURE Delete_Row
(
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,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_row_id IN VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row';
SAVEPOINT Delete_Row_Pvt;
DELETE FROM IGC_CC_SYSTEM_OPTIONS_ALL
WHERE ROWID = p_row_id;
ROLLBACK TO Delete_Row_Pvt;
ROLLBACK TO Delete_Row_Pvt;
ROLLBACK TO Delete_Row_Pvt;
END Delete_Row;
SELECT '1'
FROM igc_cc_system_options_all
WHERE org_id = p_org_id
AND (
p_row_id IS NULL
OR
rowid <> p_row_id
);
SELECT cc_prefix, cc_next_num
FROM igc_cc_system_options_all
WHERE org_id = l_org_id
FOR UPDATE NOWAIT; -- Added for bug 3329666
SELECT Nvl(cbc_po_enable, 'N')
INTO l_cbc_po_enable
FROM igc_cc_bc_enable
WHERE set_of_books_id = p_sob_id;
SELECT count(*)
INTO x_cc_num_exists
FROM igc_cc_headers
WHERE cc_num = x_cc_num;
SELECT count(*)
INTO x_po_num_exists
FROM po_headers
WHERE segment1 = x_cc_num;
UPDATE igc_cc_system_options_all
SET cc_next_num = x_cc_next_num + 1
WHERE org_id = p_org_id;