The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT pol.calculation_method,
pol.Vendor_Site_code,
pol.vendor_site_id,
nvl(pol.asset_policy_id,0)
FROM fa_ins_mst_pols_v pol
WHERE pol.vendor_id = X_Vendor_id
AND pol.policy_number = X_Policy_number
;
PROCEDURE Insert_Row( X_Rowid IN OUT NOCOPY VARCHAR2,
X_Asset_policy_id IN OUT NOCOPY NUMBER,
X_Asset_id VARCHAR2,
X_Book_type_code VARCHAR2,
X_Policy_number VARCHAR2,
X_Vendor_site_id NUMBER,
X_Vendor_id NUMBER,
X_Calculation_method VARCHAR2,
X_Current_insurance_value NUMBER,
X_Base_insurance_value NUMBER,
X_Base_index_date DATE,
X_Current_price_index_id NUMBER,
X_Last_indexation_id NUMBER,
X_Insured_amount NUMBER,
X_Swiss_Building VARCHAR2,
X_Last_update_date DATE,
X_Last_updated_by VARCHAR2,
X_Last_update_login VARCHAR2,
X_Creation_date DATE,
X_Created_by VARCHAR2,
X_Attribute_category VARCHAR2,
X_Attribute1 VARCHAR2,
X_Attribute2 VARCHAR2,
X_Attribute3 VARCHAR2,
X_Attribute4 VARCHAR2,
X_Attribute5 VARCHAR2,
X_Attribute6 VARCHAR2,
X_Attribute7 VARCHAR2,
X_Attribute8 VARCHAR2,
X_Attribute9 VARCHAR2,
X_Attribute10 VARCHAR2,
X_Attribute11 VARCHAR2,
X_Attribute12 VARCHAR2,
X_Attribute13 VARCHAR2,
X_Attribute14 VARCHAR2,
X_Attribute15 VARCHAR2,
X_Attribute16 VARCHAR2,
X_Attribute17 VARCHAR2,
X_Attribute18 VARCHAR2,
X_Attribute19 VARCHAR2,
X_Attribute20 VARCHAR2,
p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
CURSOR C IS SELECT rowid FROM fa_ins_policies
WHERE asset_policy_id = X_Asset_policy_id
AND policy_number = X_Policy_number
AND asset_id = X_Asset_id;
SELECT asset_policy_id
FROM fa_ins_mst_pols
WHERE policy_number = X_Policy_number
AND Vendor_id = X_Vendor_id;
SELECT FA_INS_POLICY_S.nextval
INTO X_Asset_policy_id
FROM dual;
INSERT INTO fa_ins_mst_pols
(asset_policy_id,
policy_number,
calculation_method,
vendor_id,
vendor_site_id
)
VALUES
(
X_asset_policy_id,
X_Policy_number,
X_Calculation_method,
X_Vendor_id,
X_Vendor_site_id
);
INSERT INTO fa_ins_policies
(
asset_policy_id,
asset_id,
book_type_code,
policy_number,
current_insurance_value,
base_insurance_value,
base_index_date,
current_price_index_id,
last_indexation_id,
insured_amount,
swiss_building,
last_update_date,
last_updated_by,
last_update_login,
creation_date,
created_by,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
attribute16,
attribute17,
attribute18,
attribute19,
attribute20
)
VALUES
(
L_Asset_policy_id,
X_Asset_id,
X_Book_type_code,
X_Policy_number,
X_Current_insurance_value,
X_Base_insurance_value,
X_Base_index_date,
X_Current_price_index_id,
X_last_indexation_id,
X_Insured_amount,
X_Swiss_building,
X_Last_update_date,
X_Last_updated_by,
X_Last_update_login,
X_Creation_date,
X_Created_by,
X_Attribute_category,
X_Attribute1,
X_Attribute2,
X_Attribute3,
X_Attribute4,
X_Attribute5,
X_Attribute6,
X_Attribute7,
X_Attribute8,
X_Attribute9,
X_Attribute10,
X_Attribute11,
X_Attribute12,
X_Attribute13,
X_Attribute14,
X_Attribute15,
X_Attribute16,
X_Attribute17,
X_Attribute18,
X_Attribute19,
X_Attribute20
);
END Insert_Row;
SELECT *
FROM fa_ins_policies
WHERE rowid = X_Rowid
FOR UPDATE OF policy_number NOWAIT;
FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
PROCEDURE Update_Row( X_Rowid VARCHAR2,
X_Asset_policy_id NUMBER,
X_Asset_id VARCHAR2,
X_Book_type_code VARCHAR2,
X_Policy_number VARCHAR2,
X_Vendor_site_id NUMBER,
X_Vendor_id NUMBER,
X_Calculation_method VARCHAR2,
X_Base_insurance_value NUMBER,
X_Current_insurance_value NUMBER,
X_Base_index_date DATE,
X_Current_price_index_id NUMBER,
X_Last_indexation_id NUMBER,
X_Insured_amount NUMBER,
X_Swiss_building VARCHAR2,
X_Last_update_date DATE,
X_Last_updated_by VARCHAR2,
X_Last_update_login VARCHAR2,
X_Creation_date DATE,
X_Created_by VARCHAR2,
X_Attribute_category VARCHAR2,
X_Attribute1 VARCHAR2,
X_Attribute2 VARCHAR2,
X_Attribute3 VARCHAR2,
X_Attribute4 VARCHAR2,
X_Attribute5 VARCHAR2,
X_Attribute6 VARCHAR2,
X_Attribute7 VARCHAR2,
X_Attribute8 VARCHAR2,
X_Attribute9 VARCHAR2,
X_Attribute10 VARCHAR2,
X_Attribute11 VARCHAR2,
X_Attribute12 VARCHAR2,
X_Attribute13 VARCHAR2,
X_Attribute14 VARCHAR2,
X_Attribute15 VARCHAR2,
X_Attribute16 VARCHAR2,
X_Attribute17 VARCHAR2,
X_Attribute18 VARCHAR2,
X_Attribute19 VARCHAR2,
X_Attribute20 VARCHAR2,
p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
BEGIN
UPDATE fa_ins_policies
SET
asset_policy_id = X_Asset_policy_id,
asset_id = X_Asset_id,
book_type_code = X_Book_type_code,
policy_number = X_Policy_number,
current_insurance_value = X_Current_insurance_value,
base_insurance_value = X_Base_insurance_value,
base_index_date = X_Base_index_date,
current_price_index_id = X_Current_price_index_id,
last_indexation_id = X_Last_indexation_id,
insured_amount = X_Insured_amount,
swiss_building = X_Swiss_building,
last_update_date = X_Last_update_date,
last_updated_by = X_Last_updated_by,
last_update_login = X_Last_update_login,
creation_date = X_Creation_date,
created_by = X_Created_by,
attribute_category = X_Attribute_category,
attribute1 = X_Attribute1,
attribute2 = X_Attribute2,
attribute3 = X_Attribute3,
attribute4 = X_Attribute4,
attribute5 = X_Attribute5,
attribute6 = X_Attribute6,
attribute7 = X_Attribute7,
attribute8 = X_Attribute8,
attribute9 = X_Attribute9,
attribute10 = X_Attribute10,
attribute11 = X_Attribute11,
attribute12 = X_Attribute12,
attribute13 = X_Attribute13,
attribute14 = X_Attribute14,
attribute15 = X_Attribute15,
attribute16 = X_Attribute16,
attribute17 = X_Attribute17,
attribute18 = X_Attribute18,
attribute19 = X_Attribute19,
attribute20 = X_Attribute20
WHERE rowid = X_Rowid;
END Update_Row;
PROCEDURE Delete_Row( X_Rowid VARCHAR2,
p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
BEGIN
DELETE FROM fa_ins_policies
WHERE rowid = X_Rowid;
END Delete_Row;