How to Create Customer Contacts API in R12

API'S WHICH ARE USING:-      

   hz_party_v2pub.create_person
                                    (p_init_msg_list      => fnd_api.g_false,
                                     p_person_rec         => r_person_rec_type,
                                     x_party_id           => ln_party_id,
                                     x_party_number       => lc_party_number,
                                     x_profile_id         => ln_profile_id,
                                     x_return_status      => gc_api_return_status,
                                     x_msg_count          => gn_msg_count,
                                     x_msg_data           => gc_msg_data
                                    );



                           hz_contact_point_v2pub.create_contact_point
                              (p_init_msg_list          => fnd_api.g_false,
                               p_contact_point_rec      => r_contact_point_rec_type,
                               p_edi_rec                => r_edi_rec_type,
                               p_email_rec              => r_email_rec_type,
                               p_phone_rec              => r_phone_rec_type,
                               p_telex_rec              => r_telex_rec_type,
                               p_web_rec                => r_web_rec_type,
                               x_contact_point_id       => ln_contact_point_id,
                               x_return_status          => gc_api_return_status,
                               x_msg_count              => gn_msg_count,
                               x_msg_data               => gc_msg_data
                              );


               hz_party_contact_v2pub.create_org_contact
                                (p_init_msg_list        => fnd_api.g_false,
                                 p_org_contact_rec      => r_org_contact_rec_type,
                                 x_org_contact_id       => ln_org_contact_id,
                                 x_party_rel_id         => ln_party_rel_id,
                                 x_party_id             => l_party_id,
                                 x_party_number         => l_party_number,
                                 x_return_status        => gc_api_return_status,
                                 x_msg_count            => gn_msg_count,
                                 x_msg_data             => gc_msg_data
                                );



                     hz_party_contact_v2pub.create_org_contact_role
                        (p_init_msg_list             => fnd_api.g_false,
                         p_org_contact_role_rec      => r_org_contact_role_rec_type,
                         x_org_contact_role_id       => l_org_contact_role_id,
                         x_return_status             => gc_api_return_status,
                         x_msg_count                 => gn_msg_count,
                         x_msg_data                  => gc_msg_data
                        );


         hz_location_v2pub.create_location
                                    (p_init_msg_list      => fnd_api.g_false,
                                     p_location_rec       => r_location_rec_type,
                                     x_location_id        => ln_location_id,
                                     x_return_status      => gc_api_return_status,
                                     x_msg_count          => gn_msg_count,
                                     x_msg_data           => gc_msg_data
                                    );



            hz_party_site_v2pub.create_party_site
                                (p_init_msg_list          => fnd_api.g_false,
                                 p_party_site_rec         => r_party_site_rec_type,
                                 x_party_site_id          => ln_party_site_id,
                                 x_party_site_number      => lc_party_site_number,
                                 x_return_status          => gc_api_return_status,
                                 x_msg_count              => gn_msg_count,
                                 x_msg_data               => gc_msg_data
                                );


                     hz_cust_account_role_v2pub.create_cust_account_role
                        (p_init_msg_list              => fnd_api.g_false,
                         p_cust_account_role_rec      => r_cust_account_role_rec_type,
                         x_cust_account_role_id       => ln_cust_account_role_id,
                         x_return_status              => gc_api_return_status,
                         x_msg_count                  => gn_msg_count,
                         x_msg_data                   => gc_msg_data
                        );


                        hz_cust_account_role_v2pub.create_role_responsibility
                           (p_init_msg_list                => fnd_api.g_false,
                            p_role_responsibility_rec      => r_role_responsibility_rec,
                            x_responsibility_id            => ln_responsibility_id,
                            x_return_status                => gc_api_return_status,
                            x_msg_count                    => gn_msg_count,
                            x_msg_data                     => gc_msg_data
                           );