The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE APPLY_SR_LINK_INSERT
(p_HA_PAYLOAD_ID IN NUMBER,
p_COL_NAME_LIST IN CSM_VARCHAR_LIST,
p_COL_VALUE_LIST IN CSM_VARCHAR_LIST,
x_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_Error_Message Out Nocopy Varchar2
)
AS
--Variable Declarations
L_Api_Version Number := 2.0;
CSM_UTIL_PKG.LOG('Entering CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_INSERT for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_INSERT',FND_LOG.LEVEL_PROCEDURE);
ELSIF p_COL_NAME_LIST(i) = 'PROGRAM_UPDATE_DATE' THEN
L_Link_Rec.PROGRAM_UPDATE_DATE := p_Col_Value_List(I);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_INSERT for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_INSERT',Fnd_Log.Level_Procedure);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_INSERT for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_INSERT',FND_LOG.LEVEL_PROCEDURE);
END APPLY_SR_LINK_INSERT;
PROCEDURE APPLY_SR_LINK_UPDATE
(p_HA_PAYLOAD_ID IN NUMBER,
p_COL_NAME_LIST IN CSM_VARCHAR_LIST,
p_COL_VALUE_LIST IN CSM_VARCHAR_LIST,
x_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_Error_Message Out Nocopy Varchar2
)
AS
--Variable Declarations
L_Api_Version Number := 2.0;
SELECT OBJECT_VERSION_NUMBER
FROM CS_INCIDENT_LINKS
WHERE LINK_ID = B_LINK_ID;
CSM_UTIL_PKG.LOG('Entering CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_UPDATE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_UPDATE',FND_LOG.LEVEL_PROCEDURE);
ELSIF p_COL_NAME_LIST(i) = 'PROGRAM_UPDATE_DATE' THEN
L_Link_Rec.PROGRAM_UPDATE_DATE := p_Col_Value_List(I);
Cs_Incidentlinks_Pub.UPDATE_INCIDENTLINK (
P_Api_Version => L_Api_Version,
P_Init_Msg_List => L_Init_Msg_List,
P_Commit => NULL,
P_Resp_Appl_Id => Null, -- not used
P_Resp_Id => Null, -- not used
P_User_Id => Fnd_Global.User_Id,
P_Login_Id => NULL,
P_ORG_ID => NULL, -- not used
P_LINK_ID => L_LINK_ID,
P_LINK_REC => L_LINK_REC,
P_OBJECT_VERSION_NUMBER => L_OBJECT_VERSION_NUMBER,
X_Return_Status => l_return_status,
X_Msg_Count => l_msg_count,
X_Msg_Data => l_msg_data,
X_Object_Version_Number => L_Object_Version_Number -- new for 1159
);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_UPDATE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_UPDATE',Fnd_Log.Level_Procedure);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_UPDATE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_UPDATE',FND_LOG.LEVEL_PROCEDURE);
END APPLY_SR_LINK_UPDATE;
PROCEDURE APPLY_SR_LINK_DELETE
(p_HA_PAYLOAD_ID IN NUMBER,
p_COL_NAME_LIST IN CSM_VARCHAR_LIST,
p_COL_VALUE_LIST IN CSM_VARCHAR_LIST,
x_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_Error_Message Out Nocopy Varchar2
)
AS
--Variable Declarations
L_Api_Version Number := 2.0;
CSM_UTIL_PKG.LOG('Entering CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_DELETE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_DELETE',FND_LOG.LEVEL_PROCEDURE);
Cs_Incidentlinks_Pub.DELETE_INCIDENTLINK (
P_Api_Version => L_Api_Version,
P_Init_Msg_List => FND_API.G_FALSE,
P_Commit => FND_API.G_FALSE,
P_Resp_Appl_Id => Null, -- not used
P_Resp_Id => Null, -- not used
P_User_Id => Fnd_Global.User_Id,
P_Login_Id => NULL,
P_ORG_ID => NULL, -- not used
P_LINK_ID => L_LINK_ID,
X_Return_Status => l_return_status,
X_Msg_Count => l_msg_count,
X_Msg_Data => l_msg_data
);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_DELETE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_DELETE',Fnd_Log.Level_Procedure);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_DELETE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_LINK_DELETE',FND_LOG.LEVEL_PROCEDURE);
END APPLY_SR_LINK_DELETE;
PROCEDURE APPLY_SR_ATTR_INSERT
(p_HA_PAYLOAD_ID IN NUMBER,
p_Col_Name_List In Csm_Varchar_List,
p_COL_VALUE_LIST IN CSM_VARCHAR_LIST,
x_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_Error_Message Out Nocopy Varchar2
)
AS
--Variable Declarations
L_Rowid Varchar2(150);
L_LAST_UPDATE_DATE DATE;
L_Last_Updated_By Number;
L_Last_Update_Login Number;
CSM_UTIL_PKG.LOG('Entering CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_INSERT for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_INSERT',FND_LOG.LEVEL_PROCEDURE);
ELSIF P_COL_NAME_LIST(i) = 'LAST_UPDATE_DATE' THEN
L_LAST_UPDATE_DATE := P_COL_NAME_LIST(I);
Elsif P_COL_NAME_LIST(I) = 'LAST_UPDATED_BY' Then
L_Last_Updated_By:= P_COL_NAME_LIST(i);
ELSIF P_COL_NAME_LIST(i) = 'LAST_UPDATE_LOGIN' THEN
L_Last_Update_Login := P_COL_NAME_LIST(I);
Cug_Incidnt_Attr_Vals_Pkg.Insert_Row (
X_Rowid => L_Rowid,
X_Incidnt_Attr_Val_Id => L_Incidnt_Attr_Val_Id,
X_Object_Version_Number => L_Object_Version_Number,
X_Incident_Id => L_Incident_Id,
X_Sr_Attribute_Code => L_Sr_Attribute_Code,
X_Override_Addr_Valid_Flag => L_Override_Addr_Valid_Flag,
X_Attribute1 => L_Attribute1,
X_Attribute2 => L_Attribute2,
X_Attribute3 => L_Attribute3,
X_Attribute4 => L_Attribute4,
X_Attribute5 => L_Attribute5,
X_Attribute6 => L_Attribute6,
X_Attribute7 => L_Attribute7,
X_Attribute8 => L_Attribute8,
X_Attribute9 => L_Attribute9,
X_Attribute10 => L_Attribute10,
X_Attribute11 => L_Attribute11,
X_Attribute12 => L_Attribute12,
X_Attribute13 => L_Attribute13,
X_Attribute14 => L_Attribute14,
X_Attribute15 => L_Attribute15,
X_Attribute_Category => L_Attribute_Category,
X_Sr_Attribute_Value => L_SR_ATTRIBUTE_VALUE,
X_Creation_Date => L_Creation_Date,
X_Created_By => L_Last_Updated_By,
X_Last_Update_Date => L_Last_Update_Date,
X_Last_Updated_By => L_Last_Updated_By,
X_Last_Update_Login => L_Last_Update_Login
) ;
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_INSERT for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_INSERT',Fnd_Log.Level_Procedure);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_INSERT for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_INSERT',FND_LOG.LEVEL_PROCEDURE);
End APPLY_SR_ATTR_INSERT;
PROCEDURE APPLY_SR_ATTR_UPDATE
(p_HA_PAYLOAD_ID IN NUMBER,
p_Col_Name_List In Csm_Varchar_List,
p_COL_VALUE_LIST IN CSM_VARCHAR_LIST,
x_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_Error_Message Out Nocopy Varchar2
)
AS
--Variable Declarations
L_Rowid Varchar2(150);
L_LAST_UPDATE_DATE DATE;
L_Last_Updated_By Number;
L_Last_Update_Login Number;
SELECT OBJECT_VERSION_NUMBER
FROM CUG_INCIDNT_ATTR_VALS_B
WHERE INCIDNT_ATTR_VAL_ID = B_INCIDNT_ATTR_VAL_ID;
CSM_UTIL_PKG.LOG('Entering CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_UPDATE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_UPDATE',FND_LOG.LEVEL_PROCEDURE);
ELSIF P_COL_NAME_LIST(i) = 'LAST_UPDATE_DATE' THEN
L_LAST_UPDATE_DATE := P_COL_NAME_LIST(I);
Elsif P_COL_NAME_LIST(I) = 'LAST_UPDATED_BY' Then
L_Last_Updated_By:= P_COL_NAME_LIST(i);
ELSIF P_COL_NAME_LIST(i) = 'LAST_UPDATE_LOGIN' THEN
L_Last_Update_Login := P_COL_NAME_LIST(I);
CUG_INCIDNT_ATTR_VALS_PKG.UPDATE_ROW
(
X_Incidnt_Attr_Val_Id => L_Incidnt_Attr_Val_Id,
X_Object_Version_Number => L_Object_Version_Number,
X_Incident_Id => L_Incident_Id,
X_Sr_Attribute_Code => L_Sr_Attribute_Code,
X_Override_Addr_Valid_Flag => L_Override_Addr_Valid_Flag,
X_Attribute1 => L_Attribute1,
X_Attribute2 => L_Attribute2,
X_Attribute3 => L_Attribute3,
X_Attribute4 => L_Attribute4,
X_Attribute5 => L_Attribute5,
X_Attribute6 => L_Attribute6,
X_Attribute7 => L_Attribute7,
X_Attribute8 => L_Attribute8,
X_Attribute9 => L_Attribute9,
X_Attribute10 => L_Attribute10,
X_Attribute11 => L_Attribute11,
X_Attribute12 => L_Attribute12,
X_Attribute13 => L_Attribute13,
X_Attribute14 => L_Attribute14,
X_Attribute15 => L_Attribute15,
X_Attribute_Category => L_Attribute_Category,
X_Sr_Attribute_Value => L_SR_ATTRIBUTE_VALUE,
X_Last_Update_Date => L_Last_Update_Date,
X_Last_Updated_By => L_Last_Updated_By,
X_Last_Update_Login => L_Last_Update_Login
) ;
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_UPDATE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_UPDATE',Fnd_Log.Level_Procedure);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_UPDATE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_UPDATE',FND_LOG.LEVEL_PROCEDURE);
END APPLY_SR_ATTR_UPDATE;
PROCEDURE APPLY_SR_ATTR_DELETE
(p_HA_PAYLOAD_ID IN NUMBER,
p_Col_Name_List In Csm_Varchar_List,
p_COL_VALUE_LIST IN CSM_VARCHAR_LIST,
x_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_Error_Message Out Nocopy Varchar2
)
AS
--Variable Declarations
L_Incidnt_Attr_Val_Id Number;
CSM_UTIL_PKG.LOG('Entering CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_DELETE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_DELETE',FND_LOG.LEVEL_PROCEDURE);
CUG_INCIDNT_ATTR_VALS_PKG.DELETE_ROW
(
X_Incidnt_Attr_Val_Id => L_Incidnt_Attr_Val_Id
) ;
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_DELETE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_DELETE',Fnd_Log.Level_Procedure);
CSM_UTIL_PKG.LOG('Leaving CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_DELETE for HA ID ' || p_HA_PAYLOAD_ID ,
'CSM_SR_ATTRIBUTES_PKG.APPLY_SR_ATTR_DELETE',FND_LOG.LEVEL_PROCEDURE);
END APPLY_SR_ATTR_DELETE;
APPLY_SR_ATTR_INSERT
(p_HA_PAYLOAD_ID => p_HA_PAYLOAD_ID,
p_COL_NAME_LIST => P_COL_NAME_LIST,
p_COL_VALUE_LIST => p_COL_VALUE_LIST,
x_RETURN_STATUS => l_RETURN_STATUS,
x_ERROR_MESSAGE => l_ERROR_MESSAGE
);
APPLY_SR_ATTR_UPDATE
(p_HA_PAYLOAD_ID => p_HA_PAYLOAD_ID,
p_COL_NAME_LIST => P_COL_NAME_LIST,
p_COL_VALUE_LIST => p_COL_VALUE_LIST,
x_RETURN_STATUS => l_RETURN_STATUS,
X_ERROR_MESSAGE => L_ERROR_MESSAGE
);
APPLY_SR_ATTR_DELETE
(p_HA_PAYLOAD_ID => p_HA_PAYLOAD_ID,
p_COL_NAME_LIST => P_COL_NAME_LIST,
p_COL_VALUE_LIST => p_COL_VALUE_LIST,
x_RETURN_STATUS => l_RETURN_STATUS,
X_ERROR_MESSAGE => L_ERROR_MESSAGE
);
APPLY_SR_LINK_INSERT
(p_HA_PAYLOAD_ID =>p_HA_PAYLOAD_ID,
p_COL_NAME_LIST => P_COL_NAME_LIST,
p_COL_VALUE_LIST => p_COL_VALUE_LIST,
x_RETURN_STATUS => l_RETURN_STATUS,
x_ERROR_MESSAGE => l_ERROR_MESSAGE
);
APPLY_SR_LINK_UPDATE
(p_HA_PAYLOAD_ID =>p_HA_PAYLOAD_ID,
p_COL_NAME_LIST => P_COL_NAME_LIST,
p_COL_VALUE_LIST => p_COL_VALUE_LIST,
x_RETURN_STATUS => l_RETURN_STATUS,
X_ERROR_MESSAGE => L_ERROR_MESSAGE
);
APPLY_SR_LINK_DELETE
(p_HA_PAYLOAD_ID =>p_HA_PAYLOAD_ID,
p_COL_NAME_LIST => P_COL_NAME_LIST,
p_COL_VALUE_LIST => p_COL_VALUE_LIST,
x_RETURN_STATUS => l_RETURN_STATUS,
X_ERROR_MESSAGE => L_ERROR_MESSAGE
);