[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'Duplicate row found'
FROM gl_intercompany_acc_sets ia
WHERE ia.LEDGER_ID = x_ledger_id
AND ia.JE_SOURCE_NAME = x_je_source_name
AND ia.JE_CATEGORY_NAME = x_je_category_name
AND ( x_rowid IS NULL
OR
ia.rowid <> x_rowid );
SELECT 'Duplicate row found'
FROM gl_intercompany_accounts ia
WHERE ia.LEDGER_ID = x_ledger_id
AND ia.JE_SOURCE_NAME = x_je_source_name
AND ia.JE_CATEGORY_NAME = x_je_category_name
AND ia.bal_seg_value = x_bal_seg_value
AND ( x_rowid IS NULL
OR
ia.rowid <> x_rowid );
SELECT 'found'
FROM gl_intercompany_accounts ia
WHERE ia.LEDGER_ID = x_ledger_id
AND ia.JE_SOURCE_NAME = 'Other'
AND ia.JE_CATEGORY_NAME = 'Other'
AND ia.BAL_SEG_VALUE = 'OTHER1234567890123456789012345';
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Je_Source_Name VARCHAR2,
X_Je_Category_Name VARCHAR2,
X_Ledger_Id NUMBER,
X_Balance_By_Code VARCHAR2,
X_Bal_Seg_Rule_Code VARCHAR2,
X_Always_Balance_Flag VARCHAR2,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Creation_Date DATE,
X_Created_By NUMBER,
X_Last_Update_Login NUMBER,
X_Default_Bal_Seg_Value 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_Context VARCHAR2
) IS
CURSOR C IS SELECT rowid FROM gl_intercompany_acc_sets
WHERE je_source_name = X_Je_Source_Name
AND je_category_name = X_Je_Category_Name
AND ledger_id = X_Ledger_Id;
INSERT INTO gl_intercompany_acc_sets(
je_source_name,
je_category_name,
ledger_id,
balance_by_code,
bal_seg_rule_code,
always_balance_flag,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
default_bal_seg_value,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
context
) VALUES (
X_Je_Source_Name,
X_Je_Category_Name,
X_Ledger_Id,
X_Balance_By_Code,
X_Bal_Seg_Rule_Code,
X_Always_Balance_Flag,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
X_Last_Update_Login,
X_Default_Bal_Seg_Value,
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_Context
);
'GL_INTERCOMPANY_ACCTS_PKG.Insert_Row');
END Insert_Row;
SELECT *
FROM gl_intercompany_acc_sets
WHERE rowid = X_Rowid
FOR UPDATE of Je_Source_Name NOWAIT;
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_Je_Source_Name VARCHAR2,
X_Je_Category_Name VARCHAR2,
X_Ledger_Id NUMBER,
X_Balance_By_Code VARCHAR2,
X_Bal_Seg_Rule_Code VARCHAR2,
X_Always_Balance_Flag VARCHAR2,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER,
X_Default_Bal_Seg_Value 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_Context VARCHAR2
) IS
BEGIN
UPDATE gl_intercompany_acc_sets
SET
je_source_name = X_Je_Source_Name,
je_category_name = X_Je_Category_Name,
ledger_id = X_Ledger_Id,
balance_by_code = X_Balance_By_Code,
bal_seg_rule_code = X_Bal_Seg_Rule_Code,
always_balance_flag = X_Always_Balance_Flag,
default_bal_seg_value = X_Default_Bal_Seg_Value,
last_update_date = X_Last_Update_Date,
last_updated_by = X_Last_Updated_By,
last_update_login = X_Last_Update_Login,
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,
context = X_Context
WHERE rowid = X_Rowid;
'GL_INTERCOMPANY_ACCTS_PKG.Update_Row');
END Update_Row;
PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
BEGIN
DELETE FROM gl_intercompany_acc_sets
WHERE rowid = X_Rowid;
'GL_INTERCOMPANY_ACCTS_PKG.Delete_Row');
END Delete_Row;