The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Address_Insert_Row( X_rowid IN OUT NOCOPY VARCHAR2,
X_address_id NUMBER,
X_customer_id NUMBER,
X_org_id NUMBER,
X_status VARCHAR2,
X_orig_system_reference VARCHAR2,
X_country VARCHAR2,
X_address1 VARCHAR2,
X_address2 VARCHAR2,
X_address3 VARCHAR2,
X_address4 VARCHAR2,
X_city VARCHAR2,
X_postal_code VARCHAR2,
X_state VARCHAR2,
X_province VARCHAR2,
X_county VARCHAR2,
X_address_key VARCHAR2,
X_key_account_flag VARCHAR2,
X_language VARCHAR2,
X_address_lines_phonetic VARCHAR2,
X_customer_category_code VARCHAR2,
X_ece_tp_location_code VARCHAR2,
X_stp_common_ref VARCHAR2,
X_stp_alt_addr VARCHAR2,
X_stp_supplier VARCHAR2,
X_stp_site_inactive_date DATE,
X_creation_date DATE,
X_created_by NUMBER,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER,
X_party_id NUMBER,
X_location_id NUMBER,
X_party_site_id NUMBER,
X_party_site_number VARCHAR2) IS
CURSOR C IS SELECT location_id FROM HZ_LOCATIONS
WHERE location_id = X_location_id;
CURSOR C1 IS SELECT party_site_id FROM HZ_PARTY_SITES
WHERE party_site_id = X_party_site_id;
CURSOR C2 IS SELECT rowid FROM HZ_CUST_ACCT_SITES
WHERE cust_acct_site_id = X_address_id;
CURSOR C3 IS SELECT address_id FROM IGI_RA_ADDRESSES
WHERE address_id = X_address_id;
CURSOR C4 IS SELECT location_id FROM HZ_LOC_ASSIGNMENTS
WHERE location_id = X_location_id;
INSERT INTO igi_ra_addresses(
address_id,
ORG_ID,
stp_common_ref,
stp_alt_addr,
stp_supplier,
stp_site_inactive_date,
creation_date,
created_by,
last_update_login,
last_update_date,
last_updated_by)
VALUES(
X_address_id,
X_ORG_ID,
X_stp_common_ref,
X_stp_alt_addr,
X_stp_supplier,
X_stp_site_inactive_date,
X_creation_date,
X_created_by,
X_last_update_login,
X_last_update_date,
X_last_updated_by);
END Address_Insert_Row;
PROCEDURE Address_Update_Row( X_rowid IN OUT NOCOPY VARCHAR2,
X_org_id NUMBER,
X_status VARCHAR2,
X_orig_system_reference VARCHAR2,
X_country VARCHAR2,
X_address1 VARCHAR2,
X_address2 VARCHAR2,
X_address3 VARCHAR2,
X_address4 VARCHAR2,
X_city VARCHAR2,
X_postal_code VARCHAR2,
X_state VARCHAR2,
X_province VARCHAR2,
X_county VARCHAR2,
X_address_key VARCHAR2,
X_language VARCHAR2,
X_address_lines_phonetic VARCHAR2,
X_customer_category_code VARCHAR2,
X_ece_tp_location_code VARCHAR2,
X_stp_common_ref VARCHAR2,
X_stp_alt_addr VARCHAR2,
X_stp_supplier VARCHAR2,
X_stp_site_inactive_date DATE,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER) IS
l_location_rec hz_location_v2pub.location_rec_type;
cursor c_loc is select LOC.LOCATION_ID from HZ_PARTY_SITES PS, HZ_LOCATIONS LOC, HZ_CUST_ACCT_SITES CS
WHERE PS.PARTY_SITE_ID = CS.PARTY_SITE_ID
AND LOC.LOCATION_ID = PS.LOCATION_ID
AND CS.rowid = x_rowid;
cursor c_party is select PS.party_site_id from HZ_PARTY_SITES PS, HZ_LOCATIONS LOC, HZ_CUST_ACCT_SITES CS
WHERE PS.PARTY_SITE_ID = CS.PARTY_SITE_ID
AND LOC.LOCATION_ID = PS.LOCATION_ID
AND CS.rowid = x_rowid;
cursor c_cust_acct is select cust_acct_site_id from hz_cust_acct_sites
where rowid = X_rowid;
select object_version_number
from hz_locations
where (location_id = p_location_id);
select object_version_number
from hz_party_sites
where (party_site_id = p_party_site_id);
select object_version_number
from hz_cust_acct_sites
where (cust_acct_site_id = p_cust_acct_site_id);
hz_location_v2pub.update_location
(
p_init_msg_list => fnd_api.g_false,
p_location_rec => l_location_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
);
hz_party_site_v2pub.update_party_site
(
p_init_msg_list => fnd_api.g_false,
p_party_site_rec => l_party_site_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
);
hz_cust_account_site_v2pub.update_cust_acct_site
(
p_init_msg_list => fnd_api.g_false,
p_cust_acct_site_rec => l_cust_acct_site_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
);
UPDATE igi_ra_addresses ira
SET
stp_common_ref = X_stp_common_ref,
stp_alt_addr = X_stp_alt_addr,
stp_supplier = X_stp_supplier,
stp_site_inactive_date = X_stp_site_inactive_date,
last_update_login = X_last_update_login,
last_update_date = X_last_update_date,
last_updated_by = X_last_updated_by
WHERE ira.address_id = (select CS.cust_acct_site_id
from HZ_PARTY_SITES PS, HZ_LOCATIONS LOC, HZ_CUST_ACCT_SITES CS
WHERE PS.PARTY_SITE_ID = CS.PARTY_SITE_ID
AND LOC.LOCATION_ID = PS.LOCATION_ID
AND CS.rowid = x_rowid);
END Address_Update_Row;
SELECT CS.ORG_ID,
CS.STATUS,
CS.orig_system_reference,
LOC.country,
LOC.address1,
LOC.address2,
LOC.address3,
LOC.address4,
LOC.city,
LOC.postal_code,
LOC.state,
LOC.province,
LOC.county ,
LOC.address_key,
LOC.language,
LOC.address_lines_phonetic,
CS.customer_category_code,
CS.ece_tp_location_code
FROM HZ_PARTY_SITES PS, HZ_LOCATIONS LOC, HZ_CUST_ACCT_SITES CS
WHERE PS.PARTY_SITE_ID = CS.PARTY_SITE_ID
AND LOC.LOCATION_ID = PS.LOCATION_ID
AND CS.rowid = x_rowid
FOR UPDATE OF CS.cust_acct_site_id NOWAIT;
SELECT *
FROM igi_ra_addresses ira
WHERE ira.address_id = (select CS.cust_acct_site_id
from HZ_PARTY_SITES PS, HZ_LOCATIONS LOC, HZ_CUST_ACCT_SITES CS
WHERE PS.PARTY_SITE_ID = CS.PARTY_SITE_ID
AND LOC.LOCATION_ID = PS.LOCATION_ID
AND CS.rowid = x_rowid)
FOR UPDATE OF ira.address_Id NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
PROCEDURE Site_Insert_Row( X_Rowid IN VARCHAR2,
X_vendor_site_id NUMBER,
X_vendor_id NUMBER,
X_vendor_site_code VARCHAR2,
X_purchasing_site_flag VARCHAR2,
X_rfq_only_site_flag VARCHAR2,
X_pay_site_flag VARCHAR2,
X_attention_ar_flag VARCHAR2,
X_address_line1 VARCHAR2,
X_address_line2 VARCHAR2,
X_address_line3 VARCHAR2,
X_city VARCHAR2,
X_state VARCHAR2,
X_zip VARCHAR2,
X_province VARCHAR2,
X_country VARCHAR2,
X_customer_num VARCHAR2,
X_ship_to_location_id NUMBER,
X_bill_to_location_id NUMBER,
X_inactive_date DATE,
X_payment_method_lookup_code VARCHAR2,
X_terms_date_basis VARCHAR2,
X_vat_code VARCHAR2,
X_accts_pay_code_comb_id NUMBER,
X_prepay_code_combination_id NUMBER,
X_pay_group_lookup_code VARCHAR2,
X_payment_priority NUMBER,
X_terms_id NUMBER,
X_pay_date_basis_lookup_code VARCHAR2,
X_always_take_disc_flag VARCHAR2,
X_invoice_currency_code VARCHAR2,
X_payment_currency_code VARCHAR2,
X_hold_all_payments_flag VARCHAR2,
X_hold_future_payments_flag VARCHAR2,
X_hold_unmatched_inv_flag VARCHAR2,
X_exclusive_payment_flag VARCHAR2,
X_tax_reporting_site_flag VARCHAR2,
X_validation_number NUMBER,
X_excl_freight_from_discount VARCHAR2,
X_org_id NUMBER,
X_address_line4 VARCHAR2,
X_county VARCHAR2,
X_address_style VARCHAR2,
X_language VARCHAR2,
X_allow_awt_flag VARCHAR2,
X_auto_tax_calc_flag VARCHAR2,
X_auto_tax_calc_override VARCHAR2,
X_amount_includes_tax_flag VARCHAR2,
X_ap_tax_rounding_rule VARCHAR2,
X_vendor_site_code_alt VARCHAR2,
X_address_lines_alt VARCHAR2,
X_bank_charge_bearer VARCHAR2,
X_ece_tp_location_code VARCHAR2,
X_pcard_site_flag VARCHAR2,
X_creation_date DATE,
X_created_by NUMBER,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER,
X_fin_match_option VARCHAR2 ) IS
l_vendor_site_rec ap_vendor_pub_pkg.r_vendor_site_rec_type;
CURSOR C IS SELECT rowid FROM ap_supplier_sites
WHERE vendor_site_id = l_vendor_site_id;
l_vendor_site_rec.LAST_UPDATE_DATE := x_last_update_date ;
l_vendor_site_rec.LAST_UPDATED_BY := x_last_updated_by ;
END Site_Insert_Row;
PROCEDURE Site_Update_Row(X_vendor_site_id IN number,
X_vendor_site_code VARCHAR2,
X_address_line1 VARCHAR2,
X_address_line2 VARCHAR2,
X_address_line3 VARCHAR2,
X_city VARCHAR2,
X_state VARCHAR2,
X_zip VARCHAR2,
X_province VARCHAR2,
X_country VARCHAR2,
X_inactive_date DATE,
X_org_id NUMBER,
X_address_line4 VARCHAR2,
X_county VARCHAR2,
X_address_style VARCHAR2,
X_language VARCHAR2,
X_vendor_site_code_alt VARCHAR2,
X_address_lines_alt VARCHAR2,
X_bank_charge_bearer VARCHAR2,
X_ece_tp_location_code VARCHAR2,
X_pay_site_flag VARCHAR2,
X_address_lines_phonetic VARCHAR2,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER) IS
l_vendor_site_rec ap_vendor_pub_pkg.r_vendor_site_rec_type;
cursor c_loc is select LOC.LOCATION_ID from HZ_PARTY_SITES PS, HZ_LOCATIONS LOC,AP_SUPPLIER_SITES_ALL AP
WHERE PS.PARTY_SITE_ID = AP.PARTY_SITE_ID
AND LOC.LOCATION_ID = PS.LOCATION_ID
AND LOC.LOCATION_ID = AP.LOCATION_ID
AND AP.vendor_site_id = X_vendor_site_id
AND AP.ORG_ID = X_org_id;
select object_version_number
from hz_locations
where (location_id = p_location_id);
cursor c_party is select PS.party_site_id from HZ_PARTY_SITES PS, HZ_LOCATIONS LOC, AP_SUPPLIER_SITES_ALL AP
WHERE PS.PARTY_SITE_ID = AP.PARTY_SITE_ID
AND AP.vendor_site_id = X_vendor_site_id
AND AP.ORG_ID = X_org_id;
select object_version_number
from hz_party_sites
where (party_site_id = p_party_site_id);
select decode(X_pay_site_flag,'Y','A','I') into l_party_site_rec.status from dual;
hz_location_v2pub.update_location
(
'T',
l_location_rec,
l_object_version_number,
l_return_status,
l_msg_count,
l_msg_data
);
hz_party_site_v2pub.update_party_site
(
p_init_msg_list => fnd_api.g_false,
p_party_site_rec => l_party_site_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
);
l_vendor_site_rec.LAST_UPDATE_DATE := x_last_update_date ;
l_vendor_site_rec.LAST_UPDATED_BY := x_last_updated_by ;
AP_VENDOR_PUB_PKG.update_Vendor_Site
(p_api_version => 1.0,
p_init_msg_list => FND_API.G_TRUE,
p_commit =>FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_vendor_site_rec => l_vendor_site_rec,
p_vendor_site_id => X_vendor_site_id
); */
END Site_Update_Row;
SELECT *
FROM ap_supplier_sites_all
WHERE vendor_site_id = X_vendor_site_id
and org_id = x_org_id
FOR UPDATE OF vendor_site_id NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
PROCEDURE Customer_Insert_Row( X_rowid IN OUT NOCOPY VARCHAR2,
X_customer_id NUMBER,
X_customer_name VARCHAR2,
X_customer_number OUT NOCOPY VARCHAR2,
X_customer_key VARCHAR2,
X_status VARCHAR2,
X_stp_enforce_threshold VARCHAR2,
X_orig_system_reference VARCHAR2,
X_customer_prospect_code VARCHAR2,
X_customer_type VARCHAR2,
X_tax_reference VARCHAR2,
X_gsa_indicator VARCHAR2,
X_jgzz_fiscal_code VARCHAR2,
X_warehouse_id NUMBER,
X_competitor_flag VARCHAR2,
X_reference_use_flag VARCHAR2,
X_third_party_flag VARCHAR2,
X_customer_name_phonetic VARCHAR2,
X_stp_type VARCHAR2,
X_creation_date DATE,
X_created_by NUMBER,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER,
X_party_id NUMBER,
X_party_number VARCHAR2,
X_party_type VARCHAR2,
X_account_replication_key NUMBER ) IS
l_party_rec HZ_PARTY_V2PUB.PARTY_REC_TYPE;
CURSOR C IS SELECT party_id FROM hz_parties
WHERE party_id = X_party_id;
CURSOR C1 IS SELECT rowid FROM hz_cust_accounts
WHERE cust_account_id = X_customer_id;
CURSOR C2 IS SELECT customer_id FROM igi_ra_customers
WHERE customer_id = X_customer_id;
SELECT generate_customer_number
FROM ar_system_parameters;
SELECT hz_cust_accounts_s.nextval INTO X_Customer_Number
FROM dual;
INSERT INTO igi_ra_customers(
customer_id,
stp_enforce_threshold,
stp_type,
creation_date,
created_by,
last_update_login,
last_update_date,
last_updated_by)
VALUES(
X_customer_id,
X_stp_enforce_threshold,
X_stp_type,
X_creation_date,
X_created_by,
X_last_update_login,
X_last_update_date,
X_last_updated_by);
/*Included the following Insert Statement for Bug 2450283*/
/*The Standard Customer Form(AR) expects a record in hz_organization_profiles.
So including this insert statement here. The situation arises when STP customer
is queried in the Core AR Customer Standard Form and modifications are made and saved.*/
/*
INSERT into hz_organization_profiles
(ORGANIZATION_PROFILE_ID,
PARTY_ID,
ORGANIZATION_NAME,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
CONTENT_SOURCE_TYPE,
EFFECTIVE_START_DATE)
VALUES
(hz_organization_profiles_s.nextval,
X_party_id,
X_customer_name,
X_last_update_date,
X_last_updated_by,
X_creation_date,
X_created_by,
'USER_ENTERED',
trunc(sysdate));
END Customer_Insert_Row;
PROCEDURE Customer_Update_Row (X_rowid IN OUT NOCOPY VARCHAR2,
X_customer_name VARCHAR2,
X_customer_number VARCHAR2,
X_customer_key VARCHAR2,
X_status VARCHAR2,
X_stp_enforce_threshold VARCHAR2,
X_orig_system_reference VARCHAR2,
X_tax_reference VARCHAR2,
X_jgzz_fiscal_code VARCHAR2,
X_warehouse_id NUMBER,
X_customer_name_phonetic VARCHAR2,
X_stp_type VARCHAR2,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER ) IS
l_party_rec HZ_PARTY_V2PUB.PARTY_REC_TYPE;
SELECT nvl(a.object_version_number,fnd_api.G_NULL_NUM),a.party_id,a.cust_account_id,nvl(p.object_version_number,fnd_api.G_NULL_NUM)
FROM hz_cust_accounts a,hz_parties p
WHERE a.party_id = p.party_id
AND a.rowid = X_rowid;
hz_party_v2pub.update_organization
(
p_init_msg_list => fnd_api.g_false,
p_organization_rec => l_organization_rec,
p_party_object_version_number => l_object_version_number,
x_profile_id => l_profile_id,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
);
hz_cust_account_v2pub.update_cust_account
(
p_init_msg_list => fnd_api.g_false,
p_cust_account_rec => l_cust_account_rec,
p_object_version_number => l_object_cust_version_number,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
);
UPDATE igi_ra_customers irc
SET stp_enforce_threshold = X_stp_enforce_threshold,
stp_type = X_stp_type,
last_update_login = X_last_update_login,
last_update_date = X_last_update_date,
last_updated_by = X_last_updated_by
WHERE irc.customer_id = (select a.cust_account_id from hz_cust_accounts a,hz_parties p
where a.party_id = p.party_id and a.rowid = X_rowid); -- Bug 3902175
END Customer_Update_Row;
SELECT *
FROM igi_ar_customers_v --bug3514922 sdixit
WHERE row_id = X_rowid
FOR UPDATE OF customer_id NOWAIT;
SELECT *
FROM igi_ra_customers irc
WHERE irc.customer_id = (select a.cust_account_id from hz_cust_accounts a,hz_parties p -- Bug 3902175
where a.party_id = p.party_id and a.rowid = X_rowid)
FOR UPDATE OF irc.customer_id NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
PROCEDURE Supplier_Insert_Row( X_rowid IN VARCHAR2,
X_vendor_id NUMBER,
X_vendor_name VARCHAR2,
X_segment1 VARCHAR2,
X_stp_enforce_threshold VARCHAR2,
X_summary_flag VARCHAR2,
X_enabled_flag VARCHAR2,
X_one_time_flag VARCHAR2,
X_payment_priority NUMBER,
X_num_1099 VARCHAR2,
X_start_date_active DATE,
X_end_date_active DATE,
X_women_owned_flag VARCHAR2,
X_small_business_flag VARCHAR2,
X_hold_flag VARCHAR2,
X_federal_reportable_flag VARCHAR2,
X_vat_registration_num VARCHAR2,
X_vendor_name_alt VARCHAR2,
X_auto_tax_calc_flag VARCHAR2,
X_auto_tax_calc_override VARCHAR2,
X_ap_tax_rounding_rule VARCHAR2,
X_bank_charge_bearer VARCHAR2,
X_state_reportable_flag VARCHAR2,
X_amount_includes_tax_flag VARCHAR2,
X_hold_all_payments_flag VARCHAR2,
X_hold_future_payments_flag VARCHAR2,
X_always_take_disc_flag VARCHAR2,
X_excl_freight_from_discount VARCHAR2,
X_auto_calc_interest_flag VARCHAR2,
X_invoice_currency_code VARCHAR2,
X_payment_currency_code VARCHAR2,
X_exclusive_payment_flag VARCHAR2,
X_terms_date_basis VARCHAR2,
X_pay_date_basis_lookup_code VARCHAR2,
X_payment_method_lookup_code VARCHAR2,
X_enforce_ship_to_loc_code VARCHAR2,
X_qty_rcv_tolerance NUMBER,
X_qty_rcv_exception_code VARCHAR2,
X_days_early_receipt_allowed NUMBER,
X_allow_subst_receipts_flag VARCHAR2,
X_days_late_receipt_allowed NUMBER,
X_allow_unord_receipts_flag VARCHAR2,
X_receipt_days_exception_code VARCHAR2,
X_allow_awt_flag VARCHAR2,
X_bill_to_location_id NUMBER,
X_receiving_routing_id NUMBER,
X_ship_to_location_id NUMBER,
X_pay_group_lookup_code VARCHAR2,
X_terms_id NUMBER,
X_set_of_books_id NUMBER,
X_inspection_required_flag VARCHAR2,
X_receipt_required_flag VARCHAR2,
X_creation_date DATE,
X_created_by NUMBER,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER,
X_future_dated_payment_ccid NUMBER,
X_fin_match_option VARCHAR2,
X_po_create_dm_flag VARCHAR2,
X_customer_id NUMBER ) IS
l_vendor_rec ap_vendor_pub_pkg.r_vendor_rec_type;
CURSOR C IS SELECT rowid FROM AP_SUPPLIERS
WHERE vendor_id = l_vendor_id;
CURSOR C1 IS SELECT vendor_id FROM igi_po_vendors
WHERE vendor_id = l_vendor_id;
INSERT INTO igi_po_vendors(
vendor_id,
stp_enforce_threshold,
customer_id,
creation_date,
created_by,
last_update_login,
last_update_date,
last_updated_by)
VALUES(
l_vendor_id,
X_stp_enforce_threshold,
X_customer_id,
X_creation_date,
X_created_by,
X_last_update_login,
X_last_update_date,
X_last_updated_by);
END Supplier_Insert_Row;
PROCEDURE Supplier_Update_Row(X_rowid IN VARCHAR2,
X_vendor_name VARCHAR2,
X_num_1099 VARCHAR2,
X_vat_registration_num VARCHAR2,
X_VENDOR_ID NUMBER,
X_vendor_name_alt VARCHAR2,
X_end_date_active DATE,
X_status VARCHAR2,
X_orig_system_reference VARCHAR2,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_stp_enforce_threshold VARCHAR2,
X_last_updated_by NUMBER
) IS
l_vendor_rec ap_vendor_pub_pkg.r_vendor_rec_type;
select party_id,nvl(object_version_number,fnd_api.G_NULL_NUM) into l_party_id,l_object_version_number from hz_parties where party_name = X_vendor_name and created_by_module = 'AP_SUPPLIERS_API';
hz_party_v2pub.update_organization
(
p_init_msg_list => fnd_api.g_false,
p_organization_rec => l_organization_rec,
p_party_object_version_number => l_object_version_number,
x_profile_id => l_profile_id,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
);
AP_VENDOR_PUB_PKG.Update_Vendor(
p_api_version => 1.0,
p_init_msg_list => FND_API.G_TRUE,
p_commit => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_vendor_rec => l_vendor_rec,
p_vendor_id => X_VENDOR_ID); */
UPDATE igi_po_vendors ipv
SET ipv.stp_enforce_threshold = X_stp_enforce_threshold
WHERE ipv.vendor_id = (select pv.vendor_id
from AP_SUPPLIERS pv
where pv.rowid = X_rowid);
END Supplier_Update_Row;
SELECT *
FROM ap_suppliers
WHERE rowid = X_rowid
FOR UPDATE OF vendor_id NOWAIT;
SELECT *
FROM igi_po_vendors ipv
WHERE ipv.vendor_id = (select pv.vendor_id
from ap_suppliers pv
where pv.rowid = X_rowid )
FOR UPDATE OF ipv.vendor_id NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
PROCEDURE Package_Update_Row( X_rowid VARCHAR2,
X_exchange_rate NUMBER,
X_exchange_rate_type VARCHAR2,
X_exchange_date DATE,
X_last_update_login NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER) IS
BEGIN
UPDATE igi_stp_packages
SET exchange_rate = X_exchange_rate,
exchange_rate_type = X_exchange_rate_type,
exchange_date = X_exchange_date,
last_update_login = X_last_update_login,
last_update_date = X_last_update_date,
last_updated_by = X_last_updated_by
WHERE rowid = x_rowid;
END Package_Update_Row;
SELECT *
FROM igi_stp_packages
WHERE rowid = X_rowid
FOR UPDATE of exchange_rate NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');