Cobol Foro
Navegación en el Foro
Retroceder   Cobol Foro Entornos de desarrollo y compiladores Cobol Fujitsu COBOL PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
 
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Leer dato en un archivo Json con Chilkat... Fito PowerCOBOL (ActiveX, v4 - v11) 12 7 de agosto de 2024 19:20
[Sintaxis] Comando Perform... Fito PowerCOBOL (ActiveX, v4 - v11) 8 6 de enero de 2023 22:57
[Sintaxis] Ordenar fichero con comando Sort Begoguay PowerCOBOL (ActiveX, v4 - v11) 4 14 de noviembre de 2016 10:43
[Duda] Leer archivo AcuCobol con PowerCobol Roger PowerCOBOL (ActiveX, v4 - v11) 7 28 de septiembre de 2016 10:44
[Sintaxis] Leer archivo texto con codificacion UTF-8 Recato53 PowerCOBOL (ActiveX, v4 - v11) 1 18 de abril de 2016 10:47

Respuesta

  #1
Antiguo 19 de septiembre de 2016, 19:56
Roger
Forero Activo
Última Actividad 04.02.2021 13:03
Posts Posts: 236
Likes enviados Enviados: 26
Likes recibidos Recibidos: 60
Leer con comando START
0 Inactivo Inactivo

Amigos del Foro
Tengo un archivo donde la llave principal es el nombre pero esta esta en minuscula cuando pongo este codigo
Código COBOL:
  1. MOVE NOMBRE TO DESCRIPCION-AR.  
  2. START ARTIC KEY NOT < DESCRIPCION-AR INVALID KEY
  3.        GO LEE.
  4.  LEE. READ ARTIC NEXT AT END GO FIN.

NO MUESTRA NADA.

SI LOS NOMBRES ESTAN EN MAYUSCULA SI FUNCIONA.:o
Roger is offline   Responder Con Cita
  #2
Antiguo 20 de septiembre de 2016, 00:14
Rapinto
Gran amigo del Foro
Guru de COBOL
Activista del Foro: Activista del Foro - Issue reason: ¡Gracias! Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por ayudar mucho a los foreros Guru de los Gurus: Por solidos y amplios conocimientos - Issue reason: Por saber demasiado! 
Última Actividad 29.01.2018 20:23
Posts Posts: 240
Likes enviados Enviados: 19
Likes recibidos Recibidos: 224

Roger,
Se tentasses o start e por "invalid key" usavas o CBL_TOLOWER e fazias novo start.

Código COBOL:
  1. CALL "CBL_TOLOWER" USING string BY VALUE length RETURNING status-code.

Pode ser que resolva.
Rui Pinto
Rapinto is offline   Responder Con Cita
  #3
Antiguo 20 de septiembre de 2016, 20:01
Roger
Forero Activo
Última Actividad 04.02.2021 13:03
Posts Posts: 236
Likes enviados Enviados: 26
Likes recibidos Recibidos: 60

Rapinto
No pude hacer funcionar con el CBL_TOLOWER
asi que no me quedo otra que hacer una bucle.
Roger is offline   Responder Con Cita
  #4
Antiguo 20 de septiembre de 2016, 23:37
Kuk
Administrador
Última Actividad 21.09.2026 18:24
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207

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?



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita
  #5
Antiguo 21 de septiembre de 2016, 00:23
Rapinto
Gran amigo del Foro
Guru de COBOL
Activista del Foro: Activista del Foro - Issue reason: ¡Gracias! Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por ayudar mucho a los foreros Guru de los Gurus: Por solidos y amplios conocimientos - Issue reason: Por saber demasiado! 
Última Actividad 29.01.2018 20:23
Posts Posts: 240
Likes enviados Enviados: 19
Likes recibidos Recibidos: 224

Roger,
Tens que incluir a: F3BICBLR.LIB (está na pasta Programs\Fujitsu Cobol

Un saludo,
Rui Pinto
Rapinto is offline   Responder Con Cita
  #6
Antiguo 21 de septiembre de 2016, 16:54
Roger
Forero Activo
Última Actividad 04.02.2021 13:03
Posts Posts: 236
Likes enviados Enviados: 26
Likes recibidos Recibidos: 60

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.
Roger is offline   Responder Con Cita
Respuesta


Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado

Saltar a Foro


La franja horaria es GMT +2. Ahora son las 01:14.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.