Hola Jone:

No se conteste en parte a este mensaje en su dia, o se perdio, por si 
acaso lo repito.

Puedes hacerte un peque�o programa ILE C que haga la conversi�n, mira 
el fuente en:

http://publib.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/QBJADR00/1.25.6?
SHELF=&DT=19960828131310

Este hace referencia a el miembro QSYSINC/MHI/CVTHC esta libreria si no 
la tienes la tienes que instalar como el producto 5722SS1 opcion 13.

Una vez tengas el literal con el valor hex en una variable. Puede 
construir todo el mandato OVRDBR en otra variable y ejecutar esta con 
un CALL QCMDEXC PARM(&CMD &LONG).

En teoria deber�a de funcionar. Saludos.

Marti Riera

----- Mensaje Original -----
De: [EMAIL PROTECTED]
Fecha: Miercoles, Septiembre 18, 2002 3:00 pm
Asunto: Procesar Archivos BD en Programas CL

> Hola Foro, hace unos d�as envi� esta pregunta y todav�a no he 
> encontrado la
> respuesta. Por favor, si alguno de Uds tiene alg�n programador cerca
> transmitanle este mensaje para ver si alguien puede contestarme a la
> pregunta.
> .......
> En el �ltimo numero de la revista NEWS 400 encontr� ejemplos de como
> situarse por clave en un archivo de datos en un progrma CL. Todo 
> bien hasta
> que prob� con un archivo cuya clave es num�rica empaquetada. Hay 
> que poner
> el valor en Hexadecimal. Muy bien, funciona:
>     OVRDBF     FILE(CALNDR01) TOFILE(AMFLIB/CALNDR01) MBR(*FIRST) 
> POSITION     (*KEYBE 1 CALNDRA X'1020911F')
> 
> Claro que de poco me sirve si el valor se lo tengo que dar como una
> constante.
> Mi pregunta es como puedo pasarle el valor de posicionamiento en una
> variable. �como defino esa variable, *CHAR o DEC? etc... �c�mo 
> convierto el
> valor que tengo a Hexadecimal?.
> Gracias, Jone Abrego
> 
> 
> 
> _____________________________________________________
> Forum.HELP400 es un servicio m�s de NEWS/400.
> � Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
> 
> Para darte de baja, env�a el mensaje resultante de pulsar
> mailto:[EMAIL PROTECTED]?body^AVE
> 



_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=LEAVE

Responder a