管理员为供应商创建新联系人流程
/oracle/apps/pos/supplier/webui/ByrAddCntctPG
oracle.apps.pos.supplier.webui.ByrAddCntctCO
oracle.apps.pos.supplier.server.ByrSuppAM
//伪码 //CO if ("ByrAddCont".equals(comingFrom)){ …… long1 = (Long)oaapplicationmodule2.invokeMethod("addContact", aserializable4, aclass4); } //AM public Long addContact(Long long1, Long long2, String s) throws Exception { …… l = PosByrContactHelper.createContact(oadbtransaction, long1.longValue(), poscontinfoamimpl); …… long l2 = PosByrContactHelper.createContactUserAccount(oadbtransaction, l, s2, s13); …… }
//PosByrContactHelper
public static long createContact(OADBTransaction oadbtransaction, long l, PosContInfoAMImpl poscontinfoamimpl)
{
……
BEGIN pos_supp_contact_pkg.create_supplier_contact(p_vendor_party_id => :1, p_first_name => :2, p_last_name => :3, p_middle_name => :4, p_contact_title => :5, p_job_title => :6, p_phone_area_code => :7, p_phone_number => :8, p_phone_extension => :9, p_fax_area_code => :10, p_fax_number => :11, p_email_address => :12, p_inactive_date => :13, x_return_status => :14, x_msg_count => :15, x_msg_data => :16, x_person_party_id => :17, p_department => :18, p_alt_contact_name => :19, p_alt_area_code => :20, p_alt_phone_number => :21, p_url => :22); END;
……
}
public static long createContactUserAccount(OADBTransaction oadbtransaction, long l, String s, String s1)
{
……
BEGIN pos_user_admin_pkg.create_supplier_user_ntf(p_user_name => :1, p_user_email => :2, p_person_party_id => :3, p_password => :4, x_return_status => :5, x_msg_count => :6, x_msg_data => :7, x_user_id => :8, x_password => :9); END;
……
}
//证明提示
createUserCertReminderNtf1
//am
BEGIN pos_user_admin_pkg.add_certntf_subscription(p_user_id => :1, x_status => :2, x_exception_msg => :3); END;