The following lines contain the word 'select', 'insert', 'update' or 'delete':
p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
p_header_id IN NUMBER := FND_API.G_MISS_NUM,
p_created_by IN NUMBER := FND_API.G_MISS_NUM,
p_creation_date IN DATE := FND_API.G_MISS_DATE,
p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
p_last_update_date IN DATE := FND_API.G_MISS_DATE,
p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_location_id IN NUMBER := FND_API.G_MISS_NUM,
p_party_site_id IN NUMBER,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
l_moheader_rec CSP_ORDERHEADERS_PVT.MOH_Rec_Type;
l_last_update_date DATE := p_last_update_date;
l_last_update_login NUMBER := p_last_update_login;
l_last_updated_by NUMBER := p_last_updated_by;
Select creation_date
From csp_moveorder_headers
Where header_id = p_header_id;
Select header_id
From csp_moveorder_headers
Where header_id = p_header_id;
SELECT header_id INTO l_check_existence
FROM mtl_txn_request_headers
WHERE header_id = p_header_id;
SELECT distinct freight_code INTO l_carrier
FROM org_freight_tl
WHERE freight_code = p_carrier
AND organization_id = (SELECT organization_id FROM mtl_txn_request_headers
WHERE header_id = p_header_id);
IF nvl(l_last_update_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
l_last_update_date := sysdate;
IF nvl(l_last_update_login, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
l_last_update_login := g_login_id;
IF nvl(l_last_updated_by, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
l_last_updated_by := g_user_id;
SELECT header_id INTO l_check_existence
FROM csp_moveorder_headers
WHERE header_id = p_header_id;
SELECT distinct freight_code INTO l_carrier
FROM org_freight_tl
WHERE freight_code = p_carrier
AND organization_id = (SELECT organization_id FROM mtl_txn_request_headers
WHERE header_id = p_header_id);
IF nvl(l_last_update_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
l_last_update_date := sysdate;
SELECT header_id INTO l_check_existence
FROM csp_moveorder_headers
WHERE header_id = p_header_id;
l_moheader_rec.last_updated_by := nvl(l_last_updated_by, fnd_api.g_miss_num);
l_moheader_rec.last_update_date := nvl(l_last_update_date, fnd_api.g_miss_date);
l_moheader_rec.last_update_login := l_last_update_login;
CSP_ORDERHEADERS_PVT.Update_orderheaders(
P_Api_Version_Number => p_api_version_number,
P_Init_Msg_List => p_init_msg_list,
P_Commit => l_commit,
p_validation_level => l_validation_level,
P_Identity_Salesforce_Id => null,
P_MOH_Rec => l_moheader_rec,
X_Return_Status => l_return_status,
X_Msg_Count => l_msg_count,
X_Msg_Data => l_msg_data);
CSP_ORDERHEADERS_PVT.Delete_orderheaders(
P_Api_Version_Number => p_api_version_number,
P_Init_Msg_List => p_init_msg_list,
P_Commit => l_commit,
p_validation_level => l_validation_level,
P_Identity_Salesforce_Id => null,
P_MOH_Rec => l_moheader_rec,
X_Return_Status => l_return_status,
X_Msg_Count => l_msg_count,
X_Msg_Data => l_msg_data);