Facebook
From Lousy Lizard, 6 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 211
  1. IF INCSTR(GenJnlLine."Journal Batch Name") <> '' THEN BEGIN
  2.       GenJnlBatch.DELETE;
  3.       IF GenJnlTemplate.Type = GenJnlTemplate.Type::Assets THEN
  4.         FAJnlSetup.IncGenJnlBatchName(GenJnlBatch);
  5.       GenJnlBatch.Name := INCSTR(GenJnlLine."Journal Batch Name");
  6.       IF GenJnlBatch.INSERT THEN;
  7.       GenJnlLine."Journal Batch Name" := GenJnlBatch.Name;
  8.     END;