Important DataTypeArray in AL visual studio code for Dynamics 365 Business Central

Dear Readers ,

This blog will tell you about new datatypes available in AL language for MS Dynamics 365 business Central.

Arrays :

Arrays are complex variables that contain a group of variables, with the same data type. An array is declared as a variable with:

• An identifier
• A data type
• Elements
• An index
• A dimension

An array holds multiple values, and these values are stored in the elements of an array. You can access these values by using the index. The index can also be a value stored in another variable. With this you can create a loop where you increment a certain variable, to loop trough every element in an array.

By using the dimension property, you can define how many dimensions your array will hold.

One-dimensional and multi-dimensional array

When creating a variable of the array data type, you must define upfront how many elements you will have in your array. The most used is the one-dimensional array. This is just a list of elements with the same data type.

We can represent an array as a row of values:

To create an array, we can use the following code:

To access an element in an array you will need to use the array element syntax:

In the example above, SaleAmount is our identifier, and we are accessing the fifth element in the array. We are setting the value 0 in the fifth element. This would result in:

Because there is only one element between the square brackets, this indicates that we are using a one-dimensional array. If we want to have a multi-dimensional array, you would use a comma separated list between the brackets.

A multi-dimensional array can be represented as a table of values:

To create an array, we can use the following code:

To create an array, we can use the following code:

To access an element in an array, you will need to use the array element syntax:

In the example above, we are accessing the fifth row and the third column in the array. We are setting the value 0. This would result in:

How to Start customising AL Extension for Dynamics 365 business central?

Dear Readers ,

This post is related with my AL development. Lets start to dive in Business Central to get a real idea.

Step 1. Open Visual Studio Code and Goto View-Command Pallette.

1. Select AL:GO
2. Type the project Name : Social Media
3. Change the Launch.json  file as shown in screen if you are using windows Authentication.

4. Download the Symbol from View and Command Pallete by typing AL:Download Symbol

5.Once your Symbols are downloaded you can start with real development.

6. Delete Hello World.AL file and create 1 folder with name  Tables to put all tables and create 1 file in it with name SocialMediaExtension.al as shown in screen.

How to Extend existing tables via AL Code in Visual Studio?

1. Type ttable to use code snippet. And change the file as shown in screenshot.

2. Create one more folder Page and Add one more file for SocialMediaCard.al Pages. Publish the Extension to view your ready Extension. If you need some guidance to Publish the extension you can follow my last point of blog LINK.

3. After the Publish you can check your Extension Management Page.

4. Install the Extension and check your Customer Card PAge with new fields where you can enter records for your cutomers.

I hope this blog will help to understand AL Extension and coding link with your projects.

Error while opening RTC Dynamics 365 Business Central: You do not have the following permissions on CodeUnit ApplicationManagement: Execute

Dear Readers,

This blog is a summary to resolve this step and it is fine with all RTC Clients available from NAV 2013.

Step 1.

Use this query in SQL.

Use [DATABASE]
DELETE FROM [dbo].[User];
DELETE FROM [dbo].[Access Control];
delete From [dbo].[User Property];
delete FROM [dbo].[Page Data Personalization];
Delete FROM [dbo].[User Default Style Sheet];
Delete FROM [dbo].[User Metadata];
DELETE FROM [dbo].[User Personalization];

Step 2.

Open Administration Shell of NAV version which you are using via Run as Administrator

Type these 3 Commands.

Command 1

Import-Module "${env:ProgramFiles}\Microsoft Dynamics NAV\80\Service\NavAdminTool.ps1"

Command 2

New-NavServerUser -WindowsAccount 'domain\user' -ServerInstance InstanceName

EG. New-NavServerUser -WindowsAccount "xyz\user name" -ServerInstance DynamicsNav90

Command 3

New-NavServerUserPermissionSet -WindowsAccount 'domain\user' -ServerInstance
InstanceName -PermissionSetId SUPER

EG. New-NavServerUserPermissionSet -WindowsAccount "domain\user name" -ServerInstance DynamicsNav90 -PermissionSetId COST

Step 3.

Execute the SQL Command written below you need to change Domain\User.

SET NOCOUNT ON

GO

