csharp Crear grid sin quer en Json formas

Posted 2021-05-12

_Query.Selected(new TField("B", "Code", "SubFamilia"));
            _Query.Selected(new TField("B", "Name", "Nombre"));
            _Query.Selected(new TField("A", "U_LDT_Editable", "Editable"));
            _Query.From(new TFrom("@LDT_FAMILIA_DET", "A"));
            _Query.From(_JoinSubFaamilia);
            _Query.Where(new TField("A", "Code"), OperadoresFiltros.Igual, new TValue(txtEdit.String));
            _Query.OrdenBy(new TField("A", "U_LDT_Orden"), TipoOrden.Ascendente);
            if (_Query.Open())
            {

                Grid grid = (Grid)pForma.Items.Item("Max4").Specific;
                DataTable DT = grid.DataTable;
                

                recset.DoQuery(_Query.SQL);
                int I = recset.RecordCount - 1;
                int RecIndex = DT.Rows.Count - 1;
                if (RecIndex < 0) { RecIndex = 0; };
                for (int J = 0; J <= I; J++) {

                    DT.Rows.Add(1);
                    DT.SetValue(EColCodArt.CodSubFam , J + RecIndex, recset.Fields.Item("SubFamilia").Value);
                    DT.SetValue(EColCodArt.NomSubFam, J + RecIndex, recset.Fields.Item("Nombre").Value);
                    DT.SetValue(EColCodArt.SubDivision, J + RecIndex, "");
                    DT.SetValue(EColCodArt.NomDivision, J + RecIndex, "");
                    DT.SetValue(EColCodArt.Editable, J + RecIndex, recset.Fields.Item("Editable").Value);
                    recset.MoveNext();
                }

                System.Runtime.InteropServices.Marshal.ReleaseComObject(recset);
                recset = null; 
            }