Histórico da Página

// Pega a URL destino
       String strURL = "[http://localhost:8080/intellector/runpolicy";]
       // Pega o arquivo para ser postado
       String strXMLFilename = args[1];
       File input = new File(strXMLFilename);
       // Prepara o post HTTP
       PostMethod post = new PostMethod(strURL);
       // O conteudo do Request serah retirado diretamento do stream de entrada
       RequestEntity entity = new FileRequestEntity(input, "text/xml; charset=ISO-8859-1");
       post.setRequestEntity(entity);
       // Pega o HTTP client
       HttpClient httpclient = new HttpClient();
       // Executa o request
       try {
           int result = httpclient.executeMethod(post);
           // Mostra o status code
           System.out.println("Response status code: " + result);
           // Mostra o response
           System.out.println("Response body: ");
           System.out.println(post.getResponseBodyAsString());
       } finally {
           // Release da conexao atual para o connection pool de conexoes, uma vez que jah foi feito
           post.releaseConnection();
       }

<programa cod_programa="politica_dummy">

  <usuario>admin</usuario>
  <tipo>credito</tipo>
  <layout>Layout_politica_dummy</layout>
  <publishDate>2008-11-26 17:59:56.619 BRST</publishDate>
  <entrada>
    <campo>
      <nom_campo>CodCpf</nom_campo>
      <cod_formato></cod_formato>
      <tipo_dado>String</tipo_dado>
      <val_default></val_default>
      <listaDexPara>
        <dexPara valorDefault="true">
          <para>00000001910</para>
        </dexPara>
      </listaDexPara>
    </campo>
    <campo>
      <nom_campo>DataNascimento</nom_campo>
      <cod_formato>1</cod_formato>
      <tipo_dado>Date</tipo_dado>
      <val_default></val_default>
    </campo>
    ...
  </entrada>
  <saida>
    <campo>
      <nom_campo>LPT__sAcao</nom_campo>
      <cod_formato></cod_formato>
      <tipo_dado>String</tipo_dado>
      <val_default></val_default>
    </campo>
    <campo>
      <nom_campo>LPT__sMsgErro</nom_campo>
      <cod_formato></cod_formato>
      <tipo_dado>String</tipo_dado>
      <val_default></val_default>
    </campo>
    <campo>
      <nom_campo>LPT__iRetorno</nom_campo>
      <cod_formato></cod_formato>
      <tipo_dado>Integer</tipo_dado>
      <val_default></val_default>
    </campo>
    <campo>
      <nom_campo>D100_NOMEdummy</nom_campo>
      <cod_formato></cod_formato>
      <tipo_dado>String</tipo_dado>
      <val_default></val_default>
    </campo>
    <campo>
      <nom_campo>DtSistema</nom_campo>
      <cod_formato>1</cod_formato>
      <tipo_dado>Date</tipo_dado>
      <val_default></val_default>
    </campo>
    ...
  </saida>
</programa>

<?xml version="1.0" encoding="ISO-8859-1"?> 
<raiz>
        <!-- nome da politica -->
	<programa>politica_dummy</programa>
        <!-- nome do usuário com permissão pra execucao -->
	<usuario>admin</usuario>
        <!-- senha do usuario -->
	<senha>senha_admin</senha>
        <!-- tipo de politica -->
	<tipo>credito</tipo>
        <!-- layout para ser usado -->
	<layout>Layout_politica_dummy</layout>
        <!-- dados de entrada para a execução da politica -->
	<CodCpf>21769796304</CodCpf>
	<DataNascimento>30011966</DataNascimento>
...
</raiz>

O XML de saída é composto pelas variáveis de saída descritas no layout de política utilizado na execução e, pelas seguintes variáveis de controle:

   <!-- UUID - identificador unico -->
   <LPT__CodExecucao>3176837B-00D1-4B50-8419-126650B0E114</LPT__CodExecucao>
   <LPT__iRetorno>0</LPT__iRetorno>
   <LPT__sAcao>NEGA CREDITO</LPT__sAcao>
   <LPT__sMsgErro></LPT__sMsgErro>

