PDA

Ver la Versión Completa : [Duda] Leer con comando START


Roger
19 de septiembre de 2016, 19:56
Amigos del Foro
Tengo un archivo donde la llave principal es el nombre pero esta esta en minuscula cuando pongo este codigo
MOVE NOMBRE TO DESCRIPCION-AR.
START ARTIC KEY NOT < DESCRIPCION-AR INVALID KEY
GO LEE.
LEE. READ ARTIC NEXT AT END GO FIN.

NO MUESTRA NADA.

SI LOS NOMBRES ESTAN EN MAYUSCULA SI FUNCIONA.:o

Rapinto
20 de septiembre de 2016, 00:14
Roger,
Se tentasses o start e por "invalid key" usavas o CBL_TOLOWER e fazias novo start.

CALL "CBL_TOLOWER" USING string BY VALUE length RETURNING status-code.

Pode ser que resolva.
Rui Pinto

Roger
20 de septiembre de 2016, 20:01
Rapinto
No pude hacer funcionar con el CBL_TOLOWER
asi que no me quedo otra que hacer una bucle.:llora:

Kuk
20 de septiembre de 2016, 23:37
Roger, en general no es buena idea meter en la clave alfanuméricos y además que no sean mayúsculas.

¿De qué compilador estamos hablando?

Rapinto
21 de septiembre de 2016, 00:23
Roger,
Tens que incluir a: F3BICBLR.LIB (está na pasta Programs\Fujitsu Cobol

Un saludo,
Rui Pinto

Roger
21 de septiembre de 2016, 16:54
Kuk, Rapinto
El compilador es el powercobol9, la llave principal es alfanumerica porque
es del codigo de barras internas y la llave alterna es el nombre.

Estoy leyendo el archivo por la llave alterna si pongo de comienzo a fin
sale primero ninusculas y luego mayusculas.

Pero el Start no funciona probare nuevamente con las indicaciones de Rapinto.