13. März 2007 10:37
if TempJnlLineDim3.GET(TableID3,GnTmpName,GenJnlLine."Journal Batch Name",
GenJnlLine."Line No.",GenJnlAllocation."Line No.",CISInstFunc.GetDimCode(i)) then
CASE i OF
3: GLEntry."Shortcut Dimension 3 Code" := TempJnlLineDim3."Dimension Value Code";
4: GLEntry."Shortcut Dimension 4 Code" := TempJnlLineDim3."Dimension Value Code";
5: GLEntry."Shortcut Dimension 5 Code" := TempJnlLineDim3."Dimension Value Code";
6: GLEntry."Shortcut Dimension 6 Code" := TempJnlLineDim3."Dimension Value Code";
7: GLEntry."Shortcut Dimension 7 Code" := TempJnlLineDim3."Dimension Value Code";
8: GLEntry."Shortcut Dimension 8 Code" := TempJnlLineDim3."Dimension Value Code";
END;
13. März 2007 10:50
13. März 2007 10:56
13. März 2007 14:02
13. März 2007 14:06