md cuenta corriente

Este servicio permite publicar registros de cuenta corriente para un destinatario (cuenta de gmail) que al entrar en la pltaforma MisDatos podrá consultar.

Desde visual basic 6 (o cualquier otro lenguaje en ambiente windows) el servicio se puede usar con esté código básico. En este ejemplo se conecta servidor de seguridad de misdatos misql.misdatos.com.ar  (teniendo un token de acceso creado) y subre un registro que queda publicado automáticamente.

Set gMD = CreateObject("misdatos.gstorage2")

gMD.usuario = "usuario token"

gMD.Password = "contraseña token"

Dim besultado As Boolean

Dim nid As Integer

bresultado = True

bresultado = gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros.itemcantidad", "16", 0, 0, 0, "") ' cantidad de parametros

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "0", 0, 0, 0, "entero") 'ntipo 0=insertar, 1=borrar OBLIGGATORIO SI ES PARA BORRAR

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "destino@gmail.com", 1, 0, 0, "string") 'cdestino gmail que lo puede ver OBLIGATARIO

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "comprobante7", 2, 0, 0, "string") 'ccomprobante numero/descripcion

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "20251107", 3, 0, 0, "fecha") 'fecha del comprobante

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "20251107", 4, 0, 0, "fecha") 'vencimiento

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "mercaderia", 5, 0, 0, "string") 'cnombre descripción o detalle del comprobante

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "55.12", 6, 0, 0, "decimal") ' total del comproabnte, en cuenta corriente

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "0", 7, 0, 0, "decimal") 'total contado, no influye en cuenta corriente

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "www.misdatos.com.ar", 8, 0, 0, "string") 'cenlace vinculo para descargar el pdf del comprobante

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "0", 9, 0, 0, "entero") ' naccion sinuso

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "", 10, 0, 0, "string") 'carea area o seccion del comprobante

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "titular", 11, 0, 0, "string") 'ctitular titular

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "comprobante7", 12, 0, 0, "string") 'cid identificador unico del comprobante, no se debe repetir OBLIGATLARIO

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "0", 13, 0, 0, "entero") 'norden numero de cuota si la hay OBLIGATORIO

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "basico", 14, 0, 0, "string") 'cplan

bresultado = bresultado And gMD.cargarPropiedad("AccesoCuentaCorriente", "listaparametros", "4", 15, 0, 0, "entero") 'proveedor

If bresultado Then

   nid = gMD.AccesoCuentaCorriente()

   If nid > 0 Then

      MsgBox "registro publicado id: " + Str(nid)

   Else

      MsgBox "error ACCESIO cuenta corriente " + gMD.ultimomensajeerror

   End If

Else

     MsgBox "error cargar propiedad: " + gMD.ultimomensajeerror

End If

Set gMD = Nothing

Para poder usar este servicio debe tener en cuenta los siguientes puntos o requisitos

• El instalador mdpyv009 descargado y registrado.

• Un token de seguridad (usuario / conraseña) creado en la plataforma MisDatos>usar mis servicios>md enlace>Token y una suscripcipón al servicio md enlace como se muestra en este tutorial de token 

• aseguarse de tener conexión al servidor de seguridad (misql.misdatos.com.ar) y el puerto (3306)

• En la plataforma tener contratado un plan para el servicio md ctacte (puede comenzar con el plan gratuito) y asociar el token a ese servicio.

Como se ve en el ejempo básico uno de los métodos ejecutados es: gMD.AccesoCuentaCorriente Este método conecta al servidor de seguridad de MisDatos (misql.misdatos.com.ar puerto 3306) lo que le permitirá registrar  y publicar los datos además de todas las veces que ha conumido o usado el servicio (desde la plataforma MisDatos>usar mis servicios>licencia>md enalce>Mis Consumo)  además de no exederse en su costo o prespuesto ya que el mismo método le avisará si supera el limite de usos para el plan que tiene contratado (puede empezar con el plan "gratuito" que no tiene costos y le permitrá algunos usos diarios y aumentar de plan en cualquier momento)

La planilla de test mdenlacetest (al pie de página, debe descargarla para abrir  la planilla localmente en excel) contiene hojas y macros que replica todos y cada uno de los métodos por lo que es imprescindible para ver como cada métodos, con sus campos de entrada y salida, es implementada desde la interfaz misdatos.gstorage2. La planilla puede ser ejecutada en un excel de 32 bits con las macros habilitadas (puede usar un motor de IA para que lo guie en lo pasos necesarios para habilitar las macro en su versión de excel) y en caso que no pudiera ejecutarlas aun puede usar el código de la macros para ver como todos los métodos son implementados en visual basic.