Buenas a todos 😎
Esta semana os traigo un ejemplo de cómo convertir los datos de todo un Record en un Json para poder ser enviados, descargados o transportados.
Este ejemplo es muy sencillo y se puede utilizar para una infinidad de desarrollos.
Vamos manos a la obra 😁
Lo primero que haremos es crear una codeunit y un procedure donde le insertaremos por parámetro un Variant y extraeremos un texto.
Ahora creamos las siguientes 4 variables:
La primera es la tabla virtual de los campos que hay en el sistema.
Las otras 3 ya las conocéis puesto que hemos ido hablando en varias ocasiones de ellas.
Si queréis ver por ejemplo como funciona el RecordRef o el FieldRef podéis ir al link donde hablo de ello.
Ahora inicializamos el RecRef y filtramos los campos que hay en la tabla que hemos pasado por parámetro.
Para facilitar que no haya errores he filtrado los campos blob, GUID y demás campos que pueden traer problemas al extraer en un texto, pero en lugar de eso se podrían llegar a convertir.
También quitamos los campos obsoletos para que no den error al volver a insertar.
Ahora recorreremos todos esos campos e iremos cogiendo los datos necesarios para crear el Json.
Podéis observar que lo que hacemos es poner primero el nombre y después el valor del campo.
Por último, añadimos en el texto el Json creado:
Ahora para hacer las pruebas creamos una page extensión de la page de cliente y mostramos en un mensaje el Json resultante:
Como siempre este ejemplo entero lo tenéis colgado en GitHub en el link.
Esperamos que esta explicación os resulte de utilidad y os emplazamos a nuestra próxima publicación.