Acumatica API: использование .ActionConvertToBAccount для преобразования Lead не работает

Ваш текущий вопрос

Ошибка возникает из-за того, что действие ConvertToBAccount вызывает всплывающее диалоговое окно и ожидает ответа:

if (AccountInfo.AskExt((graph, view) => graph.Views[view].Cache.Clear(), true) != WebDialogResult.OK) return contacts;

Чтобы сообщить Acumatica о своем ответе, нужно отправить значение «ОК» еще до того, как вызвать действие. В зависимости от вашей конфигурации вы также можете заполнить поле во всплывающем окне:

Dim commandsConvert As Command() =
    {
        New Value With {.Value = leadID, .LinkedCommand = CR301000.LeadSummary.LeadID, .Commit = True},
        New Value With {.Value = "OK", .LinkedCommand = CR301000.NewAccountServicesSettings.ServiceCommands.DialogAnswer, .Commit = True}, 'This is how close the pop-up. We fill the field from the pop-up after this line
        New Value With {.Value = newCompanyCD, .LinkedCommand = CR301000.NewAccountServicesSettings.BAccountID}, 'With autonumbering On, no need for this line.
        New Value With {.Value = newCompanyName, .LinkedCommand = CR301000.NewAccountServicesSettings.AccountName}, 'The default value will be taken from DetailsSummary.CompanyName
        CR301000.Actions.ActionConvertToBAccount
    }

m_context.CR301000Submit(commandsConvert)

Ваш будущий вопрос

Преобразование из Lead в BAccount - это двухэтапный процесс, при котором вы будете перенаправлены на недавно созданный BAccount и где вам нужно его сохранить. . Он не будет преобразован, пока вы его не сохраните.

Обычно это довольно простой процесс, или вы просто отправляете Save на страницу, на которую вы были перенаправлены (CR303000):

'Once the Process is completed, We want to save the new record.
'If we want to edit some information on the new Business Account
'this is the right place to do it.

Dim newBAID As String = String.Empty
Dim commandsBAccount As Command() =
    {
        CR303000.Actions.Save,
        CR303000.AccountSummary.BusinessAccount
    }
Dim newBAccountContent As CR303000Content() = m_context.CR303000Submit(commandsBAccount)
If newBAccountContent.Length > 0 Then
    newBAID = newBAccountContent(0).AccountSummary.BusinessAccount.Value
End If

Пока вы сохраняете один и тот же контейнер cookie, UserState должен знать, что вы в настоящее время используете грязный CR303000 с кэшированной информацией. Если вы используете настраиваемую конечную точку веб-службы, включающую как CR301000, так и CR303000, вам не с чем иметь дело.

К сожалению, в этом сценарии это не работает.

Кажется, что PXRedirectRequiredException возникает из PXLongOperation (читайте Thread) и что веб-служба не выбирает грязное состояние BAccount. Единственное решение, которое я могу найти прямо сейчас, - настроить действие ConvertToBAccount для удаления потоковой передачи:

public class LeadMaintExt : PXGraphExtension<LeadMaint>
{
    [PXUIField(DisplayName = Messages.ConvertToBAccount, MapEnableRights = PXCacheRights.Update, MapViewRights = PXCacheRights.Select)]
    [PXButton(ImageKey = PX.Web.UI.Sprite.Main.Process)]
    public virtual IEnumerable ConvertToBAccount(PXAdapter adapter)
    {
        List<Contact> contacts = new List<Contact>(adapter.Get().Cast<Contact>());
        foreach (Contact lead in contacts)
        {
            if (Base.AccountInfo.AskExt((graph, view) => graph.Views[view].Cache.Clear(), true) != WebDialogResult.OK) return contacts;
            bool empty_required = !Base.AccountInfo.VerifyRequired();
            BAccount existing = PXSelect<BAccount, Where<BAccount.acctCD, Equal<Required<BAccount.acctCD>>>>.SelectSingleBound(Base, null, Base.AccountInfo.Current.BAccountID);
            if (existing != null)
            {
                Base.AccountInfo.Cache.RaiseExceptionHandling<LeadMaint.AccountsFilter.bAccountID>(Base.AccountInfo.Current, Base.AccountInfo.Current.BAccountID, new PXSetPropertyException(Messages.BAccountAlreadyExists, Base.AccountInfo.Current.BAccountID));
                return contacts;
            }
            if (empty_required) return contacts;

            Base.Save.Press();
            //PXLongOperation.StartOperation(this, () => ConvertToAccount(lead, AccountInfo.Current));
            LeadMaint.ConvertToAccount(lead, Base.AccountInfo.Current);
        }
        return contacts;
    }
}

Я ищу лучший способ разрешить ситуацию, и я отредактирую свой ответ, когда найду его.

Указанные команды должны быть для диалогового окна, а не для сводки. Обязательные поля и ответ диалога должны быть предоставлены перед вызовом действия.

Ниже приведен образец, используемый для создания действия «Квитанция» на экране квитанций. Примечание: код C #

   commands = new Command[]
            {          
                 new Value 
                {

                    Value = CreatedOn.HasValue ? ((DateTime)CreatedOn.Value).ToLongDateString() : "",  
                    LinkedCommand = SOSchema.SpecifyShipmentParameters.ShipmentDate, 
                    Commit = true 
                },
                new Value 
                {

                    Value = "OK", 
                    LinkedCommand = SOSchema.SpecifyShipmentParameters.ServiceCommands.DialogAnswer, 
                    Commit = true 
                },               
                SOSchema.Actions.ActionCreateReceipt
            };
                context.SO301000Submit(commands);

Надеюсь это поможет.