[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row
(X_rowid IN OUT NOCOPY VARCHAR2,
X_locn_id NUMBER,
X_ship_from_code VARCHAR2,
X_ship_to_segment_id NUMBER,
X_tax_category_id NUMBER,
X_end_date_active DATE,
X_last_updated_by NUMBER,
X_last_update_date DATE,
X_base_rate NUMBER,
X_tax_code VARCHAR2,
X_trib_subst_inscription VARCHAR2,
X_start_date_active DATE,
X_org_id NUMBER,
X_last_update_login NUMBER,
X_creation_date DATE,
X_created_by NUMBER,
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_calling_sequence IN VARCHAR2) IS
CURSOR C IS
SELECT rowid
FROM jl_zz_ar_TX_LOCN
WHERE ship_from_code = X_ship_from_code
AND ship_to_segment_id = X_ship_to_segment_id
AND tax_category_id = X_tax_category_id
AND end_date_active = X_end_date_active
AND org_id = X_org_id;
current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.INSERT_ROW<-' ||
X_calling_sequence;
debug_info := 'Insert into JL_ZZ_AR_TX_LOCN ';
INSERT INTO JL_ZZ_AR_TX_LOCN (locn_id,
ship_from_code,
ship_to_segment_id,
tax_category_id,
end_date_active,
last_updated_by,
last_update_date,
base_rate,
tax_code,
trib_subst_inscription,
start_date_active,
org_id,
last_update_login,
creation_date,
created_by,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15)
VALUES (X_locn_id,
X_ship_from_code,
X_ship_to_segment_id,
X_tax_category_id,
X_end_date_active,
X_last_updated_by,
X_last_update_date,
X_base_rate,
X_tax_code,
X_trib_subst_inscription,
X_start_date_active,
X_org_id,
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);
END Insert_Row;
X_last_updated_by NUMBER,
X_last_update_date DATE,
X_base_rate NUMBER,
X_tax_code VARCHAR2,
X_trib_subst_inscription VARCHAR2,
X_start_date_active DATE,
X_org_id NUMBER,
X_last_update_login NUMBER,
X_creation_date DATE,
X_created_by NUMBER,
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_calling_sequence IN VARCHAR2) IS
CURSOR C IS
SELECT *
FROM jl_zz_ar_tx_locn
WHERE ship_from_code = X_ship_from_code
AND ship_to_segment_id = X_ship_to_segment_id
AND tax_category_id = X_tax_category_id
AND end_date_active = X_end_date_active
AND org_id = X_org_id
FOR UPDATE of ship_from_code,
ship_to_segment_id,
tax_category_id,
end_date_active
NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
(Recinfo.last_updated_by = X_last_updated_by) AND
(Recinfo.last_update_date = X_last_update_date) AND
((Recinfo.org_id = X_org_id) OR
((Recinfo.org_id IS NULL) AND
(X_org_id IS NULL))) AND
((Recinfo.base_rate = X_base_rate) OR
((Recinfo.base_rate IS NULL) AND
(X_base_rate IS NULL))) AND
((Recinfo.tax_code = X_tax_code) OR
((Recinfo.tax_code IS NULL) AND
(X_tax_code IS NULL))) AND
((Recinfo.trib_subst_inscription = X_trib_subst_inscription) OR
((Recinfo.trib_subst_inscription IS NULL) AND
(X_trib_subst_inscription IS NULL))) AND
((Recinfo.start_date_active = X_start_date_active) OR
((Recinfo.start_date_active IS NULL) AND
(X_start_date_active IS NULL))) AND
((Recinfo.last_update_login = X_last_update_login) OR
((Recinfo.last_update_login IS NULL) AND
(X_last_update_login IS NULL))) AND
((Recinfo.creation_date = X_creation_date) OR
((Recinfo.creation_date IS NULL) AND
(X_creation_date IS NULL))) AND
((Recinfo.created_by = X_created_by) OR
((Recinfo.created_by IS NULL) AND
(X_created_by IS NULL))) AND
((Recinfo.attribute_category = X_attribute_Category) OR
((Recinfo.attribute_category IS NULL) AND
(X_attribute_Category IS NULL))) AND
((Recinfo.attribute1 = X_attribute1) OR
((Recinfo.attribute1 IS NULL) AND
(X_attribute1 IS NULL))) AND
((Recinfo.attribute2 = X_attribute2) OR
((Recinfo.attribute2 IS NULL) AND
(X_attribute2 IS NULL))) AND
((Recinfo.attribute3 = X_attribute3) OR
((Recinfo.attribute3 IS NULL) AND
(X_attribute3 IS NULL))) AND
((Recinfo.attribute4 = X_attribute4) OR
((Recinfo.attribute4 IS NULL) AND
(X_attribute4 IS NULL))) AND
((Recinfo.attribute5 = X_attribute5) OR
((Recinfo.attribute5 IS NULL) AND
(X_attribute5 IS NULL))) AND
((Recinfo.attribute6 = X_attribute6) OR
((Recinfo.attribute6 IS NULL) AND
(X_attribute6 IS NULL))) AND
((Recinfo.attribute7 = X_attribute7) OR
((Recinfo.attribute7 IS NULL) AND
(X_attribute7 IS NULL))) AND
((Recinfo.attribute8 = X_attribute8) OR
((Recinfo.attribute8 IS NULL) AND
(X_attribute8 IS NULL))) AND
((Recinfo.attribute9 = X_attribute9) OR
((Recinfo.attribute9 IS NULL) AND
(X_attribute9 IS NULL))) AND
((Recinfo.attribute10 = X_attribute10) OR
((Recinfo.attribute10 IS NULL) AND
(X_attribute10 IS NULL))) AND
((Recinfo.attribute11 = X_attribute11) OR
((Recinfo.attribute11 IS NULL) AND
(X_attribute11 IS NULL))) AND
((Recinfo.attribute12 = X_attribute12) OR
((Recinfo.attribute12 IS NULL) AND
(X_attribute12 IS NULL))) AND
((Recinfo.attribute13 = X_attribute13) OR
((Recinfo.attribute13 IS NULL) AND
(X_attribute13 IS NULL))) AND
((Recinfo.attribute14 = X_attribute14) OR
((Recinfo.attribute14 IS NULL) AND
(X_attribute14 IS NULL))) AND
((Recinfo.attribute15 = X_attribute15) OR
((Recinfo.attribute15 IS NULL) AND
(X_attribute15 IS NULL)))) THEN
return;
PROCEDURE Update_Row
(X_rowid VARCHAR2,
X_ship_from_code VARCHAR2,
X_ship_to_segment_id NUMBER,
X_tax_category_id NUMBER,
X_end_date_active DATE,
X_last_updated_by NUMBER,
X_last_update_date DATE,
X_base_rate NUMBER,
X_tax_code VARCHAR2,
X_trib_subst_inscription VARCHAR2,
X_start_date_active DATE,
X_org_id NUMBER,
X_last_update_login NUMBER,
X_creation_date DATE,
X_created_by NUMBER,
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_calling_sequence IN VARCHAR2) IS
BEGIN
UPDATE jl_zz_ar_tx_locn
SET ship_from_code = X_ship_from_code,
ship_to_segment_id = X_ship_to_segment_id,
tax_category_id = X_tax_category_id,
end_date_active = X_end_date_active,
last_updated_by = X_last_updated_by,
last_update_date = X_last_update_date,
base_rate = X_base_rate,
tax_code = X_tax_code,
trib_subst_inscription = X_trib_subst_inscription,
start_date_active = X_start_date_active,
org_id = X_org_id,
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
WHERE rowid = X_rowid;
END Update_Row;
PROCEDURE Delete_Row
(X_rowid VARCHAR2) IS
BEGIN
DELETE
FROM JL_ZZ_AR_TX_LOCN
WHERE rowid = X_rowid;
END Delete_Row;
SELECT COUNT(1)
INTO l_dummy
FROM jl_zz_ar_TX_LOCN
WHERE ship_from_code = X_ship_from_code
AND ship_to_segment_id = X_ship_to_segment_id
AND tax_category_id = X_tax_category_id
AND end_date_active = X_end_date_active
AND org_id = X_org_id
AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
SELECT COUNT(1)
INTO l_dummy
FROM JL_ZZ_AR_TX_LOCN A
WHERE a.ship_from_code = X_ship_from_code
AND a.ship_to_segment_id = X_ship_to_segment_id
AND a.tax_category_id = X_tax_category_id
AND org_id = X_org_id
AND ((a.end_date_active <= X_end_date_active AND
a.end_date_active >= X_start_date_active) OR
(a.start_date_active <= X_end_date_active AND
a.start_date_active >= X_start_date_active) OR
(a.start_date_active <= X_start_date_active AND
a.end_date_active >= X_end_date_active))
AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
SELECT COUNT(1)
INTO l_dummy
FROM jl_zz_ar_TX_LOCN a
WHERE a.ship_from_code = X_ship_from_code
AND a.ship_to_segment_id = X_ship_to_segment_id
AND a.tax_category_id = X_tax_category_id
AND trunc(a.end_date_active) = (trunc(X_start_date_active) -1)
AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid))
AND org_id = X_org_id;
SELECT COUNT(1)
INTO l_dummy1
FROM jl_zz_ar_TX_LOCN a
WHERE a.ship_from_code = X_ship_from_code
AND a.ship_to_segment_id = X_ship_to_segment_id
AND a.tax_category_id = X_tax_category_id
AND trunc(a.start_date_active) = (trunc(X_end_date_active) + 1)
AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid))
AND org_id = X_org_id;
SELECT COUNT(1)
INTO l_dummy2
FROM jl_zz_ar_TX_LOCN a
WHERE a.ship_from_code = X_ship_from_code
AND a.ship_to_segment_id = X_ship_to_segment_id
AND a.tax_category_id = X_tax_category_id
AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid))
AND org_id = X_org_id;