Se o campo no Cobol for do tipo PIC S9(10)V99 COMP-3, converta esse campo para um PIC X(13), onde o primeiro caracter informe o sinal (C para crédito, D para débito), os 11 próximos caracteres definem o valor inteiro e os dois últimos os decimais.
 
 
   Neste caso acho melhor editar o campo com uma picture -9999999999.99 usando o hifen no lugar do D ou C. Isto facilitara o manuseio da String na hora de converter para um tipo numérico.
 
 
Roberto Tatemoto


 
Assunto:[java-list] Dados Compactado do AS400 para Java
Data:20/11/02 09:21:08 Hora padrão leste da Am. Sul
De:[EMAIL PROTECTED]
Responder-para:[EMAIL PROTECTED]
Para:[EMAIL PROTECTED]
Enviado pela Internet



PessoALL

Estou com uma duvida muito complicada.

Estou trabalhando com AS400 e o Sistema trabalha com
um tipo de arquivo chamado compactado (pessoal de
mainframe usa isso direto). Acontece que um programa
Cobol está passando parametros para uma aplicação
Java, onde está aplicação cobol passa um registro do
Banco de Dados concatenado, e eu preciso pegar esse
registro (desconcatenar) através de substring
(star,End).

Até ai tudo bem.
Quando eu pegar esse pedaço de string, que é um campo
compactado do tipo AS400, eu tenho que transformar
esse dado em um tipo visivel ou ASCII.

Estou usando o pacote da IBM Java Toolbox for AS400,
que é um conjunto de libraries que podem me auxiliar,
mas até o momento não estou encontrando solução.


Quem já fez isso usando o Java, por favor me de uma
Luz, pois não estou parado nesse ponto e não consigo
evoluir.


Muito Obrigado
[]´s
Kleber Rodrigo de Carvalho

__________________________________________________
Do you Yahoo!?
Yahoo! Web Hosting - Let the expert host your site
http://webhosting.yahoo.com

------------------------------ LISTA SOUJAVA ----------------------------
http://www.soujava.org.br  -  Sociedade de Usuários Java da Sucesu-SP
dúvidas mais comuns: http://www.soujava.org.br/faq.htm
regras da lista: http://www.soujava.org.br/regras.htm
historico: http://www.mail-archive.com/java-list%40soujava.org.br
para sair da lista: envie email para [EMAIL PROTECTED]
-------------------------------------------------------------------------



Responder a