IBM MVS 3.8J - Instalación de KICKS (alternativa a CICS) — Transcript
Full transcript
- 0:04Hola muy buenas a todos y bienvenidos a
- 0:06un nuevo vídeo de mindframe Corner bien
- 0:09pues en este vídeo vamos a volver a la
- 0:12parte MVS
- 0:133.8j concretamente a la distribución que
- 0:17está en internet que es totalmente de
- 0:19uso legal y de uso libre y que todo eso
- 0:21opensource llamado El turn Ke System tk5
- 0:27en este caso utat 3 en otro en el pasado
- 0:30vídeo os enseñé Cómo descargaros la
- 0:31directamente y cómo ejecutarla Bueno
- 0:33pues en Este vídeo lo que vamos a hacer
- 0:35es instalar el sistema transaccional
- 0:39kicks como todos sabéis en los
- 0:41mainframes actuales tenemos el sistema
- 0:43cobol thix db2 tanto el Zig como el dv2
- 0:48Son productos licenciados y de hecho el
- 0:50zix ya era licenciado en la época de los
- 0:53años 70 cuando salió la primera versión
- 0:55de Zig comercialmente para la
- 0:57instalación de sistemas transaccionales
- 0:59en máquinas de la época Pero qué pasa
- 1:02como ya os comenté en el vídeo anterior
- 1:04la versión de MVS 3.8j es libre porque
- 1:08pues hubo un problema legal con el
- 1:10copyright en aquella época y se llegó a
- 1:13la a la conclusión legal en la que el mv
- 1:17en la que esta versión en concreto era
- 1:20una versión que estaba libre es decir No
- 1:23tienes que tener una licencia de uso por
- 1:25parte de IBM como si pasa en los
- 1:27sistemas operativos posteriores que ya
- 1:29IBM aprendido la elección que a partir
- 1:31de la versión del MVS
- 1:333.8j Como por ejemplo el MVS xa o el vm
- 1:38o el MVS esa posteriormente el os 390 y
- 1:42hasta zos Pues bueno IBM ya aprendió la
- 1:44lección y registró y licenció su
- 1:48software y y digamos que solo puedes
- 1:52ejecutarlo si dienes una licencia por
- 1:54parte de IBM pero en el caso del MVS 38j
- 1:58y sistemas anteriores Como por ejemplo
- 1:59mvt el dos 360 o el el mft Hay un montón
- 2:05de sistemas operativos que también
- 2:06podéis ver a nivel de IBM mucho más
- 2:08antiguos que son libres y como ya digo
- 2:11en este MVS 38j que ya os expliqué en el
- 2:14vídeo anterior tenemos utilidades de
- 2:16compiladores tanto de gcc como Pascal
- 2:19como algol como cobol como Rex Hay un
- 2:23montón de compiladores y programas
- 2:26aparte del del del G2 de los jcls etc
- 2:29etcétera y luego a nivel de base de
- 2:31datos tenemos Los ficheros particionados
- 2:33de toda la vida y Los ficheros
- 2:36vsam qué pasa no tenemos db2 pues lo
- 2:39explicado anteriormente el dv2 se
- 2:41licenció y por lo tanto no podemos
- 2:43instalar un db2 en nuestro sistema MVS
- 2:4738j y lo mismo pasa con el Zig el Z es
- 2:51un transaccional que también está
- 2:52licenciado y por tanto no tenemos una
- 2:55forma de instalar Zig en el en la
- 2:57versión MVS 38j al menos legalmente pero
- 3:02aquí es cuando entra la comunidad de
- 3:04programadores y sacan un sucedáneo del
- 3:08cig llamado kcks con k Así que en el
- 3:12vídeo de hoy lo que os voy a enseñar es
- 3:14Cómo descargar el kicks Cómo cargaron en
- 3:17el sistema y cómo ejecutarlo y Vais a
- 3:20ver además que es una gozada porque al
- 3:23final el entorno cobol kicks vsam es
- 3:28perfectamente factible como lo era en
- 3:31los sistemas operativos vs esa que ya os
- 3:34he enseñado en otros vídeos que al final
- 3:36el vse esa es un Zig que está por encima
- 3:40y ataca ficheros vesam ni siquiera tiene
- 3:42db2 ese sistema Por lo tanto vamos a
- 3:44retrotraen de nuevo a los años 80 y
- 3:47vamos a hacer una instalación de un
- 3:49sistema transaccional para poder
- 3:51nosotros crear nuestros programas cobble
- 3:53kicks vsam en lugar de cle fix d b2 y ya
- 3:56en un futuro si Luis Martínez tiene
- 3:59ganas porque hace falta tener ganas para
- 4:01hacer esto podemos incluso migrar la
- 4:03aplicación all asterisco que hicimos en
- 4:06los vídeos anteriores de los cursos de
- 4:07cobol para que funcionen dentro de
- 4:10nuestro sistema MVS
- 4:133.8j así pues lo primero que voy a hacer
- 4:16aquí es arrancar la máquina Le voc la
- 4:19escape para ir a la parte gráfica y el
- 4:22tk5 res es nuestro disco residente luego
- 4:25es el disco que arranca el sistema
- 4:26operativo Así que hago aquí una l de
- 4:28loaz y elijo la a para arrancar la
- 4:32dirección 390 que es la dirección de
- 4:35nuestro disco
- 4:37residente por aquí especificamos
- 4:39parámetros de sistema aquí directamente
- 4:41o podemos poner r00 clpa para limpiar la
- 4:46Impact área o no ponemos nada yo ya la
- 4:50limpié en su día así que si le doy al
- 4:52enter el sistema sigue arrancando normal
- 4:54y corriente mientras está arrancando
- 4:57vamos a ir a la página web que nos dice
- 4:58Cómo instalar el kicks
- 5:01que es esta de aquí bien los pasos son
- 5:04muy sencillos al final es Descargar el
- 5:06el lo que es el programa kcks preparamos
- 5:10un volumen para instalarlo en el propio
- 5:12volumen y luego hacemos un transmit del
- 5:15fichero xmi a nuestro
- 5:17MVS descomprimimos el contenido
- 5:21cambiando una serie de cosas por aquí y
- 5:23customizamos el acceso al kicks hasta
- 5:26llegar pues a la pantalla
- 5:29kicks así que bueno vamos paso por
- 5:32paso lo primero es vamos a descargarnos
- 5:36el kicks para ello hacemos clic sobre
- 5:38esta enlace de giap y lo desamos aquí
- 5:42kickmaster
- 5:46aquí lo
- 5:47tenemos lo tenemos aquí y ya veis que
- 5:51tenemos aquí un Kick tc versión 1
- 5:55Release 5 si vamos aquí al final es un
- 5:57fichero xmi pues Este es el que vamos a
- 6:00tener que subir a nuestro sistema MVS
- 6:02así que bueno vamos a descomprimirlo
- 6:07todo vale extraemos la
- 6:10información aquí tenemos nuestro
- 6:12kickmaster
- 6:15aquí tenemos nuestro kck
- 6:20tso y este es nuestro fichero xmi luego
- 6:24incluso aquí tenemos nuestro guía de
- 6:26usuario que que si vamos aquí al Index
- 6:29Pues nos toda la documentación de cómo
- 6:31instalar el el kcks cómo customizar lo e
- 6:34incluso tenemos programas de ejemplo con
- 6:36ficheros vesam que nos permite Pues eso
- 6:39trabajar con él como si fuera el cig
- 6:42bien dicho esto una vez realizada la
- 6:45descarga vamos a preparar nuestro nuevo
- 6:47volumen donde vamos a alojar el futuro
- 6:51entorno kcks el sistema está pensado
- 6:54también para que utilice los volúmenes
- 6:56del mv 38j pero yo ya os comenté en en
- 6:59otros vídeos y y además sabéis
- 7:01perfectamente cómo soy yo prefiero que
- 7:03el kcks tenga su propio volumen y el que
- 7:06venga por detrás que arree y que los
- 7:08datos de usuario estén en un volumen
- 7:10pero los datos de la aplicación estén en
- 7:12otro volumen totalmente diferenciados
- 7:14para que luego no hayan cristos así que
- 7:15bueno lo que vamos a hacer aquí es irnos
- 7:17a la a la línea de comandos de Hércules
- 7:20y vamos a efectuar este Comando que es
- 7:23el dust init - a kck 0. 3350 de porque
- 7:28va Vamos a crear un
- 7:30disco del tamaño 3350 con el bolser
- 7:3311111 para eso abrimos un cmd aquí lo
- 7:37tenemos entonces de aquí nos vamos a
- 7:41MVS aquí aquí nos vamos a creo que
- 7:45estaba la carpeta vale Tenemos aquí la
- 7:48carpeta Hércules pues está aquí dentro
- 7:50CD
- 7:52Hércules bien Vamos a ver qué tenemos
- 7:54aquí vale tenemos que ir a la parte de
- 7:57Windows
- 8:00de 64
- 8:03bits y aquí tenemos todos los comandos
- 8:05de Hércules que tenemos y uno de ellos
- 8:07está aquí arriba que es el ddit ya veis
- 8:10está aquí dastin
- 8:12entonces si simplemente hago aquí un
- 8:14dasit Vais a ver que pues te dice el D
- 8:19opciones fichero tipo de de dispositivo
- 8:21el modelo el bolser y el tamaño pero en
- 8:24este caso concreto pues como Tenemos
- 8:25aquí El Comando hacemos un dasit
- 8:29menos
- 8:32a que tenga cilindros
- 8:35alternos llamado kicks
- 8:390.33 que es un disco
- 8:423350 y con el bolser 111 11 y enter yaos
- 8:48ya nos ha creado el disco aquí en la
- 8:49misma carpeta de hecho si me voy ahora
- 8:51mismo la
- 8:55carpeta en la configuración
- 8:59en la carpeta Hércules Windows 64 nos va
- 9:03creado por aquí el kicks veis Aquí está
- 9:06este es nuestro disquito claro no lo
- 9:08vamos a dejar aquí vamos a añadirlo a la
- 9:10configuración dust que tenemos en
- 9:13Hércules Así que cojo me corto este
- 9:16fichero y me lo dejo en dust donde está
- 9:19el resto de los discos Así que lo pego
- 9:22aquí y ahí
- 9:24está lo siguiente que vamos a hacer
- 9:27ahora que ha arrancado todo el sistema
- 9:29Tenemos aquí el ya tenemos aquí la
- 9:32consola y aquí tenemos nuestro
- 9:34tso vamos a hacer un vamos entrar con el
- 9:37usuario
- 9:41er01 además si yo tengo la pantalla
- 9:44en 2% 2% 32 Me he acostumbrado a usarla
- 9:49Así que es una gozada porque entra mucho
- 9:52más en la pantalla meto la contraseña
- 10:00ya estamos en nuestro ispf Por qué entro
- 10:03aquí porque quiero ver el los tipos de
- 10:05disco que tenemos activos y los tipos de
- 10:07disco que tenemos libres para poder
- 10:09utilizar cómo veo eso pues si me voy a
- 10:11la m de tso applications hay uno que es
- 10:14el Im que es el imon 370 es un monitor
- 10:18del
- 10:19sistema Entonces si vamos al imon con la
- 10:22opción
- 10:233 venimos aquí a nuestro interactive
- 10:27monitoring program for mv s370 Y si
- 10:30vamos a la opción d es input output
- 10:32device monitor si vas aquí y aquí se
- 10:35listan todos los discos ad si damos
- 10:37enter ya veis que de vez en cuando va
- 10:40saliendo
- 10:41pues ior rate como por ejemplo veis aquí
- 10:46porque ahora mismo el sistema está en
- 10:48uso y los discos que están aquí son los
- 10:49discos que están publicados Y pues
- 10:51tenemos el spull tenemos el los feers de
- 10:54paginación etcétera pues vamos a ver a
- 10:56ver qué tipo de discos Tenemos aquí que
- 10:57sean 3350 porque veis Que aquí hay una
- 11:00mezcla de
- 11:013390 3350 por aquí más abajo si lamos f8
- 11:05Ah vale es una única pantalla Y por
- 11:08último Tenemos aquí
- 11:103390 entonces veis Que aquí hay una
- 11:13ristra de discos que son 3350 que
- 11:16empiezan en el 340 y acaban el
- 11:19340b pues vamos a asignar el 340 c a
- 11:24nuestro disco kicks para ello lo que
- 11:27vamos a hacer es vol volvernos a la
- 11:30página web Y tenemos aquí otro comandito
- 11:32que hacemos el attach aquí por ejemplo
- 11:36está poniendo la dirección 351 Porque
- 11:38será otra configuración de un i odf pero
- 11:41el I odf que tenemos aquí el 351 bueno
- 11:44está libre pero no sé yo si es un 3350 o
- 11:47sea yo yo personalmente voy a seguir la
- 11:50el orden y vemos aquí que el siguiente
- 11:53disco es el 34c porque el 34b es el que
- 11:56está ocupado ahora con el catálogo de
- 11:57Los ficheros fuente así que sin más voy
- 12:00a hacer lo mismo voy a entrar ahora esto
- 12:03lo voed a cerrar porque ya no entramos
- 12:04para nada en el ms2 y me voy al Hércules
- 12:07y en el Hércules hay un comando que es
- 12:10el attach Si volvemos aquí a la página
- 12:12web y ahora pongo el Hércules V que
- 12:15tenemos attx 351 a 3350 das Kick 0 3350
- 12:20pues hacemos esto lo que va a hacer es
- 12:22de forma dinámica va a Añadir el disco
- 12:26al sistema Hércules Así que hacemos un
- 12:28attach
- 12:30del
- 12:3234 c recordar que el siguiente es el
- 12:3734c porque aquí está el 34b ocupado
- 12:42obviamente
- 12:44y vamos a
- 12:48poner
- 12:50kicks
- 12:510. 3350 Ah perdonar attach 34c el tipo
- 12:57que es el 33 50 de dónde de dust barra
- 13:03kx
- 13:053350 bien pues si damos al
- 13:09enter lo acaba de detectar ya veis ck
- 13:12filas model 350 modelo 1 tiene 560
- 13:15cilindros 30 cabezas etcétera si yo hago
- 13:18Ahora aquí un display u coma coma coma
- 13:22340 podemos ver una lista de los
- 13:25dispositivos que tiene definidos
- 13:26Hércules Así que vamos a comprobarlo
- 13:30bien Aquí está el 341 342 un un
- 13:35Forward
- 13:36467
- 13:39forw 89 AB que es el último
- 13:44forw veis que c d e y F están offline
- 13:48pero también son del modelo
- 13:503350 así que ya sabemos cómo está el
- 13:54tema el Hércules Sí podría ver el disco
- 13:57que acabamos de crear 34
- 14:00Entonces qué es lo que vamos a hacer
- 14:02para que en el siguiente arranque ya
- 14:04coja siempre el disco por defecto nos
- 14:06vamos de nuevo a la carpeta
- 14:11dmvs 38j el turn 5 y de aquí nos vamos a
- 14:16la configuración conf y de aquí vamos a
- 14:19tk5 cnf le vamos a usar el block de
- 14:23notas y esto nos el bloc de notas y Aquí
- 14:25vamos a
- 14:27Añadir ve que tenemos figuraciones
- 14:30diversas el disco
- 14:33034 c como
- 14:393350 que es está en dust
- 14:43barra
- 14:45kicks
- 14:470. 3350 ya con esto salvado en el
- 14:51siguiente arranque del MVS 38j ya nos
- 14:55añadirá el disco por defecto Así que una
- 14:58cosa hecha bien qué es lo que tenemos
- 15:00que hacer ahora pues tenemos que antes
- 15:02de poner el disco online lo tenemos que
- 15:05inicializar tenemos que crearle la vt el
- 15:08los índices etcétera para ello Tenemos
- 15:11aquí ya ya veis un jcl a tal efecto que
- 15:15ahora mismo control c me lo
- 15:17copio
- 15:19y vuelta a mi sesión salgo de aquí
- 15:23porque ya no necesito tener nada más y
- 15:253.4 me voy a
- 15:27mi
- 15:2901 y aquí tenemos tengo mis dataset de
- 15:32trabajo entre ellos tengo el dataset
- 15:35er01 test. cnl si entro en él con un
- 15:39edit tengo ahí un import cbt que es
- 15:42cuando importamos los catálogos del cbt
- 15:44y tal pues voy a hacer un
- 15:46s
- 15:50init kicks
- 15:52init que sean de ocho caracteres y que
- 15:55no hay ningún
- 15:56problema y esto me va a crear Pues un
- 15:59fichero en blanco en el que ahora mismo
- 16:01haciendo un edición
- 16:04pegar Me copie el jcl que acabamos de
- 16:08copiarnos de la página web Aquí también
- 16:10voy a hacer una cosa voy a hacer Voy a
- 16:12editar el jcl para Añadir un notify
- 16:16igual a dó sis
- 16:20uid y por otra parte vamos a cambiar
- 16:23aquí en algunas cosas porque no es la el
- 16:26la dirección 351 sino la 34 c verify 11
- 16:31bolit k0 Owner hercules el resto de los
- 16:34parámetros los dejamos tal cual Así que
- 16:36con esto hacemos
- 16:38un submit bueno primero vamos a hacer un
- 16:41save y así guardamos nuestro nuestro jcl
- 16:45y hacemos un submit sub vale
- 16:49submit Y aquí en la consola nos aparece
- 16:53responder u para alterar el volumen 34c
- 16:56si no t pues hacemos un
- 16:5900 coma
- 17:03u ves ya ha terminado el icd sf y aquí
- 17:08si le damos al
- 17:10enter trabajo terminado con concod 00 o
- 17:14sea que ha ido bien Cómo podemos además
- 17:17Ver el resultado del Job pues muy
- 17:19sencillo el propio rfe que es el
- 17:23sustituto del clon del ispf en esta en
- 17:26este entorno lo que
- 17:29tiene es una gozada Y es que si me voy
- 17:31aquí a la opción o out list podemos ver
- 17:35todos los trabajos que hemos sometido y
- 17:37deberíamos de ver nuestro trabajo del
- 17:39del del icsf que ha terminado bien Así
- 17:42que hacemos un 8 out list y aquí tenemos
- 17:44la lista de trabajos esto es viene a ser
- 17:46muy parecido al sdsf y aquí tenemos
- 17:49nuestros icd sf y con una s vemos su
- 17:52interior veis aquí se ve la consola lo
- 17:55que nos ha preguntado lo que hemos
- 17:57contestado y aquí tenemos el las
- 17:59estadísticas del Job el
- 18:01jcl y lo que ha hecho el sistema veis
- 18:06Por eso me gusta tener la pantalla en
- 18:0827.32 porque aparece toda la longitud
- 18:11del carro de impresión aquí y la podemos
- 18:14ver perfectamente online sin tener que
- 18:16hacer como hacíamos antes imprimir el
- 18:19contenido en un PDF con el rprt y verlo
- 18:23en un navegador entonces aquí ya lo
- 18:24estamos viendo pues como si esto fuera
- 18:26un un sdsf
- 18:29ya veis que ha acabado en
- 18:30cero Así que a partir de este momento
- 18:34podemos perfectamente volver a nuestra
- 18:36consola y hacer un bar del del volumen
- 18:4134c coma
- 18:45online y ya tenemos nuestro nuestro
- 18:48entorno online dicho esto continuamos
- 18:51con el tutorial si es muy fácil ya hemos
- 18:54hecho el Bari Ah y vamos a montar
- 18:56también el volumen como privado copiamos
- 19:00El Comando nos vamos a la consola
- 19:03pegamos El Comando aquí no es el 351
- 19:06sino el
- 19:0734
- 19:10c y ya está montado vamos a ver si ahora
- 19:15sale los datos en el Im o no salen Ya
- 19:19está ya veis que aquí está ya tenemos el
- 19:21volumen montado y ya se ve exactamente
- 19:24como como el volumen se llama Kick 0 y
- 19:27está está en modo private
- 19:29reser etcétera bien ya tenemos el disco
- 19:34libre para poder grabar la información
- 19:37en él para ello De hecho si hacemos un
- 19:393.4 y vamos al
- 19:42disco
- 19:46x0 te dice que no hay ningún dataset
- 19:49está totalmente vacío así que bueno
- 19:52seguimos el
- 19:54tutorial aquí nos está diciendo Bueno
- 19:56aquí ya hemos editado nuestra
- 19:58configuración de Hércules para que el
- 19:59nuevo volumen dust se esté online
- 20:02siempre que arranquemos a partir de
- 20:03ahora el Hércules y vamos a entrar en la
- 20:05s1 plip a la bat lst 00 para hacer que
- 20:10este Comando de montaje privado sea
- 20:12permanente Así que hacemos lo mismo nos
- 20:16vamos a la a
- 20:18nuestra consola y hacemos un 3.4
- 20:23Buscamos por sis
- 20:251.pm lip borrando esto de abajo aquí
- 20:28tenemos la par de nuestro sistema
- 20:30operativo entramos en ella con un
- 20:31browser y buscamos el B list que está
- 20:34aquí Lo editamos bueno aquí hay dos B
- 20:38list aquí tenemos cbt paj tal vamos a
- 20:41ver igual es la bist 01 vale aquí están
- 20:45todos los volúmenes entonces aquí
- 20:47añadimos otro con un insert y añadimos
- 20:51tal cual lo que nos aparece
- 20:55aquí k0 0 2 etctera con los parámetros
- 20:59del B list que no voy a entrar entr
- 21:01ahora a explicar porque si no se nos
- 21:02haía un vídeo enorme Así que lo dejo así
- 21:05esto lo voy a poner un poquito
- 21:10tabulado y ya tenemos nuestro B list
- 21:13editado f3 editado vamos a ver si en la
- 21:16iasis Cuál es el B que utiliza en la
- 21:19iasis 00 que está aquí vamos a ver si
- 21:22hace referencia a que bat list para
- 21:25saber si es la cer o la un si he editado
- 21:27bien o he editado mal
- 21:30vale es la
- 21:3200 así que Entonces tenemos que editar
- 21:35también la batl 00 para ello
- 21:41editamos la
- 21:4300 pero vamos a hacer un poquito lo que
- 21:46están diciendo aquí vale wordp poner
- 21:49aquí insertar y aquí pego lo de lo de
- 21:53antes
- 21:59y así que no haya ningún
- 22:02problema cierro y ya en el siguiente
- 22:05reinicio de MVS el volumen debería de
- 22:08montarse ya en modo eh privado y tal no
- 22:12vamos a hacer un reinicio porque como
- 22:15todo esto es online lo podemos hacer
- 22:17durante la marcha Cuál es lo siguiente
- 22:19que tenemos que hacer o sea vamos a
- 22:20crear un catálogo solo para todos los
- 22:23datos del C y los datos de usuario del C
- 22:26del kx en este caso así que nos copiamos
- 22:29esto control c y nos vamos a
- 22:35nuestro
- 22:37dataset vamos a buscar por erc
- 22:4001 aquí en nuestro ctnl editamos y
- 22:45hacemos Un s
- 22:48Cut
- 22:49kicks y
- 22:52pegamos
- 22:54edición pegar aquí nos entra todo bien
- 22:59no podemos ejecutarlo tal cual bueno
- 23:01primero Porque además quiero aquí poner
- 23:03coma notify siempre @ si
- 23:09suid yo vosotros no no sé vosotros pero
- 23:12yo me siento un poco desamparado si
- 23:14lanzo el Job y luego no me no me dice si
- 23:17ha ido bien o mal y tengo que andar
- 23:18buscándole los las salidas Así que
- 23:21prefiero hacerlo así bien lo primero que
- 23:23tenemos que mirar aquí es que al definir
- 23:26el user catalog que se va Kick 0 dentro
- 23:30del volumen Kick 0 hay que definirlo
- 23:33sobre el catálogo maestro pero claro el
- 23:34catálogo maestro de esta distribución no
- 23:37se llama así entonces tenemos que mirar
- 23:39cómo se llama cómo se llama pues bueno
- 23:41vamos a hacer una cosa si yo aquí con f2
- 23:45parto la pantalla esto es como en el
- 23:47ispf Así que si yo ahora entro de nuevo
- 23:50en las teso Apps y me voy al tres al
- 23:53monitor hay un sitio por aquí abajo que
- 23:56te dice dónde están los catálogos y
- 23:59vamos a mirar y aquí en la opción B bldl
- 24:03an lpa Search display nos tiene que
- 24:05aparecer los catálogos efectivamente
- 24:07aquí Tenemos veis aquí tenemos nuestro
- 24:09catálogo de maestro que es s1 mcat tk5
- 24:13que está en el volumen tk5 Cat y por
- 24:16otra parte tenemos dos dos catálogos de
- 24:19usuario que es el ucat tso y el ucat tk5
- 24:23Entonces vamos a copiarnos el mcat
- 24:26tk5 y con f9 volvemos aquí y quitamos
- 24:31esto de aquí y lo pegamos tk5 y todo
- 24:34esto
- 24:37fuera De igual forma el alias también
- 24:40hay que definirlo en el catálago maestro
- 24:42Así que cogemos esto pegamos aquí
- 24:45tk5 y el resto
- 24:49fuera bien pues ya tenemos kcks kicks
- 24:53Las pistas tracks creamos el catálogo
- 24:56asociado al catálogo maestro y definimos
- 24:58el alias kicks para el catálogo maestro
- 25:01para que así las búsquedas sean
- 25:04directamente hechas por catálogo Así que
- 25:07salvamos y
- 25:09ejecutamos
- 25:11submitted y conco de
- 25:15cero vale como sabemos con f2 hacemos un
- 25:223.8 y comprobamos que aquí nuestro
- 25:26idcams con un s aquí tenemos nuestro
- 25:30proceso de alocación Del catálogo y cómo
- 25:33ha terminado bien veis que se ha creado
- 25:36el catálogo usuario con cero se ha
- 25:38creado el alias con cero Total que todo
- 25:40el trabajo ha acabado en cero Muy bien
- 25:42pues estupendo Vale salimos de aquí
- 25:45f3 y ya tenemos nuestro catálogo del
- 25:49kicks
- 25:51creado siguiente paso Vamos a subir el
- 25:55kcks tso al MVS cómo lo hace
- 25:59Pues hay varias maneras Aquí hay una que
- 26:01te que lo hace por batch pero vamos a
- 26:03hacerlo por terminal es muy sencillo
- 26:05Mira venimos aquí a nuestro terminal y
- 26:09yo me voy aquí
- 26:10a lo primero de todo hay que irse a la
- 26:13opción de
- 26:14tso es decir a los comandos de tso a la
- 26:17opción se y aquí si nos hacemos un
- 26:22acciones enviar archivos al sistema
- 26:25principal no enviar archivo pues
- 26:26examinamos y nos tenemos que ir aquí a
- 26:29descargas kickmaster kickmaster y Kick
- 26:34tso v1 R5 xm le damos aquí aceptar y
- 26:38tenemos que primero antes comprobar que
- 26:41es en modo
- 26:43binario pero no me gusta a ver cómo está
- 26:47definido Esto vale MVS tso transferencia
- 26:52binaria vale es que pone variable no
- 26:55tiene que ser fijo con un blocaje de 80
- 26:58esto siempre cilindros etcétera y así ya
- 27:02aceptar Ah bueno Vale entonces tengo que
- 27:05poner aquí uno nuevo que se llame binary
- 27:0880 para así diferenciarlo del binario
- 27:11normal y así no nos deje ya está
- 27:13Entonces ahora Aquí sí que le digo que
- 27:16lo suba como binario de 80 esto es muy
- 27:19muy importante porque si no el fichero
- 27:21xm se desbar ajusta y no se puede y no
- 27:25se puede subir Así que dicho esto Aquí
- 27:27vamos a
- 27:29decirle xmi o sea vamos a
- 27:33hacer
- 27:36kicks
- 27:39xmi binary 80 y ahora actualizar en la
- 27:43lista Vale entonces ahora que está en 80
- 27:45vamos a ver si lo podemos
- 27:54enviar recordar que para enviarlo
- 27:57siempre tenemos que estar en
- 27:58la pantalla del tso commands si no
- 28:01fallaría
- 28:06eh Así que bueno Pues si pincho
- 28:12aquí recupero el El Comando pero ya no
- 28:16se llama ahora se llama simplemente
- 28:19kicks xmi
- 28:29vale le damos al
- 28:32enter Y esto es esto es como hacer un un
- 28:35zip está descomprimiendo todo el
- 28:39contenido de ese dataset Así que se ha
- 28:43creado un dataset llamado er01 kcks v1
- 28:47R5 Big pds pues ya está enter Vale pues
- 28:50Ahora vamos a comprobar que realmente
- 28:52está ya tenemos aquí un Hércules aquí
- 28:54tenemos el Big pds Y si vemos aquí con
- 28:58un os con un browser podemos ver todos
- 29:01estos son ficheros también xmi
- 29:02comprimidos Pero tenemos un fichero que
- 29:05se llama v1 R5 que es un jcl que
- 29:08descomprime todo pues siguiendo el
- 29:14manual myy 29 miembros ta ta ta ta hay
- 29:18que editar el miembro v1 R5 m0 y hacer
- 29:22una serie de cambios Vale entonces vamos
- 29:25a poner la pantalla un poquito más
- 29:27pequeña para poder tener tan Eh bueno no
- 29:31tan pequeña porque si no no veis un
- 29:34[ __ ] Vale entonces vamos a entrar
- 29:36Primero aquí en 1 R5 con un edit lo
- 29:40primero de todo aquí poner lo mismo Aquí
- 29:42voy a Añadir una línea adicional que
- 29:48ponga notify igual
- 29:51a sis
- 29:54uid y aquí una coma de continuación
- 29:58porque si no catac croc bien dicho esto
- 30:01aquí lo primero no está diciendo bueno
- 30:03eh region tal nos está diciendo que
- 30:06tenemos que Añadir aquí un uno como
- 30:09número de accounting pues lo añadimos
- 30:15clase nos da igual que sea la clase o la
- 30:18clase C en este caso porque tenemos
- 30:19todas las clases abiertas Así que aquí
- 30:21añadimos ponemos un insert y ponemos
- 30:24coma uno y cerramos eh tenía que ser
- 30:29perdonar tenía que ser antes aquí
- 30:33insertamos
- 30:35uno y
- 30:37coma r Kick tal mage Level
- 30:4311 region 496 etcétera Luego vamos a
- 30:47Añadir una J lip para que utilice el el
- 30:52reive de forma en forma batch porque
- 30:54aquí llama el reive pero no sabemos si
- 30:56el re está metido o no está metido en la
- 31:00lista de librerías así que por si acaso
- 31:03añadimos justo después del
- 31:06Job Así que añadimos aquí un insert y
- 31:10añadimos
- 31:11tacacata y ponemos jli
- 31:17que
- 31:21dd disp igual
- 31:25shr coma
- 31:28dsn = a
- 31:32sis c
- 31:35punto
- 31:37link
- 31:40le y con eso ya tenemos la biblioteca de
- 31:43linkli con el recib y tal recordar esta
- 31:48biblioteca la debemos la tenemos Porque
- 31:51en el vídeo anterior os expliqué Cómo
- 31:53importar los el volumen s cpk con todas
- 31:56las utilidades y y compiladores y la
- 31:59madre del cordero que tiene la
- 32:00distribución de MVS 38j Así que es
- 32:03importante que por si acaso la añadamos
- 32:05Aquí bien lo siguiente que vamos a hacer
- 32:07aquí es cambiar el uid del procedimiento
- 32:11poit ya veis que es complicado pero hay
- 32:13que ir paso por paso Eh hay que cambiar
- 32:15el uid del procedimiento de er01 a kxs
- 32:19Así que aquí en el rcv del procedimient
- 32:23este este Proc de aquí hay que quitar
- 32:25esto y hay que poner en su lugar
- 32:28kcks y este uno
- 32:31fuera luego el xií que está
- 32:36aquí nos pide también cambiarlo y hay
- 32:39que
- 32:40poner
- 32:42kicks v5 v1 R5 m0 y el Big y el Big pds
- 32:49lo dejamos tal cual porque así es como
- 32:50se llama así es como lo hemos llamado
- 32:52realmente se llama así se llama
- 32:58Así que vamos a a quitar esto veis que
- 33:01aquí sale en azul porque no encuentra
- 33:03nada raro Así que vamos a dar aquí un
- 33:06poco de de cancha para poder pegarlo si
- 33:09que se nos sobreescribe nada vale Ahora
- 33:13sí bien Si de repente ponemos el dataset
- 33:17y aparece en subrayado es que lo ha
- 33:19encontrado es que existe Así que esto es
- 33:21una ayuda que fijaos el ispf de la
- 33:24versión zos no tiene Así que eso está
- 33:27muy bien vale lo siguiente después del
- 33:30del xitin nos pide que hay que Añadir el
- 33:34bolser Al sis2 que está aquí Ah claro
- 33:37porque aquí lo metería donde le diera la
- 33:40gana Así que lo que vamos a hacer aquí
- 33:43es Añadir en lugar donde pone si unit si
- 33:47salde
- 33:48a añadimos b igual a ser igual a K 0 Y
- 33:56de esa forma y ojo siempre la coma eh Y
- 34:00de esa forma nos aseguramos que todo lo
- 34:02que descomprima se va a ir a nuestro
- 34:05volumen recién creado kck c0 si no se
- 34:07iría a instalar en volúmenes públicos en
- 34:10la pu 00 o donde fuera cosa que no
- 34:13queremos Así que una vez hecho esto
- 34:16hacemos un
- 34:19save creo que no hay que tocar nada más
- 34:21dejarme que repase un poco
- 34:24esto no ya está esto ya lo hace todo él
- 34:29así que nada hacemos un
- 34:32submit lo pongo en grande y
- 34:36enter
- 34:40subsitio bueno hemos tenido aquí algún
- 34:43problema ha hecho una Benz sist 047 a
- 34:47ver qué es lo que ha
- 34:48pasado vamos a
- 34:51ver algo nos hemos equivocado bien aquí
- 34:54tenemos nuestra salida de
- 34:57a ver qué es lo que estaba dando aquí
- 35:00vale Aquí está el
- 35:09trabajo
- 35:24mensaje no has ejecutado ninguna de
- 35:28estas Y si le quito este J
- 35:31lip qué hará
- 35:36vale
- 35:43sub no me lo puedo creer el el y parece
- 35:47que está bueno y bueno como podéis ver
- 35:50ha terminado en con code cero así que
- 35:53tenemos todo ya
- 35:56instalado bien he hecho unas
- 35:58modificaciones vale para que podamos ver
- 36:00la salida primero msg Class x y por otro
- 36:04lado lo que decía que había que Añadir
- 36:08en la el J lip Este no es necesario al
- 36:12menos en el tk5 no es necesario así que
- 36:16bueno ya tenemos todo todo descomprimido
- 36:19por tanto ahora se hacemos f3 aquí y f3
- 36:22aquí podemos perfectamente cargarnos con
- 36:25un delete esto y
- 36:29esto del información y d información
- 36:34todo borrado así que ya volvemos a dejar
- 36:36la la
- 36:38máquina sin cosas por ahí sueltas pero
- 36:41si ahora hacemos un
- 36:43kicks veis que tenemos todo
- 36:45descomprimido en nuestro volumen Kick
- 36:47c0o como era lo que queríamos hacer
- 36:49Bueno pues ya tenemos el germen del
- 36:53programa hecho pues continuamos con el
- 36:55con el tutorial aquí Aquí hay una cist
- 36:58que lo que hay que hacer es llamarla al
- 37:02Aquí hay una cist que es la que usamos
- 37:04la ikj acnt que en este caso concreto
- 37:07nuestro MVS no tiene esa Cuál es la que
- 37:11tiene
- 37:13esta isp logon Entonces tenemos que
- 37:17buscar la isp logon y hacer dos cosas
- 37:21primero comprobar que está en la1 prp y
- 37:25hay que hacer una serie de
- 37:26modificaciones para para Añadir El
- 37:29Comando kicks como otro Comando más de
- 37:31tso para que podamos lanzar el kicks
- 37:33desde nuestro terminal para ello lo que
- 37:35hacemos editamos nuestra proclip pero
- 37:38ojo no es la ijac cnt tenemos que
- 37:42cambiar el parámetro dam member
- 37:45a64 Entonces como nuestra nuestra prak
- 37:49es la isp logon hacemos una búsqueda tan
- 37:52fácil como hacer un 3.4 de la sis un.pr
- 37:56lip
- 37:59entramos en ella con un brower y
- 38:01buscamos nuestra
- 38:03isp
- 38:07logon Aquí está nuestro isp logon y
- 38:10vamos a entrar con un edit y vamos a
- 38:13mirar Ah mira ya está dinam 64 pues Oye
- 38:17ese paso no lo tenemos que hacer está
- 38:19perfectamente realizado ya así que esto
- 38:22no hay que cambiarlo y con eso cambiado
- 38:24que no hemos modificado nada lo que
- 38:26tenemos que hacer es Omar el para
- 38:28nuestro usuario para ello lo que vamos a
- 38:30hacer es el usar el comando profile
- 38:33dentro de nuestro tso para ello salimos
- 38:36de aquí que aquí no hay que tocar nada
- 38:39vamos a la al comando al ready y hacemos
- 38:43un
- 38:44profile
- 38:47prefix
- 38:49kicks por qué porque vamos si lo escribo
- 38:52bien Mejor Ahí está porque vamos a
- 38:56entrar con el usuario kicks que es el
- 38:58que tiene la customización de nuestro
- 39:00entorno kicks Así que damos aquí al
- 39:04enter Ya está ya estamos con el perfil
- 39:09kicks y lo siguiente que tenemos que
- 39:11hacer es ejecutar una celist que está
- 39:18aquí Así
- 39:20que vamos a nuestra pantallita lo
- 39:23ponemos un poquito más pequeño para que
- 39:24podamos copiar bien y hacemos una
- 39:28abrimos comilla simple kcks punto kcks
- 39:39sis punto v1
- 39:42R5
- 39:44m0
- 39:46cist
- 39:49kfix y
- 39:52enter bien aquí tenemos nuestra
- 39:54customización del kicks para ello lo que
- 39:56nos va a decir es que tenemos que hacer
- 39:58enter hasta entrar al posible High Level
- 40:01qualifiers el que tenemos que elegir es
- 40:04el el hlq kicks no el usuario 01 que
- 40:07viene por defecto Así que hacemos esto
- 40:11entramos con un entramos Aquí hacemos un
- 40:14enter ves el userid
- 40:18es01 el prefijo es kicks inst hlq Will
- 40:23be kicks If This is not enter to c
- 40:28through the list or type no to quit
- 40:30Bueno Este es el el equipo Así que si
- 40:33deos otra vez al enter nos va a decir si
- 40:35es esto lo que queremos hacemos un Yes
- 40:37pues hacemos un
- 40:42Yes y ya ha hecho la customización y
- 40:45hemos acabado ahora lo que hacemos Es
- 40:48cambiar nuestro prefijo a no prefix
- 40:51profile no prefix para no tener el
- 40:54prefijo de kicks por delante
- 40:58y y estar otra vez en la configuración
- 41:00de tso normal y corriente que aquí viene
- 41:04esto Bueno aquí tenemos entornos de
- 41:07prueba que ya están hechos con cobol
- 41:09kicks vsam para ello Nos vamos aquí de
- 41:12nuevo al
- 41:14ispf
- 41:18isf y Aquí vamos al 3.4 y nos vamos a la
- 41:22parte de
- 41:25kicks aquí tenemos todos estos datasets
- 41:27y hay que buscar uno que es kicks
- 41:31kcks v1 R5 m0
- 41:36inl kicks kcks insp aquí Este es nuestro
- 41:40dataset Así que entramos aquí con un
- 41:43brows Y tenemos tres jcls estos tres
- 41:47jcls son una carga de una gestión de
- 41:51clientes de un tal murach otra carga de
- 41:55otra de una aplicación antigua y otra
- 41:58carga de otra aplicación cob que era cob
- 42:01six vsam para ver cómo se ejecuta
- 42:04perfectamente en el kicks Así que vamos
- 42:07por la primera hay que hacer algunas
- 42:09ediciones porque los paces hay que
- 42:10cambiarlos así que hacemos una e porque
- 42:13Claro si no ponemos nada Al final todo
- 42:15lo que se vaya a crear aquí se va a
- 42:18crear en unos discos Como por ejemplo pu
- 42:21002 y Mira vamos a meter todo dentro del
- 42:24mismo volumen del kicks
- 42:27Así que para ello lo que vamos a hacer
- 42:29lo primero la clase C la cambiamos por
- 42:32clase
- 42:36a mensaje Class a lo cambiamos por la x
- 42:40aquí la región está bien pero voy a
- 42:43Añadir mi jcl mi línea de jcl preferida
- 42:48que es barra barra
- 42:53notify igual a s
- 42:57para estar enterado de lo que pasa bien
- 43:00entonces lo que una vez hecho esto
- 43:02Ah también hay que añad
- 43:06aquí un
- 43:12uno así el número de Counting vamos una
- 43:17vez hecho esto ya nos vemos aquí nos
- 43:19vamos a la parte
- 43:20de eso que borra aquí va a crear aquí
- 43:25aquí lo que va a hacer es crear un vsam
- 43:28con los datos de los clientes pero vamos
- 43:31a ponerlos en el volumen
- 43:35kicker Data Index Aquí también vamos a
- 43:42poner kck c como
- 43:44volumen
- 43:46correcto vamos a ver aquí que no se nos
- 43:49pase nada Define cluster Kick
- 43:540 o hacemos un change Perdón un change
- 43:58de puff 002 por kck 0 all me lo tiene
- 44:03que cambiar todo veis ya me lo ha
- 44:06cambiado
- 44:07aquí
- 44:11f8 aquí la carga la carga de los de los
- 44:14datos
- 44:17klo Y aquí Esta es una repro de datos
- 44:22que que nos lo meterá en el vsam vale
- 44:26aquí y también
- 44:30cile Aquí también repro que no se nos
- 44:34pase ningún volumen por
- 44:36aquí
- 44:38no tal aquí hay más datos de V
- 44:42sanes es Esos son todos
- 44:45repros vale también eso también está
- 44:48aquí Def alternate
- 44:51Index volumen Kick muy
- 44:55bien ha hecho cambio completamente y ya
- 44:58está Entonces ahora si hacemos aquí un
- 45:00sub lo que va a hacer es cargar los
- 45:03datos de trabajo de aplicación de murach
- 45:07que yo os enseñaré luego cuál es así que
- 45:09sub
- 45:12subiti y acaba en cero perfecto pues una
- 45:15cosa menos vamos a cargar el siguiente
- 45:18hacemos lo mismo aquí añadimos primero
- 45:22el
- 45:24accounting Class
- 45:27qué ha pasado
- 45:30aquí
- 45:32Ah el s no funciona vale Class a message
- 45:37Class x message Level tal y como es
- 45:42menester y os lo recomiendo a todos
- 45:45añadimos
- 45:46barra
- 45:49barra
- 45:50notify ig a
- 45:53ampersan
- 45:55sisid por si todo casca y aquí lo mismo
- 45:59ya veis que está el pu 002 pues hacemos
- 46:01un
- 46:02change
- 46:04de Pu
- 46:06002 a kicks 0
- 46:12all ya nos lo ha cambiado
- 46:18aquí y en ningún otro sitio más perfecto
- 46:22pues sub subm mitido cero muy bien Y por
- 46:28último en loag también hacemos
- 46:34nuestra 1
- 46:37coma Class a m Class x para poder ver
- 46:42los textos en nuestro editor del spool y
- 46:46hacemos un insertamos nuestra línea
- 46:51de notify ig
- 46:55ampers ID
- 46:57y ya está y aquí lo mismo pu 002 Así que
- 47:02hacemos un change de Pu 002 por kicks 0
- 47:09all Ahí está ha
- 47:14cambiado y hacemos un
- 47:16sub subiti y todo acaba en cero Y si
- 47:21hacemos aquí un f3 y un f3 y un f3 y ya
- 47:24hemos cargado todos los datos si vamos a
- 47:25nuestro out list podemos ver aquí los
- 47:28diferentes trabajos por ejemplo el de
- 47:30murach que ha acabado
- 47:32aquí ya veis que alocado lo que tenía
- 47:35que alocar aquí tenemos nuestra primera
- 47:37paso que ha acabado en cero segundo paso
- 47:40que ha acabado en cero último paso que
- 47:42ha acabado en cero y cero ya veis que
- 47:46está todo
- 47:49fetén en con el resto pues tres cuartos
- 47:53de lo mismo entramos aquí una s y vemos
- 47:54aquí que efectivamente el sistema
- 47:56acabado en cero y tenemos aquí el
- 47:58resumen de la ejecución
- 48:00etcétera la verdad es que da hasta casi
- 48:03más datos que el spol que el sdsf de de
- 48:07IBM del zos Eh Así que la verdad es que
- 48:10la gente ha hecho un trabajo
- 48:12encomiable con la edición y la creación
- 48:14de estos Editores que que todo esto es
- 48:17Open source eh recordad que todo esto es
- 48:19Open
- 48:19source bien pues una vez que ya hemos
- 48:22cargado todos los datasets de trabajo de
- 48:26prueba para que funcione el kicks pues
- 48:28vamos a lanzar el kicks para ello
- 48:31primero vamos a buscar por kicks y hay
- 48:33que ir a la tenemos que ir al kicks ksis
- 48:37v1 R5 m0c list vamos a est más abajo
- 48:41ksis aquí cist y esta es la cist de
- 48:45arranque del C Que es kicks así que lo
- 48:48que vamos a hacer es editarla porque
- 48:51creo que hay que Añadir alguna cosita
- 48:52por aquí que antes no
- 48:54estaba en la línea 140 para ser más
- 48:58exactos según el manual este que tenemos
- 49:00aquí en la web dice que hay que alocar
- 49:03este
- 49:04tipo estos ficheros y hay que cambiar el
- 49:09kiki de kiks
- 49:12ver.lo este hay que borrarlo así que
- 49:16agur benur ya nos quedamos con el tsid
- 49:19kcks versión skilo y
- 49:23Kid kis
- 49:25version lo Haz y ya está y con esto
- 49:30salvamos y ahora si ya vamos al tso tal
- 49:36cual ready y hacemos un
- 49:38exec de qué de la celist kicks punto
- 49:45kis
- 49:47punto v1
- 49:51R5
- 49:53m0 cist y
- 49:57kicks y cierro
- 50:03comillas
- 50:05tachan ya tenemos nuestro entorno kicks
- 50:08funcional de hecho si vamos al enter
- 50:11cambian los para que veáis que el propio
- 50:15transaccional ya está cambiando los los
- 50:17los colores pues ya tenemos nuestro kiik
- 50:19si ahora mismo hacemos
- 50:21un Clear que en el personal
- 50:23Communications es la tecla pausa
- 50:26podemos hacer por ejemplo cualquier cosa
- 50:29por ejemplo el programa demo que era Inc
- 50:331 creo que se llama que es el programa
- 50:35de murach y aquí efectivamente nuestro
- 50:37customer number que creo que empezaba
- 50:39por el
- 50:401000 bueno justo no está no es este 100
- 50:44que creo que si metemos el
- 50:474000 1 Ahí
- 50:51está por ejemplo si hacemos aquí f12
- 50:54cancel vamos a nuestro menú disay
- 50:57customer information que era lo que
- 50:58estábamos viendo customer number pues
- 51:00era 4 el 40000 que no existe pero 4001
- 51:05sí McDonald k y si vamos a f12 podemos
- 51:08incluso mantener órdenes de trabajo aquí
- 51:12podemos incluso crear un número un
- 51:15usuario nuevo por ejemplo voy a crear el
- 51:16usuario
- 51:18100000 New customer Last name Pues voy a
- 51:21poner de los palotes
- 51:29adr
- 51:30avenida de la paz número 43 City pues
- 51:37vamos a poner
- 51:39Bilbao Por qué Porque Bilbao es la
- 51:41capital del mundo estado Vizcaya cip
- 51:44code
- 51:4548001 y enter y ya hemos añadido un
- 51:49nuevo un nuevo
- 51:51cliente Por otra parte si damos a f12
- 51:55podemos introducir orden de trabajo por
- 51:57ejemplo a nuestro customer que era
- 52:0040,001 podemos poner el código de
- 52:04producto Pues yo que sé por ejemplo el
- 52:06001 cantidad 1 que es
- 52:12Penny y ya hemos creado una orden de de
- 52:16de ejecución ese a ese a ese cliente
- 52:19veis que esto es un zix realmente t tal
- 52:23es el Z que si yo ahora mismo vo aquí
- 52:25enter si salgo aquí y le doy a pausa y
- 52:30hago un kdf que es el famoso cedf para
- 52:33debugar el
- 52:35Z ya está y ahora si hago menú creo que
- 52:39era ahora eso B a lanzar el menú con el
- 52:44mapset mset menu map aquí el comand se
- 52:48complete y aquí sale el área la comara y
- 52:52aquí nos aparece el menú display
- 52:54customer information
- 52:56aquí ahora nos está debug es ves el ex
- 52:59reive map hacemos la recepción del mapa
- 53:03va a lanzar el programa El xtl program c
- 53:06Ink 1 que a su vez tiene la comara con
- 53:09esta con esta eh
- 53:13información metemos los datos por
- 53:16ejemplo pues el mío el el 10.000 enter
- 53:19veis
- 53:21que usa el reive hace el include ya veis
- 53:26la comara está aquí está la comara con
- 53:30los datos lanza el X file va leer el
- 53:35fichero c+ que recordemos que es el
- 53:37fichero vsam que contiene los
- 53:40clientes aquí en la comaria ha metido
- 53:44todos los datos del del cliente más más
- 53:48datos del cliente y hace el s
- 53:51map execution complete
- 53:56y aquí tenemos el mapa ya veis Cómo se
- 53:59debug Gea un kicks que es lo mismo que
- 54:01debuggear el zix así que bueno salimos
- 54:04aquí con f3 aquí con
- 54:06f 3
- 54:09f3 session ended y hacemos un kdf off
- 54:14para salir Cómo Cerramos el kicks Pues
- 54:18kssf que era el cssf lof del cix Pues
- 54:23aquí es kssf por el kicks
- 54:27K Shooting down y
- 54:31ready ya veis que fácil ya hemos
- 54:33instalado un cic un kicks más bien dicho
- 54:36en nuestro entorno tso bien para hacerlo
- 54:40más rápido para no tener que hacer meter
- 54:42esa c list y ese Paz entero lo que vamos
- 54:45a hacer es copiarnos esa c list y nos la
- 54:49vamos a meter en el sis 1.cmd Proc para
- 54:54ello hacemos un spf 3ve copy desde el
- 55:00dataset vamos a
- 55:02copiar desde el dataset que tenía aquí
- 55:06copiado control V de
- 55:09Kick
- 55:12kicks y recordar que hay que poner las
- 55:14comillas porque si no va a poner por
- 55:16defecto er01 y por eso no lo encuentra
- 55:19hacemos aquí un
- 55:21copy A dónde Pues al
- 55:27cmd Proc no es muy ortodoxo porque lo
- 55:32suyo sería concatenar la librería de de
- 55:34kicks en nuestra en nuestra sisp Pero
- 55:40mira va a ser más rápido
- 55:43así ya se ha copiado Entonces ahora
- 55:45mismo ya simplemente con esto si salgo
- 55:48hago un log of y vuelvo a entrar con
- 55:52er01 y password que haya puesto
- 56:00aquí tenemos nuestro esto salimos con f3
- 56:03Y si hacemos un kicks tiene que ir a la
- 56:07primera y ya tenéis el kicks instalado
- 56:10en nuestro sistema MVS
- 56:133.8j Clear vale K
- 56:18ssf Cerramos el
- 56:20kicks hacemos un isf y es una gozada
- 56:24porque aquí eso ese programa que os he
- 56:27enseñado del kcks lo tenéis aquí kcks
- 56:30murach control invoice invoice no sé qué
- 56:33estos son los diferentes ficheros vsam
- 56:36Pero hay aquí están los mapas de los
- 56:39diferentes entornos mira aquí tenéis en
- 56:42kicks map
- 56:45src todos los fuentes de los mapas que
- 56:51habéis visto en la
- 56:53aplicación y aparte de esto Esta es la
- 56:56parte de los mapas Pero y aquí en k.k.
- 56:59v1 R5
- 57:03m.com podemos ir aquí al cus Ink 1 y ver
- 57:08el Fuente del cobol que llama a la
- 57:12aplicación que hemos visto de gestión de
- 57:15clientes ya veis que esto es Exactamente
- 57:17igual esto es cob puro como el cob six
- 57:20de b2 Solo que aquí en lugar de Six
- 57:23Clear es Kick Clear en vez de de
- 57:28exec pues es exec
- 57:32kicks pero mi compañero Luis ha estado
- 57:35haciendo unas pruebas y me ha comentado
- 57:37que si no pones exec kicks y pones exec
- 57:41el sistema te lo traga o sea de debe
- 57:43haber un alias para que los programas
- 57:45que ya estaban escritos en Zig se puedan
- 57:47portar al kicks sin tocar Ni una sola
- 57:51línea de código así que bueno tenemos un
- 57:55sistema transacción con ficheros vesam
- 57:57no de b2 obviamente en un entorno de
- 58:031981 y ya veis qué fácil es
- 58:08lanzarlo así que bueno sin más Este ha
- 58:11sido un vídeo un poquito largo porque ya
- 58:13veis que hemos tenido que hacer muchas
- 58:15pruebas hemos tenido que enviar varias
- 58:17veces el fichero porque ha fallado eh En
- 58:21fin cosillas del directo que tenemos
- 58:23aquí pues bueno a la hora de instalar
- 58:25una aplicación Porque además es una
- 58:27aplicación ciertamente compleja Pero
- 58:29bueno ya habéis visto en como en MVS
- 58:33podemos ver el resultado de los trabajos
- 58:36eh ten o sea es decir que el sdsf está
- 58:39más o menos metido dentro de la de la
- 58:41aplicación del rfe del ispf que tenéis
- 58:45aquí y bueno ya tenemos un un sistema
- 58:48transaccional en el que podemos crear
- 58:50nuestros propios programas cobol que
- 58:52ataquen ficheros de bases de datos vsam
- 58:55que era lo que se hacía toda la vida
- 58:58antes de la llegada del dv2 y se sigue
- 59:01haciendo durante durante muchísimas
- 59:04aplicaciones que todavía trabajan con
- 59:06ficheros vsam y se sigue utilizando a
- 59:10día de hoy como herramienta normal en
- 59:12los sistemas zvc que zvc es un sistema
- 59:16operativo muy pequeñito con un zix muy
- 59:18potente pero que tiene por debajo son
- 59:20ficheros vsam ni siquiera tiene db2
- 59:23porque no lo necesita porque el vsam es
- 59:26tan potente como el
- 59:29db2 salvo salvo las instrucciones sql
- 59:32Que obviamente no tiene Pero vamos
- 59:35siempre ha sido el vsam un entorno
- 59:37indexado muy muy muy potente y que se
- 59:40sigue utilizando hoy en día así que
- 59:43todos aquellos que decís que este vídeo
- 59:45os parece una [ __ ] porque preferiría
- 59:48aprender zos Pues bueno a ver tenéis
- 59:50parte de razón pero por otra parte el
- 59:53tener un entorno que es totalmente libre
- 59:55que no tienes que estar pagando ninguna
- 59:56licencia a IBM y que te sirve para
- 59:59aprender a programar el en cob thix pues
- 1:00:03lo tenéis aquí y toda la sabiduría la
- 1:00:05tenéis a un golpe de un click de acuerdo
- 1:00:07pues eso ha sido todo si os ha gustado
- 1:00:10el vídeo Dad a me gusta o visionar los
- 1:00:12anuncios que aparecen en el vídeo para
- 1:00:13apoyarme económicamente Dad a la
- 1:00:15campanita para que os avise Cuando suba
- 1:00:16nuevos vídeos aunque los que ya me
- 1:00:17conocéis sabéis que lo subo todos los
- 1:00:19viernes en la medida que puedo
- 1:00:20suscribiros Si no lo habéis hecho ya
- 1:00:22porque Cuanto más seamos mucho mejor y
- 1:00:24además me ayuda a mantener el canal Y si
- 1:00:26tenéis alguna duda de la que queráis que
- 1:00:27hable en futuros vídeos Y si está dentro
- 1:00:29de mis conocimientos dejádmelo en los
- 1:00:30comentarios ya veis que os hago caso y
- 1:00:32os los contesto todos y sobre todo
- 1:00:35Muchísimas gracias por ver el vídeo
- 1:00:37hasta el
- 1:00:38final así que dicho esto hasta el
- 1:00:41próximo vídeo de mainframe corner
- 1:00:46[Música]
About this transcript
This page contains the full transcript of IBM MVS 3.8J - Instalación de KICKS (alternativa a CICS) by The Mainframe Corner, generated from the public captions YouTube serves with the video. The transcript has 7,840 words across 1,194 segments, with the original timestamps preserved so you can click any line to jump to that moment in the embedded player.
What you can do with it
Use the transcript to take notes, quote the speaker, build a study guide, generate a summary with ChatGPT or Claude via the YouTube Summary tool, or export it as a timed subtitle file with YouTube to SRT. You can also re-open it in the transcriber to translate the transcript into 100+ languages.
Free YouTube transcript tool
YouTube2Text is a free YouTube transcript generator — no signup, no daily limit. Paste any YouTube link and get the full transcript instantly, with timestamps, click-to-jump, translation to 100+ languages, AI prompts for ChatGPT, Claude, and Gemini, and exports to TXT, SRT, VTT, or Markdown.