Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
  COBOL Foro > IDE-s y compiladores COBOL > COBOL - General
COBOL - General Discusiones de temática general sobre el lenguaje COBOL y todo lo relacionado con él.
Comunicados
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Información] Eejempo: convertir string binario en valor Kuk MicroFocus COBOL 0 9 de agosto de 2019 15:24
[Sintaxis] Traspasar el valor de una variable jmeza PowerCOBOL (ActiveX, v4 - v11) 2 30 de mayo de 2019 00:20
[Sintaxis] Traspaso de valor en variable entre 2 Forms jmeza PowerCOBOL (ActiveX, v4 - v11) 12 13 de noviembre de 2018 19:24
[Sintaxis] Asignar valor a una propiedad lfortuny PowerCOBOL y COM/OLE 1 22 de diciembre de 2015 10:42
[Sintaxis] Valor SHIFT+TAB Recato53 PowerCOBOL (ActiveX, v4 - v11) 3 18 de febrero de 2015 17:51
Respuesta
 
Herramientas

  #1
Antiguo 3 de mayo de 2020, 18:37
IDENTIFICATION DIVISION
Begoguay
 Junior
ENVIRONMENT DIVISION
Avatar de Begoguay
DATA DIVISION
febrero 2015
Valladolid
07.10.2021 20:30
PROCEDURE DIVISION
Posts: 58
Enviado: 74
Recibido: 9
Soluiones: 1
Reputación: 7
Begoguay is on a distinguished road
Predeterminado Máximo valor de una variable

Hola foreros.

Tengo una duda. Para inicializar una variable se puede hacer con INITIALIZE variable. ¿Existe algo parecido para mover el máximo valor a una variable?

Un saludo.

Y feliz paseo. (Para los que puedan salir)
Begoguay no ha iniciado sesión   Responder Con Cita
  #2
Antiguo 3 de mayo de 2020, 19:19
IDENTIFICATION DIVISION
Josber
 Super Moderador
Activista del Foro: Activista del Foro - Razón: Por aportar manuales y enriquecer   Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Razón: Por muchos agradecimientos 
ENVIRONMENT DIVISION
Avatar de Josber
DATA DIVISION
febrero 2015
Alicante
25.10.2021 19:41
PROCEDURE DIVISION
Posts: 598
Enviado: 274
Recibido: 296
Soluiones: 41
Reputación: 30
Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road
Predeterminado

Cita del post de Begoguay Ver Mensaje
el máximo valor a una variable
Pues sí,
Código COBOL:
  1. MOVE HIGH-VALUES TO nombre_de_variable

También puedes usar HIGH-VALUE, además, tienes LOW-VALUE o LOW-VALUES to ..., que es para mover el valor más bajo posible a una variable

Un salu2.-
Josber no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Begoguay ( 4 de mayo de 2020)
  #3
Antiguo 4 de mayo de 2020, 07:55
IDENTIFICATION DIVISION
Kuk
 Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
diciembre 2014
Madrid
36 años
25.10.2021 17:30
PROCEDURE DIVISION
Posts: 1.843
Enviado: 590
Recibido: 775
Soluiones: 95
Reputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

@Begoguay, @Josber, lleva razón.

Más info: el LOW-VALUES va a llenar el campo con X"00" y el HIGH-VALUES con X"FF".

Lo único, hay que tener cuidado con esto si el campo es un binario (COMP/COMP-4/COMP-5).



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 no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Begoguay ( 4 de mayo de 2020)
  #4
Antiguo 4 de mayo de 2020, 11:06
IDENTIFICATION DIVISION
Joseg
 Senior
Innovación: Por aportar innovaciones - Razón: Por aportar soluciones innovadoras en varias ocasiones 
ENVIRONMENT DIVISION
Avatar de Joseg
DATA DIVISION
abril 2015
25.10.2021 17:55
PROCEDURE DIVISION
Posts: 234
Enviado: 54
Recibido: 95
Soluiones: 13
Reputación: 16
Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about
Predeterminado

Cita del post de Begoguay Ver Mensaje
Hola foreros.

Tengo una duda. Para inicializar una variable se puede hacer con INITIALIZE variable. ¿Existe algo parecido para mover el máximo valor a una variable?

