Para que esto funcionara, teoricamente, tendrias que posicionar utilizando
una variable *CHAR, pero no es necesario hacer operaciones de conversion
para pasar a hexadecimal el valor para la llave...
Explico. Si el valor a buscar es 127 la variable pasa como X'127F', para
construir tu variable observa las consideraciones siguientes:
1. La longitud de la cadena debe ser siempre par, considerando una posicion
para el signo.
2. Si utilizas decimales en el campo del archivo, no consideres un espacio
para el punto en la cadena.
3. Si la longitud del campo numerico es par deberas llenar la variable con
uno o mas ceros a la izquierda.
4. La ultima posicion de la cadena representa el signo, de manera que
F=Positivo y D=Negativo
Espero sea util...
Saludos
Jesus Olague
Zacatecas, Mexico
[EMAIL PROTECTED]
Enviado por: Para: [EMAIL PROTECTED]
forum.help400-request@ cc:
combios.es Asunto: Procesar Archivos BD en
Programas CL
18/09/2002 08:00
Por favor, responda a
forum.help400
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=LEAVE
_____________________________________________________
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
