Estimados, me funciona supuestamente todo en el server test menos recuperar el .pdf
If cticket = "SI" Then
bresultado = mio.apiCargarPropiedad("LIMPIAR", "", 0, 0)
' Configuración de la llamada GET para el PDF
bresultado = bresultado And mio.apiCargarPropiedad("ARBA2025.URLMETODO", curl, 0, 0)
' CORREGIDO: El método es GET y el contenido es JSON
bresultado = bresultado And mio.apiCargarPropiedad("ARBA2025.TIPOMETODO", "GET", 0, 0)
bresultado = bresultado And mio.apiCargarPropiedad("ARBA2025.TIPOCONTENIDO", "application/json", 0, 0)
' Parámetro de ejemplo (ID de comprobante)
bresultado = bresultado And mio.apiCargarPropiedad("
ARBA2025.PARAMETROS.id", "1003", 0, 0)
If bresultado Then
If mio.apiEjecutar("ARBA2025") Then
Dim ccadena As String
' Leemos el resultado crudo
ccadena = mio.apiLeerPropiedad("ARBA2025", "resultado", "", 0, 0)
If mio.UltimoMensajeError = "" Then
Dim cmessage As String
cmessage = mio.apiLeerPropiedad("ARBA2025", "diccionario.error", "", 0, 0)