BegNewStringFormat = SprDocTarget.TableHeight + 1;
    SquareArea = Report.Area(1, , Report.TableHeight, );
  SprDocTarget.InsertArea(SquareArea, SprDocTarget.Area(BegNewStringFormat, 1));
  SprDocTarget.Area(BegNewStringFormat, , 
        BegNewStringFormat + Report.TableHeight – 1, ).CreateFormatOfRows();
    // establecer el ancho de columna para el área de nuevo formato de cadena

    For Counter = 1 To Report.TableWidth Do
        SprDocTarget.Area(BegNewStringFormat, Counter).ColumnWidth = Report.Area(1, Counter).ColumnWidth;
    EndDo;
  SprDocTarget.PutHorizontalPageBreak();

EndProcedure // AddReport