OpenEdge ABL: Cómo definir variables y constantes

 

En otras publicaciones ya hemos hablado de éste lenguaje de programación. Sin embargo, faltó indicar indicar cómo se declaran las variables y constantes, además de como se puede asignar valores a ellas. En el post anterior vimos que podemos asignar valores con la palabra ``ASSIGN``, pero podemos omitirla. También vimos como iniciar un valor con la palabra ``INIT``.

DEFINE VARIABLE edad AS INTEGER NO-UNDO.

/* Usando la palabra clave ASSIGN */
ASSIGN edad = 30.

/* Usando el operador de asignación = */
edad = 30.

Podemos usar ``ASSIGN`` para asignar valores a las variables declaradas.

DEFINE VARIABLE RADIO AS DECIMAL NO-UNDO INITIAL 5.0.

DEFINE VARIABLE AREA AS DECIMAL NO-UNDO.

/* Declaración de la constante */
DEFINE VARIABLE PI AS DECIMAL NO-UNDO INITIAL 3.14159.

/* Cálculo del área del círculo */
AREA = PI * RADIO * RADIO.

/* Mostrar el área */
MESSAGE "El área del círculo es: " AREA VIEW-AS ALERT-BOX.

Podemos usar ``INITIAL`` para inicializar un valor en una variable y omitir ``ASSIGN``. Y también usamos la palabra ``INITIAL`` para inicializarla. En teoría una constante es una variable que no podrá cambiar de valor a lo largo del flujo del programa. En OpenEdge para declara una constante deberás usar una clase y dentro de ésta crear un campo público e inicializar el valor. Algo bastante engorroso. Aquí en este post solo simulamos crearla.

En OpenEdge existen variables de tipo:

CHAR o CHARACTER
DATE
INT o INTEGER
DEC o DECIMAL
LOGICAL

Ejemplos de declaración de variables y asignación de valores.

/* Declaración de variables */
DEFINE VARIABLE cliente AS HANDLE NO-UNDO.
DEFINE VARIABLE fechaNacimiento AS DATE NO-UNDO.
DEFINE VARIABLE esMayorDeEdad AS LOGICAL NO-UNDO.
DEFINE VARIABLE nombre AS CHARACTER NO-UNDO.
DEFINE VARIABLE precio AS DECIMAL NO-UNDO.
DEFINE VARIABLE edad AS INTEGER NO-UNDO.

/* Asignación de valores */
ASSIGN edad = 30.
ASSIGN precio = 19.99.
ASSIGN nombre = "Juan".
ASSIGN esMayorDeEdad = TRUE.
ASSIGN fechaNacimiento = DATE("1990-01-01").

CREATE CLIENTE.
ASSIGN cliente = LAST-RESULT.

Hemos aprendido cómo declarar variables y constantes en OpenEdge.

Enlaces:

https://codemonkeyjunior.blogspot.com/2024/03/openedge-abl-creando-funciones-y.html

Elixir: variables

 Elixir al igual que muchos otros lenguajes funcionales como Erlang y/o Haskell permiten ejecutar un shell para interactuar. Abrimos una terminal y tecleamos:

$ iex
Erlang/OTP 23 [erts-11.2] [source] [64-bit] [smp:4:4] [ds:4:4:10] [async-threads:1]

Interactive Elixir (1.11.2) - press Ctrl+C to exit (type h() ENTER for help)
iex(1)> entero = 23
23
iex(2)> str = "ABC"
"ABC"
iex(3)> real = 3.45
3.45
iex(4)> true
true
iex(5)> not false
true
iex(6)> true or false
true
iex(7)> false or true
true
iex(8)> true and true
true
iex(9)> true and false
false
iex(10)> rem(220,200)
20
iex(11)> div(23,10)
2
iex(12)> 23 + 65
88
iex(13)> 12 / 6
2.0
iex(14)> 

Para salir del shell(repl) debemos teclear  Ctrl + C. 

Los tipos de datos en Elixir son: Int, String, Double, Booleans...

Contrario a Erlang, no es necesario que las variables comiencen en mayúscula. Tampoco que las sentencias acaben con un punto.

variables.exs

# Variables en Elixir
entero = 45
IO.puts "Entero: #{entero}"
str = "Elixir es parecido a Ruby"
IO.puts "Str: #{str}"
mayuscula = String.upcase(str)
IO.puts "Str en mayuscula: #{mayuscula}"
verdadero = 12>5 # true
if verdadero do
  IO.puts "Esto es verdadero"   
end

Ejecutamos:

$ elixir variables.exs

Enlaces:
https://elixirschool.com/en/
https://emanuelpeg.blogspot.com/search?q=elixir