Histórico da Página
...
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
FUNCTION RFI_newURLAccessToken_test() DEFINE l_url CHAR(250) DEFINE l_urlAccessToken CHAR(300) #Caminho completo para acessar o recurso em portal WEB #Neste caso a BASE URL está incluida e ficará fixa na base de dados. LET l_url = "https://www.empresaAcesso.com.br/logix/supecotacao/cotacaoPreco.aph" CALL RFI_clearParameters() CALL RFI_addParameter("item","A001X40") LET l_urlAccessToken = RFI_newURLAccessToken(l_url) IF l_urlAccessToken IS NULL THEN CALL conout("RFI - Falha ao gerar link de acesso. Motivo: "||RFI_getErrorMessage()) ELSE CALL conout("RFI - Link de acesso gerado com BASE URL fixada no link de geração do Token: "||l_urAccessToken CLIPPED) END IF #Caminho relativo para acessar o recurso em portal WEB #Neste caso a BASE URL não é armazenada na base e irá ser acrescida automaticamente pela URL BASE configurada na chave de profile "logix.rfi.baseURL" no momento da recuperacao da URL. LET l_url = "/ecotacao/cotacaoPreco.aph" CALL RFI_clearParameters() CALL RFI_addParameter("item","A001X40") LET l_urlAccessToken = RFI_newURLAccessToken(l_url) IF l_urlAccessToken IS NULL THEN CALL conout("RFI - Falha ao gerar link de acesso. Motivo: "||RFI_getErrorMessage()) ELSE CALL conout("RFI - Link de acesso gerado com BASE URL setado no profile: "||l_urAccessToken CLIPPED) END IF ##Neste caso deseja fixar um base URL diferente do que pode estar setado no arquivo de profile do appserver CALL RFI_setBaseURL("https://www.empresaAcesso.com.br/logix") #Caminho relativo para acessar o recurso em portal WEB #Neste caso a BASE URL não é armazenada na base e irá ser acrescida automaticamente pela URL BASE configurada na chave de profile "logix.rfi.baseURL" no momento da recuperacao da URL. LET l_url = "/ecotacao/cotacaoPreco.aph" CALL RFI_clearParameters() CALL RFI_addParameter("item","A001X40") LET l_urlAccessToken = RFI_newURLAccessToken(l_url) IF l_urlAccessToken IS NULL THEN CALL conout("RFI - Falha ao gerar link de acesso. Motivo: "||RFI_getErrorMessage()) ELSE CALL conout("RFI - Link de acesso gerado com BASE URL fixada no programa: "||l_urAccessToken CLIPPED) END IF END FUNCTION |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas