This is a migrated thread and some comments may be shown as answers.

ArgumentOutOfRangeException RadGridView ChildView

1 Answer 94 Views
GridView
This is a migrated thread and some comments may be shown as answers.
Frank Schürer
Top achievements
Rank 1
Frank Schürer asked on 04 Sep 2009, 10:29 AM
Hello,

I've got a problem and i have no more idea how to fix it. I made a Gridview and put 2 Childs into it. The first Child can be selectet without any problems. But when i select the second child, i'll get an exception.
It's the ArgumentOutOfRangeException.

The two 2 Childviews are made in the Code.

The first Child:
Private Sub LoadDetailsTable() 
        Dim table As New DataTable("Belegungseinheit"
        table.Columns.Add("Belegungseinheit_ID"GetType(Integer)) 
        table.Columns.Add("Konzept_ID"GetType(String)) 
        table.Columns.Add("Gattung_ID"GetType(Integer)) 
        table.Columns.Add("Medium_ID"GetType(Integer)) 
        table.Columns.Add("Ausgaben_ID"GetType(Integer)) 
        table.Columns.Add("Erscheinungsweise"GetType(String)) 
        table.Columns.Add("verbr_Auflage"GetType(Integer)) 
        table.Columns.Add("HH_RW"GetType(Integer)) 
        table.Columns.Add("ET1"GetType(DateTime)) 
        table.Columns.Add("ET2"GetType(DateTime)) 
        table.Columns.Add("Anzahl_Spalten"GetType(Integer)) 
        table.Columns.Add("Breite_mm"GetType(Integer)) 
        table.Columns.Add("Hoehe_mm"GetType(Integer)) 
        ''table.Columns.Add("Platzierung_ID", GetType(Integer)) 
        ''table.Columns.Add("Umrechnungsfaktor", GetType(Double)) 
        ''table.Columns.Add("Farb_ID", GetType(Integer)) 
        ''table.Columns.Add("mm_Preis", GetType(Double)) 
        table.Columns.Add("Farbzuschlag_Pro"GetType(Double)) 
        table.Columns.Add("Farbzuschlag_Euro"GetType(Double)) 
        table.Columns.Add("FZ_Rabatt"GetType(Boolean)) 
        table.Columns.Add("FZ_AE"GetType(Boolean)) 
        table.Columns.Add("Festpreis"GetType(Double)) 
        table.Columns.Add("Kombi_Rabatt"GetType(Double)) 
        table.Columns.Add("Mengen_Rabatt"GetType(Double)) 
        table.Columns.Add("Sonder_Rabatt"GetType(Double)) 
        table.Columns.Add("Zuschlag_Pro"GetType(Double)) 
        table.Columns.Add("Zuschlag_Euro"GetType(Double)) 
        'table.Columns.Add("AE", GetType(Double)) 
        table.Columns.Add("Netto"GetType(Double)) 
        table.Columns.Add("Netto_Honorar"GetType(Double)) 
        ''table.Columns.Add("Skonto", GetType(Integer)) 
        ''table.Columns.Add("Vereinbarung", GetType(Boolean)) 
        table.Columns.Add("Insertionsnummer"GetType(String)) 
        table.Columns.Add("MA_Code"GetType(String)) 
        table.Columns.Add("SchaltungsNr"GetType(String)) 
        table.Columns.Add("Storno"GetType(Boolean)) 
        For Each row As DataRow In Me.Anzeigenverwaltung_DEVDataSet.Belegungeinheit.Rows 
            table.Rows.Add(row("Belegungseinheit_ID"), row("Konzept_ID"), row("Gattung_ID"), row("Medium_ID"), row("Ausgaben_ID"), row("Erscheinungsweise"), row("verbr_Auflage"), row("HH_RW"), row("ET1"), row("ET2"), row("Anzahl_Spalten"), row("Breite_mm"), row("Hoehe_mm"), row("Farbzuschlag_Pro"), row("Farbzuschlag_Euro"), row("FZ_Rabatt"), row("FZ_AE"), row("Festpreis"), row("Kombi_Rabatt"), row("Mengen_Rabatt"), row("Sonder_Rabatt"), row("Zuschlag_Pro"), row("Zuschlag_Euro"), row("Netto"), row("Netto_Honorar"), row("Insertionsnummer"), row("MA_Code"), row("SchaltungsNr"), row("Storno")) 
            'table.Rows.Add(row("Belegungseinheit_ID"), row("Konzept_ID"), row("Gattung_ID"), row("Medium_ID"), row("Ausgaben_ID"), row("Erscheinungsweise"), row("verbr_Auflage"), row("HH_RW"), row("Hoehe_mm"), row("Anzahl_Spalten"), row("Breite_mm"), row("Farbzuschlag_Pro"), row("Farbzuschlag_Euro"), row("FZ_Rabatt"), row("FZ_AE"), row("Festpreis"), row("Kombi_Rabatt"), row("Mengen_Rabatt"), row("Sonder_Rabatt"), row("Zuschlag_Pro"), row("Zuschlag_Euro"), row("Netto"), row("Netto_Honorar"), row("Insertionsnummer"), row("MA_Code"), row("SchaltungsNr"), row("Storno")) 
            'table.Rows.Add(row("Belegungseinheit_ID"), row("Konzept_ID"), row("Gattung_ID"), row("Medium_ID"), row("Ausgaben_ID"), row("Erscheinungsweise"), row("verbr_Auflage"), row("HH_RW"), row("ET1"), row("ET2"), row("Anzahl_Spalten"), row("Breite_mm"), row("Hoehe_mm"), row("Farbzuschlag_Pro"), row("Farbzuschlag_Euro"), row("FZ_Rabatt"), row("FZ_AE"), row("Festpreis"), row("Kombi_Rabatt"), row("Mengen_Rabatt"), row("Sonder_Rabatt"), row("Zuschlag_Pro"), row("Zuschlag_Euro"), row("Netto"), row("Netto_Honorar"), row("Insertionsnummer"), row("MA_Code"), row("SchaltungsNr"), row("Storno")) 
        Next row 
 
        Dim template As New GridViewTemplate(Me.rgvDaten) 
        template.Caption = "Belegungseinheit" 
        template.DataSource = table 
        template.AllowEditRow = True 
        template.AllowRowResize = True 
        template.ShowColumnHeaders = False 
        template.AllowAddNewRow = False 
 
        'template.Columns("Gattung_ID").DisableHTMLRendering = False 
        template.Columns("Gattung_ID").Width = 100 
        template.Columns("Medium_ID").Width = 100 
        template.Columns("Ausgaben_ID").Width = 100 
        template.Columns("Erscheinungsweise").Width = 100 
        template.Columns("verbr_Auflage").Width = 100 
        template.Columns("HH_RW").Width = 90 
 
        'template.Columns("ET1").DisableHTMLRendering = False 
        'template.Columns("ET2").DisableHTMLRendering = False 
        template.Columns("Anzahl_Spalten").BestFit() 
        template.Columns("Breite_mm").BestFit() 
        template.Columns("Hoehe_mm").BestFit() 
        ' ''template.Columns("Platzierung_ID").Width = 40 
        template.Columns("Farbzuschlag_Pro").BestFit() 
        template.Columns("Farbzuschlag_Euro").BestFit() 
        template.Columns("FZ_Rabatt").Width = 75 
        template.Columns("FZ_AE").Width = 50 
 
        template.Columns("Festpreis").BestFit() 
        template.Columns("Kombi_Rabatt").BestFit() 
        template.Columns("Mengen_Rabatt").BestFit() 
        template.Columns("Sonder_Rabatt").BestFit() 
        template.Columns("Zuschlag_Pro").BestFit() 
        template.Columns("Zuschlag_Euro").BestFit() 
        ' ''template.Columns("AE").Width = 40 
        template.Columns("Netto").BestFit() 
        template.Columns("Netto_Honorar").BestFit() 
        ' ''template.Columns("Skonto").Width = 25 
        ' ''template.Columns("Vereinbarung").Width = 25 
 
        template.Columns("Insertionsnummer").Width = 120 
        template.Columns("MA_Code").Width = 120 
        template.Columns("SchaltungsNr").Width = 120 
        'template.Columns("Storno").DisableHTMLRendering = False 
        template.Columns("Storno").Width = 100 
 
 
        Me.rgvDaten.MasterGridViewTemplate.ChildGridViewTemplates.Insert(0, template) 
 
        Dim relation As New GridViewRelation(Me.rgvDaten.MasterGridViewTemplate) 
        relation.ChildTemplate = template 
        relation.ParentColumnNames.Add("Belegungseinheit_ID"
        relation.ChildColumnNames.Add("Belegungseinheit_ID"
        Me.rgvDaten.Relations.Add(relation) 
 
        Dim viewDef As New HtmlViewDefinition() 
        viewDef.RowTemplate.Rows.Add(New RowDefinition()) 
        viewDef.RowTemplate.Rows.Add(New RowDefinition()) 
        viewDef.RowTemplate.Rows.Add(New RowDefinition()) 
        viewDef.RowTemplate.Rows.Add(New RowDefinition()) 
 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Gattung_ID", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Medium_ID", 0, 2, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Ausgaben_ID", 0, 2, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Erscheinungsweise", 0, 2, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("verbr_Auflage", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("HH_RW", 0, 1, 1)) 
 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("ET1", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("ET2", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Anzahl_Spalten", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Breite_mm", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Hoehe_mm", 0, 1, 1)) 
        ''viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Platzierung_ID", 0, 1, 1)) 
        ''viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Umrechnungsfaktor", 0, 1, 1)) 
        ''viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Farb_ID", 0, 1, 1)) 
        ''viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("mm_Preis", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Farbzuschlag_Pro", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Farbzuschlag_Euro", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("FZ_Rabatt", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("FZ_AE", 0, 1, 1)) 
 
        viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Festpreis", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Kombi_Rabatt", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Mengen_Rabatt", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Sonder_Rabatt", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Zuschlag_Pro", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Zuschlag_Euro", 0, 1, 1)) 
        ''viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("AE", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Netto", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Netto_Honorar", 0, 2, 1)) 
        ''viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Skonto", 0, 1, 1)) 
        ''viewDef.RowTemplate.Rows(2).Cells.Add(New CellDefinition("Vereinbarung", 0, 1, 1)) 
 
        viewDef.RowTemplate.Rows(3).Cells.Add(New CellDefinition("Insertionsnummer", 0, 2, 1)) 
        viewDef.RowTemplate.Rows(3).Cells.Add(New CellDefinition("MA_Code", 0, 2, 1)) 
        viewDef.RowTemplate.Rows(3).Cells.Add(New CellDefinition("SchaltungsNr", 0, 2, 1)) 
        viewDef.RowTemplate.Rows(3).Cells.Add(New CellDefinition("Storno", 0, 1, 1)) 
 
        Me.rgvDaten.MasterGridViewTemplate.ChildGridViewTemplates(0).ViewDefinition = viewDef 
    End Sub 

and the second child:
Private Sub LoadDUPTable() 
        Dim table As New DataTable("DUP"
        table.Columns.Add("DUP_ID"GetType(Integer)) 
        table.Columns.Add("Verlag"GetType(String)) 
        table.Columns.Add("Strasse"GetType(String)) 
        table.Columns.Add("PLZ"GetType(String)) 
        table.Columns.Add("Ort"GetType(String)) 
        table.Columns.Add("Ansprechpartner_Anzeigen_Anrede"GetType(String)) 
        table.Columns.Add("Ansprechpartner_Anzeigen_Name"GetType(String)) 
        table.Columns.Add("Tel_Anzeige"GetType(String)) 
        table.Columns.Add("Fax_Anzeige"GetType(String)) 
        table.Columns.Add("Ansprechpartner_Technik_Anrede"GetType(String)) 
        table.Columns.Add("Ansprechpartner_Technik_Name"GetType(String)) 
        table.Columns.Add("Tel_Technik"GetType(String)) 
        table.Columns.Add("Fax_Technik"GetType(String)) 
        table.Columns.Add("Email_Technik"GetType(String)) 
        table.Columns.Add("ISDN"GetType(String)) 
        table.Columns.Add("DU_Datum"GetType(DateTime)) 
        table.Columns.Add("DU_Uhrzeit"GetType(DateTime)) 
        table.Columns.Add("Vorlage_liegt_vor"GetType(Boolean)) 
        table.Columns.Add("Beleg_liegt_vor"GetType(Boolean)) 
        table.Columns.Add("Bemerkung"GetType(String)) 
        table.Columns.Add("Belegungseinheit_ID"GetType(Integer)) 
 
        For Each row As DataRow In Me.Anzeigenverwaltung_DEVDataSet.DUP.Rows 
            table.Rows.Add(row("DUP_ID"), row("Verlag"), row("Strasse"), row("PLZ"), row("Ort"), row("Anprechpartner_Anzeigen_Anrede"), row("Ansprechpartner_Anzeigen_Name"), row("Tel_Anzeige"), row("Fax_Anzeige"), row("Ansprechpartner_Technik_Anrede"), row("Ansprechpartner_Technik_Name"), row("Tel_Technik"), row("Fax_Technik"), row("Email_Technik"), row("ISDN"), row("DU_Datum"), row("DU_Uhrzeit"), row("Vorlage_liegt_vor"), row("Beleg_liegt_vor"), row("Bemerlung"), row("Belegungseinheit_ID")) 
        Next row 
 
        Dim template As New GridViewTemplate(Me.rgvDaten) 
        template.Caption = "DUP" 
        template.DataSource = table 
        template.AllowAutoSizeColumns = True 
        template.AllowEditRow = True 
        template.AllowRowResize = True 
        template.ShowColumnHeaders = False 
        'template.AllowAddNewRow = False 
        Me.rgvDaten.MasterGridViewTemplate.ChildGridViewTemplates.Insert(0, template) 
 
        Dim relation As New GridViewRelation(Me.rgvDaten.MasterGridViewTemplate) 
        relation.ChildTemplate = template 
        relation.ParentColumnNames.Add("Kurz_Beleg_ID"
        relation.ChildColumnNames.Add("Kurz_Beleg_ID"
        Me.rgvDaten.Relations.Add(relation) 
 
        Dim viewDef As New HtmlViewDefinition() 
        viewDef.RowTemplate.Rows.Add(New RowDefinition()) 
        viewDef.RowTemplate.Rows.Add(New RowDefinition()) 
 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Verlag", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Strasse", 0, 2, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("PLZ", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Ort", 0, 2, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Ansprechpartner_Anzeigen_Anrede", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Ansprechpartner_Anzeigen_Name", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Tel_Anzeige", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(0).Cells.Add(New CellDefinition("Fax_Anzeige", 0, 1, 1)) 
 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Ansprechpartner_Technik_Anrede", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Ansprechpartner_Technik_Name", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Tel_Technik", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Fax_Technik", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Email_Technik", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("ISDN", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("DU_Datum", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("DU_Uhrzeit", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Vorlage_liegt_vor", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Beleg_liegt_vor", 0, 1, 1)) 
        viewDef.RowTemplate.Rows(1).Cells.Add(New CellDefinition("Bemerkung", 0, 1, 1)) 
 
        Me.rgvDaten.MasterGridViewTemplate.ChildGridViewTemplates(0).ViewDefinition = viewDef 
    End Sub 

Message = "Index was outside the area. It must not be negative and less than the listing. Parametername: index"

Can anyone help me?


1 Answer, 1 is accepted

Sort by
0
Jack
Telerik team
answered on 07 Sep 2009, 02:06 PM
Hi Christian Stettner,

Thank you for contacting us. I am not able to find the issue by just looking at this code snippet. Please, open a support ticket and send us your application. I will be glad to help you further, and I am looking forward to your reply.

Greetings,
Jack
the Telerik team

Instantly find answers to your questions on the new Telerik Support Portal.
Watch a video on how to optimize your support resource searches and check out more tips on the blogs.
Tags
GridView
Asked by
Frank Schürer
Top achievements
Rank 1
Answers by
Jack
Telerik team
Share this question
or