<?xml version="1.0" encoding="ISO-8859-1"?>
<raiz>
   <D200_DATA_1dummy>02/12/2008</D200_DATA_1dummy>
   <INTEGER_VALUEdummy>69</INTEGER_VALUEdummy>
   <D100_MYDIRdummy>/home/jboss/intellector/acessos/dummy//resources/dummyaccess.xml</D100_MYDIRdummy>
   <D100_OUTROdummy>Pode me ver agora</D100_OUTROdummy>
   <D200_TIPO_1dummy>CORRUPTO</D200_TIPO_1dummy>
   <MensagemRetorno>CodCpf = 00000001910;;idade = 30;tem seguro;salario > 1000;variavel double > 5.2;</MensagemRetorno>
   <D200_VALOR_1dummy>171.69</D200_VALOR_1dummy>
   <BOOLEAN_VALUEdummy>true</BOOLEAN_VALUEdummy>
   <STRING_VALUEdummy>DUMMY</STRING_VALUEdummy>
   <DOUBLE_VALUEdummy>9999,99</DOUBLE_VALUEdummy>
   <DATE_VALUEdummy>02/12/2008</DATE_VALUEdummy>
   <D200_HORA_1dummy>23:59:59</D200_HORA_1dummy>
   <D100_NOMEdummy>Claudio dos Anzoes Pereira</D100_NOMEdummy>
   <D200_MOEDA_1dummy>real</D200_MOEDA_1dummy>
   <D100_DTNASCIMENTOdummy>02/12/2008</D100_DTNASCIMENTOdummy>
   <DtSistema>02/12/2008</DtSistema>
   <LPT__sMsgErrodummy></LPT__sMsgErrodummy>
   <LPT__CodExecucao>3176837B-00D1-4B50-8419-126650B0E114</LPT__CodExecucao>
   <LPT__iRetorno>0</LPT__iRetorno>
   <LPT__iRetornodummy>0</LPT__iRetornodummy>
   <LPT__sAcao>NEGA CREDITO</LPT__sAcao>
   <LPT__sMsgErro></LPT__sMsgErro>
</raiz>

/**
* $Revision: 1.2 $
* $Date: 2008-11-13 20:26:51 $
*/
package br.com.tools.intellector.util;

import java.io.File;

import org.apache.commons.httpclient.HttpClient;
import org.apache.commons.httpclient.methods.PostMethod;
import org.apache.commons.httpclient.methods.FileRequestEntity;
import org.apache.commons.httpclient.methods.RequestEntity;

/**
* Uma classe generica, via linha de comando para enviar arquivos,
* e, a intencao eh enviar arquivos XML para testar os servlets
* <p>
* @author claudio cardozo
*
*/
public class PostXML {
    /**
*
* Use: java PostXML [http://www.intellector.com.br:8080/intellector/runpolicy] c:\dummy_pol.xml
*
*  @param args comando na linha de argumentos
*         Argumento 0 eh uma URL para um web server, servlet (wsdl?)
*         Argumento 1 eh arquivo local formato XML (pode ser qq arquivo!)
*
*/
   public static void main(String[] args) throws Exception {
	   // passagem de argumentos
       if (args.length != 2) {
           System.out.println("Use: java -classpath <classpath> [-Dorg.apache.commons.logging.simplelog.defaultlog=<loglevel>] PostXML <url> <arquivo>]");
           System.out.println("<classpath> - deve conter commons-httpclient.jar e commons-logging.jar");
           System.out.println("<loglevel> - nivel de erro, warn, info, debug, trace");
           System.out.println("<url> - a URL para postar o arquivo");
           System.out.println("<arquivo> - arquivo para postar para a URL");
           System.out.println();
           System.exit(1);
       }
       // Pega a URL destino
       String strURL = args[0];
       // Pega o arquivo para ser postado
       String strXMLFilename = args[1];
       File input = new File(strXMLFilename);
       // Prepara o post HTTP
       PostMethod post = new PostMethod(strURL);
       // O conteudo do Request serah retirado diretamento do stream de entrada
       RequestEntity entity = new FileRequestEntity(input, "text/xml; charset=ISO-8859-1");
       post.setRequestEntity(entity);
       // Pega o HTTP client
       HttpClient httpclient = new HttpClient();
       // Executa o request
       try {
           int result = httpclient.executeMethod(post);
           // Mostra o status code
           System.out.println("Response status code: " + result);
           // Mostra o response
           System.out.println("Response body: ");
           System.out.println(post.getResponseBodyAsString());
       } finally {
           // Release da conexao atual para o connection pool de conexoes, uma vez que jah foi feito
           post.releaseConnection();
       }
   }

}

create or replace FUNCTION sp_solicitahttp ( szXmlEntrada IN VARCHAR2, lenXmlEntrada IN BINARY_INTEGER, szXmlSaida IN OUT VARCHAR2, lenXmlSaida IN OUT BINARY_INTEGER )
RETURN BINARY_INTEGER
IS
/*------------------------------------------------------------------------------------------------
 DATA         : 02/12/2008
 AUTOR        : LUIZ LIMA
 PRODUTO      : SCE
 MODULO       : BATCH
 SGBD         : ORACLE
-------------------------------------------------------------------------------------------------*/
  o_return_code INTEGER;
  i_urltext VARCHAR2(32767);
  i_timeout INTEGER DEFAULT 60;
  sslreq UTL_HTTP.req;
  rsp UTL_HTTP.resp;
  replymessage VARCHAR2(32767);
  replyline VARCHAR2(32767);
BEGIN
  -- Maquina de Teste
  i_urltext := 'http://192.168.0.172:8080/intellector/runpolicy';
  i_timeout := 50;
  -- Iniciando o Banco
  sslreq := UTL_HTTP.BEGIN_REQUEST(i_urltext,'POST','HTTP/1.0');

  UTL_HTTP.SET_HEADER(sslreq,'Content-Type','text/xml;charset=ISO-8859-1');
  UTL_HTTP.SET_HEADER(sslreq,'Content-Length',lenXmlEntrada);
  UTL_HTTP.SET_TRANSFER_TIMEOUT(i_timeout);
  /* Write information over secure connection */
  /*MyXML := '<?xml version="1.0" encoding="UTF-8"?>' ||
           '<raiz>' ||
              '<programa>politica_dummy</programa>' ||
              '<usuario>admin</usuario>' ||
              '<senha>tools</senha>' ||
              '<tipo>credito</tipo>' ||
              '<layout>Layout_politica_dummy</layout>' ||
              '<CodCpf>21769796304</CodCpf>' ||
              '<DataNascimento>30011966</DataNascimento>' ||
           '</raiz>';
*/
  UTL_HTTP.WRITE_TEXT(sslreq, szXmlEntrada);
  --UTL_HTTP.WRITE_TEXT( sslreq, MyXML);
  /* Initialize Response */
  rsp:=UTL_HTTP.GET_RESPONSE(sslreq);
  replymessage := '';
  /* Retrieve response */
  BEGIN
  LOOP
    UTL_HTTP.READ_LINE(rsp, replyline, TRUE);
    replymessage := replymessage || replyline;
  END LOOP;
  UTL_HTTP.END_RESPONSE(rsp);
  EXCEPTION
    WHEN UTL_HTTP.END_OF_BODY THEN
      UTL_HTTP.END_RESPONSE(rsp);
  END;
  /* Set output information */
  szXmlSaida := replymessage;
  lenXmlSaida := length(szXmlSaida);
  o_return_code := 1;
  RETURN o_return_code;
EXCEPTION
WHEN OTHERS THEN
o_return_code := -1;
szXmlSaida := replymessage || ' erro ' || SQLERRM;
lenXmlSaida := length(szXmlSaida);
return o_return_code;
END;

'-----------------------------------------------------------------
'-- Função que executa o Intellector via HTTP
'-----------------------------------------------------------------
Function SolicitaHTTP( byval asXmlEntrada )

	Dim Url
	Dim objXMLReceive
	Dim objXMLSend
	Dim objSrvHTTP

	'Pego o Host e o path do servelet do intellector para formar a url
	Url = "[http://www.intellector.com.br:8080/intellector/runpolicy"]

        Set objSrvHTTP		= CreateObject("Msxml2.ServerXMLHTTP.3.0")
	Set objXMLSend		= CreateObject("Msxml2.DOMDocument.3.0")
	Set objXMLReceive	= CreateObject("Msxml2.DOMDocument.3.0")

	objXMLSend.async = false

	if not( asXmlEntrada = "" or isnull( asXmlEntrada ) or isempty( asXmlEntrada ) ) then

		'Carrego XML de entrada
		objXMLSend.loadXML asXmlEntrada

		'Seto os Timeouts
		'objXMLSend.setTimeouts(resolveTimeout, connectTimeout,  sendTimeout, receiveTimeout)
		'Valores				 No timeout	,	90 seg ,  2 min ,  5 min
		objSrvHTTP.setTimeouts 0		, 90000	 ,  120000, 3000000

		'Configuro o endereço
		objSrvHTTP.open "POST", Url, false

		'Envio o xml para o servidor
		objSrvHTTP.send objXMLSend

		Response.ContentType = "text/html;charset=ISO-8859-1"

		'Busco o XML de retorno
		objXMLReceive = objSrvHTTP.responseText

		SolicitaHTTP = objXMLReceive
	end if
