The following lines contain the word 'select', 'insert', 'update' or 'delete':
/*Added Insert Row for R12 Uptake bug No 5905216*/
PROCEDURE Insert_Row(X_Rowid VARCHAR2,
X_Set_Of_Books_Id NUMBER,
X_Rpi_Header_Context_Code VARCHAR2,
X_Rpi_Header_Charge_Id VARCHAR2,
X_Rpi_Header_Generate_Seq VARCHAR2,
X_Rpi_Line_Context_Code VARCHAR2,
X_Rpi_Line_Charge_Id VARCHAR2,
X_Rpi_Line_Generate_Seq VARCHAR2,
X_Rpi_Line_Charge_Line_Num VARCHAR2,
X_Rpi_Line_Price_Break_Num VARCHAR2,
-- X_Dunning_Receivables_Trx_Id NUMBER,
X_Last_Updated_By NUMBER,
X_Last_Update_Date DATE,
X_Last_Update_Login NUMBER,
X_Created_By VARCHAR2,
X_Creation_Date DATE,
X_Org_Id NUMBER
) IS
l_login_id NUMBER;
l_updated_by NUMBER;
l_updated_by := FND_GLOBAL.USER_ID;
insert into igi_ar_system_options_all
(
SET_OF_BOOKS_ID,
RPI_HEADER_CONTEXT_CODE,
RPI_HEADER_CHARGE_ID,
RPI_HEADER_GENERATE_SEQ,
RPI_LINE_CONTEXT_CODE,
RPI_LINE_CHARGE_ID,
RPI_LINE_GENERATE_SEQ,
RPI_LINE_CHARGE_LINE_NUM,
RPI_LINE_PRICE_BREAK_NUM,
DUNNING_RECEIVABLES_TRX_ID,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
CREATED_BY,
CREATION_DATE,
ORG_ID
)
values
(
X_Set_Of_Books_Id,
X_Rpi_Header_Context_Code,
X_Rpi_Header_Charge_Id,
X_Rpi_Header_Generate_Seq,
X_Rpi_Line_Context_Code,
X_Rpi_Line_Charge_Id,
X_Rpi_Line_Generate_Seq,
X_Rpi_Line_Charge_Line_Num,
X_Rpi_Line_Price_Break_Num,
NULL, /*Inserting NULL as Dunning is obsolete*/
l_updated_by,
X_Last_Update_Date,
l_login_id,
l_created_by,
X_Creation_Date,
X_Org_Id
);
END Insert_Row;
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_Set_Of_Books_Id NUMBER,
-- X_Arc_Auto_Gl_Import_Flag VARCHAR2, /*Commented for R12 Uptake Bug No 5905216*/
-- X_Arc_Cash_Sob_Id NUMBER,
-- X_Arc_Unalloc_Rev_Ccid NUMBER,
-- X_Dunning_Receivables_Trx_Id NUMBER,
X_Rpi_Header_Context_Code VARCHAR2,
X_Rpi_Header_Charge_Id VARCHAR2,
X_Rpi_Header_Generate_Seq VARCHAR2,
X_Rpi_Line_Context_Code VARCHAR2,
X_Rpi_Line_Charge_Id VARCHAR2,
X_Rpi_Line_Generate_Seq VARCHAR2,
X_Rpi_Line_Charge_Line_Num VARCHAR2,
X_Rpi_Line_Price_Break_Num VARCHAR2,
X_Last_Updated_By NUMBER,
X_Last_Update_Date DATE,
X_Last_Update_Login NUMBER
-- X_Arc_Je_Source_Name VARCHAR2
) IS
BEGIN
UPDATE igi_ar_system_options_all
SET
Set_Of_Books_Id = X_Set_Of_Books_Id,
-- Arc_Auto_Gl_Import_Flag = X_Arc_Auto_Gl_Import_Flag, /*Commented for R12 Uptake bug No 5905216*/
-- Arc_Cash_Sob_Id = X_Arc_Cash_Sob_Id,
-- Arc_Unalloc_Rev_Ccid = X_Arc_Unalloc_Rev_Ccid,
-- Dunning_Receivables_Trx_id = X_Dunning_Receivables_Trx_Id,
Rpi_Header_Context_Code = X_Rpi_Header_Context_Code,
Rpi_Header_Charge_Id = X_Rpi_Header_Charge_Id,
Rpi_Header_Generate_Seq = X_Rpi_Header_Generate_Seq,
Rpi_Line_Context_Code = X_Rpi_Line_Context_Code,
Rpi_Line_Charge_Id = X_Rpi_Line_Charge_Id,
Rpi_Line_Generate_Seq = X_Rpi_Line_Generate_Seq,
Rpi_Line_Charge_Line_Num = X_Rpi_Line_Charge_Line_Num,
Rpi_Line_Price_Break_Num = X_Rpi_Line_Price_Break_Num,
Last_Updated_By = X_Last_Updated_By,
Last_Update_Date = X_Last_Update_Date,
Last_Update_Login = X_Last_Update_Login
-- Arc_Je_Source_Name = X_Arc_Je_Source_Name
WHERE rowid = X_Rowid;
END Update_Row;
SELECT *
FROM igi_ar_system_options_all
WHERE rowid = X_Rowid
FOR UPDATE of Set_Of_Books_Id NOWAIT;
FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');