OBJECT Report 50005 Test
{
  OBJECT-PROPERTIES
  {
    Date=16/11/11;
    Time=15:35:12;
    Modified=Yes;
    Version List=;
  }
  PROPERTIES
  {
  }
  DATAITEMS
  {
    { PROPERTIES
      {
        DataItemTable=Table32;
        DataItemTableView=SORTING(Location Code,Item No.)
                          ORDER(Ascending);
        TotalFields=Quantity;
        GroupTotalFields=Item No.;
      }
      SECTIONS
      {
        { PROPERTIES
          {
            SectionType=Header;
            SectionWidth=12000;
            SectionHeight=846;
          }
          CONTROLS
          {
            { 1000000001;Label  ;0    ;0    ;1500 ;846  ;ParentControl=1000000000;
                                                         VertAlign=Bottom;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000003;Label  ;1650 ;0    ;1500 ;846  ;ParentControl=1000000002;
                                                         VertAlign=Bottom;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
          }
           }
        { PROPERTIES
          {
            SectionType=GroupHeader;
            SectionWidth=12000;
            SectionHeight=423;
            OnPreSection=BEGIN
                           Qty:=0;
                           RecItem.RESET;
                           IF RecItem.GET("Item Ledger Entry"."Item No.") THEN

                           RecItemledgEntry.RESET;
                           RecItemledgEntry.SETRANGE(RecItemledgEntry."Location Code","Item Ledger Entry"."Location Code");
                           RecItemledgEntry.SETRANGE(RecItemledgEntry."Item No.","Item Ledger Entry"."Item No.");
                           IF RecItemledgEntry.FIND('-') THEN
                           BEGIN
                           REPEAT
                              Qty:=Qty+RecItemledgEntry.Quantity;
                           UNTIL RecItemledgEntry.NEXT = 0;
                           END;
                         END;

          }
          CONTROLS
          {
            { 1000000000;TextBox;0    ;0    ;1500 ;423  ;SourceExpr="Location Code" }
            { 1000000002;TextBox;1650 ;0    ;1500 ;423  ;SourceExpr="Item No." }
            { 1000000004;TextBox;3300 ;0    ;1500 ;423  ;SourceExpr=RecItem.Description }
            { 1000000005;TextBox;4950 ;0    ;1500 ;423  ;SourceExpr=Qty }
          }
           }
        { PROPERTIES
          {
            SectionType=Body;
            SectionWidth=12000;
            SectionHeight=423;
          }
          CONTROLS
          {
          }
           }
        { PROPERTIES
          {
            SectionType=Footer;
            SectionWidth=12000;
            SectionHeight=846;
          }
          CONTROLS
          {
          }
           }
      }
       }
  }
  REQUESTFORM
  {
    PROPERTIES
    {
      Width=9020;
      Height=3410;
    }
    CONTROLS
    {
    }
  }
  REQUESTPAGE
  {
    PROPERTIES
    {
    }
    CONTROLS
    {
    }
  }
  CODE
  {
    VAR
      RecItem@1000000000 : Record 27;
      RecItemledgEntry@1000000001 : Record 32;
      Qty@1000000002 : Decimal;

    BEGIN
    END.
  }
  RDLDATA
  {
  }
}