Darle la vuelta a un campo

[Kuk]

En RM/Cobol eso de "from length of frase" no lo puedo utilizar.

Entonces tienes que hacer un MOVE adicional.

[JCantero]

Quería aclarar.

En las últimas versiones si existe "length of" pero tengo que mantener la compatibilidad en algunas cosas y no utilizo este tipo de cosas.

[Kuk]

@JCantero, el LENGTH OF forma parte del lenguaje, o sea que no es una chuminada de MF o Fujitsu, realmente es parte del lenguaje así que la verdad es que me parece extraño que no exista en versiones incluso antiguas de RM...

[Josber]

@JCantero, el LENGTH OF forma parte del lenguaje, o sea que no es una chuminada de MF o Fujitsu, realmente es parte del lenguaje así que la verdad es que me parece extraño que no exista en versiones incluso antiguas de RM...

Bueno, nada más tienes que ver el DISPLAY " " ERASE , que comentamos hace poco, que no funciona en todos los compiladores y, yo creo que también es inherente al COBOL, se conoce que los de CODASYL, "abrieron la mano" más de la cuenta y ya no es tan compatible como debiera. si Grace Hopper, levantara la cabeza, se hacía el harakiri con el cuchillo de untar mantequilla

[Kuk]

@Josber, bueno lo de las pantallas es una historia aparte porque la compatibilidad era malísima. Pero el LENGTH OF no tiene nada que ver con el dispositivo en sí, es sólo una instrucción implicando CPU, sacar el valor de longitud de un área de memoria, nada más...

Lo que tú dices es verdad, pero en este caso es algo demasiado simple

[CHITOBLA]

Josber PERFECTO, anduvo en la primer compilación.
Te felicito por hacer un programa tan simple y tan efectivo usando lo basico del cobol para un compilador como el que tengo.
Creo que te he sacado de tu forma de escribir programas para volver a lo simple y adorable que es el COBOL basico.
TE AGRADEZCO MUCHISIMO TU TIEMPO y TU CALIDAD COMO PORGRAMADOR Y MAESTRO.
Parece que no solo yo lo disfruto y me alegro mucho haber servido de motivación para el foro con esto que no sabia por donde agarrar y enredandome con instrucciones que son para otra cosa.

Si ves el programa que tu hiciste y el que yo habia hecho en el curso con PSEINT, SON IGUALES y usamos las mismas variables.

Voy a empezar a repasar programas que desarrolle en PSEINT y llevarlos al COBOL para seguir ejercitando hasta que alguien del foro me mande algun programa que use todo el entorno grafico de otro compilador y me explique como se usa el POWER COBOL4.

Estoy muy contento y agradecido por haberme suscripto a este foro y encontrar personas tan amables, profesionales de verdad y muy buena gente.
GRACIAS.

- - - Updated - - -

Josber, me encantó tu frase "hacerse un harakiri con el cuchillo de mantequilla".
Es muy grafico y real, como se van desvirtuando las características básicas del COBOL en la competencia entre empresas queriendo hacer nuevas versiones con mas "chiches" y esto perjudica a los programadores y las empresas porque pasan de tener algo "COMUN" a tener algo propietario y luego que se las arreglen para mantenerlo.
SALUDOS.

[CHITOBLA]

Kuk, compile tu programa y FUNCIONA PERFECTAMENTE.
Es bastante distinto al que hizo Josber pero hace lo mismo, da vuelta la palabra.
Muchas gracias por tu tiempo y por enseñarme otra forma de programar mas sofisticada.
Un abrazo
Gracias.

[CHITOBLA]

JCantero, te pido disculpas porque crei que el programa me lo habia mandado JOSBERT y ahora lei bien y vi que lo hiciste tu.
Tal como le dije a Josbert, me encanta la simpleza del programa, simple, directo y consigue el objetivo con pocas lineas.
Es igual que el que escribi en PSEINT pero adecuado al COBOL.
Muchas gracias por tu tiempo y pido disculpas a ti y a Josber por haberme apurado en compilar y no leer.
Ahora tengo los 2 programas, el que me mandaste tu y el de KUK juntos (asteriscado el que no uso) para poder estudiar las diferencias que son notorias, pero ambos logran el objetivo sin problemas.
GRACIAS A AMBOS.
Un abrazo.

[Josber]

@CHITOBLA, es que el que te ha enviado @JCantero, y el que he hecho yo, son distintos, el de él es para darle la vuelta completa a una cadena y el que te he hecho yo, es para comprobar si un número es capicúa, que es totalmente distinto.

Aunque pienso como tú, el de @JCantero, es muy sencillo y funcional, tiene un 10 por mi parte.

Un salu2.-

[CHITOBLA]

Josber como te dije ayer, el principio es el mismo, ya sea una palabra o un numero, ambos son resueltos con el programa que da vuelta lo ingresado.
Ayer te mande un ejemplo del que había hecho sacado de la pagina que tu me mandaste y puse un numero que luego de que es dado vuelta puedo comparar con el numero original y si son iguales ES CAPICUAL , como por ejemplo 1234321.
Mi problema era como dar vuelta ya sea una frase o un numero y con el mismo programa puedo resolver ambas necesidades.
Hoy tengo 3 soluciones que estoy estudiando y aprendiendo para cuando me haga falta.
Muchas gracias a todos ustedes.
Un abrazo y que tengamos todos una muy buena semana.
SALUDOS