End Function

package br.com.tools.intellector.util;

import java.io.IOException;

import org.apache.commons.httpclient.HttpClient;
import org.apache.commons.httpclient.HttpMethod;
import org.apache.commons.httpclient.HttpStatus;
import org.apache.commons.httpclient.NameValuePair;
import org.apache.commons.httpclient.methods.GetMethod;

/**
* Uma classe generica, via linha de comando para enviar arquivos,
* e, a intencao eh enviar arquivos XML para testar o wsdl/rest
* <p>
* @author claudio cardozo
*
*/
public class PostWSDL {

	// configura a url?wsdl
    private static String url =
        "[http://192.168.0.185:8080/intellector/services/PolicyExecution/executePolicy";]

    /**
* Chamada RESTful via httpClient
* @param args
*/
    public static void main(String[] args) {

       // instancia um HttpClient
       HttpClient client = new HttpClient();

       // instancia um GET HTTP method
       HttpMethod method = new GetMethod(url);

       // configura name-value pairs da string para o metodo
       // definindo um xml com os dados a serem para um uma politica
       NameValuePair nvp1= new NameValuePair("xmlInputString", 
    		    "<raiz>" +
				"<programa>politica_dummy</programa><usuario>admin</usuario>" +
				"<senha>tools01</senha>"+
				"<tipo>credito</tipo>"+
				"<layout>Layout_politica_dummy_credito</layout>"+
				"<CodCpf>21769796304</CodCpf>"+
				"<DataNascimento>30011966</DataNascimento>"+
				"<ValBem>101.34</ValBem>"+
				"<DataAberturaConta>23102008</DataAberturaConta>"+
				"</raiz>");

       // configura as partes de envio
       method.setQueryString(new NameValuePair[]{nvp1});

       try{
           int statusCode = client.executeMethod(method);

           System.out.println("QueryString>> " + method.getQueryString());
           System.out.println("Status Text>> " + HttpStatus.getStatusText(statusCode));

           // pega a resposta como String
           System.out.println("Response>> " + method.getResponseBodyAsString());

           //release da conexao
           method.releaseConnection();
       }
       catch(IOException e) {
           e.printStackTrace();
       }
   }

}

package br.com.tools.executaWebService;

import java.net.URL;
import javax.xml.namespace.QName;
import br.com.tools.acessos.cipher.CipherVO;
import br.com.tools.acessos.cipher.Ciphering;

public class testeWebService {

    // definicao do serviço
    private static final QName SERVICE = new QName("[http://intellector.tools.com.br/services/WSPolicyExecution/",] "PolicyExecutionService");

    public static void main(String args[]) {

        try {
            // definindo a url do web service
            URL wsdlURL = new URL("[http://192.168.0.59:8080/intellector/services/PolicyExecution?wsdl");]
            // definindo um xml com os dados a serem para um uma politica
            String sUsuario = "admin";
            String sSenha = "tools01";

            System.out.println("wsdl url: " + wsdlURL);
            // instanciando o servico
            PolicyExecutionService ss = new PolicyExecutionService( wsdlURL, SERVICE);
            // pegando o port type
            ListLayoutsPortType port = ss.getListPolicyLayouts();
            // definindo uma string para receber o retorno do soap/wsdl
            String resp = null;

            //criptografo a senha
            Ciphering cipher = new Ciphering();
            CipherVO passciphered =  cipher.encript(sSenha);

            System.out.println("Invoking executePolicy()...");
            resp = port.listPolicyLayouts(sUsuario, passciphered.getPassword());
            System.out.println("TOTVS Intellector respondeu:\n" + resp);
            System.out.println();

            System.exit(0);
        } catch (Exception e) {
            // TODO Auto-generated catch block
            e.printStackTrace();
        }
    }
}

