Nesse vídeo demonstraremos a utilização da função HttpPost, que serve para enviar um POST para uma API.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas #Include "TOTVS.ch" /*/{Protheus.doc} User Function zExe302 Aciona uma requisição POST para uma página da internet @type Function @author Atilio @since 22/02/2023 @see https://tdn.totvs.com/display/tec/HttpPost @obs Função HttpPost Parâmetros + cUrl , Caractere , Indica a URL que será feito o POST + cGetParms , Caractere , Indica os parâmetros que serão passados na requisição GET + cPostParms , Caractere , Indica os parâmetros que serão passados na requisição POST + nTimeOut , Numérico , Indica um número de segundos para timeout + aHeadStr , Array , Indica um array com os headers da requisição + cHeaderGet , Caractere , Busca o retorno dos headers da requisição (passar por referência com @) Retorno + cRet , Caractere , Retorna uma string que corresponde a solicitação Obs.: Exemplo original em https://terminaldeinformacao.com/2020/08/06/exemplo-de-integracao-com-viacep-usando-fwrest/ **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao **** /*/ User Function zExe302() Local aArea := FWGetArea() Local cResult := '' Local cCep := '17054679' //Aciona a requisição via HttpPost cResult := HttpPost(; "https://viacep.com.br/ws/" + cCep + "/json/",; // cURL ,; // cGetParms ,; // cPostParms ,; // nTimeOut ,; // aHeadStr ; // cHeaderGet ) //Exibe o resultado que veio do WS ShowLog(cResult) FWRestArea(aArea) ReturnBom pessoal, por hoje é só.
Abraços e até a próxima.
