...
FALedgerEntry.SETRANGE("Depreciation Book Code",DP_Book2."Depreciation Book Code")
ELSE
FALedgerEntry.SETRANGE("Depreciation Book Code");
FALedgerEntry.SETFILTER("FA Posting Date",DateFilter);
FALedgerEntry.SETRANGE("FA No.","No.");
// Delete the following lines.
CASE MatrixRecords[MATRIX_ColumnOrdinal]."FA Posting Type Name" OF
'Book Value' : BEGIN
FALedgerEntry.SETRANGE("Part of Book Value",TRUE);
FORM.RUN(0,FALedgerEntry);
END;
'Depreciable Basis' : BEGIN
FALedgerEntry.SETRANGE("Part of Depreciable Basis",TRUE);
FORM.RUN(0,FALedgerEntry);
END;
'Acquisition Cost' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Acquisition Cost");
FORM.RUN(0,FALedgerEntry);
END;
'Depreciation' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::Depreciation);
FORM.RUN(0,FALedgerEntry);
END;
'Write-Down' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Write-Down");
FORM.RUN(0,FALedgerEntry);
END;
'Appreciation' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::Appreciation);
FORM.RUN(0,FALedgerEntry);
END;
'Custom 1' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Custom 1");
FORM.RUN(0,FALedgerEntry);
END;
'Custom 2' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Custom 2");
FORM.RUN(0,FALedgerEntry);
END;
'Gain/Loss' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Gain/Loss");
FORM.RUN(0,FALedgerEntry);
END;
'Proceeds on Disposal' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Proceeds on Disposal");
FORM.RUN(0,FALedgerEntry);
END;
'Salvage Value' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Salvage Value");
FORM.RUN(0,FALedgerEntry);
END;
'Derogatory' : BEGIN
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::Derogatory);
FORM.RUN(0,FALedgerEntry);
END;
// End of the deleted lines.
END;
END;
LOCAL PROCEDURE MATRIX_OnAfterGetRecord@1096(MATRIX_ColumnOrdinal@1010 : Integer);
BEGIN
...
...
FALedgerEntry.SETRANGE("Depreciation Book Code",DP_Book2."Depreciation Book Code")
ELSE
FALedgerEntry.SETRANGE("Depreciation Book Code");
FALedgerEntry.SETFILTER("FA Posting Date",DateFilter);
FALedgerEntry.SETRANGE("FA No.","No.");
// Add the following lines.
//CASE MatrixRecords[MATRIX_ColumnOrdinal]."FA Posting Type Name" OF
CASE MatrixRecords[MATRIX_ColumnOrdinal]."Entry No." OF
// 'Book Value' : BEGIN
1:// 'Book Value'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("Part of Book Value",TRUE);
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Depreciable Basis' : BEGIN
10:// 'Depreciable Basis'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("Part of Depreciable Basis",TRUE);
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Acquisition Cost' : BEGIN
2:// 'Acquisition Cost'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Acquisition Cost");
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Depreciation' : BEGIN
3:// 'Depreciation'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::Depreciation);
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Write-Down' : BEGIN
4:// 'Write-Down'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Write-Down");
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Appreciation' : BEGIN
5:// 'Appreciation'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::Appreciation);
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Custom 1' : BEGIN
6:// 'Custom 1'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Custom 1");
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Custom 2' : BEGIN
7:// 'Custom 2'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Custom 2");
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Gain/Loss' : BEGIN
9:// 'Gain/Loss'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Gain/Loss");
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Proceeds on Disposal' : BEGIN
8:// 'Proceeds on Disposal'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Proceeds on Disposal");
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Salvage Value' : BEGIN
11:// 'Salvage Value'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::"Salvage Value");
FORM.RUN(0,FALedgerEntry);
END;
// VSTF277265.begin
// 'Derogatory' : BEGIN
12:// 'Derogatory'
BEGIN
// VSTF277265.end
FALedgerEntry.SETRANGE("FA Posting Type",FALedgerEntry."FA Posting Type"::Derogatory);
FORM.RUN(0,FALedgerEntry);
END;
// End of the added lines.
END;
END;
LOCAL PROCEDURE MATRIX_OnAfterGetRecord@1096(MATRIX_ColumnOrdinal@1010 : Integer);
BEGIN
...