Ejercicio: Agregar la página del Asistente de recompensas para clientes a la configuración asistida

  • 5 minutos

Escenario

La Aplicación base agrega varias guías de configuración asistidas suscribiéndose al evento OnRegister. En el siguiente ejemplo, la página Asistente de recompensas para clientes se agrega a la configuración asistida a través de la API que está expuesta para el módulo. También se agrega la traducción al inglés (Estados Unidos) del nombre.

Agregar la página del Asistente de recompensas para clientes a la configuración asistida

Para agregar la página Asistente de recompensas para clientes a la configuración asistida, siga estos pasos:

  1. Cree un archivo nuevo.

    1. Para crear una nueva página en su extensión, primero cree un nuevo archivo. Seleccione el botón Archivo nuevo en la barra lateral de Visual Studio Code.

    2. Asegúrese de que el nombre del archivo finalice con .al. En este ejemplo, es posible que desee usar el nombre CustRewardsAssistedSetup.Codeunit.al.

  2. Agregue el código a la página. Puede copiar el siguiente código y pegarlo en el archivo CustRewardsAssistedSetup.Codeunit.al.

codeunit 50102 "Cust Rewards Assisted Setup"
{
    trigger OnRun()
    begin

    end;

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"Guided Experience", 'OnRegisterAssistedSetup', '', false, false)]
    local procedure AddExtensionAssistedSetup_OnRegisterAssistedSetup();
    var
        GuidedExperience: Codeunit "Guided Experience";
        CurrentGlobalLanguage: Integer;
        myAppInfo: ModuleInfo;
        WizardTxt: Label 'Customer Rewards assisted setup guide';
        GuidedExperienceType : Enum "Guided Experience Type";
        VideoCategory : Enum "Video Category";
    begin
        NavApp.GetCurrentModuleInfo(myAppInfo);
        CurrentGlobalLanguage := GlobalLanguage();
        GuidedExperience.InsertAssistedSetup(WizardTxt, WizardTxt, WizardTxt,5,ObjectType::Page,page::"Customer Rewards Wizard","Assisted Setup Group"::Extensions,'',VideoCategory::Uncategorized,'');
        GLOBALLANGUAGE(1033);
        GuidedExperience.AddTranslationForSetupObjectTitle(GuidedExperienceType::"Assisted Setup", ObjectType::Page,Page::"Customer Rewards Wizard", CurrentGlobalLanguage, WizardTxt);
    end;
}