USE [DATABASE NAME]  -- NAV 2013 database you want to use

GO

DECLARE @UserID varchar(100)

SET @UserID = 'domain\Username'  -- Windows Login you want to add

-- Get security identifier (SID) for specified user.  Login must be setup in SQL Server first.

DECLARE @BinarySID binary(100)

SELECT @BinarySID = sid FROM sys.syslogins WHERE name = @UserID

IF @BinarySID IS NULL

  RAISERROR('SQL Server login not found for User %s.', 10, 1, @UserID)

-- SID is stored in the User table as a formatted string.  Need to convert it.

DECLARE @StringSID varchar(238)

DECLARE @i AS int

DECLARE @j AS int

DECLARE @Grp AS int

SELECT @StringSID = 'S-'

    + CONVERT(VARCHAR, CONVERT(INT, CONVERT(VARBINARY, SUBSTRING(@BinarySID, 1, 1))))

SELECT @StringSID = @StringSID + '-'

    + CONVERT(VARCHAR, CONVERT(INT, CONVERT(VARBINARY, SUBSTRING(@BinarySID, 3, 6))))

SET @j = 9

SET @i = LEN(@BinarySID)

SET @Grp = 1

WHILE (@j < @i) AND (@Grp <= 5) BEGIN

  SET @Grp = @Grp + 1

  DECLARE @val BINARY(4)

  SELECT @val = SUBSTRING(@BinarySID, @j, 4)

  SELECT @StringSID = @StringSID + '-'

    + CONVERT(VARCHAR, CONVERT(BIGINT, CONVERT(VARBINARY, REVERSE(CONVERT(VARBINARY, @val)))))

  SET @j = @j + 4 

END

-- Check to see if User record already exists

DECLARE @UserGUID uniqueidentifier

SELECT @UserGUID = [User Security ID]

FROM [User] WHERE [Windows Security ID] = @StringSID

IF @UserGUID IS NOT NULL

  PRINT 'User ID ' + @UserID + ' already exists in User table.'

ELSE BEGIN

  -- Generate new GUID for NAV security ID

  SET @UserGUID = NEWID()

  -- Create User record

  INSERT INTO [User]

  ([User Security ID], [User Name], [Full Name], [State], [Expiry Date], [Windows Security ID], [Change Password],[License Type],[Authentication Email],[Contact Email])

  VALUES(@UserGUID, @UserID, '', 0, '1/1/1753', @StringSID, 0, 0 ,'VE00AC832@yamaha-motor-india.com','') 

  PRINT 'Created User record for User ID ' + @UserID + '. - ' + CAST(@@ROWCOUNT AS varchar) + ' row(s) affected.'

END

-- Check to see if user is assigned to SUPER role 

IF EXISTS(SELECT * FROM [Access Control] WHERE [User Security ID] = @UserGUID AND [Role ID] = 'SUPER' AND [Company Name] = '')

  PRINT 'User ID ' + @UserID + ' is already assigned to SUPER role.'

ELSE BEGIN 

  -- Create Access Control record to add user to SUPER role

  INSERT INTO [Access Control]

  ([User Security ID], [Role ID], [Company Name],[App ID],[Scope])

  VALUES(@UserGUID, 'SUPER', '','2de23703-bbb9-4542-970d-84b6e5597f53','0')

  PRINT 'Added User ID ' + @UserID + ' to SUPER role. - ' + CAST(@@ROWCOUNT AS varchar) + ' row(s) affected.'

END

-- User Property record required to allow login

IF EXISTS(SELECT * FROM [User Property] WHERE [User Security ID] = @UserGUID)

  PRINT 'User Property record already exists for User ID ' + @UserID + '.'

ELSE BEGIN

  INSERT INTO [User Property]

  ([User Security ID], [Password], [Name Identifier], [Authentication Key], [WebServices Key], [WebServices Key Expiry Date],[Authentication Object ID])

  VALUES(@UserGUID, '', '', '', '', '1/1/1753','')

  PRINT 'Created User Property record for User ID ' + @UserID + '. - ' +  CAST(@@ROWCOUNT AS varchar) + ' row(s) affected.'

END

SET NOCOUNT OFF

GO