anchor.diff:      Root := Template.Document.DocumentElement;
       CheckNotNull(
         Root
  -        .FindNode('TDataPartialFromTextStreamTest'),
  -      'TDataPartialFromTextStreamTest node not exists'
  +        .FindNode(TDataPartialFromTextStreamTest.ClassName),
  +      TDataPartialFromTextStreamTest.ClassName +' node not exists'
       );
       CheckNotNull(
         Root
  -        .FindNode('TDataPartialFromTextStreamTest')
  +        .FindNode(TDataPartialFromTextStreamTest.ClassName)
           .FindNode('files'),
         'Files node not exists'
       );
       CheckNotNull(
         Root
  -        .FindNode('TDataPartialFromTextStreamTest')
  +        .FindNode(TDataPartialFromTextStreamTest.ClassName)
           .FindNode('files')
           .FindNode('file'),
         'File node not exists'
  
positive.code:     Root := Template.Document.DocumentElement;
      CheckNotNull(
        Root
          .FindNode('TDataDividedStreamTest'),
        'TDataDividedStreamTest node not exists'
      );
      CheckNotNull(
        Root
          .FindNode('TDataDividedStreamTest')
          .FindNode('files'),
        'Files node not exists'
      );
      CheckNotNull(
        Root
          .FindNode('TDataDividedStreamTest')
          .FindNode('files')
          .FindNode('file'),
        'File node not exists'
  
negative.code: uses
    James.Testing.Clss,
    James.Format.XML.Clss,
    James.Data.Stream.Tests,
    James.Tests.Template.Clss;
  
  type
  