Exercice : ajouter la page Assistant Récompenses client à la configuration assistée

  • 5 minutes

Scénario

L’application de base ajoute plusieurs guides de configuration assistée au moyen de l’abonnement à l’événement OnRegister. Dans l’exemple suivant, la page Assistant Récompenses client est ajoutée à la configuration assistée au moyen de l’API exposée pour le module. La traduction Anglais (États-Unis) du nom est également ajoutée.

Ajouter la page Assistant Récompenses client à la configuration assistée

Pour ajouter la page Assistant Récompenses client à la configuration assistée, procédez comme suit :

  1. Créez un fichier.

    1. Pour créer une page dans l’extension, créez d’abord un fichier. Cliquez sur le bouton Nouveau fichier dans la barre latérale de Visual Studio Code.

    2. Assurez-vous que le nom de fichier se termine par .al. Dans cet exemple, vous pouvez utiliser le nom CustRewardsAssistedSetup.Codeunit.al.

  2. Ajoutez le code à la page. Vous pouvez copier le code suivant et le coller dans le fichier 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;
}