/// <summary> /// Updates and immediately saves the UserDefault for the 'Last Partner Used'. /// </summary> /// <param name="APartnerKey">Partner Key of the last used Partner</param> /// <param name="ALastPartnerUse">Specifies which 'Last Partner Used' setting should be /// updated /// </param> /// <param name="APartnerClass">Partner Class of the Partner (default=<see cref="TPartnerClass.FAMILY"/>). /// Only relevant if <paramref name="ALastPartnerUse"/> is <see cref="TLastPartnerUse.lpuMailroomPartner"/>.</param> /// <returns>void</returns> public static void SetLastPartnerWorkedWith(Int64 APartnerKey, TLastPartnerUse ALastPartnerUse, TPartnerClass APartnerClass = TPartnerClass.FAMILY) { switch (ALastPartnerUse) { case TLastPartnerUse.lpuMailroomPartner: TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPARTNERMAILROOM, (object)APartnerKey); if (APartnerClass == TPartnerClass.PERSON) { TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPERSONPERSONNEL, (object)APartnerKey); } break; case TLastPartnerUse.lpuPersonnelPerson: TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPERSONPERSONNEL, (object)APartnerKey); break; case TLastPartnerUse.lpuPersonnelUnit: TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTUNITPERSONNEL, (object)APartnerKey); break; case TLastPartnerUse.lpuConferencePerson: TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPERSONCONFERENCE, (object)APartnerKey); // if partner is person then also set this for personnel module TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPERSONPERSONNEL, (object)APartnerKey); break; } }
/// <summary> /// Updates and immediately saves the UserDefault for the 'Last Partner Used'. /// </summary> /// <param name="APartnerKey">Partner Key of the last used Partner</param> /// <param name="ALastPartnerUse">Specifies which 'Last Partner Used' setting should be /// updated /// </param> /// <returns>void</returns> public static void SetLastPartnerWorkedWith(Int64 APartnerKey, TLastPartnerUse ALastPartnerUse) { String PartnerName; TPartnerClass PartnerClass; /* * Store the fact that this Partner is the 'Last Partner' that was worked with */ switch (ALastPartnerUse) { case TLastPartnerUse.lpuMailroomPartner: TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPARTNERMAILROOM, (object)APartnerKey); // if partner is person then also set this for personnel module TServerLookup.TMPartner.GetPartnerShortName(APartnerKey, out PartnerName, out PartnerClass); if (PartnerClass == TPartnerClass.PERSON) { TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPERSONPERSONNEL, (object)APartnerKey); } break; case TLastPartnerUse.lpuPersonnelPerson: TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPERSONPERSONNEL, (object)APartnerKey); break; case TLastPartnerUse.lpuPersonnelUnit: TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTUNITPERSONNEL, (object)APartnerKey); break; case TLastPartnerUse.lpuConferencePerson: TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPERSONCONFERENCE, (object)APartnerKey); // if partner is person then also set this for personnel module TUserDefaults.SetDefault(TUserDefaults.USERDEFAULT_LASTPERSONPERSONNEL, (object)APartnerKey); break; } }