Introduction:

Requested to update the Tax code in  customer Ship-to.

Solution:

We have update the Tax code by using the oracle API.

API:

DECLARE
x_return_status VARCHAR2(10);
l_init_msg_list VARCHAR2(1000) := FND_API.G_FALSE;
x_msg_count NUMBER(10);
x_msg_data VARCHAR2(1200);
p_object_version_number NUMBER(10) := 1;
l_cust_site_use_rec apps.hz_cust_account_site_v2pub.cust_site_use_rec_type;
BEGIN
dbms_output.put_line(‘API STARTED’);
fnd_global.apps_initialize(user_id => 53221,resp_id => 50286,resp_appl_id => 222);
mo_global.set_policy_context(‘S’,’106′);
————- Passing data in collection————–
l_cust_site_use_rec.site_use_id :=1582569;
l_cust_site_use_rec.cust_acct_site_id :=1286318;
l_cust_site_use_rec.status :=’A’;
l_cust_site_use_rec.site_use_code :=’SHIP_TO’;
–l_cust_site_use_rec.tax_reference := NULL;
l_cust_site_use_rec.created_by_module :=’TCA_FORM_WRAPPER’;
l_cust_site_use_rec.tax_code := ‘Exempt’;
————- Passing data in collection————–
dbms_output.put_line(‘ api started execution ‘);
hz_cust_account_site_v2pub.update_cust_site_use(fnd_api.g_true,
l_cust_site_use_rec,
p_object_version_number,
x_return_status,
x_msg_count,
x_msg_data);

IF
x_return_status = ‘s ‘
THEN
dbms_output.put_line(‘ now site use is active ‘);
ELSE
IF
nvl(x_msg_count,0) > 1
THEN
FOR i IN 1..x_msg_count LOOP
dbms_output.put_line(‘error status ‘ || x_return_status);
dbms_output.put_line(‘ error message ‘ || x_msg_data);
END LOOP;

ELSE
dbms_output.put_line(‘error message ‘ || x_msg_data);
END IF;
END IF;

COMMIT;
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line(‘ error here ‘
|| sqlcode
|| sqlerrm);
END;

Recent Posts

Start typing and press Enter to search