The following lines contain the word 'select', 'insert', 'update' or 'delete':
IEX_LITIGATIONS_PKG.Insert_Row(
px_LITIGATION_ID => x_LITIGATION_ID
,p_DELINQUENCY_ID => p_LTG_rec.DELINQUENCY_ID
,p_PARTY_ID => p_LTG_rec.PARTY_ID
,p_UNPAID_REASON_CODE => p_LTG_rec.UNPAID_REASON_CODE
,p_JUDGEMENT_DATE => p_LTG_rec.JUDGEMENT_DATE
,p_DISPOSITION_CODE => p_LTG_rec.DISPOSITION_CODE
,p_REQUEST_ID => p_LTG_rec.REQUEST_ID
,p_PROGRAM_APPLICATION_ID => p_LTG_rec.PROGRAM_APPLICATION_ID
,p_PROGRAM_ID => p_LTG_rec.PROGRAM_ID
,p_PROGRAM_UPDATE_DATE => p_LTG_rec.PROGRAM_UPDATE_DATE
,p_ATTRIBUTE_CATEGORY => p_LTG_rec.ATTRIBUTE_CATEGORY
,p_ATTRIBUTE1 => p_LTG_rec.ATTRIBUTE1
,p_ATTRIBUTE2 => p_LTG_rec.ATTRIBUTE2
,p_ATTRIBUTE3 => p_LTG_rec.ATTRIBUTE3
,p_ATTRIBUTE4 => p_LTG_rec.ATTRIBUTE4
,p_ATTRIBUTE5 => p_LTG_rec.ATTRIBUTE5
,p_ATTRIBUTE6 => p_LTG_rec.ATTRIBUTE6
,p_ATTRIBUTE7 => p_LTG_rec.ATTRIBUTE7
,p_ATTRIBUTE8 => p_LTG_rec.ATTRIBUTE8
,p_ATTRIBUTE9 => p_LTG_rec.ATTRIBUTE9
,p_ATTRIBUTE10 => p_LTG_rec.ATTRIBUTE10
,p_ATTRIBUTE11 => p_LTG_rec.ATTRIBUTE11
,p_ATTRIBUTE12 => p_LTG_rec.ATTRIBUTE12
,p_ATTRIBUTE13 => p_LTG_rec.ATTRIBUTE13
,p_ATTRIBUTE14 => p_LTG_rec.ATTRIBUTE14
,p_ATTRIBUTE15 => p_LTG_rec.ATTRIBUTE15
,p_CREATED_BY => FND_GLOBAL.USER_ID
,p_CREATION_DATE => SYSDATE
,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
,p_LAST_UPDATE_DATE => SYSDATE
--,p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID --commented for bug 10034220 gnramasa 24th Sep 10
,p_LAST_UPDATE_LOGIN => FND_GLOBAL.USER_ID
,p_CREDIT_HOLD_REQUEST_FLAG => p_LTG_rec.CREDIT_HOLD_REQUEST_FLAG
,p_CREDIT_HOLD_APPROVED_FLAG => p_LTG_rec.CREDIT_HOLD_APPROVED_FLAG
,p_SERVICE_HOLD_REQUEST_FLAG => p_LTG_rec.SERVICE_HOLD_REQUEST_FLAG
,p_SERVICE_HOLD_APPROVED_FLAG => p_LTG_rec.SERVICE_HOLD_APPROVED_FLAG
,p_SUGGESTION_APPROVED_FLAG => p_LTG_rec.SUGGESTION_APPROVED_FLAG
,p_CUST_ACCOUNT_ID => p_LTG_rec. CUST_ACCOUNT_ID
,p_CUSTOMER_SITE_USE_ID => p_LTG_rec.CUSTOMER_SITE_USE_ID
,p_ORG_ID => p_LTG_rec.ORG_ID
,p_CONTRACT_ID => p_LTG_rec.CONTRACT_ID
,p_CONTRACT_NUMBER => p_LTG_rec.CONTRACT_NUMBER);
PROCEDURE Update_litigation(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
P_Commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
P_Admin_Group_Id IN NUMBER,
P_Identity_Salesforce_Id IN NUMBER,
-- P_profile_tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
P_LTG_Rec IN LTG_Rec_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
/*
Cursor C_Get_litigation(LITIGATION_ID Number) IS
Select rowid,
LITIGATION_ID,
DELINQUENCY_ID,
PARTY_ID,
UNPAID_REASON_CODE,
JUDGEMENT_DATE,
DISPOSITION_CODE,
REQUEST_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
CREDIT_HOLD_REQUEST_FLAG,
CREDIT_HOLD_APPROVED_FLAG,
SERVICE_HOLD_REQUEST_FLAG,
SERVICE_HOLD_APPROVED_FLAG,
SUGGESTION_APPROVED_FLAG
From IEX_LITIGATIONS
-- Hint: Developer need to provide Where clause
For Update NOWAIT;
l_api_name CONSTANT VARCHAR2(30) := 'Update_litigation';
SAVEPOINT UPDATE_LITIGATION_PVT;
l_ref_LTG_rec.PROGRAM_UPDATE_DATE,
l_ref_LTG_rec.ATTRIBUTE_CATEGORY,
l_ref_LTG_rec.ATTRIBUTE1,
l_ref_LTG_rec.ATTRIBUTE2,
l_ref_LTG_rec.ATTRIBUTE3,
l_ref_LTG_rec.ATTRIBUTE4,
l_ref_LTG_rec.ATTRIBUTE5,
l_ref_LTG_rec.ATTRIBUTE6,
l_ref_LTG_rec.ATTRIBUTE7,
l_ref_LTG_rec.ATTRIBUTE8,
l_ref_LTG_rec.ATTRIBUTE9,
l_ref_LTG_rec.ATTRIBUTE10,
l_ref_LTG_rec.ATTRIBUTE11,
l_ref_LTG_rec.ATTRIBUTE12,
l_ref_LTG_rec.ATTRIBUTE13,
l_ref_LTG_rec.ATTRIBUTE14,
l_ref_LTG_rec.ATTRIBUTE15,
l_ref_LTG_rec.CREATED_BY,
l_ref_LTG_rec.CREATION_DATE,
l_ref_LTG_rec.LAST_UPDATED_BY,
l_ref_LTG_rec.LAST_UPDATE_DATE,
l_ref_LTG_rec.LAST_UPDATE_LOGIN,
l_ref_LTG_rec.CREDIT_HOLD_REQUEST_FLAG,
l_ref_LTG_rec.CREDIT_HOLD_APPROVED_FLAG,
l_ref_LTG_rec.SERVICE_HOLD_REQUEST_FLAG,
l_ref_LTG_rec.SERVICE_HOLD_APPROVED_FLAG,
l_ref_LTG_rec.SUGGESTION_APPROVED_FLAG;
FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
If (l_tar_LTG_rec.last_update_date is NULL or
l_tar_LTG_rec.last_update_date = FND_API.G_MISS_Date ) Then
IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
If (l_tar_LTG_rec.last_update_date <> l_ref_LTG_rec.last_update_date) Then
IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('IEX', 'API_RECORD_CHANGED');
p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
P_LTG_Rec => P_LTG_Rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
IEX_LITIGATIONS_PKG.Update_Row(
p_LITIGATION_ID => p_LTG_rec.LITIGATION_ID
,p_DELINQUENCY_ID => p_LTG_rec.DELINQUENCY_ID
,p_PARTY_ID => p_LTG_rec.PARTY_ID
,p_UNPAID_REASON_CODE => p_LTG_rec.UNPAID_REASON_CODE
,p_JUDGEMENT_DATE => p_LTG_rec.JUDGEMENT_DATE
,p_DISPOSITION_CODE => p_LTG_rec.DISPOSITION_CODE
,p_REQUEST_ID => p_LTG_rec.REQUEST_ID
,p_PROGRAM_APPLICATION_ID => p_LTG_rec.PROGRAM_APPLICATION_ID
,p_PROGRAM_ID => p_LTG_rec.PROGRAM_ID
,p_PROGRAM_UPDATE_DATE => p_LTG_rec.PROGRAM_UPDATE_DATE
,p_ATTRIBUTE_CATEGORY => p_LTG_rec.ATTRIBUTE_CATEGORY
,p_ATTRIBUTE1 => p_LTG_rec.ATTRIBUTE1
,p_ATTRIBUTE2 => p_LTG_rec.ATTRIBUTE2
,p_ATTRIBUTE3 => p_LTG_rec.ATTRIBUTE3
,p_ATTRIBUTE4 => p_LTG_rec.ATTRIBUTE4
,p_ATTRIBUTE5 => p_LTG_rec.ATTRIBUTE5
,p_ATTRIBUTE6 => p_LTG_rec.ATTRIBUTE6
,p_ATTRIBUTE7 => p_LTG_rec.ATTRIBUTE7
,p_ATTRIBUTE8 => p_LTG_rec.ATTRIBUTE8
,p_ATTRIBUTE9 => p_LTG_rec.ATTRIBUTE9
,p_ATTRIBUTE10 => p_LTG_rec.ATTRIBUTE10
,p_ATTRIBUTE11 => p_LTG_rec.ATTRIBUTE11
,p_ATTRIBUTE12 => p_LTG_rec.ATTRIBUTE12
,p_ATTRIBUTE13 => p_LTG_rec.ATTRIBUTE13
,p_ATTRIBUTE14 => p_LTG_rec.ATTRIBUTE14
,p_ATTRIBUTE15 => p_LTG_rec.ATTRIBUTE15
,p_CREATED_BY => FND_API.G_MISS_NUM
,p_CREATION_DATE => FND_API.G_MISS_DATE
,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
,p_LAST_UPDATE_DATE => SYSDATE
--,p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID --commented for bug 10034220 gnramasa 24th Sep 10
,p_LAST_UPDATE_LOGIN => FND_GLOBAL.USER_ID
,p_CREDIT_HOLD_REQUEST_FLAG => p_LTG_rec.CREDIT_HOLD_REQUEST_FLAG
,p_CREDIT_HOLD_APPROVED_FLAG => p_LTG_rec.CREDIT_HOLD_APPROVED_FLAG
,p_SERVICE_HOLD_REQUEST_FLAG => p_LTG_rec.SERVICE_HOLD_REQUEST_FLAG
,p_SERVICE_HOLD_APPROVED_FLAG => p_LTG_rec.SERVICE_HOLD_APPROVED_FLAG
,p_SUGGESTION_APPROVED_FLAG => p_LTG_rec.SUGGESTION_APPROVED_FLAG
,p_CUST_ACCOUNT_ID => p_LTG_rec. CUST_ACCOUNT_ID
,p_CUSTOMER_SITE_USE_ID => p_LTG_rec.CUSTOMER_SITE_USE_ID
,p_ORG_ID => p_LTG_rec.ORG_ID
,p_CONTRACT_ID => p_LTG_rec.CONTRACT_ID
,p_CONTRACT_NUMBER => p_LTG_rec.CONTRACT_NUMBER);
End Update_litigation;
PROCEDURE Delete_litigation(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
P_Commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
P_Admin_Group_Id IN NUMBER,
P_Identity_Salesforce_Id IN NUMBER,
P_Profile_Tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
P_LTG_Rec IN LTG_Rec_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_litigation';
SAVEPOINT DELETE_LITIGATION_PVT;
IEX_LITIGATIONS_PKG.Delete_Row(
p_LITIGATION_ID => p_LTG_rec.LITIGATION_ID);
End Delete_litigation;
PROCEDURE Gen_Select(
x_select_cl OUT NOCOPY VARCHAR2
)
IS
BEGIN
x_select_cl := 'Select ' ||
'IEX_LITIGATIONS.LITIGATION_ID,' ||
'IEX_LITIGATIONS.DELINQUENCY_ID,' ||
'IEX_LITIGATIONS.PARTY_ID,' ||
'IEX_LITIGATIONS.UNPAID_REASON_CODE,' ||
'IEX_LITIGATIONS.JUDGEMENT_DATE,' ||
'IEX_LITIGATIONS.DISPOSITION_CODE,' ||
'IEX_LITIGATIONS.REQUEST_ID,' ||
'IEX_LITIGATIONS.PROGRAM_APPLICATION_ID,' ||
'IEX_LITIGATIONS.PROGRAM_ID,' ||
'IEX_LITIGATIONS.PROGRAM_UPDATE_DATE,' ||
'IEX_LITIGATIONS.ATTRIBUTE_CATEGORY,' ||
'IEX_LITIGATIONS.ATTRIBUTE1,' ||
'IEX_LITIGATIONS.ATTRIBUTE2,' ||
'IEX_LITIGATIONS.ATTRIBUTE3,' ||
'IEX_LITIGATIONS.ATTRIBUTE4,' ||
'IEX_LITIGATIONS.ATTRIBUTE5,' ||
'IEX_LITIGATIONS.ATTRIBUTE6,' ||
'IEX_LITIGATIONS.ATTRIBUTE7,' ||
'IEX_LITIGATIONS.ATTRIBUTE8,' ||
'IEX_LITIGATIONS.ATTRIBUTE9,' ||
'IEX_LITIGATIONS.ATTRIBUTE10,' ||
'IEX_LITIGATIONS.ATTRIBUTE11,' ||
'IEX_LITIGATIONS.ATTRIBUTE12,' ||
'IEX_LITIGATIONS.ATTRIBUTE13,' ||
'IEX_LITIGATIONS.ATTRIBUTE14,' ||
'IEX_LITIGATIONS.ATTRIBUTE15,' ||
'IEX_LITIGATIONS.CREATED_BY,' ||
'IEX_LITIGATIONS.CREATION_DATE,' ||
'IEX_LITIGATIONS.LAST_UPDATED_BY,' ||
'IEX_LITIGATIONS.LAST_UPDATE_DATE,' ||
'IEX_LITIGATIONS.LAST_UPDATE_LOGIN,' ||
'IEX_LITIGATIONS.SECURITY_GROUP_ID,' ||
'IEX_LITIGATIONS.CREDIT_HOLD_REQUEST_FLAG,' ||
'IEX_LITIGATIONS.CREDIT_HOLD_APPROVED_FLAG,' ||
'IEX_LITIGATIONS.SERVICE_HOLD_REQUEST_FLAG,' ||
'IEX_LITIGATIONS.SERVICE_HOLD_APPROVED_FLAG,' ||
'IEX_LITIGATIONS.SUGGESTION_APPROVED_FLAG,' ||
'from IEX_LITIGATIONS';
END Gen_Select;
SELECT INSTR(p_rec_item, '%', 1, 1)
FROM DUAL;
SELECT INSTR(p_rec_item, '_', 1, 1)
FROM DUAL;
l_select_cl VARCHAR2(2000) := '';
Gen_Select(l_select_cl);
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_LITIGATION_ID <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_DELINQUENCY_ID <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_PARTY_ID <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_UNPAID_REASON_CODE <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_JUDGEMENT_DATE <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_DISPOSITION_CODE <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_CREDIT_HOLD_REQUEST_FLAG <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_CREDIT_HOLD_APPROVED_FLAG <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_SERVICE_HOLD_REQUEST_FLAG <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_SERVICE_HOLD_APPROVED_FLAG <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_SUGGESTION_APPROVED_FLAG <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;