Howdy, Stranger!
Categories
- All Categories
- 73 General
- 73 Announcements
- 66.5K Microsoft Dynamics NAV
- 18.5K NAV Three Tier
- 38.4K NAV/Navision Classic Client
- 3.6K Navision Attain
- 2.4K Navision Financials
- 115 Navision DOS
- 854 Navision e-Commerce
- 1K NAV Tips & Tricks
- 772 NAV Dutch speaking only
- 615 NAV Courses, Exams & Certification
- 2K Microsoft Dynamics-Other
- 1.5K Dynamics AX
- 262 Dynamics CRM
- 109 Dynamics GP
- 10 Dynamics SL
- 1.5K Other
- 992 SQL General
- 385 SQL Performance
- 33 SQL Tips & Tricks
- 34 Design Patterns (General & Best Practices)
- Architectural Patterns
- 10 Design Patterns
- 5 Implementation Patterns
- 53 3rd Party Products, Services & Events
- 1.7K General
- 1.1K General Chat
- 1.6K Website
- 79 Testing
- 1.2K Download section
- 23 How Tos section
- 259 Feedback
- 12 NAV TechDays 2013 Sessions
- 13 NAV TechDays 2012 Sessions
Options
Trial Balance Report Export to Excel with Show Amounts ACY
Vineeth.R
Member Posts: 121
Dear All,
Trial Balance Report (ID-6) when run with Export to Excel and Show Amounts ACY option tselected shows blank figures. If Export to Excel is not turned on then there is figures in the preview.
I noticed this in version 4sp3, version5 and also in 2009SP1 and 2009R2.
Show Amounts ACY is not more in version 2013.
any fix or hot fix available? i couldn't find any.
Thanks
Vineeth
Trial Balance Report (ID-6) when run with Export to Excel and Show Amounts ACY option tselected shows blank figures. If Export to Excel is not turned on then there is figures in the preview.
I noticed this in version 4sp3, version5 and also in 2009SP1 and 2009R2.
Show Amounts ACY is not more in version 2013.
any fix or hot fix available? i couldn't find any.
Thanks
Vineeth
Thanks and Regards
Vineeth.R
Vineeth.R
0
Comments
I have fixed the problem in the report.
Here is the Fix:
1. In the G/L Account - OnAfterGetRecord() function i modified the below code
IF PrintToExcel AND (NOT UseAmtsInAddCurr) THEN
MakeExcelDataBody
ELSE
MakeExcelDataBodyAddCurr;
2. Created a new function similar to MakeExcelDataBody for the ACY part.
PROCEDURE MakeExcelDataBodyAddCurr@1000000000();
VAR
BlankFiller@1000000000 : Text[250];
BEGIN
BlankFiller := PADSTR(' ',MAXSTRLEN(BlankFiller),' ');
ExcelBuf.NewRow;
ExcelBuf.AddColumn(
"G/L Account"."No.",FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,
FALSE,FALSE,'');
IF "G/L Account".Indentation = 0 THEN
ExcelBuf.AddColumn(
"G/L Account".Name,FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,
FALSE,FALSE,'@')
ELSE
ExcelBuf.AddColumn(
COPYSTR(BlankFiller,1,2 * "G/L Account".Indentation) + "G/L Account".Name,
FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'@');
CASE TRUE OF
"G/L Account"."Additional-Currency Net Change" = 0:
BEGIN
ExcelBuf.AddColumn(
'',FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'');
ExcelBuf.AddColumn(
'',FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'');
END;
"G/L Account"."Additional-Currency Net Change" > 0:
BEGIN
ExcelBuf.AddColumn(
"G/L Account"."Additional-Currency Net Change",FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,
FALSE,FALSE,CurrFormat);
ExcelBuf.AddColumn(
'',FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'');
END;
"G/L Account"."Additional-Currency Net Change" < 0:
BEGIN
ExcelBuf.AddColumn(
'',FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'');
ExcelBuf.AddColumn(
-"G/L Account"."Additional-Currency Net Change",FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,
FALSE,FALSE,CurrFormat);
END;
END;
CASE TRUE OF
"G/L Account"."Add.-Currency Balance at Date" = 0:
BEGIN
ExcelBuf.AddColumn(
'',FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'');
ExcelBuf.AddColumn(
'',FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'');
END;
"G/L Account"."Add.-Currency Balance at Date" > 0:
BEGIN
ExcelBuf.AddColumn(
"G/L Account"."Add.-Currency Balance at Date",FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,
FALSE,FALSE,CurrFormat);
ExcelBuf.AddColumn(
'',FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'');
END;
"G/L Account"."Add.-Currency Balance at Date" < 0:
BEGIN
ExcelBuf.AddColumn(
'',FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,FALSE,FALSE,'');
ExcelBuf.AddColumn(
-"G/L Account"."Add.-Currency Balance at Date",FALSE,'',"G/L Account"."Account Type" <> "G/L Account"."Account Type"::Posting,
FALSE,FALSE,CurrFormat);
END;
END;
END;
Vineeth.R