折れ線グラフのデータ系列を行（レコード）単位にしたい

Code:
{curl 8.0 applet}

{import * from CURL.GUI.CHARTS}

{let RS:RecordSet =

    {RecordSet

        {RecordFields

            {RecordField "BASE", domain = String},

            {RecordField "Month_4", domain = int},

            {RecordField "Month_5", domain = int},

            {RecordField "Month_6", domain = int}

        },

        || hidden = 0

        {RecordData BASE = "A", Month_4 = 120, Month_5 = 150, Month_6 = 200},

        {RecordData BASE = "B", Month_4 = 100, Month_5 = 130, Month_6 = 115},

        {RecordData BASE = "C", Month_4 = 90, Month_5 = 70, Month_6 = 80},

        {RecordData BASE = "D", Month_4 = 130, Month_5 = 170, Month_6 = 150},

        {RecordData BASE = "E", Month_4 = 500, Month_5 = 450, Month_6 = 500}



        

    }

}       



{def rg = {RecordGrid

              record-source = RS,

              height = 130,

              width = 450,

              {RecordGridColumn "BASE"},

              {RecordGridColumn "Month_4"},

              {RecordGridColumn "Month_5"},

              {RecordGridColumn "Month_6"}

          }

}

{let chart:LayeredChart =

    {LayeredChart

        width = 15cm,

        height = 6cm,

        {LineLayer

            {ChartDataSeries RS, "Month_4"},

            {ChartDataSeries RS, "Month_5"},

            {ChartDataSeries RS, "Month_6"}

        }

    }

}



{value {VBox chart,rg}}