Un saludo.

Y feliz paseo. (Para los que puedan salir)

Código COBOL:
  1. 01 AAAA PIC 9(10).
  2. 01 BBBB  PIC X(100)

Podes usar este comando:
Código COBOL:
  1. MOVE ALL 9  TO  AAAA
  2. MOVE ALL "z" TO BBBB

HIGH-VALUES/LOW-VALUES usar com cuidado em tabelas SQL, ficheiros ISAM funciona sem qualquer problema.
Joseg no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Begoguay ( 4 de mayo de 2020)
  #5
Antiguo 4 de mayo de 2020, 17:30
IDENTIFICATION DIVISION
Begoguay
 Junior
ENVIRONMENT DIVISION
Avatar de Begoguay
DATA DIVISION
febrero 2015
Valladolid
07.10.2021 20:30
PROCEDURE DIVISION
Posts: 58
Enviado: 74
Recibido: 9
Soluiones: 1
Reputación: 7
Begoguay is on a distinguished road
Predeterminado

Y otra pregunta: ¿Hay algún comando que me permita preguntar si una variable tiene el máximo valor, o el minimo?.

Del estilo: Si 'variable' = 'maximo valor' entonces...

---------- Post añadido : 18:30 ---------- Post anterior : 18:28 ----------

Cita del post de Joseg Ver Mensaje
Código COBOL:
  1. 01 AAAA PIC 9(10).
  2. 01 BBBB  PIC X(100)

Podes usar este comando:
Código COBOL:
  1. MOVE ALL 9  TO  AAAA
  2. MOVE ALL "z" TO BBBB

HIGH-VALUES/LOW-VALUES usar com cuidado em tabelas SQL, ficheiros ISAM funciona sem qualquer problema.
De esta manera lo he hecho yo siempre, pero quería saber si se podía ir un poco más allá, para poder contemplar otros valores superiores / inferiores, por si la variable tuviera algún otro valor diferente a letras / numeros
Begoguay no ha iniciado sesión   Responder Con Cita
  #6
Antiguo 4 de mayo de 2020, 17:49
IDENTIFICATION DIVISION
Kuk
 Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
diciembre 2014
Madrid
36 años
25.10.2021 17:30
PROCEDURE DIVISION
Posts: 1.843
Enviado: 590
Recibido: 775
Soluiones: 95
Reputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

@Begoguay,

Código COBOL:
  1.       IF  VARIABLE = LOW-VALUES
  2.  
  3.       IF  VARIABLE = HIGH-VALUES



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 no ha iniciado sesión   Responder Con Cita
Han dicho Gracias: 2
Begoguay ( 4 de mayo de 2020), JCantero ( 4 de mayo de 2020)
  #7
Antiguo 4 de mayo de 2020, 18:46
IDENTIFICATION DIVISION
Josber
 Super Moderador
Activista del Foro: Activista del Foro - Razón: Por aportar manuales y enriquecer   Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Razón: Por muchos agradecimientos 
ENVIRONMENT DIVISION
Avatar de Josber
DATA DIVISION
febrero 2015
Alicante
25.10.2021 19:41
PROCEDURE DIVISION
Posts: 598
Enviado: 274
Recibido: 296
Soluiones: 41
Reputación: 30
Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road
Predeterminado

Cita del post de Begoguay Ver Mensaje
MOVE ALL "z" TO BBBB
El problema de ésta forma es que la "z", tiene el valor ASCII 122, y, por ejemplo, la "ñ", tiene el valor ASCII 164, por lo que, obviamente, éste sistema falla en cuanto tengamos una ñ, o cualquier valor superior a ASCII 122, (como por ejemplo {,},Ç,ç y otros muchos), sobre todo si lo vamos a usar para posicionarnos en un fichero, por lo que yo recomiendo LOW o HIGH-VALUES antes que éste sistema.

Un saludo.-
Josber no ha iniciado sesión   Responder Con Cita
Han dicho Gracias: 3
Begoguay ( 4 de mayo de 2020), JCantero ( 4 de mayo de 2020), Kuk ( 4 de mayo de 2020)
Respuesta


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
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



La franja horaria es GMT +1. Ahora son las 04:05.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2021, Jelsoft Enterprises Ltd.