Всем привет!
Обнаружил следуюищй код в CU 13 Gen. Jnl.-Post Batch:
Код:
...
GenJnlLine3.RESET;
GenJnlLine3.SETRANGE("Journal Template Name","Journal Template Name");
GenJnlLine3.SETRANGE("Journal Batch Name","Journal Batch Name");
IF NOT GenJnlLine3.FINDLAST THEN
IF INCSTR("Journal Batch Name") <> '' THEN BEGIN
GenJnlBatch.DELETE;
IF GenJnlTemplate.Type = GenJnlTemplate.Type::Assets THEN
FAJnlSetup.IncGenJnlBatchName(GenJnlBatch);
GenJnlBatch.Name := INCSTR("Journal Batch Name");
IF GenJnlBatch.INSERT THEN;
"Journal Batch Name" := GenJnlBatch.Name;
END;
GenJnlLine3.SETRANGE("Journal Batch Name","Journal Batch Name");
IF (GenJnlBatch."No. Series" = '') AND NOT GenJnlLine3.FINDLAST THEN BEGIN
GenJnlLine3.INIT;
GenJnlLine3."Journal Template Name" := "Journal Template Name";
GenJnlLine3."Journal Batch Name" := "Journal Batch Name";
GenJnlLine3."Line No." := 10000;
GenJnlLine3.INSERT;
TempGenJnlLine2 := GenJnlLine2;
TempGenJnlLine2."Balance (LCY)" := 0;
GenJnlLine3.SetUpNewLine(TempGenJnlLine2,0,TRUE);
GenJnlLine3.MODIFY;
END;
...
Т.е. если раздел заканчивается на циферку (т.е. его можно увеличить с помощью функции INCSTR), то после учета этот раздел удаляется и создается новый.
Ладно, это один странный момент. Но второй кусок кода создает пусную строку с этим разделом. Вопрос: Есть предположения почему так сделано?
Благодарю за ответы!