El ejemplo que vamos a ver es el más simple, donde la clave no se repite en ninguno de los ficheros, es decir, se trata de un cruce 1-1-1.
En nuestro ejemplo, el archivo principal será el número 2.
Podéis escoger cualquiera de ellos, porque lo que buscamos es que la clave existe en los tres.
La base del proceso de cruce sería:
EVALUATE TRUE
WHEN Clave1 = Clave2 = Clave3
WHEN Clave1 < Clave2
WHEN Clave3 < Clave2
WHEN Clave1 > Clave2
WHEN Clave3 > Clave2
END-EVALUATE
En cada uno de los "WHEN" escribiremos el código de lo que queramos hacer. Por ejemplo, cuando las 3 claves coincidan, escribiremos un registro en el fichero de salida.
Al inicio del programa leeremos el primer registro de cada fichero e informaremos los campos Clave1, Clave2 y Clave3:
Clave1 = 1; Clave2 = 1; Clave3 = 1.
Repetiremos el proceso hasta el final de alguno de los tres ficheros (pues si llegamos al final de alguno de los ficheros, las 3 claves ya no coincidirán):
PERFORM 3000-PROCESO
UNTIL FIN-FICHERO1
OR FIN-FICHERO2
OR FIN-FICHERO3
a) Clave1 = Clave2 = Clave3:
Realizamos las funciones necesarias. En nuestro ejemplo, escribir en un fichero de salida.Leemos el siguiente registro de cada uno de los ficheros.
Clave1 = 2; Clave2 = 3; Clave3 = 2.
b) Clave1 < Clave2:
Esto significa que la Clave1 no existe en los 3 ficheros. Leemos el siguiente registro del fichero 1 (el de menor clave).Clave1 = 3; Clave2 = 3; Clave3 = 2.
c) Clave3 < Clave2:
Esto significa que la Clave3 no existe en los 3 ficheros. Leemos el siguiente registro del fichero 3 (el de menor clave).Clave1 = 3; Clave2 = 3; Clave3 = 5.
d) Clave3 > Clave2:
Esto significa que la Clave2 no existe en los 3 ficheros. Leemos el siguiente registro del fichero 2 (el de menor clave).Clave1 = 3; Clave2 = 5; Clave3 = 5.
e) Clave1 < Clave2:
Esto significa que la Clave1 no existe en los 3 ficheros. Leemos el siguiente registro del fichero 1 (el de menor clave).Clave1 = 6; Clave2 = 5; Clave3 = 5.
f) Clave1 > Clave2:
Esto significa que la Clave2 no existe en los 3 ficheros. Leemos el siguiente registro del fichero 2 (el de menor clave).Clave1 = 6; Clave2 = 6; clave3 = 5.
g) Clave3 < Clave2:
Esto significa que la Clave3 no existe en los 3 ficheros. Leemos el siguiente registro del fichero 3 (el de menor clave).Clave1 = 6; Clave2 = 6; Clave3 = 6.
El proceso descrito se refiere al ejemplo del esquema "Curece 1-1-1 sencillo". Pero si os fijáis, lo importante al comparar las claves es leer siempre del fichero con menor clave, para ir posicionándonos correctamente sin dejar ninguna comparación por hacer.
Este ejemplo es MUY sencillo. Muchas veces cuando cruzamos 3 ficheros no buscamos los registros cuyas 3 claves coincidan, sino que puede ser que necesitemos los registros con Clave1 = Clave2 por un lado, y los registros con Clave3 = Clave2 por otro lado.
Aquí la cosa se complica (y ya no digamos si las claves se repiten n veces), porque ya no podemos hacer las lecturas en cada comparación, sino que tendremos que hacer las comparaciones necesarias en primer lugar, y las lecturas correspondientes al final del proceso.
Pero todo esto lo veremos en otro artículo : )
4 comentarios:
Buenas tardes, la verdad es que el EVALUATE evoluciona correctamente pasando por todas las posibilidades. Pero a pesar de la lógica usada, la explicación del método me obligo a hacer un estudio exhaustivo de todos los casos y su evolución.
Todo funciona correctisimamente, pero la explicación activo mi mente excéptica.
Gracias por compartir tan buenos contenidos
Gracias a ti Alba. Es un poco lioso la verdad, me alegro de que te haya valido :-)
muy bueno de verdad que si.
Muchas gracias Rafael!