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 generarLiquidacionAvicola, puede que algun valor sea opcional.
LOCAL loDataObject
loDataObject = CREATEOBJECT("JSONObject")
    loDataObject.set("environment", "prod")
    loDataObject.set("method", "generarLiquidacionAvicola")
    loDataObject.set("wsid", "wslsp")
    LOCAL params
    params = CREATEOBJECT("JSONObject")
    loDataObject.set("params", params)
        LOCAL auth
        auth = CREATEOBJECT("JSONObject")
        params.set("auth", auth)
            auth.set("token", "string")
            auth.set("sign", "string")
            auth.set("cuit", 1)
        LOCAL solicitud
        solicitud = CREATEOBJECT("JSONObject")
        params.set("solicitud", solicitud)
            solicitud.set("codOperacion", 1)
            LOCAL emisor
            emisor = CREATEOBJECT("JSONObject")
            solicitud.set("emisor", emisor)
                emisor.set("puntoVenta", 1)
                emisor.set("tipoComprobante", 1)
                emisor.set("nroComprobante", 1)
                emisor.set("codCaracter", 1)
                emisor.set("fechaInicioActividades", "YYYY-MM-DD")
                emisor.set("iibb", "string")
                emisor.set("nroRUCA", 1)
                emisor.set("nroRenspa", "string")
            LOCAL receptor
            receptor = CREATEOBJECT("JSONObject")
            solicitud.set("receptor", receptor)
                receptor.set("codCaracter", 1)
                receptor.set("tipoDoc", 1)
                receptor.set("nroDoc", 1)
                receptor.set("iibb", "string")
                receptor.set("nombreApellido", "string")
                receptor.set("domicilio", "string")
                receptor.set("nombreLocalidad", "string")
                receptor.set("codProvincia", 1)
                receptor.set("codigoPostal", 1)
                receptor.set("nroRUCA", 1)
                receptor.set("nroRenspa", "string")
            LOCAL datosLiquidacion
            datosLiquidacion = CREATEOBJECT("JSONObject")
            solicitud.set("datosLiquidacion", datosLiquidacion)
                datosLiquidacion.set("fechaComprobante", "YYYY-MM-DD")
                datosLiquidacion.set("fechaOperacion", "YYYY-MM-DD")
                datosLiquidacion.set("codMotivo", 1)
                LOCAL granja
                granja = CREATEOBJECT("JSONObject")
                datosLiquidacion.set("granja", granja)
                    granja.set("nroGranja", 1)
                    granja.set("denominacionGranja", "string")
                    granja.set("nroLoteCrianza", 1)
                    granja.set("renspaGranja", "string")
                    granja.set("domicilioGranja", "string")
                    granja.set("partidoGranja", "string")
                    granja.set("codLocalidadGranja", 1)
                    granja.set("codProvinciaGranja", 1)
                    granja.set("codigoPostalGranja", 1)
                    granja.set("latitudGranja", 1.5)
                    granja.set("longitudGranja", 1.5)
                LOCAL condicionVenta
                condicionVenta = CREATEOBJECT("JSONArray")
                datosLiquidacion.set("condicionVenta", condicionVenta)
                    LOCAL condicionVenta0
                    condicionVenta0 = CREATEOBJECT("JSONObject")
                    condicionVenta.add(condicionVenta0)
                        condicionVenta0.set("codigo", 1)
                        condicionVenta0.set("detalle", "string")
            LOCAL dte
            dte = CREATEOBJECT("JSONArray")
            solicitud.set("dte", dte)
                LOCAL dte0
                dte0 = CREATEOBJECT("JSONObject")
                dte.add(dte0)
                    dte0.set("tipoDTE", "string")
                    dte0.set("nroDTE", "string")
            LOCAL remito
            remito = CREATEOBJECT("JSONArray")
            solicitud.set("remito", remito)
                LOCAL remito0
                remito0 = CREATEOBJECT("JSONObject")
                remito.add(remito0)
                    remito0.set("nroRemito", "string")
            LOCAL itemDetalleLiquidacion
            itemDetalleLiquidacion = CREATEOBJECT("JSONArray")
            solicitud.set("itemDetalleLiquidacion", itemDetalleLiquidacion)
                LOCAL itemDetalleLiquidacion0
                itemDetalleLiquidacion0 = CREATEOBJECT("JSONObject")
                itemDetalleLiquidacion.add(itemDetalleLiquidacion0)
                    itemDetalleLiquidacion0.set("cuitCliente", 1)
                    itemDetalleLiquidacion0.set("tipoLiquidacion", 1)
                    itemDetalleLiquidacion0.set("codCategoria", 1)
                    itemDetalleLiquidacion0.set("cantidad", 1)
                    itemDetalleLiquidacion0.set("cantidadCabezas", 1)
                    itemDetalleLiquidacion0.set("cantidadKgVivo", 1)
                    itemDetalleLiquidacion0.set("tipoCarneAviar", 1)
                    itemDetalleLiquidacion0.set("precioUnitario", 1.5)
                    itemDetalleLiquidacion0.set("alicuotaIVA", 1.5)
                    LOCAL liquidacionCompraAsociada
                    liquidacionCompraAsociada = CREATEOBJECT("JSONArray")
                    itemDetalleLiquidacion0.set("liquidacionCompraAsociada", liquidacionCompraAsociada)
                        LOCAL liquidacionCompraAsociada0
                        liquidacionCompraAsociada0 = CREATEOBJECT("JSONObject")
                        liquidacionCompraAsociada.add(liquidacionCompraAsociada0)
                            liquidacionCompraAsociada0.set("tipoComprobante", 1)
                            liquidacionCompraAsociada0.set("puntoVenta", 1)
                            liquidacionCompraAsociada0.set("nroComprobante", 1)
                            liquidacionCompraAsociada0.set("nroItem", 1)
                            liquidacionCompraAsociada0.set("cantidadAsociada", 1)
            LOCAL resultadoProductivo
            resultadoProductivo = CREATEOBJECT("JSONObject")
            solicitud.set("resultadoProductivo", resultadoProductivo)
                resultadoProductivo.set("bbIngresados", 1)
                resultadoProductivo.set("cantidadCabezasAvesVivasSalidas", 1)
                resultadoProductivo.set("cantidadKilosAvesVivasSalidas", 1)
                resultadoProductivo.set("cantidadCabezasAvesFaenadas", 1)
                resultadoProductivo.set("cantidadKilosAvesFaenadas", 1)
                resultadoProductivo.set("edad", 1)
                resultadoProductivo.set("kilosConsumoAlimentoBalanceado", 1)
                resultadoProductivo.set("fep", 1.5)
            LOCAL bonificacionesPenalizaciones
            bonificacionesPenalizaciones = CREATEOBJECT("JSONArray")
            solicitud.set("bonificacionesPenalizaciones", bonificacionesPenalizaciones)
                LOCAL bonificacionesPenalizaciones0
                bonificacionesPenalizaciones0 = CREATEOBJECT("JSONObject")
                bonificacionesPenalizaciones.add(bonificacionesPenalizaciones0)
                    bonificacionesPenalizaciones0.set("codigo", 1)
                    bonificacionesPenalizaciones0.set("detalle", "string")
                    bonificacionesPenalizaciones0.set("importe", 1.5)
            LOCAL gasto
            gasto = CREATEOBJECT("JSONArray")
            solicitud.set("gasto", gasto)
                LOCAL gasto0
                gasto0 = CREATEOBJECT("JSONObject")
                gasto.add(gasto0)
                    gasto0.set("codGasto", 1)
                    gasto0.set("descripcion", "string")
                    gasto0.set("baseImponible", 1.5)
                    gasto0.set("alicuota", 1.5)
                    gasto0.set("importe", 1.5)
                    gasto0.set("alicuotaIVA", 1.5)
                    gasto0.set("tipoIVANulo", "string")
            LOCAL tributo
            tributo = CREATEOBJECT("JSONArray")
            solicitud.set("tributo", tributo)
                LOCAL tributo0
                tributo0 = CREATEOBJECT("JSONObject")
                tributo.add(tributo0)
                    tributo0.set("codTributo", 1)
                    tributo0.set("descripcion", "string")
                    tributo0.set("baseImponible", 1.5)
                    tributo0.set("alicuota", 1.5)
                    tributo0.set("importe", 1.5)
            solicitud.set("datosAdicionales", "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