How to Get Account Name in RDLC and add 3rd and 4th Dimensions

Here al the codes and rdlc file https://github.com/mahmoud-algindy/Gindy-Business-Central-Extensions

Dear Mahmoud,

For the Name you can use this to get it,

case "Source Type" of "Source Type"::Customer: IF Customer.READPERMISSION THEN IF Customer.GET("Source No.") THEN SourceName := Customer.Name;

 "Source Type"::Vendor: if Vendor.READPERMISSION then if Vendor.GET("Source No.") then SourceName := Vendor.Name;

 "Source Type"::Employee: if Employee.READPERMISSION then if Employee.GET("Source No.") then SourceName := Employee."Last Name";

 "Source Type"::"Fixed Asset": if FixedAsset.READPERMISSION then if FixedAsset.GET("Source No.") then SourceName := FixedAsset.Description;

 "Source Type"::"Bank Account": if BankAccount.READPERMISSION then if BankAccount.GET("Source No.") then SourceName := BankAccount.Name;

As for the dimensions

GLSetup.GET; DimensionSetEntry.RESET; DimensionSetEntry.SETRANGE("Dimension Set ID", "  Gen. Journal Line  " ."Dimension Set ID"); DimensionSetEntry.SETRANGE("Dimension Code",GLSetup."Shortcut Dimension 3 Code"); IF DimensionSetEntry.FINDFIRST THEN BEGIN DimensionSetEntry.CALCFIELDS("Dimension Value Name"); Dimension3Name := DimensionSetEntry."Dimension Value Name"; END;

Dear UZSPACE

Thanks so much, but where I shall put this code, do I require to add in a Codeunit ?

Dear UZSPACE

Thanks so much still I am not able to achieve it, I did the following to understand the concept with only Vendor and Customer "later I will add the rest"

case "Source Type" of
"Source Type"::Customer:
IF Customer.READPERMISSION THEN
IF Customer.GET("Source No.") THEN SourceName := Customer.Name;

"Source Type"::Vendor:
if Vendor.READPERMISSION then
if Vendor.GET("Source No.") then SourceName := Vendor.Name;
end;

But the VS did not recognize what is Customer and Vendor, hence I added a global var as per the below:

        Var
        
        SourceName: Text;
        Customer: Record Customer;
        Vendor: Record Vendor;

Now the errors disappeared and I am able to add a new Column here 

dataitem(DataItemName; "Gen. Journal Line")

        {

            RequestFilterFields = "Journal Template Name", "Journal Batch Name", "Document No.";
            // RequestFilterHeading 

            column(SourceName; SourceName)
            {

            }

As I am a beginner in AL I'm not sure what I did is correct or not,

I added the new filed to the RDLC file and Published but the, unfortunately, the value appeared on the Preview is BLANK

 

Thanks for the help in advance.

I watched most of DLP courses but I saw it's just quick start and not enough at all.

Erik P. Ernst

Could you please help, also how I can become good in Business Central AL Coding

Thank you Palle Arentoft

I sent you a private message