For i = 0 To rows.Size - 1
Dim m As Map
m = rows.Get(i)
pedidoCab.name = m.Get("name")
pedidoCab.direccion = m.get("direccion")
pedidoCabeceraSolicitado.InsertAt(i,pedidoCab)
MsgboxAsync(pedidoCabeceraSolicitado.Get(i),"En el for")
pedidosDetalleTarjetaSolicitados.Add(CreateItemPedidoCabSolicitado(pedidosDetalleTarjetaSolicitados.AsView.Width,Main.idpedido,nombreCliente,direccionLocal,estadoPedido,fecha),"")
Next