The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT object_version_number
FROM pji_mt_rowset_det
WHERE measure_set_code = p_measure_set_code
AND rowset_code = p_rowset_code
FOR UPDATE OF measure_set_code, rowset_code NOWAIT;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
PROCEDURE DELETE_ROW (
p_measure_set_code IN pji_mt_rowset_det.measure_set_code%TYPE,
p_rowset_code IN pji_mt_rowset_det.rowset_code%TYPE
) IS
BEGIN
DELETE FROM pji_mt_rowset_det
WHERE measure_set_code = p_measure_set_code
AND rowset_code = p_rowset_code;
END DELETE_ROW;
PROCEDURE Insert_Row (
X_Rowid IN OUT NOCOPY ROWID,
X_measure_set_code IN pji_mt_rowset_det.measure_set_code%TYPE,
X_rowset_code IN pji_mt_rowset_det.rowset_code%TYPE,
X_Object_Version_Number IN pji_mt_rowset_det.Object_Version_Number%TYPE,
X_display_order IN pji_mt_rowset_det.display_order%TYPE, --Bug 3798976
X_Last_Update_Date IN pji_mt_rowset_det.Last_Update_Date%TYPE,
X_Last_Updated_by IN pji_mt_rowset_det.Last_Updated_by%TYPE,
X_Creation_Date IN pji_mt_rowset_det.Creation_Date%TYPE,
X_Created_By IN pji_mt_rowset_det.Created_By%TYPE,
X_Last_Update_Login IN pji_mt_rowset_det.Last_Update_Login%TYPE,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Data OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER
) IS
CURSOR C IS SELECT ROWID FROM pji_mt_rowset_det
WHERE measure_set_code = x_measure_set_code
AND rowset_code = x_rowset_code;
pa_debug.g_err_stage:= 'Inserting record in pji_mt_rowset_det, measure_code= '||X_measure_set_code||', rowset_code= '||x_rowset_code;
INSERT INTO pji_mt_rowset_det
(
measure_set_code
, rowset_code
, Object_Version_Number
, display_order --Bug 3798976
, Creation_Date
, Last_Update_Date
, Last_Updated_By
, Created_By
, Last_Update_Login )
VALUES
(
X_measure_set_code
, X_rowset_code
, X_Object_Version_Number
, X_display_order --Bug 3798976
, X_Creation_Date
, X_Last_Update_Date
, X_Last_Updated_By
, X_Created_By
, X_Last_Update_Login
);
pa_debug.g_err_stage:= 'Inserting record in pji_mt_rowset_det '||X_measure_set_code;
pa_debug.g_err_stage:= 'Rowid could not be fetched after Inserting for '||X_measure_set_code;
,p_procedure_name => 'Insert Row'
,p_error_text => x_msg_data);
END Insert_Row;
PROCEDURE Update_Row (
X_measure_set_code IN pji_mt_rowset_det.measure_set_code%TYPE,
X_rowset_code IN pji_mt_rowset_det.rowset_code%TYPE,
X_Object_Version_Number IN pji_mt_rowset_det.Object_Version_Number%TYPE,
X_display_order IN pji_mt_rowset_det.display_order%TYPE, --Bug 3798976
X_Last_Update_Date IN pji_mt_rowset_det.Last_Update_Date%TYPE,
X_Last_Updated_by IN pji_mt_rowset_det.Last_Updated_by%TYPE,
X_Last_Update_Login IN pji_mt_rowset_det.Last_Update_Login%TYPE,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Data OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER
)
IS
l_return_status VARCHAR2(1) := NULL;
UPDATE pji_mt_rowset_det
SET
Object_Version_Number = X_Object_Version_Number
, display_order = X_display_order --Bug 3798976
, Last_Update_Date = X_Last_Update_Date
, Last_Updated_By = X_Last_Updated_By
, Last_Update_Login = X_Last_Update_Login
WHERE measure_set_code = X_measure_set_code
AND rowset_code = X_rowset_code;
,p_procedure_name => 'UPDATE_ROW'
,p_error_text => x_msg_data);
END Update_Row;
PJI_MT_ROWSET_DET_PKG.Update_Row (
X_measure_set_code => X_measure_set_code ,
X_rowset_code => X_rowset_code ,
X_Object_Version_Number => X_Object_Version_Number ,
X_display_order => X_display_order , --Bug 3798976
X_Last_Update_Date => SYSDATE ,
X_Last_Updated_By => User_Id ,
X_Last_Update_Login => 0 ,
X_Return_Status => l_Return_Status ,
X_Msg_Data => l_Msg_Data ,
X_Msg_Count => l_Msg_Count );
PJI_MT_ROWSET_DET_PKG.Insert_Row (
X_Rowid => X_Rowid ,
X_measure_set_code => X_measure_set_code ,
X_rowset_code => X_rowset_code ,
X_Object_Version_Number => X_Object_Version_Number ,
X_display_order => X_display_order , --Bug 3798976
X_Creation_Date => SYSDATE ,
X_Created_By => User_Id ,
X_Last_Update_Date => SYSDATE ,
X_Last_Updated_By => User_Id ,
X_Last_Update_Login => 0 ,
X_Return_Status => l_Return_Status ,
X_Msg_Data => l_Msg_Data ,
X_Msg_Count => l_Msg_Count );
,p_procedure_name => 'UPDATE_ROW'
,p_error_text => l_msg_data);