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]
-------------------------------------------------------------------------
|