You haven't replaced printonlyifdetail property with a filter set. This is the problem.
OBJECT Report 60014 Detail Trial Balanceo
{
OBJECT-PROPERTIES
{
Date=17.08.12;
Time=10:09:57;
Modified=Yes;
Version List=NAVW16.00.01;
}
PROPERTIES
{
CaptionML=ENU=Detail Trial Balance;
OnPreReport=BEGIN
GLFilter := "G/L Account".GETFILTERS;
GLDateFilter := "G/L Account".GETFILTER("Date Filter");
END;
OnPostReport=BEGIN
IF PrintToExcel THEN BEGIN
TempExcelBuffer.CreateBook;
TempExcelBuffer.CreateSheet('Createsheet','Trail Balance',COMPANYNAME,USERID);
TempExcelBuffer.GiveUserControl;
END;
END;
}
DATAITEMS
{
{ PROPERTIES
{
DataItemTable=Table15;
DataItemTableView=WHERE(Account Type=CONST(Posting));
PrintOnlyIfDetail=Yes;
OnPreDataItem=BEGIN
IF ISSERVICETIER THEN
PageGroupNo := 1;
CurrReport.NEWPAGEPERRECORD := PrintOnlyOnePerPage;
END;
OnAfterGetRecord=BEGIN
SetLinkFilter;
StartBalance := 0;
IF GLDateFilter <> '' THEN
IF GETRANGEMIN("Date Filter") <> 0D THEN BEGIN
SETRANGE("Date Filter",0D,CLOSINGDATE(GETRANGEMIN("Date Filter") - 1));
CALCFIELDS("Net Change");
StartBalance := "Net Change";
SETFILTER("Date Filter",GLDateFilter);
END;
IF ISSERVICETIER THEN BEGIN
IF PrintOnlyOnePerPage THEN BEGIN
GLEntryPage.RESET;
GLEntryPage.SETRANGE("G/L Account No.", "G/L Account"."No.");
IF CurrReport.PRINTONLYIFDETAIL AND GLEntryPage.FIND('-') THEN
PageGroupNo := PageGroupNo + 1;
END;
END;
END;
ReqFilterFields=No.,Search Name,Income/Balance,Debit/Credit,Date Filter;
}
SECTIONS
{
{ PROPERTIES
{
SectionType=Header;
PrintOnEveryPage=Yes;
SectionWidth=18450;
SectionHeight=1692;
}
CONTROLS
{
{ 1 ;Label ;0 ;0 ;7500 ;423 ;FontSize=8;
FontBold=Yes;
CaptionML=ENU=Detail Trial Balance;
DataSetFieldName=Detail_Trial_BalanceCaption }
{ 2 ;TextBox ;15000;0 ;3150 ;423 ;HorzAlign=Right;
SourceExpr=FORMAT(TODAY,0,4);
DataSetFieldName=FORMAT_TODAY_0_4_ }
{ 3 ;TextBox ;0 ;423 ;7500 ;423 ;SourceExpr=STRSUBSTNO(Text000,GLDateFilter);
DataSetFieldName=STRSUBSTNO_Text000_GLDateFilter_ }
{ 4 ;Label ;16950;423 ;750 ;423 ;ParentControl=5;
DataSetFieldName=CurrReport_PAGENOCaption }
{ 5 ;TextBox ;17700;423 ;450 ;423 ;CaptionML=ENU=Page;
SourceExpr=CurrReport.PAGENO;
DataSetFieldName=CurrReport_PAGENO }
{ 6 ;TextBox ;0 ;846 ;7500 ;423 ;SourceExpr=COMPANYNAME;
DataSetFieldName=COMPANYNAME }
{ 7 ;TextBox ;15900;846 ;2250 ;423 ;HorzAlign=Right;
SourceExpr=USERID;
DataSetFieldName=USERID }
}
}
{ PROPERTIES
{
SectionType=Header;
PrintOnEveryPage=Yes;
SectionWidth=18450;
SectionHeight=423;
OnPreSection=BEGIN
CurrReport.SHOWOUTPUT((CurrReport.PAGENO = 1) AND NOT ExcludeBalanceOnly);
END;
}
CONTROLS
{
{ 8 ;Label ;0 ;0 ;12000;423 ;CaptionML=ENU=This also includes G/L accounts that only have a balance.;
DataSetFieldName=This_also_includes_G_L_accounts_that_only_have_a_balance_Caption }
{ 49 ;TextBox ;18000;0 ;150 ;423 ;Name=ExcludeBalanceOnly;
Visible=No;
ForeColor=65535;
SourceExpr=ExcludeBalanceOnly;
DataSetFieldName=ExcludeBalanceOnly }
{ 53 ;TextBox ;17000;0 ;150 ;423 ;Name=PrintOnlyOnePerPage;
Visible=No;
ForeColor=65535;
SourceExpr=PrintOnlyOnePerPage;
DataSetFieldName=PrintOnlyOnePerPage }
{ 54 ;TextBox ;17150;0 ;150 ;423 ;Name=PrintReversedEntries;
Visible=No;
ForeColor=65535;
SourceExpr=PrintReversedEntries;
DataSetFieldName=PrintReversedEntries }
{ 50 ;TextBox ;16850;0 ;150 ;423 ;Name=PageGroupNo;
Visible=No;
ForeColor=65535;
SourceExpr=PageGroupNo;
DataSetFieldName=PageGroupNo }
}
}
{ PROPERTIES
{
SectionType=Header;
PrintOnEveryPage=Yes;
SectionWidth=18450;
SectionHeight=423;
OnPreSection=BEGIN
CurrReport.SHOWOUTPUT((CurrReport.PAGENO = 1) AND PrintClosingEntries);
END;
}
CONTROLS
{
{ 9 ;Label ;0 ;0 ;12000;423 ;CaptionML=ENU=This report also includes closing entries within the period.;
DataSetFieldName=This_report_also_includes_closing_entries_within_the_period_Caption }
{ 51 ;TextBox ;18000;0 ;150 ;423 ;Name=PrintClosingEntries;
Visible=No;
ForeColor=65535;
SourceExpr=PrintClosingEntries;
DataSetFieldName=PrintClosingEntries }
}
}
{ PROPERTIES
{
SectionType=Header;
SectionWidth=18450;
SectionHeight=423;
OnPreSection=BEGIN
CurrReport.SHOWOUTPUT((CurrReport.PAGENO = 1) AND PrintOnlyCorrections);
END;
}
CONTROLS
{
{ 47 ;Label ;0 ;0 ;12000;423 ;CaptionML=ENU=Only corrections are included.;
DataSetFieldName=Only_corrections_are_included_Caption }
{ 52 ;TextBox ;18000;0 ;150 ;423 ;Name=PrintOnlyCorrections;
Visible=No;
ForeColor=65535;
SourceExpr=PrintOnlyCorrections;
DataSetFieldName=PrintOnlyCorrections }
}
}
{ PROPERTIES
{
SectionType=Header;
PrintOnEveryPage=Yes;
SectionWidth=18450;
SectionHeight=423;
OnPreSection=BEGIN
CurrReport.SHOWOUTPUT((CurrReport.PAGENO = 1) AND (GLFilter <> ''));
END;
}
CONTROLS
{
{ 10 ;TextBox ;0 ;0 ;18000;423 ;SourceExpr="G/L Account".TABLECAPTION + ': ' + GLFilter;
DataSetFieldName=G_L_Account__TABLECAPTION__________GLFilter }
{ 48 ;TextBox ;18000;0 ;150 ;423 ;Name=GLFilter;
Visible=No;
ForeColor=65535;
SourceExpr=GLFilter;
DataSetFieldName=GLFilter }
}
}
{ PROPERTIES
{
SectionType=Header;
PrintOnEveryPage=Yes;
SectionWidth=18450;
SectionHeight=423;
OnPreSection=BEGIN
CurrReport.SHOWOUTPUT(
(CurrReport.PAGENO = 1) AND
(PrintClosingEntries OR (GLFilter <> '') OR NOT ExcludeBalanceOnly));
END;
}
CONTROLS
{
}
}
{ PROPERTIES
{
SectionType=Header;
PrintOnEveryPage=Yes;
SectionWidth=18450;
SectionHeight=1692;
OnPreSection=BEGIN
rowno+=1;
EnterCell(rowno,1,'Posting Date',TRUE,TRUE,TRUE);
EnterCell(rowno,2,'Document No',TRUE,TRUE,TRUE);
EnterCell(rowno,3,'Description',TRUE,TRUE,TRUE);
EnterCell(rowno,4,'Vat amount',TRUE,TRUE,TRUE);
EnterCell(rowno,5,'Debit amount',TRUE,TRUE,TRUE);
EnterCell(rowno,6,'Credit amount',TRUE,TRUE,TRUE);
EnterCell(rowno,7,'Balance',TRUE,TRUE,TRUE);
EnterCell(rowno,8,'Entry No',TRUE,TRUE,TRUE);
END;
}
CONTROLS
{
{ 11 ;Label ;9750 ;0 ;3750 ;423 ;FontBold=Yes;
CaptionML=ENU=Net Change;
DataSetFieldName=Net_ChangeCaption }
{ 12 ;TextBox ;9750 ;423 ;3750 ;423 ;FontBold=Yes;
LeaderDots=Yes;
SourceExpr='';
DataSetFieldName=EmptyString }
{ 13 ;Label ;0 ;846 ;1350 ;423 ;ParentControl=29;
FontBold=Yes;
DataSetFieldName=G_L_Entry__Posting_Date_Caption }
{ 14 ;Label ;1500 ;846 ;1500 ;423 ;ParentControl=30;
FontBold=Yes;
DataSetFieldName=G_L_Entry__Document_No__Caption }
{ 15 ;Label ;3150 ;846 ;4500 ;423 ;ParentControl=31;
FontBold=Yes;
DataSetFieldName=G_L_Entry_DescriptionCaption }
{ 16 ;Label ;7800 ;846 ;1800 ;423 ;ParentControl=32;
HorzAlign=Right;
FontBold=Yes;
DataSetFieldName=G_L_Entry__VAT_Amount__Control32Caption }
{ 17 ;Label ;9750 ;846 ;1800 ;423 ;ParentControl=33;
HorzAlign=Right;
FontBold=Yes;
DataSetFieldName=G_L_Entry__Debit_Amount__Control33Caption }
{ 18 ;Label ;11700;846 ;1800 ;423 ;ParentControl=34;
HorzAlign=Right;
FontBold=Yes;
DataSetFieldName=G_L_Entry__Credit_Amount__Control34Caption }
{ 19 ;Label ;13650;846 ;1800 ;423 ;ParentControl=35;
HorzAlign=Right;
FontBold=Yes;
DataSetFieldName=GLBalanceCaption }
{ 20 ;Label ;15600;846 ;1200 ;423 ;ParentControl=36;
HorzAlign=Right;
FontBold=Yes;
DataSetFieldName=G_L_Entry__Entry_No__Caption }
}
}
}
}
{ PROPERTIES
{
DataItemIndent=1;
DataItemTable=Table2000000026;
DataItemTableView=SORTING(Number)
WHERE(Number=CONST(1));
DataItemVarName=PageCounter;
OnAfterGetRecord=BEGIN
Showout:=ExcludeBalanceOnly OR (StartBalance = 0);
IF NOT Showout THEN
CurrReport.SKIP;
END;
}
SECTIONS
{
{ PROPERTIES
{
SectionType=Body;
SectionWidth=18450;
SectionHeight=423;
OnPreSection=BEGIN
IF CurrReport.SHOWOUTPUT AND PrintToExcel THEN BEGIN
rowno+=1;
EnterCell(rowno,2,FORMAT("G/L Account"."No."),FALSE,FALSE,FALSE);
EnterCell(rowno,3,FORMAT("G/L Account".Name),FALSE,FALSE,FALSE);
EnterCell(rowno,7,FORMAT(StartBalance),FALSE,FALSE,FALSE);
END;
END;
}
CONTROLS
{
{ 21 ;TextBox ;0 ;0 ;1500 ;423 ;FontBold=Yes;
SourceExpr="G/L Account"."No.";
DataSetFieldName=G_L_Account___No__ }
{ 22 ;TextBox ;1650 ;0 ;4500 ;423 ;FontBold=Yes;
SourceExpr="G/L Account".Name;
DataSetFieldName=G_L_Account__Name }
{ 23 ;TextBox ;13650;0 ;1800 ;423 ;SourceExpr=StartBalance;
AutoFormatType=1;
DataSetFieldName=StartBalance }
}
}
}
}
{ PROPERTIES
{
DataItemIndent=2;
DataItemTable=Table17;
DataItemTableView=SORTING(G/L Account No.,Posting Date);
OnPreDataItem=BEGIN
SetLinkFilter;
GLBalance := StartBalance;
CurrReport.CREATETOTALS(Amount,"Debit Amount","Credit Amount","VAT Amount");
END;
OnAfterGetRecord=BEGIN
IF PrintOnlyCorrections THEN
IF NOT (("Debit Amount" < 0) OR ("Credit Amount" < 0)) THEN
CurrReport.SKIP;
IF NOT PrintReversedEntries AND Reversed THEN
CurrReport.SKIP;
IF ISSERVICETIER THEN BEGIN
GLBalance := GLBalance + Amount;
IF ("Posting Date" = CLOSINGDATE("Posting Date")) AND
NOT PrintClosingEntries
THEN BEGIN
"Debit Amount" := 0;
"Credit Amount" := 0;
END;
IF ("Posting Date" = CLOSINGDATE("Posting Date")) THEN
ClosingEntry := TRUE
ELSE
ClosingEntry := FALSE;
END;
END;
DataItemLinkReference=G/L Account;
}
SECTIONS
{
{ PROPERTIES
{
SectionType=TransHeader;
SectionWidth=18450;
SectionHeight=846;
}
CONTROLS
{
{ 24 ;Label ;3150 ;0 ;4500 ;423 ;ParentControl=25;
LeaderDots=Yes;
DataSetFieldName=G_L_Entry__VAT_Amount_Caption }
{ 25 ;TextBox ;7800 ;0 ;1800 ;423 ;CaptionML=ENU=Continued;
SourceExpr="VAT Amount";
DataSetFieldName=G_L_Entry__VAT_Amount_ }
{ 26 ;TextBox ;9750 ;0 ;1800 ;423 ;BlankZero=Yes;
SourceExpr="Debit Amount";
DataSetFieldName=G_L_Entry__Debit_Amount_ }
{ 27 ;TextBox ;11700;0 ;1800 ;423 ;BlankZero=Yes;
SourceExpr="Credit Amount";
DataSetFieldName=G_L_Entry__Credit_Amount_ }
{ 28 ;TextBox ;13650;0 ;1800 ;423 ;SourceExpr=StartBalance + Amount;
AutoFormatType=1;
DataSetFieldName=StartBalance___Amount }
}
}
{ PROPERTIES
{
SectionType=Body;
SectionWidth=18450;
SectionHeight=423;
OnPostSection=BEGIN
GLBalance := GLBalance + Amount;
IF ("Posting Date" = CLOSINGDATE("Posting Date")) AND
NOT PrintClosingEntries
THEN BEGIN
CurrReport.SHOWOUTPUT := FALSE;
"Debit Amount" := 0;
"Credit Amount" := 0;
END;
IF CurrReport.SHOWOUTPUT THEN BEGIN
rowno+=1;
EnterCell(rowno,1,FORMAT("Posting Date"),FALSE,FALSE,FALSE);
EnterCell(rowno,2,FORMAT("Document No."),FALSE,FALSE,FALSE);
EnterCell(rowno,3,FORMAT(Description),FALSE,FALSE,FALSE);
EnterCell(rowno,4,FORMAT("VAT Amount"),FALSE,FALSE,FALSE);
EnterCell(rowno,5,FORMAT("Debit Amount"),FALSE,FALSE,FALSE);
EnterCell(rowno,6,FORMAT("Credit Amount"),FALSE,FALSE,FALSE);
EnterCell(rowno,7,FORMAT(GLBalance),FALSE,FALSE,FALSE);
EnterCell(rowno,8,FORMAT("Entry No."),FALSE,FALSE,FALSE);
END;
END;
}
CONTROLS
{
{ 29 ;TextBox ;0 ;0 ;1350 ;423 ;SourceExpr="Posting Date";
DataSetFieldName=G_L_Entry__Posting_Date_ }
{ 30 ;TextBox ;1500 ;0 ;1500 ;423 ;SourceExpr="Document No.";
DataSetFieldName=G_L_Entry__Document_No__ }
{ 31 ;TextBox ;3150 ;0 ;4500 ;423 ;SourceExpr=Description;
DataSetFieldName=G_L_Entry_Description }
{ 32 ;TextBox ;7800 ;0 ;1800 ;423 ;SourceExpr="VAT Amount";
DataSetFieldName=G_L_Entry__VAT_Amount__Control32 }
{ 33 ;TextBox ;9750 ;0 ;1800 ;423 ;CaptionML=ENU=Debit;
BlankZero=Yes;
SourceExpr="Debit Amount";
DataSetFieldName=G_L_Entry__Debit_Amount__Control33 }
{ 34 ;TextBox ;11700;0 ;1800 ;423 ;CaptionML=ENU=Credit;
BlankZero=Yes;
SourceExpr="Credit Amount";
DataSetFieldName=G_L_Entry__Credit_Amount__Control34 }
{ 35 ;TextBox ;13650;0 ;1800 ;423 ;CaptionML=ENU=Balance;
SourceExpr=GLBalance;
AutoFormatType=1;
DataSetFieldName=GLBalance }
{ 36 ;TextBox ;15600;0 ;1200 ;423 ;SourceExpr="Entry No.";
DataSetFieldName=G_L_Entry__Entry_No__ }
{ 55 ;TextBox ;18000;0 ;150 ;423 ;Visible=No;
ForeColor=65535;
SourceExpr=ClosingEntry;
DataSetFieldName=ClosingEntry }
{ 56 ;TextBox ;17850;0 ;150 ;423 ;Name=GLEntryReversed;
Visible=No;
ForeColor=65535;
SourceExpr="G/L Entry".Reversed;
DataSetFieldName=GLEntryReversed }
}
}
{ PROPERTIES
{
SectionType=TransFooter;
SectionWidth=18450;
SectionHeight=846;
}
CONTROLS
{
{ 37 ;Label ;3150 ;423 ;4500 ;423 ;ParentControl=38;
LeaderDots=Yes;
DataSetFieldName=G_L_Entry__VAT_Amount__Control38Caption }
{ 38 ;TextBox ;7800 ;423 ;1800 ;423 ;CaptionML=ENU=Continued;
SourceExpr="VAT Amount";
DataSetFieldName=G_L_Entry__VAT_Amount__Control38 }
{ 39 ;TextBox ;9750 ;423 ;1800 ;423 ;BlankZero=Yes;
SourceExpr="Debit Amount";
DataSetFieldName=G_L_Entry__Debit_Amount__Control39 }
{ 40 ;TextBox ;11700;423 ;1800 ;423 ;BlankZero=Yes;
SourceExpr="Credit Amount";
DataSetFieldName=G_L_Entry__Credit_Amount__Control40 }
{ 41 ;TextBox ;13650;423 ;1800 ;423 ;SourceExpr=StartBalance + Amount;
AutoFormatType=1;
DataSetFieldName=StartBalance___Amount_Control41 }
}
}
}
}
{ PROPERTIES
{
DataItemIndent=2;
DataItemTable=Table2000000026;
DataItemTableView=SORTING(Number)
WHERE(Number=CONST(1));
OnAfterGetRecord=BEGIN
IF ("G/L Entry"."Debit Amount" = 0) AND
("G/L Entry"."Credit Amount" = 0) AND
((StartBalance = 0) OR ExcludeBalanceOnly)
THEN
CurrReport.SKIP;
END;
}
SECTIONS
{
{ PROPERTIES
{
SectionType=Body;
SectionWidth=18450;
SectionHeight=1269;
OnPreSection=BEGIN
rowno+=1;
EnterCell(rowno,2,FORMAT("G/L Account".Name),TRUE,TRUE,TRUE);
EnterCell(rowno,4,FORMAT("G/L Entry"."VAT Amount"),TRUE,TRUE,TRUE);
EnterCell(rowno,5,FORMAT("G/L Entry"."Debit Amount"),TRUE,TRUE,TRUE);
EnterCell(rowno,6,FORMAT("G/L Entry"."Credit Amount"),TRUE,TRUE,TRUE);
EnterCell(rowno,7,FORMAT(StartBalance + "G/L Entry".Amount),TRUE,TRUE,TRUE);
END;
}
CONTROLS
{
{ 42 ;TextBox ;1650 ;0 ;4500 ;423 ;FontBold=Yes;
SourceExpr="G/L Account".Name;
DataSetFieldName=G_L_Account__Name_Control42 }
{ 46 ;TextBox ;7800 ;0 ;1800 ;423 ;FontBold=Yes;
SourceExpr="G/L Entry"."VAT Amount";
DataSetFieldName=G_L_Entry___VAT_Amount_ }
{ 43 ;TextBox ;9750 ;0 ;1800 ;423 ;FontBold=Yes;
BlankZero=Yes;
SourceExpr="G/L Entry"."Debit Amount";
DataSetFieldName=G_L_Entry___Debit_Amount_ }
{ 44 ;TextBox ;11700;0 ;1800 ;423 ;FontBold=Yes;
BlankZero=Yes;
SourceExpr="G/L Entry"."Credit Amount";
DataSetFieldName=G_L_Entry___Credit_Amount_ }
{ 45 ;TextBox ;13650;0 ;1800 ;423 ;FontBold=Yes;
SourceExpr=StartBalance + "G/L Entry".Amount;
AutoFormatType=1;
DataSetFieldName=StartBalance____G_L_Entry__Amount }
}
}
}
}
}
REQUESTFORM
{
PROPERTIES
{
Width=4730;
Height=4730;
SaveValues=Yes;
}
CONTROLS
{
{ 1 ;CheckBox ;3410 ;0 ;440 ;440 ;InPage=-1;
ShowCaption=No;
CaptionML=ENU=New Page per G/L Acc.;
SourceExpr=PrintOnlyOnePerPage }
{ 21 ;Label ;0 ;0 ;3300 ;440 ;ParentControl=1 }
{ 2 ;CheckBox ;3410 ;990 ;440 ;440 ;InPage=-1;
ShowCaption=No;
CaptionML=ENU=Exclude G/L Accs. That Have a Balance Only;
SourceExpr=ExcludeBalanceOnly }
{ 22 ;Label ;0 ;550 ;3300 ;880 ;ParentControl=2;
VertAlign=Bottom;
MultiLine=Yes }
{ 3 ;CheckBox ;3410 ;1980 ;440 ;440 ;InPage=-1;
ShowCaption=No;
CaptionML=ENU=Include Closing Entries Within the Period;
SourceExpr=PrintClosingEntries }
{ 23 ;Label ;0 ;1540 ;3300 ;880 ;ParentControl=3;
VertAlign=Bottom;
MultiLine=Yes }
{ 4 ;CheckBox ;3410 ;3080 ;440 ;440 ;InPage=-1;
ShowCaption=No;
CaptionML=ENU=Print Corrections Only;
SourceExpr=PrintOnlyCorrections }
{ 5 ;Label ;0 ;3080 ;3300 ;440 ;ParentControl=4 }
{ 6 ;CheckBox ;3410 ;2530 ;440 ;440 ;InPage=-1;
ShowCaption=No;
CaptionML=ENU=Include Reversed Entries;
SourceExpr=PrintReversedEntries }
{ 7 ;Label ;0 ;2530 ;3300 ;440 ;ParentControl=6 }
{ 1102156000;CheckBox;3300;3850 ;440 ;440 ;ShowCaption=No;
SourceExpr=PrintToExcel }
{ 1102156001;Label ;0 ;3740 ;2860 ;440 ;ParentControl=1102156000 }
}
}
REQUESTPAGE
{
PROPERTIES
{
SaveValues=Yes;
}
CONTROLS
{
{ 1900000001;0;Container;
ContainerType=ContentArea }
{ 1900000002;1;Group ;
CaptionML=ENU=Options }
{ 1 ;2 ;Field ;
CaptionML=ENU=New Page per G/L Acc.;
SourceExpr=PrintOnlyOnePerPage }
{ 2 ;2 ;Field ;
CaptionML=ENU=Exclude G/L Accs. That Have a Balance Only;
SourceExpr=ExcludeBalanceOnly;
MultiLine=Yes }
{ 3 ;2 ;Field ;
CaptionML=ENU=Include Closing Entries Within the Period;
SourceExpr=PrintClosingEntries;
MultiLine=Yes }
{ 6 ;2 ;Field ;
CaptionML=ENU=Include Reversed Entries;
SourceExpr=PrintReversedEntries }
{ 4 ;2 ;Field ;
CaptionML=ENU=Print Corrections Only;
SourceExpr=PrintOnlyCorrections }
}
}
CODE
{
VAR
Text000@1000 : TextConst 'ENU=Period: %1';
GLDateFilter@1001 : Text[30];
GLFilter@1002 : Text[250];
GLBalance@1003 : Decimal;
StartBalance@1004 : Decimal;
PrintOnlyOnePerPage@1005 : Boolean;
ExcludeBalanceOnly@1006 : Boolean;
PrintClosingEntries@1007 : Boolean;
PrintOnlyCorrections@1008 : Boolean;
PrintReversedEntries@1009 : Boolean;
PageGroupNo@1010 : Integer;
GLEntryPage@1011 : Record 17;
ClosingEntry@1012 : Boolean;
PrintToExcel@1102156000 : Boolean;
TempExcelBuffer@1102156001 : TEMPORARY Record 370;
rowno@1102156002 : Integer;
Showout@1102156003 : Boolean;
PROCEDURE EnterCell@1102156001(RowNo@1102156005 : Integer;ColumnNo@1102156004 : Integer;CellValue@1102156003 : Text[250];Bold@1102156002 : Boolean;Italic@1102156001 : Boolean;UnderLine@1102156000 : Boolean);
BEGIN
TempExcelBuffer.INIT;
TempExcelBuffer.VALIDATE("Row No.",RowNo);
TempExcelBuffer.VALIDATE("Column No.",ColumnNo);
TempExcelBuffer."Cell Value as Text" := CellValue;
TempExcelBuffer.Formula := '';
TempExcelBuffer.Bold := Bold;
TempExcelBuffer.Italic := Italic;
TempExcelBuffer.Underline := UnderLine;
TempExcelBuffer.INSERT;
END;
PROCEDURE SetLinkFilter@1103301000();
BEGIN
"G/L Entry".RESET;
"G/L Entry".SETRANGE("G/L Account No.", "G/L Account"."No.");
IF "G/L Account".GETFILTER("Date Filter") <> '' THEN
"G/L Entry".SETFILTER("Posting Date", "G/L Account".GETFILTER("Date Filter"));
IF "G/L Account".GETFILTER("Global Dimension 1 Filter") <> '' THEN
"G/L Entry".SETRANGE("Global Dimension 1 Code", "G/L Account"."Global Dimension 1 Filter");
IF "G/L Account".GETFILTER("Global Dimension 2 Filter") <> '' THEN
"G/L Entry".SETRANGE("Global Dimension 2 Code", "G/L Account"."Global Dimension 2 Filter");
IF "G/L Account".GETFILTER("Business Unit Filter") <> '' THEN
"G/L Entry".SETRANGE("Business Unit Code","G/L Account"."Business Unit Filter");
IF "G/L Entry".ISEMPTY THEN
CurrReport.SKIP;
END;
BEGIN
END.
}
RDLDATA
{
<?xml version="1.0" encoding="utf-8"?>
<Report xmlns="http://schemas.microsoft.com/sqlserver/reporting/2005/01/reportdefinition" xmlns:rd="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner">
<Body>
<Height>5.922cm</Height>
</Body>
<BottomMargin>2cm</BottomMargin>
<Code>Public Function BlankZero(ByVal Value As Decimal)
if Value = 0 then
Return ""
end if
Return Value
End Function
Public Function BlankPos(ByVal Value As Decimal)
if Value > 0 then
Return ""
end if
Return Value
End Function
Public Function BlankZeroAndPos(ByVal Value As Decimal)
if Value >= 0 then
Return ""
end if
Return Value
End Function
Public Function BlankNeg(ByVal Value As Decimal)
if Value < 0 then
Return ""
end if
Return Value
End Function
Public Function BlankNegAndZero(ByVal Value As Decimal)
if Value <= 0 then
Return ""
end if
Return Value
End Function
</Code>
<DataSets>
<DataSet Name="DataSet_Result">
<Fields>
<Field Name="Detail_Trial_BalanceCaption">
<DataField>Detail_Trial_BalanceCaption</DataField>
</Field>
<Field Name="FORMAT_TODAY_0_4_">
<DataField>FORMAT_TODAY_0_4_</DataField>
</Field>
<Field Name="STRSUBSTNO_Text000_GLDateFilter_">
<DataField>STRSUBSTNO_Text000_GLDateFilter_</DataField>
</Field>
<Field Name="CurrReport_PAGENOCaption">
<DataField>CurrReport_PAGENOCaption</DataField>
</Field>
<Field Name="CurrReport_PAGENO">
<DataField>CurrReport_PAGENO</DataField>
</Field>
<Field Name="COMPANYNAME">
<DataField>COMPANYNAME</DataField>
</Field>
<Field Name="USERID">
<DataField>USERID</DataField>
</Field>
<Field Name="This_also_includes_G_L_accounts_that_only_have_a_balance_Caption">
<DataField>This_also_includes_G_L_accounts_that_only_have_a_balance_Caption</DataField>
</Field>
<Field Name="ExcludeBalanceOnly">
<DataField>ExcludeBalanceOnly</DataField>
</Field>
<Field Name="PrintOnlyOnePerPage">
<DataField>PrintOnlyOnePerPage</DataField>
</Field>
<Field Name="PrintReversedEntries">
<DataField>PrintReversedEntries</DataField>
</Field>
<Field Name="PageGroupNo">
<DataField>PageGroupNo</DataField>
</Field>
<Field Name="This_report_also_includes_closing_entries_within_the_period_Caption">
<DataField>This_report_also_includes_closing_entries_within_the_period_Caption</DataField>
</Field>
<Field Name="PrintClosingEntries">
<DataField>PrintClosingEntries</DataField>
</Field>
<Field Name="Only_corrections_are_included_Caption">
<DataField>Only_corrections_are_included_Caption</DataField>
</Field>
<Field Name="PrintOnlyCorrections">
<DataField>PrintOnlyCorrections</DataField>
</Field>
<Field Name="G_L_Account__TABLECAPTION__________GLFilter">
<DataField>G_L_Account__TABLECAPTION__________GLFilter</DataField>
</Field>
<Field Name="GLFilter">
<DataField>GLFilter</DataField>
</Field>
<Field Name="Net_ChangeCaption">
<DataField>Net_ChangeCaption</DataField>
</Field>
<Field Name="EmptyString">
<DataField>EmptyString</DataField>
</Field>
<Field Name="G_L_Entry__Posting_Date_Caption">
<DataField>G_L_Entry__Posting_Date_Caption</DataField>
</Field>
<Field Name="G_L_Entry__Document_No__Caption">
<DataField>G_L_Entry__Document_No__Caption</DataField>
</Field>
<Field Name="G_L_Entry_DescriptionCaption">
<DataField>G_L_Entry_DescriptionCaption</DataField>
</Field>
<Field Name="G_L_Entry__VAT_Amount__Control32Caption">
<DataField>G_L_Entry__VAT_Amount__Control32Caption</DataField>
</Field>
<Field Name="G_L_Entry__Debit_Amount__Control33Caption">
<DataField>G_L_Entry__Debit_Amount__Control33Caption</DataField>
</Field>
<Field Name="G_L_Entry__Credit_Amount__Control34Caption">
<DataField>G_L_Entry__Credit_Amount__Control34Caption</DataField>
</Field>
<Field Name="GLBalanceCaption">
<DataField>GLBalanceCaption</DataField>
</Field>
<Field Name="G_L_Entry__Entry_No__Caption">
<DataField>G_L_Entry__Entry_No__Caption</DataField>
</Field>
<Field Name="G_L_Account_No_">
<DataField>G_L_Account_No_</DataField>
</Field>
<Field Name="G_L_Account_Date_Filter">
<DataField>G_L_Account_Date_Filter</DataField>
</Field>
<Field Name="G_L_Account_Global_Dimension_1_Filter">
<DataField>G_L_Account_Global_Dimension_1_Filter</DataField>
</Field>
<Field Name="G_L_Account_Global_Dimension_2_Filter">
<DataField>G_L_Account_Global_Dimension_2_Filter</DataField>
</Field>
<Field Name="G_L_Account_Business_Unit_Filter">
<DataField>G_L_Account_Business_Unit_Filter</DataField>
</Field>
<Field Name="G_L_Account___No__">
<DataField>G_L_Account___No__</DataField>
</Field>
<Field Name="G_L_Account__Name">
<DataField>G_L_Account__Name</DataField>
</Field>
<Field Name="StartBalance">
<DataField>StartBalance</DataField>
</Field>
<Field Name="StartBalanceFormat">
<DataField>StartBalanceFormat</DataField>
</Field>
<Field Name="G_L_Entry__VAT_Amount_Caption">
<DataField>G_L_Entry__VAT_Amount_Caption</DataField>
</Field>
<Field Name="G_L_Entry__VAT_Amount_">
<DataField>G_L_Entry__VAT_Amount_</DataField>
</Field>
<Field Name="G_L_Entry__VAT_Amount_Format">
<DataField>G_L_Entry__VAT_Amount_Format</DataField>
</Field>
<Field Name="G_L_Entry__Debit_Amount_">
<DataField>G_L_Entry__Debit_Amount_</DataField>
</Field>
<Field Name="G_L_Entry__Debit_Amount_Format">
<DataField>G_L_Entry__Debit_Amount_Format</DataField>
</Field>
<Field Name="G_L_Entry__Credit_Amount_">
<DataField>G_L_Entry__Credit_Amount_</DataField>
</Field>
<Field Name="G_L_Entry__Credit_Amount_Format">
<DataField>G_L_Entry__Credit_Amount_Format</DataField>
</Field>
<Field Name="StartBalance___Amount">
<DataField>StartBalance___Amount</DataField>
</Field>
<Field Name="StartBalance___AmountFormat">
<DataField>StartBalance___AmountFormat</DataField>
</Field>
<Field Name="G_L_Entry__Posting_Date_">
<DataField>G_L_Entry__Posting_Date_</DataField>
</Field>
<Field Name="G_L_Entry__Document_No__">
<DataField>G_L_Entry__Document_No__</DataField>
</Field>
<Field Name="G_L_Entry_Description">
<DataField>G_L_Entry_Description</DataField>
</Field>
<Field Name="G_L_Entry__VAT_Amount__Control32Format">
<DataField>G_L_Entry__VAT_Amount__Control32Format</DataField>
</Field>
<Field Name="G_L_Entry__Debit_Amount__Control33Format">
<DataField>G_L_Entry__Debit_Amount__Control33Format</DataField>
</Field>
<Field Name="G_L_Entry__Credit_Amount__Control34Format">
<DataField>G_L_Entry__Credit_Amount__Control34Format</DataField>
</Field>
<Field Name="GLBalance">
<DataField>GLBalance</DataField>
</Field>
<Field Name="GLBalanceFormat">
<DataField>GLBalanceFormat</DataField>
</Field>
<Field Name="G_L_Entry__Entry_No__">
<DataField>G_L_Entry__Entry_No__</DataField>
</Field>
<Field Name="ClosingEntry">
<DataField>ClosingEntry</DataField>
</Field>
<Field Name="GLEntryReversed">
<DataField>GLEntryReversed</DataField>
</Field>
<Field Name="G_L_Entry__VAT_Amount__Control38Caption">
<DataField>G_L_Entry__VAT_Amount__Control38Caption</DataField>
</Field>
<Field Name="G_L_Entry__VAT_Amount__Control38Format">
<DataField>G_L_Entry__VAT_Amount__Control38Format</DataField>
</Field>
<Field Name="G_L_Entry__Debit_Amount__Control39Format">
<DataField>G_L_Entry__Debit_Amount__Control39Format</DataField>
</Field>
<Field Name="G_L_Entry__Credit_Amount__Control40Format">
<DataField>G_L_Entry__Credit_Amount__Control40Format</DataField>
</Field>
<Field Name="StartBalance___Amount_Control41Format">
<DataField>StartBalance___Amount_Control41Format</DataField>
</Field>
<Field Name="G_L_Entry_G_L_Account_No_">
<DataField>G_L_Entry_G_L_Account_No_</DataField>
</Field>
<Field Name="G_L_Entry_Global_Dimension_1_Code">
<DataField>G_L_Entry_Global_Dimension_1_Code</DataField>
</Field>
<Field Name="G_L_Entry_Global_Dimension_2_Code">
<DataField>G_L_Entry_Global_Dimension_2_Code</DataField>
</Field>
<Field Name="G_L_Entry_Business_Unit_Code">
<DataField>G_L_Entry_Business_Unit_Code</DataField>
</Field>
<Field Name="G_L_Account__Name_Control42">
<DataField>G_L_Account__Name_Control42</DataField>
</Field>
<Field Name="G_L_Entry___VAT_Amount_">
<DataField>G_L_Entry___VAT_Amount_</DataField>
</Field>
<Field Name="G_L_Entry___VAT_Amount_Format">
<DataField>G_L_Entry___VAT_Amount_Format</DataField>
</Field>
<Field Name="G_L_Entry___Debit_Amount_">
<DataField>G_L_Entry___Debit_Amount_</DataField>
</Field>
<Field Name="G_L_Entry___Debit_Amount_Format">
<DataField>G_L_Entry___Debit_Amount_Format</DataField>
</Field>
<Field Name="G_L_Entry___Credit_Amount_">
<DataField>G_L_Entry___Credit_Amount_</DataField>
</Field>
<Field Name="G_L_Entry___Credit_Amount_Format">
<DataField>G_L_Entry___Credit_Amount_Format</DataField>
</Field>
<Field Name="StartBalance____G_L_Entry__Amount">
<DataField>StartBalance____G_L_Entry__Amount</DataField>
</Field>
<Field Name="StartBalance____G_L_Entry__AmountFormat">
<DataField>StartBalance____G_L_Entry__AmountFormat</DataField>
</Field>
</Fields>
<Query>
<CommandText />
<DataSourceName>DummyDataSource</DataSourceName>
</Query>
<rd:DataSetInfo>
<rd:DataSetName>DataSet</rd:DataSetName>
<rd:TableName>Result</rd:TableName>
</rd:DataSetInfo>
</DataSet>
</DataSets>
<DataSources>
<DataSource Name="DummyDataSource">
<ConnectionProperties>
<ConnectString />
<DataProvider>SQL</DataProvider>
</ConnectionProperties>
<rd:DataSourceID>c396a512-e01c-4416-83e6-146281d0d75b</rd:DataSourceID>
</DataSource>
</DataSources>
<InteractiveHeight>11in</InteractiveHeight>
<InteractiveWidth>8.5in</InteractiveWidth>
<Language>=User!Language</Language>
<LeftMargin>1.5cm</LeftMargin>
<PageHeight>29.7cm</PageHeight>
<PageWidth>21cm</PageWidth>
<TopMargin>2cm</TopMargin>
<Width>18.15cm</Width>
<rd:DrawGrid>true</rd:DrawGrid>
<rd:ReportID>62e8f68c-8a67-4807-9608-4433fc5e1619</rd:ReportID>
<rd:SnapToGrid>true</rd:SnapToGrid>
</Report>
END_OF_RDLDatA
}
}
Login
Register
RSS Feed
Rules
FAQ
Search the forum
