Como agregar filas o itema vb.net con json
Publicado por ricardo (1 intervención) el 28/04/2018 21:29:37
Algún maestro de .Net recién ingreso a usar json con vb.net y tengo una dificultad, de como agregar las filas que recorro a json.items= item,
después del recorrido solamente almacena la ultima fila, porfa apoyo, Gracias.
Dejo el código aquí
después del recorrido solamente almacena la ultima fila, porfa apoyo, Gracias.
Dejo el código aquí
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Dim item
For Each itemDetalleRecibo As cls_Entidad.clsDetalleRecibo In detalleReciboReciboL
item = {
New cls_Entidad.clsJsonItem With {
.unidad_de_medida = itemDetalleRecibo.s_unidad_de_medida,
.codigo = itemDetalleRecibo.s_servicio,
.descripcion = util.borrar_caracteres_especiales(itemDetalleRecibo.s_detalle),
.cantidad = itemDetalleRecibo.i_cantidad,
.valor_unitario = itemDetalleRecibo.de_precio,
.precio_unitario = itemDetalleRecibo.s_valor_unitario,
.descuento = itemDetalleRecibo.s_descuento,
.subtotal = itemDetalleRecibo.de_subTotal,
.tipo_de_igv = itemDetalleRecibo.s_tipo_de_igv,
.igv = itemDetalleRecibo.de_igv,
.total = itemDetalleRecibo.de_total,
.anticipo_regularizacion = itemDetalleRecibo.b_anticipo_regularizacion,
.anticipo_serie = itemDetalleRecibo.s_anticipo_documento_serie,
.anticipo_documento_numero = itemDetalleRecibo.s_anticipo_documento_numero
}
}
Next
json.items = item
Valora esta pregunta
0