|
SORT - colar datos registro precedente
Buenos días Coboleros,
Tengo la siguiente duda respecto a si es posible o no realizar lo siguiente: Partiendo de un fichero de entrada A, cuyo formato es: tipo registro (2) + datos (n) + ID (10) Entrada Código:
01.....0000000001Salida Código:
01.....0000000001 0000000001No sé si esto se puede hacer con un paso de SORT, ICETOOL o herramienta similar. Sabría abordarlo con Easytrieve, pero estoy intentando aprender algo nuevo sobre SORT. Mil gracias de antemano a todos! Un saludo! |
Para el ejemplo que has puesto si no he entendido mal, no hace falta un sort
La fd del fichero entrada: Código COBOL:
La fd del fichero salida: Código COBOL:
La variable de working cadena tendria el ultimo leido y fs- entrada file status del fichero entrada Código COBOL:
Y ya un bucle para leer el fichero entrada hasta el final Código COBOL:
Esto es salvo error u omision, Pero eso seria la idea |
Muchas gracias por tu respuesta!
No, la cuestión es que debería hacerlo mediante la herramienta SORT, para evitar la subida de programas COBOL. ¿Se os ocurre cómo? Un saludo y mil gracias! |
"para evitar la subida de programas COBOL." ?
No entiendo lo que dices. Desarrolla el objetivo del fichero de salida. Si deseas utilizar "sort" seria un bucle parecido cambiando el write por release y luego realizar un bucle de lectura con return. Ademas meter un criterio de oden que no acabo de entender. Lo quieres hacer en cobol, en un script .bat (windows), script en linux, c, php, java, js, .... ? |
Buenas,
Lo que estoy intentando es, mediante la herramienta SORT (o ICETOOL o ICEMAN), en un paso de JCL, obtener el fichero de salida a partir del de entrada. La dificultad recae en que necesito que los registros '02' lleven la referencia correcta. Dicha referencia correcta es la perteneciente al registro '01' anterior. Pero claro, pueden existir 'n' registros 02 pertenecientes al mismo 01. Cito otro ejemplo Entrada 01.....0000000001 01.....0000000002 01.....0000000003 02.....0000000000 02.....0000000000 02.....0000000000 01.....0000000004 02.....0000000000 02.....0000000000 01.....0000000005 02.....0000000000 02.....0000000000 02.....0000000000 02.....0000000000 Salida 01.....0000000001 0000000001 01.....0000000002 0000000002 01.....0000000003 0000000003 02.....0000000000 0000000003 02.....0000000000 0000000003 02.....0000000000 0000000003 01.....0000000004 0000000004 02.....0000000000 0000000004 02.....0000000000 0000000004 01.....0000000005 0000000005 02.....0000000000 0000000005 02.....0000000000 0000000005 02.....0000000000 0000000005 02.....0000000000 0000000005 Muchas gracias! Un saludo |
@SwimPiii, no puedes hacerlo con SORT. Debes pasar por ICETOOL, echale un ojo a la documentación del mismo y busca GROUP.
ICETOOL es una herramienta hiperpoderosa, pero un tanto compleja. Mira este ejemplo, para darte una idea: [Sintaxis] ICETOOL - un ejemplo batsante potente - COBOL Foro Sobre todo esta parte: Código JCL:
Si lo quieres hacer por herramienta IBM si o si, no te queda otra. Lo que se podría hacer tambien es via varios steps de SORT, pero sería más bien una chapuza, aunque funcionar funcionaría, yo creo. Llevo tiempo sin tocar el JCL :) |
| La franja horaria es GMT +2. Ahora son las 02:05. |
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.