The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_row
( p_row_id OUT NOCOPY VARCHAR2
, p_credit_profile_id NUMBER
, p_organization_id NUMBER
, p_item_category_id NUMBER
, p_enable_flag VARCHAR2
, p_effective_date_from DATE
, p_effective_date_to DATE
, p_credit_checking VARCHAR2
, p_next_credit_review_date DATE
, p_tolerance NUMBER
, p_credit_hold VARCHAR2
, p_credit_rating VARCHAR2
, p_creation_date DATE
, p_created_by NUMBER
, p_last_update_date DATE
, p_last_updated_by NUMBER
, p_last_update_login NUMBER
)
IS
CURSOR profile_csr IS
SELECT
rowid
FROM
hz_credit_profiles
WHERE credit_profile_id=p_credit_profile_id;
INSERT INTO hz_credit_profiles
( credit_profile_id
, organization_id
, item_category_id
, creation_date
, created_by
, last_update_date
, last_updated_by
, last_update_login
, enable_flag
, effective_date_from
, effective_date_to
, credit_checking
, next_credit_review_date
, tolerance
, credit_hold
, credit_rating
, program_application_id
, program_id
, program_update_date
, request_id
, attribute_category
, attribute1
, attribute2
, attribute3
, attribute4
, attribute5
, attribute6
, attribute7
, attribute8
, attribute9
, attribute10
, attribute11
, attribute12
, attribute13
, attribute14
, attribute15
)
VALUES
( p_credit_profile_id
, p_organization_id
, p_item_category_id
, p_creation_date
, p_created_by
, p_last_update_date
, p_last_updated_by
, p_last_update_login
, p_enable_flag
, p_effective_date_from
, p_effective_date_to
, p_credit_checking
, p_next_credit_review_date
, p_tolerance
, p_credit_hold
, p_credit_rating
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
, null
);
FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,'Insert_row');
END Insert_row;
, p_last_update_date DATE
)
IS
CURSOR prof_csr
IS
SELECT *
FROM hz_credit_profiles
WHERE credit_profile_id=p_credit_profile_id
FOR UPDATE OF last_update_date NOWAIT;
FND_MESSAGE.Set_name('FND', 'FORM_RECORD_DELETED');
(recinfo.last_update_date=p_last_update_date)
THEN
NULL;
PROCEDURE Update_row
( p_credit_profile_id NUMBER
, p_organization_id NUMBER
, p_item_category_id NUMBER
, p_enable_flag VARCHAR2
, p_effective_date_from DATE
, p_effective_date_to DATE
, p_credit_checking VARCHAR2
, p_next_credit_review_date DATE
, p_tolerance NUMBER
, p_credit_hold VARCHAR2
, p_credit_rating VARCHAR2
, p_last_update_date DATE
, p_last_updated_by NUMBER
)
IS
BEGIN
UPDATE hz_credit_profiles
SET
organization_id =p_organization_id
, item_category_id=p_item_category_id
, enable_flag=p_enable_flag
, effective_date_from=p_effective_date_from
, effective_date_to=p_effective_date_to
, credit_checking=p_credit_checking
, next_credit_review_date=p_next_credit_review_date
, tolerance=p_tolerance
, credit_hold=p_credit_hold
, credit_rating=p_credit_rating
, last_update_date=p_last_update_date
, last_updated_by=p_last_updated_by
WHERE credit_profile_id=p_credit_profile_id;
FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,'Update_row');
END Update_Row;
PROCEDURE Delete_row
( p_credit_profile_id NUMBER
)
IS
BEGIN
DELETE
FROM HZ_CREDIT_PROFILES
WHERE credit_profile_id=p_credit_profile_id;
FND_MSG_PUB.Add_exc_msg(G_PKG_NAME,'Delete_row');
END Delete_row;