public interface Acesso {
	/**
	 * Executa um acesso externo; interface
	 * <p>
	 * @param hashIn
	 * @throws InfraException
	 * @throws LayoutException
	 * @throws ConfigException
	 */
	public HashMap<String, Object> execute( HashMap<String, Object> hashIn) 
		throws InfraException, LayoutException, ConfigException;
}

public class CipheringException extends Exception {
	/** 
	 * Excecao relativa a problemas de criptografia
	 * <p>
	 * @param msg mensagem para ser mostrada pela excecao
	 */
	public CipheringException(String msg) {
		super(msg);
	}

	/**
	 * Constrói uma nova exceção especificando a mensagem detalhada e a causa.
	 * Note que a mensagem detalhada associada a causa não são incorporadas
	 * automaticamente na mensagem desta exceção.
	 * <p>
	 * @param message
	 *            Mensagem detalhada (que é armazenada para posterior obtenção
	 *            pelo método {@link #getMessage()})
	 * @param cause
	 *            Causa (que é guardada para posterior recuperação pelo método
	 *            {@link #getCause()}) (Um valor nulo é permitida, e indica que
	 *            a causa é inexistente ou desconhecida.)
	 */
	public CipheringException(String message, Throwable cause) {
		super(message, cause);
	}
}

<?xml version="1.0" encoding="ISO-8859-1"?>
<!-- $Revision: 1.1.2.7 $ 						-->
<!-- $Date: 2008-11-05 21:02:55 $					-->
<!-- @Author claudio cardozo						-->
<dummy>
	<!-- metodo de acesso para ser carregado no acesso 		-->
	<code name="br.com.tools.acessos.DummyAccess"/>

	<!-- esse deverah ser sufixo para ser acrescentado ao nome 	-->
	<!-- vindo da politica, entao irei buscar na hash da politica	-->
	<!-- hash.getKey(cpf_dummy); um de/para para os elementos 	-->
	<nome_acesso>dummy</nome_acesso>

	<!-- contem os dados necessarios para entrada no Dummy  	-->
	<entrada>
		<!-- posso testar pelo valor obrigatorio dentro de cada -->
		<!-- acesso,  ele dever ser "CPF" 			-->
		<field description="cpf requerente" type="String" format="">CPF</field>
		<field description="Data de Nascimento" type="Date" format="ddmmyyyy">DT_NASC</field>
	   	<field description="Tem seguro" type="Boolean" format="">TEM_SEGURO</field>
	   	<field description="Valor do salario" type="Double" format="">VAL_SALARIO</field>
	   	<field description="Idade do requerente" type="Integer" format="">IDADE</field>
	</entrada>

	<!-- contem todas as saidas disponiveis pelo Dummy		-->
	<!-- Obs.: quando counter=alguma_coisa, entao todo o bloco 	-->
	<!-- abaixo sofrerah um looping baseado nesse counter		-->   	
	<saida id="DUMMY" counter="" >
	   	<register description="Teste de boolean" type="Boolean" format="">BOOLEAN_VALUE</register>
	   	<register description="Teste pra tipo Data" type="Date" format="">DATE_VALUE</register>
	   	<register description="Teste pra tipo Double" type="Double" format="">DOUBLE_VALUE</register>
	   	<register description="Teste pra tipo Integer" type="Integer" format="">INTEGER_VALUE</register>
	   	<register description="Teste pra tipo String" type="String" format="">STRING_VALUE</register>
	</saida>
   	<saida id="D100" counter="" >
		<register description="Um Nome qualquer" type="String" format="">D100_NOME</register>
		<register description="Uma data de Nascimento" type="Date" format="ddmmyyyy">D100_DTNASCIMENTO</register>
		<register description="Mostra o diretorio" type="String" format="">D100_MYDIR</register>
		<register description="Qualquer string" type="String" format="">D100_OUTRO</register>
	</saida>
	<saida id="D200" counter="D200_NUMCONSULTAS" >
		<register description="Simula String com contador" type="String" format="">D200_TIPO_</register>
		<register description="Simula Date com contador" type="Date" format="yyyyddmm">D200_DATA_</register>
		<register description="Simula String com contador" type="String" format="">D200_HORA_</register>
		<register description="Simula String com contador" type="String" format="">D200_MOEDA_</register>
		<register description="Simula Double com contador" type="Double" format="">D200_VALOR_</register>
   	</saida>
</dummy>