M.O.A. - Declaración


Solicitud
LOCAL loHttp, loUrl, loData, loResponse

* Deben cambiar los datos de "params" por los que correspondan. 
* Esta request de ejemplo incluye todos posibles valores para 
* llamar al metodo ConsultarDenunciasDetallada, puede que algun valor sea opcional.
LOCAL loDataObject
loDataObject = CREATEOBJECT("JSONObject")
    loDataObject.set("environment", "prod")
    loDataObject.set("method", "ConsultarDenunciasDetallada")
    loDataObject.set("wsid", "wconsdeclaracion")
    LOCAL params
    params = CREATEOBJECT("JSONObject")
    loDataObject.set("params", params)
        LOCAL argWSAutenticacionEmpresa
        argWSAutenticacionEmpresa = CREATEOBJECT("JSONObject")
        params.set("argWSAutenticacionEmpresa", argWSAutenticacionEmpresa)
            argWSAutenticacionEmpresa.set("Token", "string")
            argWSAutenticacionEmpresa.set("Sign", "string")
            argWSAutenticacionEmpresa.set("CuitEmpresaConectada", 1)
            argWSAutenticacionEmpresa.set("TipoAgente", "string")
            argWSAutenticacionEmpresa.set("Rol", "string")
        LOCAL inputDenunciaDetallada
        inputDenunciaDetallada = CREATEOBJECT("JSONObject")
        params.set("inputDenunciaDetallada", inputDenunciaDetallada)
            inputDenunciaDetallada.set("CuitImportadorExportador", "string")
            inputDenunciaDetallada.set("CuitDespachante", "string")
            inputDenunciaDetallada.set("IdentificadorDeclaracion", "string")
            inputDenunciaDetallada.set("FechaDenunciaDesde", "YYYY-MM-DDThh:mm:ss")
            inputDenunciaDetallada.set("FechaDenunciaHasta", "YYYY-MM-DDThh:mm:ss")
            inputDenunciaDetallada.set("NumeroExpediente", "string")
            inputDenunciaDetallada.set("Subregimen", "string")
            inputDenunciaDetallada.set("CodigoAduana", "string")
            inputDenunciaDetallada.set("CodigoMotivo", "string")

* Convertimos el objeto en JSON
loData = json_encode(loDataObject)

* Creamos un cliente HTTP para llamar a la API
loHttp = CREATEOBJECT("Msxml2.XMLHTTP")
loUrl = "https://app.afipsdk.com/api/v1/afip/requests"

* Realizamos la llamada a la API
loHttp.Open("POST", loUrl, .F.)
loHttp.setRequestHeader("Content-Type", "application/json")

* Reemplazar con tu access_token obtenido de https://app.afipsdk.com
LOCAL accessToken
accessToken = "TU_TOKEN_AQUI"
loHttp.setRequestHeader("Authorization", "Bearer " + accessToken)

loHttp.Send(loData)

* En caso de error lo mostramos por pantalla
IF loHttp.Status <> 200
    ? STR(loHttp.responseText)
    RETURN
ENDIF

* Convertimos la respuesta en un objeto
loResponse = json_decode(loHttp.responseText)

* Mostramos la respuesta por pantalla
? loHttp.responseText
Respuesta
{
    "ConsultarDenunciasDetalladaResult": {
        "Server": "string",
        "TimeStamp": "datetime",
        "Resultado": {
            "DenunciaDetallada": [
                {
                    "Declaracion": "string",
                    "FechaOficializacion": "datetime",
                    "NumeroDenuncia": "string",
                    "FechaDenuncia": "datetime",
                    "NumeroExpediente": "string",
                    "UbicacionExpediente": "string",
                    "Fallo": "string",
                    "MontoAbonado": "decimal",
                    "OcasionaPerjuicioFiscal": "string",
                    "NumeroOMESefia": "string",
                    "ObservacionesDenuncia": "string",
                    "ListaMotivosDenuncia": {
                        "MotivoDenunciaDetallada": [
                            {
                                "MotivoDenuncia": "string",
                                "ObservacionesMotivoDenuncia": "string"
                            }
                        ]
                    },
                    "MotivosAgrupados": "string"
                }
            ]
        },
        "Errores": {
            "ErrorEjecucion": [
                {
                    "Codigo": "string",
                    "Descripcion": "string"
                }
            ]
        }
    }
}