Olá, bom dia.

Eu estou criando uma API para o Protheus e gostaria de saber como eu faço pra poder debugar no console as respostas, como o getQueryRequest, getContent, pra eu poder mostrar no console o que está sendo passado pelo usuário que está usando a API.

Eu fiz assim o meu @get:

Method get() as Logical Class SolicitacaoArmazemController

    // Setar Empresa e Filial no começo do App (Necessário)
    rpcSetEnv(cEmpAnt, cFilAnt)

    ConOut("SolicitacaoArmazemController:get - Iniciando")

    Local cResponseJson := '[{"Mensagem":"Hello World!"}]'

    Local jParam as Json
    jParam := oRest:getQueryRequest() // Retornar o QueryParam

    cBody := DecodeUtf8(oRest::getContent(), "cp1252")
    ConOut("SolicitacaoArmazemController:get - Body: " + fromJSON(cBody))

    ConOut("SolicitacaoArmazemController:get - Configurando os Headers e a Response")
    oRest:setKeyHeaderResponse('Content-Type', 'application/json; charset=utf-8')    
    oRest:setResponse(cResponseJson)

    // Resetar a Empresa/Filial e liberar licenças utilizadas.
    rpcClearEnv()

Return .T.

Ele compilou com sucesso mas ele para antes da linha que eu printou no log o cBody... Ele não passa pra frente.

Por favor, alguém pode me ajudar? Quero saber como mostrar no log as coisas que o cliente manda.

Olá, bom dia.

Eu estou criando uma API para o Protheus e gostaria de saber como eu faço pra poder debugar no console as respostas, como o getQueryRequest, getContent, pra eu poder mostrar no console o que está sendo passado pelo usuário que está usando a API.

Eu fiz assim o meu @get:

Method get() as Logical Class SolicitacaoArmazemController

    // Setar Empresa e Filial no começo do App (Necessário)
    rpcSetEnv(cEmpAnt, cFilAnt)

    ConOut("SolicitacaoArmazemController:get - Iniciando")

    Local cResponseJson := '[{"Mensagem":"Hello World!"}]'

    // Pega os Parâmetros da Query e printa no Console.
    Local jParam as Json
    jParam := oRest:getQueryRequest() // Retornar o QueryParam
    ConOut("SolicitacaoArmazemController:get - Parametros da Query: " + jParam:toJSON())

    /* 
    NOTA sobre o Local jBody:

    Atribui o JSON enviado no BODY para um JSON Local usado pra printar no Log.
    O JSON enviado de exemplo foi:

    {
        "parametro": "teste"
    }

    */

    Local jBody := JsonObject():new()
    jBody:fromJson( oRest:GetBodyRequest() )
    if ( jBody <> Nil)
        cParametroNoJson := jBody:GetJsonText("parametro")
        if ( cParametroNoJson == "null" )
            cParametroNoJson := Nil
        Else
            ConOut("SolicitacaoArmazemController:get - Parametro no JSON: " + cParametroNoJson:toJSON())
        EndIf
    EndIf

    ConOut("SolicitacaoArmazemController:get - Configurando os Headers e a Response")
    oRest:setKeyHeaderResponse('Content-Type', 'application/json; charset=utf-8')    
    oRest:setResponse(cResponseJson)

    // Resetar a Empresa/Filial e liberar licenças utilizadas.
    rpcClearEnv()

Return .T.

Ele compilou com sucesso mas ele para antes da linha que eu printou no log o cBody... Ele não passa pra frente.

Por favor, alguém pode me ajudar? Quero saber como mostrar no log as coisas que o cliente manda.

Olá, bom dia.

Eu estou criando uma API para o Protheus e gostaria de saber como eu faço pra poder debugar no console as respostas, como o getQueryRequest, getContent, pra eu poder mostrar no console o que está sendo passado pelo usuário que está usando a API.

Eu fiz assim o meu @get:

Method get() as Logical Class SolicitacaoArmazemController

    // Setar Empresa e Filial no começo do App (Necessário)
    rpcSetEnv(cEmpAnt, cFilAnt)

    ConOut("SolicitacaoArmazemController:get - Iniciando")

    Local cResponseJson := '[{"Mensagem":"Hello World!"}]'

    // Pega os Parâmetros da Query e printa no Console.
    Local jParam as Json
    jParam := oRest:getQueryRequest() // Retornar o QueryParam
    ConOut("SolicitacaoArmazemController:get - Parametros da Query: " + jParam:toJSON())

    /* 
    NOTA sobre o Local jBody:

    Atribui o JSON enviado no BODY para um JSON Local usado pra printar no Log.
    O JSON enviado de exemplo foi:

    {
        "parametro": "teste"
    }

    */

    Local jBody := JsonObject():new()
    jBody:fromJson( oRest:GetBodyRequest() )
    if ( jBody <> Nil)
        cParametroNoJson := jBody:GetJsonText("parametro")
        if ( cParametroNoJson == "null" )
            cParametroNoJson := Nil
        Else
            ConOut("SolicitacaoArmazemController:get - Parametro no JSON: " + cParametroNoJson:toJSON())
        EndIf
    EndIf

    ConOut("SolicitacaoArmazemController:get - Configurando os Headers e a Response")
    oRest:setKeyHeaderResponse('Content-Type', 'application/json; charset=utf-8')    
    oRest:setResponse(cResponseJson)

    // Resetar a Empresa/Filial e liberar licenças utilizadas.
    rpcClearEnv()

Return .T.

Ele compilou com sucesso mas ele para antes da linha que eu tento printar o cParametroNoJson. Ele não passa pra frente.

Por favor, alguém pode me ajudar? Quero saber como mostrar no log as coisas que o cliente manda.