Thursday, May 13, 2010

TCA API Example: hz_party_site_v2pub.update_party_site

This sample code updates identifying flag for the party site.


DECLARE
l_party_site_rec hz_party_site_v2pub.PARTY_SITE_REC_TYPE;
l_obj_num NUMBER;
l_return_status VARCHAR2(1);
l_msg_count NUMBER;
l_msg_data VARCHAR2(2000);
BEGIN
l_party_site_rec.party_site_id := 10806693;
l_party_site_rec.identifying_address_flag := 'Y';
l_obj_num := 1;

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_obj_num
, x_return_status => l_return_status
, x_msg_count => l_msg_count
, x_msg_data => l_msg_data
) ;
dbms_output.put_line('Ret Status:' || l_return_status);
END;
/

1 comment: