The following lines contain the word 'select', 'insert', 'update' or 'delete':
x_terr_rec.last_update_date := p_terr_rec.last_update_date;
x_terr_rec.last_updated_by := p_terr_rec.last_updated_by;
x_terr_rec.last_update_login := p_terr_rec.last_update_login;
x_terr_rec.program_update_date := p_terr_rec.program_update_date;
x_terr_rec.update_flag := p_terr_rec.update_flag;
x_terrqual_tbl (l_counter).last_update_date :=
p_terrqual_tbl (l_counter).last_update_date;
x_terrqual_tbl (l_counter).last_updated_by :=
p_terrqual_tbl (l_counter).last_updated_by;
x_terrqual_tbl (l_counter).last_update_login :=
p_terrqual_tbl (l_counter).last_update_login;
x_terrqual_rec .last_update_date := p_terrqual_rec.last_update_date;
x_terrqual_rec.last_updated_by := p_terrqual_rec.last_updated_by;
x_terrqual_rec.last_update_login := p_terrqual_rec.last_update_login;
x_terrvalues_tbl (l_counter).last_update_date :=
p_terrvalues_tbl (l_counter).last_update_date;
x_terrvalues_tbl (l_counter).last_updated_by :=
p_terrvalues_tbl (l_counter).last_updated_by;
x_terrvalues_tbl (l_counter).last_update_login :=
p_terrvalues_tbl (l_counter).last_update_login;
x_terrusgs_tbl (l_counter).last_update_date :=
p_terrusgs_tbl (l_counter).last_update_date;
x_terrusgs_tbl (l_counter).last_updated_by :=
p_terrusgs_tbl (l_counter).last_updated_by;
x_terrusgs_tbl (l_counter).last_update_login :=
p_terrusgs_tbl (l_counter).last_update_login;
x_terrqtypeusgs_tbl (l_counter).last_update_date :=
p_terrqtypeusgs_tbl (l_counter).last_update_date;
x_terrqtypeusgs_tbl (l_counter).last_updated_by :=
p_terrqtypeusgs_tbl (l_counter).last_updated_by;
x_terrqtypeusgs_tbl (l_counter).last_update_login :=
p_terrqtypeusgs_tbl (l_counter).last_update_login;
x_terrrsc_tbl (l_counter).last_update_date :=
p_terrrsc_tbl (l_counter).last_update_date;
x_terrrsc_tbl (l_counter).last_updated_by :=
p_terrrsc_tbl (l_counter).last_updated_by;
x_terrrsc_tbl (l_counter).last_update_login :=
p_terrrsc_tbl (l_counter).last_update_login;
x_terrrscacc_tbl (l_counter).last_update_date :=
p_terrrscacc_tbl (l_counter).last_update_date;
x_terrrscacc_tbl (l_counter).last_updated_by :=
p_terrrscacc_tbl (l_counter).last_updated_by;
x_terrrscacc_tbl (l_counter).last_update_login :=
p_terrrscacc_tbl (l_counter).last_update_login;
PROCEDURE delete_territory (
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_commit IN VARCHAR2 := fnd_api.g_false,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_terr_id IN NUMBER
)
AS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Territory';
SAVEPOINT delete_territory_pub;
jtf_territory_pvt.delete_territory (
p_api_version_number => p_api_version_number,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_terr_id => p_terr_id
);
ROLLBACK TO delete_territory_pub;
ROLLBACK TO delete_territory_pub;
ROLLBACK TO delete_territory_pub;
'Others exception in Delete_Territory PUB' || SQLERRM
);
END delete_territory;
PROCEDURE update_territory (
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_commit IN VARCHAR2 := fnd_api.g_false,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_terr_all_rec IN terr_all_rec_type
:= g_miss_terr_all_rec,
/* Territory Usage and Transaction types cant be updated in R12.
p_terr_usgs_tbl IN terr_usgs_tbl_type
:= g_miss_terr_usgs_tbl,
p_terr_qualtypeusgs_tbl IN terr_qualtypeusgs_tbl_type
:= g_miss_terr_qualtypeusgs_tbl,
p_terr_qual_tbl IN terr_qual_tbl_type
:= g_miss_terr_qual_tbl,
p_terr_values_tbl IN terr_values_tbl_type
:= g_miss_terr_values_tbl, */
x_terr_all_out_rec OUT NOCOPY terr_all_out_rec_type
-- x_terr_usgs_out_tbl OUT NOCOPY terr_usgs_out_tbl_type,
-- x_terr_qualtypeusgs_out_tbl OUT NOCOPY terr_qualtypeusgs_out_tbl_type,
-- x_terr_qual_out_tbl OUT NOCOPY terr_qual_out_tbl_type,
-- x_terr_values_out_tbl OUT NOCOPY terr_values_out_tbl_type
)
AS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Territory';
SAVEPOINT update_territory_pub;
jtf_territory_pvt.update_territory (
p_api_version_number => 1.0,
p_init_msg_list => fnd_api.g_false,
p_commit => fnd_api.g_false,
p_validation_level => fnd_api.g_valid_level_full,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_terr_all_rec => l_terr_rec,
-- p_terr_usgs_tbl => l_terr_usgs_tbl,
-- p_terr_qualtypeusgs_tbl => l_terr_qualtypeusgs_tbl,
-- p_terr_qual_tbl => l_terr_qual_tbl,
-- p_terr_values_tbl => l_terr_values_tbl,
x_terr_all_out_rec => l_terr_out_rec
-- x_terr_usgs_out_tbl => l_terr_usgs_out_tbl,
-- x_terr_qualtypeusgs_out_tbl => l_terr_qualtypeusgs_out_tbl,
-- x_terr_qual_out_tbl => l_terr_qual_out_tbl,
-- x_terr_values_out_tbl => l_terr_values_out_tbl
);
ROLLBACK TO update_territory_pub;
ROLLBACK TO update_territory_pub;
ROLLBACK TO update_territory_pub;
'Others exception in Update_Territory PUB' || SQLERRM
);
END update_territory;
PROCEDURE Delete_Terr_Qualifier (
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_commit IN VARCHAR2 := fnd_api.g_false,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
P_Terr_Qual_Id IN NUMBER
)
AS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Terr_Qualifier';
SAVEPOINT delete_territory_pub;
jtf_territory_pvt.Delete_Terr_Qualifier (
p_api_version_number => p_api_version_number,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
P_Terr_Qual_Id => P_Terr_Qual_Id
);
ROLLBACK TO delete_territory_pub;
ROLLBACK TO delete_territory_pub;
ROLLBACK TO delete_territory_pub;
'Others exception in Delete_Terr_Qualifier PUB' || SQLERRM
);
END Delete_Terr_Qualifier;
SAVEPOINT update_territory_pub;
ROLLBACK TO update_territory_pub;
ROLLBACK TO update_territory_pub;
ROLLBACK TO update_territory_pub;
PROCEDURE Update_Qualifier_Value (
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_commit IN VARCHAR2 := fnd_api.g_false,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_terr_values_tbl IN terr_values_tbl_type
:= g_miss_terr_values_tbl,
x_terr_values_out_tbl OUT NOCOPY terr_values_out_tbl_type
)
AS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Territory';
SAVEPOINT update_territory_pub;
jtf_territory_pvt.Update_Terr_Value( P_Api_Version_Number => 1.0,
P_Init_Msg_List => fnd_api.g_false,
P_Commit => fnd_api.g_false,
p_validation_level => fnd_api.g_valid_level_full,
P_Terr_Value_Tbl => l_Terr_Values_Tbl,
X_Return_Status => l_Return_Status,
X_Msg_Count => x_Msg_Count,
X_Msg_Data => x_Msg_Data,
X_Terr_Value_Out_Tbl => l_Terr_Values_Out_Tbl);
ROLLBACK TO update_territory_pub;
ROLLBACK TO update_territory_pub;
ROLLBACK TO update_territory_pub;
'Others exception in Update_Territory Values ' || SQLERRM
);
END Update_Qualifier_Value;
PROCEDURE Delete_Qualifier_Value (
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_commit IN VARCHAR2 := fnd_api.g_false,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
P_Terr_Value_Id IN NUMBER
)
AS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Terr_Value';
SAVEPOINT delete_territory_pub;
jtf_territory_pvt.Delete_Terr_Value (
p_api_version_number => p_api_version_number,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
P_Terr_Value_Id => P_Terr_Value_Id
);
ROLLBACK TO delete_territory_pub;
ROLLBACK TO delete_territory_pub;
ROLLBACK TO delete_territory_pub;
'Others exception in Delete_Terr_Value PUB' || SQLERRM
);
END Delete_Qualifier_Value;
PROCEDURE delete_terrresource (
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_commit IN VARCHAR2 := fnd_api.g_false,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_terrrsc_id IN NUMBER
)
AS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_TerrResource';
SAVEPOINT delete_terrresource_pub;
jtf_territory_resource_pvt.delete_terr_resource (
p_api_version_number => p_api_version_number,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => fnd_api.g_valid_level_full,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_terrrsc_id => p_terrrsc_id
);
ROLLBACK TO delete_terrresource_pub;
ROLLBACK TO delete_terrresource_pub;
ROLLBACK TO delete_terrresource_pub;
'Others exception in Delete_TerrResource PUB' || SQLERRM
);
END delete_terrresource;
PROCEDURE update_terrresource (
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_commit IN VARCHAR2 := fnd_api.g_false,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_terrrsc_tbl IN terrresource_tbl_type
:= g_miss_terrresource_tbl,
p_terrrsc_access_tbl IN terrrsc_access_tbl_type
:= g_miss_terrrsc_access_tbl,
x_terrrsc_out_tbl OUT NOCOPY terrresource_out_tbl_type,
x_terrrsc_access_out_tbl OUT NOCOPY terrrsc_access_out_tbl_type
)
AS
l_api_name CONSTANT VARCHAR2(30) := 'Update_TerrResource';
SAVEPOINT update_terrresource_pub;
jtf_territory_resource_pvt.update_terrresource (
p_api_version_number => 1.0,
p_init_msg_list => fnd_api.g_false,
p_commit => fnd_api.g_false,
p_validation_level => fnd_api.g_valid_level_full,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_terrrsc_tbl => l_terrrsc_tbl,
p_terrrsc_access_tbl => l_terrrsc_access_tbl,
x_terrrsc_out_tbl => l_terrrsc_out_tbl,
x_terrrsc_access_out_tbl => l_terrrsc_access_out_tbl
);
ROLLBACK TO update_terrresource_pub;
ROLLBACK TO update_terrresource_pub;
ROLLBACK TO update_terrresource_pub;
'Others exception in Update_TerrResource PUB' || SQLERRM
);
END update_terrresource;