No se si es tu caso. Pero te cuento. 

Segun creo el caracter “1B” es un caracter no representable. Supongo que lo que 
deseas hacer es enviarlo a alguna impresora como caracter de control desde un 
programa Cobol. 

Yo lo estoy haciendo de la siguiente manera:

En en prtf defino un campo ESCAP0 de la logitud que desees enviarle la ristra 
de datos entre ellos el “1B”. 

Y en el programa cobol mándale la ristra al campo de la siguiente manera. 

MOVE  X'031A1B2830591B28733070352E37376831322E303076307330623054' 

               TO ESCAP0.        

Al imprimir los datos te interpretara la ristra hexadecimal enviada. 

No se si es esto exactamente lo que buscas. 

Saludos 

 

 

Lluís Segura  i Rosich

Industrias Valls 1, S.A.

Avda. Balmes, 16

08700 - Igualada

Tel. 34 93 803 52 52  - Fax. 34 93 804 43 62

[email protected]

(Atención para enviar correo quitar el –antiespam)

www.puntoblanco.com <http://www.puntoblanco.com/> 

 

 

Antes de imprimir este correo piense en el medio ambiente.

Abans d’imprimir aquest correu pensa en el medi ambient.

 

                     

 

De: [email protected] 
[mailto:[email protected]] En nombre de Elvira_vazquez
Enviado el: dijous, 4 / novembre / 2010 12:45
Para: forum.help400
Asunto: Re[2]: duda

 

Agradezco las ayudas pero mi pregunta fue incompleta: como lo puedo representar 
el Cobol??

  _____  

-----Mensaje original-----
De: Àlex Corretgé <[email protected]>
A: "forum.help400" <[email protected]>
Fecha: 04/11/2010 08:49
Asunto: Re: duda

Hola, define una constante en la hoja D que se inicialice con x'1B' y trabaja 
internamente con esa constante. 

 

Z en binario? de la tabla EBCDIC o de ASCII? en un campo binario o su 
representación con ceros y unos? Si sólo quieres saber si un bit está encendido 
tienes TESTB.

 


Atentament / Kind Regards 

Àlex Corretgé 
a/e - wave: [email protected] <http://mailto:[email protected]/>  

 

 

Carrer de la Font, 2 
17142 - Verges 
Tel: +34 972 780 422 
Cell: +34 669 86 92 64 

Serveis Informàtics Corretgé.com SLU

*       http://corretge.cat/ <http://corretge.cat/> 
*       skype: corretge_com
*       LinkedIn:http://www.linkedin.com/in/corretge 
<http://www.linkedin.com/in/corretge>  
*       News:http://bloc.corretge.cat <http://bloc.corretge.cat/>  





2010/11/3 Elvira Vázquez < [email protected] 
<http://mailto:[email protected]/> > 

Hola Foreros

No se si ya estoy estupidao demasiado estresada pero tengo una duda: 

tengo que representar el valor 1B en hexadecimal y el valor Z en binario y no 
me acuerdo de como hacerlo

Me podeis ayudar

GRacias

Elvira


____________________________________________________ 
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) 
Forum.Help400 © Publicaciones Help400, S.L. 

 

  _____  

____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

<<image005.jpg>>

<<image006.jpg>>

<<image007.png>>

____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a