Esercizio - Aggiunta della pagina Procedura guidata per i premi dei clienti al setup assistito
Scenario
L'Applicazione di base aggiunge diverse guide di setup assistito iscrivendosi all'evento OnRegister. Nell'esempio che segue si aggiunge la pagina Procedura guidata per i premi dei clienti alla configurazione assistita tramite l'API esposta per il modulo. Si aggiunge anche la traduzione inglese (United States) del nome.
Aggiunta della pagina Procedura guidata per i premi dei clienti al setup assistito
Per aggiungere la pagina Procedura guidata per i premi dei clienti al setup assistito, effettuare i seguenti passaggi:
Creare un nuovo file.
Per creare una nuova pagina nell'estensione, creare prima un nuovo file. Selezionare il pulsante Nuovo file nella barra laterale di Visual Studio Code.
Assicurarsi che il nome del file termini con .al. In questo esempio è consigliabile usare il nome CustRewardsAssistedSetup.Codeunit.al.
Aggiungere il codice alla pagina. È possibile copiare il codice che segue e incollarlo nel file 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;
}