Skip to main content

Estimados,

Estoy modificando sistemas en RM/COBOL hechos por otras personas, y veo algunas cosas que me gustaría corregir y mejorar.

Una de ellas es la definición de un archivo Indexado que tiene un mismo campo 4 veces definido para poder conformar 4 claves alternativas diferentes.

 

Ej. 

 

03 Clave-1.

     05 CentroCostos     Pic 9(06).

     05 CuentaContable Pic 9(12).

03  Clave-2

     05 CentroCostos2   Pic 9(06).

     05 FechaIngreso     Pic 9(08).

03  Clave-3.

     05 CentroCostos3   Pic 9(06).

     05 SubCentroCostos   Pic 9(06).

 

Como verán.. en el mismo registro se triplica el mismo campo con el mismo valor 3 veces para poder armar 3 Claves... esto atenta al largo del registro y a tener que mover 3 veces el mismo valor, o moverlo a 3 campos diferentes.

No se pueden armar registros donde el dato este 1 sola vez y luego en la SELECT se arme la Clave uniendo los campos que uno quiera ?

 

Saludos

 

Pablo Tilotta

 

Estimados,

Estoy modificando sistemas en RM/COBOL hechos por otras personas, y veo algunas cosas que me gustaría corregir y mejorar.

Una de ellas es la definición de un archivo Indexado que tiene un mismo campo 4 veces definido para poder conformar 4 claves alternativas diferentes.

 

Ej. 

 

03 Clave-1.

     05 CentroCostos     Pic 9(06).

     05 CuentaContable Pic 9(12).

03  Clave-2

     05 CentroCostos2   Pic 9(06).

     05 FechaIngreso     Pic 9(08).

03  Clave-3.

     05 CentroCostos3   Pic 9(06).

     05 SubCentroCostos   Pic 9(06).

 

Como verán.. en el mismo registro se triplica el mismo campo con el mismo valor 3 veces para poder armar 3 Claves... esto atenta al largo del registro y a tener que mover 3 veces el mismo valor, o moverlo a 3 campos diferentes.

No se pueden armar registros donde el dato este 1 sola vez y luego en la SELECT se arme la Clave uniendo los campos que uno quiera ?

 

Saludos

 

Pablo Tilotta

 

Hi:

You can use split keys in order to avoid duplicate field in records. In File Control, define the indexed keys structure of the record. ie:
Record Key Clave-1 = CentroCostos CuentaContable
Alternate Record Key Clave-2 = CentroCostos FechaIngreso
Alternate Record Key Clave-3 = CentroCostos SubCentroCostos

Greetings,

Humberto Betancur
hb4 Technologies Corp.

Estimados,

Estoy modificando sistemas en RM/COBOL hechos por otras personas, y veo algunas cosas que me gustaría corregir y mejorar.

Una de ellas es la definición de un archivo Indexado que tiene un mismo campo 4 veces definido para poder conformar 4 claves alternativas diferentes.

 

Ej. 

 

03 Clave-1.

     05 CentroCostos     Pic 9(06).

     05 CuentaContable Pic 9(12).

03  Clave-2

     05 CentroCostos2   Pic 9(06).

     05 FechaIngreso     Pic 9(08).

03  Clave-3.

     05 CentroCostos3   Pic 9(06).

     05 SubCentroCostos   Pic 9(06).

 

Como verán.. en el mismo registro se triplica el mismo campo con el mismo valor 3 veces para poder armar 3 Claves... esto atenta al largo del registro y a tener que mover 3 veces el mismo valor, o moverlo a 3 campos diferentes.

No se pueden armar registros donde el dato este 1 sola vez y luego en la SELECT se arme la Clave uniendo los campos que uno quiera ?

 

Saludos

 

Pablo Tilotta

 

Thanks Humberto !!!

Estimados,

Estoy modificando sistemas en RM/COBOL hechos por otras personas, y veo algunas cosas que me gustaría corregir y mejorar.

Una de ellas es la definición de un archivo Indexado que tiene un mismo campo 4 veces definido para poder conformar 4 claves alternativas diferentes.

 

Ej. 

 

03 Clave-1.

     05 CentroCostos     Pic 9(06).

     05 CuentaContable Pic 9(12).

03  Clave-2

     05 CentroCostos2   Pic 9(06).

     05 FechaIngreso     Pic 9(08).

03  Clave-3.

     05 CentroCostos3   Pic 9(06).

     05 SubCentroCostos   Pic 9(06).

 

Como verán.. en el mismo registro se triplica el mismo campo con el mismo valor 3 veces para poder armar 3 Claves... esto atenta al largo del registro y a tener que mover 3 veces el mismo valor, o moverlo a 3 campos diferentes.

No se pueden armar registros donde el dato este 1 sola vez y luego en la SELECT se arme la Clave uniendo los campos que uno quiera ?

 

Saludos

 

Pablo Tilotta

 

Hola Pablo,

Eso sí, vas a tener que convertir el archivo y recompilar todos los programas que lo usen.

Saludos,