YouTube2Text

IBM MVS 3.8J - Instalación de KICKS (alternativa a CICS) — Transcript

by The Mainframe Corner · 7,840 words · 1,194 segments · language en · Watch on YouTube

Full transcript

  1. 0:04Hola muy buenas a todos y bienvenidos a
  2. 0:06un nuevo vídeo de mindframe Corner bien
  3. 0:09pues en este vídeo vamos a volver a la
  4. 0:12parte MVS
  5. 0:133.8j concretamente a la distribución que
  6. 0:17está en internet que es totalmente de
  7. 0:19uso legal y de uso libre y que todo eso
  8. 0:21opensource llamado El turn Ke System tk5
  9. 0:27en este caso utat 3 en otro en el pasado
  10. 0:30vídeo os enseñé Cómo descargaros la
  11. 0:31directamente y cómo ejecutarla Bueno
  12. 0:33pues en Este vídeo lo que vamos a hacer
  13. 0:35es instalar el sistema transaccional
  14. 0:39kicks como todos sabéis en los
  15. 0:41mainframes actuales tenemos el sistema
  16. 0:43cobol thix db2 tanto el Zig como el dv2
  17. 0:48Son productos licenciados y de hecho el
  18. 0:50zix ya era licenciado en la época de los
  19. 0:53años 70 cuando salió la primera versión
  20. 0:55de Zig comercialmente para la
  21. 0:57instalación de sistemas transaccionales
  22. 0:59en máquinas de la época Pero qué pasa
  23. 1:02como ya os comenté en el vídeo anterior
  24. 1:04la versión de MVS 3.8j es libre porque
  25. 1:08pues hubo un problema legal con el
  26. 1:10copyright en aquella época y se llegó a
  27. 1:13la a la conclusión legal en la que el mv
  28. 1:17en la que esta versión en concreto era
  29. 1:20una versión que estaba libre es decir No
  30. 1:23tienes que tener una licencia de uso por
  31. 1:25parte de IBM como si pasa en los
  32. 1:27sistemas operativos posteriores que ya
  33. 1:29IBM aprendido la elección que a partir
  34. 1:31de la versión del MVS
  35. 1:333.8j Como por ejemplo el MVS xa o el vm
  36. 1:38o el MVS esa posteriormente el os 390 y
  37. 1:42hasta zos Pues bueno IBM ya aprendió la
  38. 1:44lección y registró y licenció su
  39. 1:48software y y digamos que solo puedes
  40. 1:52ejecutarlo si dienes una licencia por
  41. 1:54parte de IBM pero en el caso del MVS 38j
  42. 1:58y sistemas anteriores Como por ejemplo
  43. 1:59mvt el dos 360 o el el mft Hay un montón
  44. 2:05de sistemas operativos que también
  45. 2:06podéis ver a nivel de IBM mucho más
  46. 2:08antiguos que son libres y como ya digo
  47. 2:11en este MVS 38j que ya os expliqué en el
  48. 2:14vídeo anterior tenemos utilidades de
  49. 2:16compiladores tanto de gcc como Pascal
  50. 2:19como algol como cobol como Rex Hay un
  51. 2:23montón de compiladores y programas
  52. 2:26aparte del del del G2 de los jcls etc
  53. 2:29etcétera y luego a nivel de base de
  54. 2:31datos tenemos Los ficheros particionados
  55. 2:33de toda la vida y Los ficheros
  56. 2:36vsam qué pasa no tenemos db2 pues lo
  57. 2:39explicado anteriormente el dv2 se
  58. 2:41licenció y por lo tanto no podemos
  59. 2:43instalar un db2 en nuestro sistema MVS
  60. 2:4738j y lo mismo pasa con el Zig el Z es
  61. 2:51un transaccional que también está
  62. 2:52licenciado y por tanto no tenemos una
  63. 2:55forma de instalar Zig en el en la
  64. 2:57versión MVS 38j al menos legalmente pero
  65. 3:02aquí es cuando entra la comunidad de
  66. 3:04programadores y sacan un sucedáneo del
  67. 3:08cig llamado kcks con k Así que en el
  68. 3:12vídeo de hoy lo que os voy a enseñar es
  69. 3:14Cómo descargar el kicks Cómo cargaron en
  70. 3:17el sistema y cómo ejecutarlo y Vais a
  71. 3:20ver además que es una gozada porque al
  72. 3:23final el entorno cobol kicks vsam es
  73. 3:28perfectamente factible como lo era en
  74. 3:31los sistemas operativos vs esa que ya os
  75. 3:34he enseñado en otros vídeos que al final
  76. 3:36el vse esa es un Zig que está por encima
  77. 3:40y ataca ficheros vesam ni siquiera tiene
  78. 3:42db2 ese sistema Por lo tanto vamos a
  79. 3:44retrotraen de nuevo a los años 80 y
  80. 3:47vamos a hacer una instalación de un
  81. 3:49sistema transaccional para poder
  82. 3:51nosotros crear nuestros programas cobble
  83. 3:53kicks vsam en lugar de cle fix d b2 y ya
  84. 3:56en un futuro si Luis Martínez tiene
  85. 3:59ganas porque hace falta tener ganas para
  86. 4:01hacer esto podemos incluso migrar la
  87. 4:03aplicación all asterisco que hicimos en
  88. 4:06los vídeos anteriores de los cursos de
  89. 4:07cobol para que funcionen dentro de
  90. 4:10nuestro sistema MVS
  91. 4:133.8j así pues lo primero que voy a hacer
  92. 4:16aquí es arrancar la máquina Le voc la
  93. 4:19escape para ir a la parte gráfica y el
  94. 4:22tk5 res es nuestro disco residente luego
  95. 4:25es el disco que arranca el sistema
  96. 4:26operativo Así que hago aquí una l de
  97. 4:28loaz y elijo la a para arrancar la
  98. 4:32dirección 390 que es la dirección de
  99. 4:35nuestro disco
  100. 4:37residente por aquí especificamos
  101. 4:39parámetros de sistema aquí directamente
  102. 4:41o podemos poner r00 clpa para limpiar la
  103. 4:46Impact área o no ponemos nada yo ya la
  104. 4:50limpié en su día así que si le doy al
  105. 4:52enter el sistema sigue arrancando normal
  106. 4:54y corriente mientras está arrancando
  107. 4:57vamos a ir a la página web que nos dice
  108. 4:58Cómo instalar el kicks
  109. 5:01que es esta de aquí bien los pasos son
  110. 5:04muy sencillos al final es Descargar el
  111. 5:06el lo que es el programa kcks preparamos
  112. 5:10un volumen para instalarlo en el propio
  113. 5:12volumen y luego hacemos un transmit del
  114. 5:15fichero xmi a nuestro
  115. 5:17MVS descomprimimos el contenido
  116. 5:21cambiando una serie de cosas por aquí y
  117. 5:23customizamos el acceso al kicks hasta
  118. 5:26llegar pues a la pantalla
  119. 5:29kicks así que bueno vamos paso por
  120. 5:32paso lo primero es vamos a descargarnos
  121. 5:36el kicks para ello hacemos clic sobre
  122. 5:38esta enlace de giap y lo desamos aquí
  123. 5:42kickmaster
  124. 5:46aquí lo
  125. 5:47tenemos lo tenemos aquí y ya veis que
  126. 5:51tenemos aquí un Kick tc versión 1
  127. 5:55Release 5 si vamos aquí al final es un
  128. 5:57fichero xmi pues Este es el que vamos a
  129. 6:00tener que subir a nuestro sistema MVS
  130. 6:02así que bueno vamos a descomprimirlo
  131. 6:07todo vale extraemos la
  132. 6:10información aquí tenemos nuestro
  133. 6:12kickmaster
  134. 6:15aquí tenemos nuestro kck
  135. 6:20tso y este es nuestro fichero xmi luego
  136. 6:24incluso aquí tenemos nuestro guía de
  137. 6:26usuario que que si vamos aquí al Index
  138. 6:29Pues nos toda la documentación de cómo
  139. 6:31instalar el el kcks cómo customizar lo e
  140. 6:34incluso tenemos programas de ejemplo con
  141. 6:36ficheros vesam que nos permite Pues eso
  142. 6:39trabajar con él como si fuera el cig
  143. 6:42bien dicho esto una vez realizada la
  144. 6:45descarga vamos a preparar nuestro nuevo
  145. 6:47volumen donde vamos a alojar el futuro
  146. 6:51entorno kcks el sistema está pensado
  147. 6:54también para que utilice los volúmenes
  148. 6:56del mv 38j pero yo ya os comenté en en
  149. 6:59otros vídeos y y además sabéis
  150. 7:01perfectamente cómo soy yo prefiero que
  151. 7:03el kcks tenga su propio volumen y el que
  152. 7:06venga por detrás que arree y que los
  153. 7:08datos de usuario estén en un volumen
  154. 7:10pero los datos de la aplicación estén en
  155. 7:12otro volumen totalmente diferenciados
  156. 7:14para que luego no hayan cristos así que
  157. 7:15bueno lo que vamos a hacer aquí es irnos
  158. 7:17a la a la línea de comandos de Hércules
  159. 7:20y vamos a efectuar este Comando que es
  160. 7:23el dust init - a kck 0. 3350 de porque
  161. 7:28va Vamos a crear un
  162. 7:30disco del tamaño 3350 con el bolser
  163. 7:3311111 para eso abrimos un cmd aquí lo
  164. 7:37tenemos entonces de aquí nos vamos a
  165. 7:41MVS aquí aquí nos vamos a creo que
  166. 7:45estaba la carpeta vale Tenemos aquí la
  167. 7:48carpeta Hércules pues está aquí dentro
  168. 7:50CD
  169. 7:52Hércules bien Vamos a ver qué tenemos
  170. 7:54aquí vale tenemos que ir a la parte de
  171. 7:57Windows
  172. 8:00de 64
  173. 8:03bits y aquí tenemos todos los comandos
  174. 8:05de Hércules que tenemos y uno de ellos
  175. 8:07está aquí arriba que es el ddit ya veis
  176. 8:10está aquí dastin
  177. 8:12entonces si simplemente hago aquí un
  178. 8:14dasit Vais a ver que pues te dice el D
  179. 8:19opciones fichero tipo de de dispositivo
  180. 8:21el modelo el bolser y el tamaño pero en
  181. 8:24este caso concreto pues como Tenemos
  182. 8:25aquí El Comando hacemos un dasit
  183. 8:29menos
  184. 8:32a que tenga cilindros
  185. 8:35alternos llamado kicks
  186. 8:390.33 que es un disco
  187. 8:423350 y con el bolser 111 11 y enter yaos
  188. 8:48ya nos ha creado el disco aquí en la
  189. 8:49misma carpeta de hecho si me voy ahora
  190. 8:51mismo la
  191. 8:55carpeta en la configuración
  192. 8:59en la carpeta Hércules Windows 64 nos va
  193. 9:03creado por aquí el kicks veis Aquí está
  194. 9:06este es nuestro disquito claro no lo
  195. 9:08vamos a dejar aquí vamos a añadirlo a la
  196. 9:10configuración dust que tenemos en
  197. 9:13Hércules Así que cojo me corto este
  198. 9:16fichero y me lo dejo en dust donde está
  199. 9:19el resto de los discos Así que lo pego
  200. 9:22aquí y ahí
  201. 9:24está lo siguiente que vamos a hacer
  202. 9:27ahora que ha arrancado todo el sistema
  203. 9:29Tenemos aquí el ya tenemos aquí la
  204. 9:32consola y aquí tenemos nuestro
  205. 9:34tso vamos a hacer un vamos entrar con el
  206. 9:37usuario
  207. 9:41er01 además si yo tengo la pantalla
  208. 9:44en 2% 2% 32 Me he acostumbrado a usarla
  209. 9:49Así que es una gozada porque entra mucho
  210. 9:52más en la pantalla meto la contraseña
  211. 10:00ya estamos en nuestro ispf Por qué entro
  212. 10:03aquí porque quiero ver el los tipos de
  213. 10:05disco que tenemos activos y los tipos de
  214. 10:07disco que tenemos libres para poder
  215. 10:09utilizar cómo veo eso pues si me voy a
  216. 10:11la m de tso applications hay uno que es
  217. 10:14el Im que es el imon 370 es un monitor
  218. 10:18del
  219. 10:19sistema Entonces si vamos al imon con la
  220. 10:22opción
  221. 10:233 venimos aquí a nuestro interactive
  222. 10:27monitoring program for mv s370 Y si
  223. 10:30vamos a la opción d es input output
  224. 10:32device monitor si vas aquí y aquí se
  225. 10:35listan todos los discos ad si damos
  226. 10:37enter ya veis que de vez en cuando va
  227. 10:40saliendo
  228. 10:41pues ior rate como por ejemplo veis aquí
  229. 10:46porque ahora mismo el sistema está en
  230. 10:48uso y los discos que están aquí son los
  231. 10:49discos que están publicados Y pues
  232. 10:51tenemos el spull tenemos el los feers de
  233. 10:54paginación etcétera pues vamos a ver a
  234. 10:56ver qué tipo de discos Tenemos aquí que
  235. 10:57sean 3350 porque veis Que aquí hay una
  236. 11:00mezcla de
  237. 11:013390 3350 por aquí más abajo si lamos f8
  238. 11:05Ah vale es una única pantalla Y por
  239. 11:08último Tenemos aquí
  240. 11:103390 entonces veis Que aquí hay una
  241. 11:13ristra de discos que son 3350 que
  242. 11:16empiezan en el 340 y acaban el
  243. 11:19340b pues vamos a asignar el 340 c a
  244. 11:24nuestro disco kicks para ello lo que
  245. 11:27vamos a hacer es vol volvernos a la
  246. 11:30página web Y tenemos aquí otro comandito
  247. 11:32que hacemos el attach aquí por ejemplo
  248. 11:36está poniendo la dirección 351 Porque
  249. 11:38será otra configuración de un i odf pero
  250. 11:41el I odf que tenemos aquí el 351 bueno
  251. 11:44está libre pero no sé yo si es un 3350 o
  252. 11:47sea yo yo personalmente voy a seguir la
  253. 11:50el orden y vemos aquí que el siguiente
  254. 11:53disco es el 34c porque el 34b es el que
  255. 11:56está ocupado ahora con el catálogo de
  256. 11:57Los ficheros fuente así que sin más voy
  257. 12:00a hacer lo mismo voy a entrar ahora esto
  258. 12:03lo voed a cerrar porque ya no entramos
  259. 12:04para nada en el ms2 y me voy al Hércules
  260. 12:07y en el Hércules hay un comando que es
  261. 12:10el attach Si volvemos aquí a la página
  262. 12:12web y ahora pongo el Hércules V que
  263. 12:15tenemos attx 351 a 3350 das Kick 0 3350
  264. 12:20pues hacemos esto lo que va a hacer es
  265. 12:22de forma dinámica va a Añadir el disco
  266. 12:26al sistema Hércules Así que hacemos un
  267. 12:28attach
  268. 12:30del
  269. 12:3234 c recordar que el siguiente es el
  270. 12:3734c porque aquí está el 34b ocupado
  271. 12:42obviamente
  272. 12:44y vamos a
  273. 12:48poner
  274. 12:50kicks
  275. 12:510. 3350 Ah perdonar attach 34c el tipo
  276. 12:57que es el 33 50 de dónde de dust barra
  277. 13:03kx
  278. 13:053350 bien pues si damos al
  279. 13:09enter lo acaba de detectar ya veis ck
  280. 13:12filas model 350 modelo 1 tiene 560
  281. 13:15cilindros 30 cabezas etcétera si yo hago
  282. 13:18Ahora aquí un display u coma coma coma
  283. 13:22340 podemos ver una lista de los
  284. 13:25dispositivos que tiene definidos
  285. 13:26Hércules Así que vamos a comprobarlo
  286. 13:30bien Aquí está el 341 342 un un
  287. 13:35Forward
  288. 13:36467
  289. 13:39forw 89 AB que es el último
  290. 13:44forw veis que c d e y F están offline
  291. 13:48pero también son del modelo
  292. 13:503350 así que ya sabemos cómo está el
  293. 13:54tema el Hércules Sí podría ver el disco
  294. 13:57que acabamos de crear 34
  295. 14:00Entonces qué es lo que vamos a hacer
  296. 14:02para que en el siguiente arranque ya
  297. 14:04coja siempre el disco por defecto nos
  298. 14:06vamos de nuevo a la carpeta
  299. 14:11dmvs 38j el turn 5 y de aquí nos vamos a
  300. 14:16la configuración conf y de aquí vamos a
  301. 14:19tk5 cnf le vamos a usar el block de
  302. 14:23notas y esto nos el bloc de notas y Aquí
  303. 14:25vamos a
  304. 14:27Añadir ve que tenemos figuraciones
  305. 14:30diversas el disco
  306. 14:33034 c como
  307. 14:393350 que es está en dust
  308. 14:43barra
  309. 14:45kicks
  310. 14:470. 3350 ya con esto salvado en el
  311. 14:51siguiente arranque del MVS 38j ya nos
  312. 14:55añadirá el disco por defecto Así que una
  313. 14:58cosa hecha bien qué es lo que tenemos
  314. 15:00que hacer ahora pues tenemos que antes
  315. 15:02de poner el disco online lo tenemos que
  316. 15:05inicializar tenemos que crearle la vt el
  317. 15:08los índices etcétera para ello Tenemos
  318. 15:11aquí ya ya veis un jcl a tal efecto que
  319. 15:15ahora mismo control c me lo
  320. 15:17copio
  321. 15:19y vuelta a mi sesión salgo de aquí
  322. 15:23porque ya no necesito tener nada más y
  323. 15:253.4 me voy a
  324. 15:27mi
  325. 15:2901 y aquí tenemos tengo mis dataset de
  326. 15:32trabajo entre ellos tengo el dataset
  327. 15:35er01 test. cnl si entro en él con un
  328. 15:39edit tengo ahí un import cbt que es
  329. 15:42cuando importamos los catálogos del cbt
  330. 15:44y tal pues voy a hacer un
  331. 15:46s
  332. 15:50init kicks
  333. 15:52init que sean de ocho caracteres y que
  334. 15:55no hay ningún
  335. 15:56problema y esto me va a crear Pues un
  336. 15:59fichero en blanco en el que ahora mismo
  337. 16:01haciendo un edición
  338. 16:04pegar Me copie el jcl que acabamos de
  339. 16:08copiarnos de la página web Aquí también
  340. 16:10voy a hacer una cosa voy a hacer Voy a
  341. 16:12editar el jcl para Añadir un notify
  342. 16:16igual a dó sis
  343. 16:20uid y por otra parte vamos a cambiar
  344. 16:23aquí en algunas cosas porque no es la el
  345. 16:26la dirección 351 sino la 34 c verify 11
  346. 16:31bolit k0 Owner hercules el resto de los
  347. 16:34parámetros los dejamos tal cual Así que
  348. 16:36con esto hacemos
  349. 16:38un submit bueno primero vamos a hacer un
  350. 16:41save y así guardamos nuestro nuestro jcl
  351. 16:45y hacemos un submit sub vale
  352. 16:49submit Y aquí en la consola nos aparece
  353. 16:53responder u para alterar el volumen 34c
  354. 16:56si no t pues hacemos un
  355. 16:5900 coma
  356. 17:03u ves ya ha terminado el icd sf y aquí
  357. 17:08si le damos al
  358. 17:10enter trabajo terminado con concod 00 o
  359. 17:14sea que ha ido bien Cómo podemos además
  360. 17:17Ver el resultado del Job pues muy
  361. 17:19sencillo el propio rfe que es el
  362. 17:23sustituto del clon del ispf en esta en
  363. 17:26este entorno lo que
  364. 17:29tiene es una gozada Y es que si me voy
  365. 17:31aquí a la opción o out list podemos ver
  366. 17:35todos los trabajos que hemos sometido y
  367. 17:37deberíamos de ver nuestro trabajo del
  368. 17:39del del icsf que ha terminado bien Así
  369. 17:42que hacemos un 8 out list y aquí tenemos
  370. 17:44la lista de trabajos esto es viene a ser
  371. 17:46muy parecido al sdsf y aquí tenemos
  372. 17:49nuestros icd sf y con una s vemos su
  373. 17:52interior veis aquí se ve la consola lo
  374. 17:55que nos ha preguntado lo que hemos
  375. 17:57contestado y aquí tenemos el las
  376. 17:59estadísticas del Job el
  377. 18:01jcl y lo que ha hecho el sistema veis
  378. 18:06Por eso me gusta tener la pantalla en
  379. 18:0827.32 porque aparece toda la longitud
  380. 18:11del carro de impresión aquí y la podemos
  381. 18:14ver perfectamente online sin tener que
  382. 18:16hacer como hacíamos antes imprimir el
  383. 18:19contenido en un PDF con el rprt y verlo
  384. 18:23en un navegador entonces aquí ya lo
  385. 18:24estamos viendo pues como si esto fuera
  386. 18:26un un sdsf
  387. 18:29ya veis que ha acabado en
  388. 18:30cero Así que a partir de este momento
  389. 18:34podemos perfectamente volver a nuestra
  390. 18:36consola y hacer un bar del del volumen
  391. 18:4134c coma
  392. 18:45online y ya tenemos nuestro nuestro
  393. 18:48entorno online dicho esto continuamos
  394. 18:51con el tutorial si es muy fácil ya hemos
  395. 18:54hecho el Bari Ah y vamos a montar
  396. 18:56también el volumen como privado copiamos
  397. 19:00El Comando nos vamos a la consola
  398. 19:03pegamos El Comando aquí no es el 351
  399. 19:06sino el
  400. 19:0734
  401. 19:10c y ya está montado vamos a ver si ahora
  402. 19:15sale los datos en el Im o no salen Ya
  403. 19:19está ya veis que aquí está ya tenemos el
  404. 19:21volumen montado y ya se ve exactamente
  405. 19:24como como el volumen se llama Kick 0 y
  406. 19:27está está en modo private
  407. 19:29reser etcétera bien ya tenemos el disco
  408. 19:34libre para poder grabar la información
  409. 19:37en él para ello De hecho si hacemos un
  410. 19:393.4 y vamos al
  411. 19:42disco
  412. 19:46x0 te dice que no hay ningún dataset
  413. 19:49está totalmente vacío así que bueno
  414. 19:52seguimos el
  415. 19:54tutorial aquí nos está diciendo Bueno
  416. 19:56aquí ya hemos editado nuestra
  417. 19:58configuración de Hércules para que el
  418. 19:59nuevo volumen dust se esté online
  419. 20:02siempre que arranquemos a partir de
  420. 20:03ahora el Hércules y vamos a entrar en la
  421. 20:05s1 plip a la bat lst 00 para hacer que
  422. 20:10este Comando de montaje privado sea
  423. 20:12permanente Así que hacemos lo mismo nos
  424. 20:16vamos a la a
  425. 20:18nuestra consola y hacemos un 3.4
  426. 20:23Buscamos por sis
  427. 20:251.pm lip borrando esto de abajo aquí
  428. 20:28tenemos la par de nuestro sistema
  429. 20:30operativo entramos en ella con un
  430. 20:31browser y buscamos el B list que está
  431. 20:34aquí Lo editamos bueno aquí hay dos B
  432. 20:38list aquí tenemos cbt paj tal vamos a
  433. 20:41ver igual es la bist 01 vale aquí están
  434. 20:45todos los volúmenes entonces aquí
  435. 20:47añadimos otro con un insert y añadimos
  436. 20:51tal cual lo que nos aparece
  437. 20:55aquí k0 0 2 etctera con los parámetros
  438. 20:59del B list que no voy a entrar entr
  439. 21:01ahora a explicar porque si no se nos
  440. 21:02haía un vídeo enorme Así que lo dejo así
  441. 21:05esto lo voy a poner un poquito
  442. 21:10tabulado y ya tenemos nuestro B list
  443. 21:13editado f3 editado vamos a ver si en la
  444. 21:16iasis Cuál es el B que utiliza en la
  445. 21:19iasis 00 que está aquí vamos a ver si
  446. 21:22hace referencia a que bat list para
  447. 21:25saber si es la cer o la un si he editado
  448. 21:27bien o he editado mal
  449. 21:30vale es la
  450. 21:3200 así que Entonces tenemos que editar
  451. 21:35también la batl 00 para ello
  452. 21:41editamos la
  453. 21:4300 pero vamos a hacer un poquito lo que
  454. 21:46están diciendo aquí vale wordp poner
  455. 21:49aquí insertar y aquí pego lo de lo de
  456. 21:53antes
  457. 21:59y así que no haya ningún
  458. 22:02problema cierro y ya en el siguiente
  459. 22:05reinicio de MVS el volumen debería de
  460. 22:08montarse ya en modo eh privado y tal no
  461. 22:12vamos a hacer un reinicio porque como
  462. 22:15todo esto es online lo podemos hacer
  463. 22:17durante la marcha Cuál es lo siguiente
  464. 22:19que tenemos que hacer o sea vamos a
  465. 22:20crear un catálogo solo para todos los
  466. 22:23datos del C y los datos de usuario del C
  467. 22:26del kx en este caso así que nos copiamos
  468. 22:29esto control c y nos vamos a
  469. 22:35nuestro
  470. 22:37dataset vamos a buscar por erc
  471. 22:4001 aquí en nuestro ctnl editamos y
  472. 22:45hacemos Un s
  473. 22:48Cut
  474. 22:49kicks y
  475. 22:52pegamos
  476. 22:54edición pegar aquí nos entra todo bien
  477. 22:59no podemos ejecutarlo tal cual bueno
  478. 23:01primero Porque además quiero aquí poner
  479. 23:03coma notify siempre @ si
  480. 23:09suid yo vosotros no no sé vosotros pero
  481. 23:12yo me siento un poco desamparado si
  482. 23:14lanzo el Job y luego no me no me dice si
  483. 23:17ha ido bien o mal y tengo que andar
  484. 23:18buscándole los las salidas Así que
  485. 23:21prefiero hacerlo así bien lo primero que
  486. 23:23tenemos que mirar aquí es que al definir
  487. 23:26el user catalog que se va Kick 0 dentro
  488. 23:30del volumen Kick 0 hay que definirlo
  489. 23:33sobre el catálogo maestro pero claro el
  490. 23:34catálogo maestro de esta distribución no
  491. 23:37se llama así entonces tenemos que mirar
  492. 23:39cómo se llama cómo se llama pues bueno
  493. 23:41vamos a hacer una cosa si yo aquí con f2
  494. 23:45parto la pantalla esto es como en el
  495. 23:47ispf Así que si yo ahora entro de nuevo
  496. 23:50en las teso Apps y me voy al tres al
  497. 23:53monitor hay un sitio por aquí abajo que
  498. 23:56te dice dónde están los catálogos y
  499. 23:59vamos a mirar y aquí en la opción B bldl
  500. 24:03an lpa Search display nos tiene que
  501. 24:05aparecer los catálogos efectivamente
  502. 24:07aquí Tenemos veis aquí tenemos nuestro
  503. 24:09catálogo de maestro que es s1 mcat tk5
  504. 24:13que está en el volumen tk5 Cat y por
  505. 24:16otra parte tenemos dos dos catálogos de
  506. 24:19usuario que es el ucat tso y el ucat tk5
  507. 24:23Entonces vamos a copiarnos el mcat
  508. 24:26tk5 y con f9 volvemos aquí y quitamos
  509. 24:31esto de aquí y lo pegamos tk5 y todo
  510. 24:34esto
  511. 24:37fuera De igual forma el alias también
  512. 24:40hay que definirlo en el catálago maestro
  513. 24:42Así que cogemos esto pegamos aquí
  514. 24:45tk5 y el resto
  515. 24:49fuera bien pues ya tenemos kcks kicks
  516. 24:53Las pistas tracks creamos el catálogo
  517. 24:56asociado al catálogo maestro y definimos
  518. 24:58el alias kicks para el catálogo maestro
  519. 25:01para que así las búsquedas sean
  520. 25:04directamente hechas por catálogo Así que
  521. 25:07salvamos y
  522. 25:09ejecutamos
  523. 25:11submitted y conco de
  524. 25:15cero vale como sabemos con f2 hacemos un
  525. 25:223.8 y comprobamos que aquí nuestro
  526. 25:26idcams con un s aquí tenemos nuestro
  527. 25:30proceso de alocación Del catálogo y cómo
  528. 25:33ha terminado bien veis que se ha creado
  529. 25:36el catálogo usuario con cero se ha
  530. 25:38creado el alias con cero Total que todo
  531. 25:40el trabajo ha acabado en cero Muy bien
  532. 25:42pues estupendo Vale salimos de aquí
  533. 25:45f3 y ya tenemos nuestro catálogo del
  534. 25:49kicks
  535. 25:51creado siguiente paso Vamos a subir el
  536. 25:55kcks tso al MVS cómo lo hace
  537. 25:59Pues hay varias maneras Aquí hay una que
  538. 26:01te que lo hace por batch pero vamos a
  539. 26:03hacerlo por terminal es muy sencillo
  540. 26:05Mira venimos aquí a nuestro terminal y
  541. 26:09yo me voy aquí
  542. 26:10a lo primero de todo hay que irse a la
  543. 26:13opción de
  544. 26:14tso es decir a los comandos de tso a la
  545. 26:17opción se y aquí si nos hacemos un
  546. 26:22acciones enviar archivos al sistema
  547. 26:25principal no enviar archivo pues
  548. 26:26examinamos y nos tenemos que ir aquí a
  549. 26:29descargas kickmaster kickmaster y Kick
  550. 26:34tso v1 R5 xm le damos aquí aceptar y
  551. 26:38tenemos que primero antes comprobar que
  552. 26:41es en modo
  553. 26:43binario pero no me gusta a ver cómo está
  554. 26:47definido Esto vale MVS tso transferencia
  555. 26:52binaria vale es que pone variable no
  556. 26:55tiene que ser fijo con un blocaje de 80
  557. 26:58esto siempre cilindros etcétera y así ya
  558. 27:02aceptar Ah bueno Vale entonces tengo que
  559. 27:05poner aquí uno nuevo que se llame binary
  560. 27:0880 para así diferenciarlo del binario
  561. 27:11normal y así no nos deje ya está
  562. 27:13Entonces ahora Aquí sí que le digo que
  563. 27:16lo suba como binario de 80 esto es muy
  564. 27:19muy importante porque si no el fichero
  565. 27:21xm se desbar ajusta y no se puede y no
  566. 27:25se puede subir Así que dicho esto Aquí
  567. 27:27vamos a
  568. 27:29decirle xmi o sea vamos a
  569. 27:33hacer
  570. 27:36kicks
  571. 27:39xmi binary 80 y ahora actualizar en la
  572. 27:43lista Vale entonces ahora que está en 80
  573. 27:45vamos a ver si lo podemos
  574. 27:54enviar recordar que para enviarlo
  575. 27:57siempre tenemos que estar en
  576. 27:58la pantalla del tso commands si no
  577. 28:01fallaría
  578. 28:06eh Así que bueno Pues si pincho
  579. 28:12aquí recupero el El Comando pero ya no
  580. 28:16se llama ahora se llama simplemente
  581. 28:19kicks xmi
  582. 28:29vale le damos al
  583. 28:32enter Y esto es esto es como hacer un un
  584. 28:35zip está descomprimiendo todo el
  585. 28:39contenido de ese dataset Así que se ha
  586. 28:43creado un dataset llamado er01 kcks v1
  587. 28:47R5 Big pds pues ya está enter Vale pues
  588. 28:50Ahora vamos a comprobar que realmente
  589. 28:52está ya tenemos aquí un Hércules aquí
  590. 28:54tenemos el Big pds Y si vemos aquí con
  591. 28:58un os con un browser podemos ver todos
  592. 29:01estos son ficheros también xmi
  593. 29:02comprimidos Pero tenemos un fichero que
  594. 29:05se llama v1 R5 que es un jcl que
  595. 29:08descomprime todo pues siguiendo el
  596. 29:14manual myy 29 miembros ta ta ta ta hay
  597. 29:18que editar el miembro v1 R5 m0 y hacer
  598. 29:22una serie de cambios Vale entonces vamos
  599. 29:25a poner la pantalla un poquito más
  600. 29:27pequeña para poder tener tan Eh bueno no
  601. 29:31tan pequeña porque si no no veis un
  602. 29:34[ __ ] Vale entonces vamos a entrar
  603. 29:36Primero aquí en 1 R5 con un edit lo
  604. 29:40primero de todo aquí poner lo mismo Aquí
  605. 29:42voy a Añadir una línea adicional que
  606. 29:48ponga notify igual
  607. 29:51a sis
  608. 29:54uid y aquí una coma de continuación
  609. 29:58porque si no catac croc bien dicho esto
  610. 30:01aquí lo primero no está diciendo bueno
  611. 30:03eh region tal nos está diciendo que
  612. 30:06tenemos que Añadir aquí un uno como
  613. 30:09número de accounting pues lo añadimos
  614. 30:15clase nos da igual que sea la clase o la
  615. 30:18clase C en este caso porque tenemos
  616. 30:19todas las clases abiertas Así que aquí
  617. 30:21añadimos ponemos un insert y ponemos
  618. 30:24coma uno y cerramos eh tenía que ser
  619. 30:29perdonar tenía que ser antes aquí
  620. 30:33insertamos
  621. 30:35uno y
  622. 30:37coma r Kick tal mage Level
  623. 30:4311 region 496 etcétera Luego vamos a
  624. 30:47Añadir una J lip para que utilice el el
  625. 30:52reive de forma en forma batch porque
  626. 30:54aquí llama el reive pero no sabemos si
  627. 30:56el re está metido o no está metido en la
  628. 31:00lista de librerías así que por si acaso
  629. 31:03añadimos justo después del
  630. 31:06Job Así que añadimos aquí un insert y
  631. 31:10añadimos
  632. 31:11tacacata y ponemos jli
  633. 31:17que
  634. 31:21dd disp igual
  635. 31:25shr coma
  636. 31:28dsn = a
  637. 31:32sis c
  638. 31:35punto
  639. 31:37link
  640. 31:40le y con eso ya tenemos la biblioteca de
  641. 31:43linkli con el recib y tal recordar esta
  642. 31:48biblioteca la debemos la tenemos Porque
  643. 31:51en el vídeo anterior os expliqué Cómo
  644. 31:53importar los el volumen s cpk con todas
  645. 31:56las utilidades y y compiladores y la
  646. 31:59madre del cordero que tiene la
  647. 32:00distribución de MVS 38j Así que es
  648. 32:03importante que por si acaso la añadamos
  649. 32:05Aquí bien lo siguiente que vamos a hacer
  650. 32:07aquí es cambiar el uid del procedimiento
  651. 32:11poit ya veis que es complicado pero hay
  652. 32:13que ir paso por paso Eh hay que cambiar
  653. 32:15el uid del procedimiento de er01 a kxs
  654. 32:19Así que aquí en el rcv del procedimient
  655. 32:23este este Proc de aquí hay que quitar
  656. 32:25esto y hay que poner en su lugar
  657. 32:28kcks y este uno
  658. 32:31fuera luego el xií que está
  659. 32:36aquí nos pide también cambiarlo y hay
  660. 32:39que
  661. 32:40poner
  662. 32:42kicks v5 v1 R5 m0 y el Big y el Big pds
  663. 32:49lo dejamos tal cual porque así es como
  664. 32:50se llama así es como lo hemos llamado
  665. 32:52realmente se llama así se llama
  666. 32:58Así que vamos a a quitar esto veis que
  667. 33:01aquí sale en azul porque no encuentra
  668. 33:03nada raro Así que vamos a dar aquí un
  669. 33:06poco de de cancha para poder pegarlo si
  670. 33:09que se nos sobreescribe nada vale Ahora
  671. 33:13sí bien Si de repente ponemos el dataset
  672. 33:17y aparece en subrayado es que lo ha
  673. 33:19encontrado es que existe Así que esto es
  674. 33:21una ayuda que fijaos el ispf de la
  675. 33:24versión zos no tiene Así que eso está
  676. 33:27muy bien vale lo siguiente después del
  677. 33:30del xitin nos pide que hay que Añadir el
  678. 33:34bolser Al sis2 que está aquí Ah claro
  679. 33:37porque aquí lo metería donde le diera la
  680. 33:40gana Así que lo que vamos a hacer aquí
  681. 33:43es Añadir en lugar donde pone si unit si
  682. 33:47salde
  683. 33:48a añadimos b igual a ser igual a K 0 Y
  684. 33:56de esa forma y ojo siempre la coma eh Y
  685. 34:00de esa forma nos aseguramos que todo lo
  686. 34:02que descomprima se va a ir a nuestro
  687. 34:05volumen recién creado kck c0 si no se
  688. 34:07iría a instalar en volúmenes públicos en
  689. 34:10la pu 00 o donde fuera cosa que no
  690. 34:13queremos Así que una vez hecho esto
  691. 34:16hacemos un
  692. 34:19save creo que no hay que tocar nada más
  693. 34:21dejarme que repase un poco
  694. 34:24esto no ya está esto ya lo hace todo él
  695. 34:29así que nada hacemos un
  696. 34:32submit lo pongo en grande y
  697. 34:36enter
  698. 34:40subsitio bueno hemos tenido aquí algún
  699. 34:43problema ha hecho una Benz sist 047 a
  700. 34:47ver qué es lo que ha
  701. 34:48pasado vamos a
  702. 34:51ver algo nos hemos equivocado bien aquí
  703. 34:54tenemos nuestra salida de
  704. 34:57a ver qué es lo que estaba dando aquí
  705. 35:00vale Aquí está el
  706. 35:09trabajo
  707. 35:24mensaje no has ejecutado ninguna de
  708. 35:28estas Y si le quito este J
  709. 35:31lip qué hará
  710. 35:36vale
  711. 35:43sub no me lo puedo creer el el y parece
  712. 35:47que está bueno y bueno como podéis ver
  713. 35:50ha terminado en con code cero así que
  714. 35:53tenemos todo ya
  715. 35:56instalado bien he hecho unas
  716. 35:58modificaciones vale para que podamos ver
  717. 36:00la salida primero msg Class x y por otro
  718. 36:04lado lo que decía que había que Añadir
  719. 36:08en la el J lip Este no es necesario al
  720. 36:12menos en el tk5 no es necesario así que
  721. 36:16bueno ya tenemos todo todo descomprimido
  722. 36:19por tanto ahora se hacemos f3 aquí y f3
  723. 36:22aquí podemos perfectamente cargarnos con
  724. 36:25un delete esto y
  725. 36:29esto del información y d información
  726. 36:34todo borrado así que ya volvemos a dejar
  727. 36:36la la
  728. 36:38máquina sin cosas por ahí sueltas pero
  729. 36:41si ahora hacemos un
  730. 36:43kicks veis que tenemos todo
  731. 36:45descomprimido en nuestro volumen Kick
  732. 36:47c0o como era lo que queríamos hacer
  733. 36:49Bueno pues ya tenemos el germen del
  734. 36:53programa hecho pues continuamos con el
  735. 36:55con el tutorial aquí Aquí hay una cist
  736. 36:58que lo que hay que hacer es llamarla al
  737. 37:02Aquí hay una cist que es la que usamos
  738. 37:04la ikj acnt que en este caso concreto
  739. 37:07nuestro MVS no tiene esa Cuál es la que
  740. 37:11tiene
  741. 37:13esta isp logon Entonces tenemos que
  742. 37:17buscar la isp logon y hacer dos cosas
  743. 37:21primero comprobar que está en la1 prp y
  744. 37:25hay que hacer una serie de
  745. 37:26modificaciones para para Añadir El
  746. 37:29Comando kicks como otro Comando más de
  747. 37:31tso para que podamos lanzar el kicks
  748. 37:33desde nuestro terminal para ello lo que
  749. 37:35hacemos editamos nuestra proclip pero
  750. 37:38ojo no es la ijac cnt tenemos que
  751. 37:42cambiar el parámetro dam member
  752. 37:45a64 Entonces como nuestra nuestra prak
  753. 37:49es la isp logon hacemos una búsqueda tan
  754. 37:52fácil como hacer un 3.4 de la sis un.pr
  755. 37:56lip
  756. 37:59entramos en ella con un brower y
  757. 38:01buscamos nuestra
  758. 38:03isp
  759. 38:07logon Aquí está nuestro isp logon y
  760. 38:10vamos a entrar con un edit y vamos a
  761. 38:13mirar Ah mira ya está dinam 64 pues Oye
  762. 38:17ese paso no lo tenemos que hacer está
  763. 38:19perfectamente realizado ya así que esto
  764. 38:22no hay que cambiarlo y con eso cambiado
  765. 38:24que no hemos modificado nada lo que
  766. 38:26tenemos que hacer es Omar el para
  767. 38:28nuestro usuario para ello lo que vamos a
  768. 38:30hacer es el usar el comando profile
  769. 38:33dentro de nuestro tso para ello salimos
  770. 38:36de aquí que aquí no hay que tocar nada
  771. 38:39vamos a la al comando al ready y hacemos
  772. 38:43un
  773. 38:44profile
  774. 38:47prefix
  775. 38:49kicks por qué porque vamos si lo escribo
  776. 38:52bien Mejor Ahí está porque vamos a
  777. 38:56entrar con el usuario kicks que es el
  778. 38:58que tiene la customización de nuestro
  779. 39:00entorno kicks Así que damos aquí al
  780. 39:04enter Ya está ya estamos con el perfil
  781. 39:09kicks y lo siguiente que tenemos que
  782. 39:11hacer es ejecutar una celist que está
  783. 39:18aquí Así
  784. 39:20que vamos a nuestra pantallita lo
  785. 39:23ponemos un poquito más pequeño para que
  786. 39:24podamos copiar bien y hacemos una
  787. 39:28abrimos comilla simple kcks punto kcks
  788. 39:39sis punto v1
  789. 39:42R5
  790. 39:44m0
  791. 39:46cist
  792. 39:49kfix y
  793. 39:52enter bien aquí tenemos nuestra
  794. 39:54customización del kicks para ello lo que
  795. 39:56nos va a decir es que tenemos que hacer
  796. 39:58enter hasta entrar al posible High Level
  797. 40:01qualifiers el que tenemos que elegir es
  798. 40:04el el hlq kicks no el usuario 01 que
  799. 40:07viene por defecto Así que hacemos esto
  800. 40:11entramos con un entramos Aquí hacemos un
  801. 40:14enter ves el userid
  802. 40:18es01 el prefijo es kicks inst hlq Will
  803. 40:23be kicks If This is not enter to c
  804. 40:28through the list or type no to quit
  805. 40:30Bueno Este es el el equipo Así que si
  806. 40:33deos otra vez al enter nos va a decir si
  807. 40:35es esto lo que queremos hacemos un Yes
  808. 40:37pues hacemos un
  809. 40:42Yes y ya ha hecho la customización y
  810. 40:45hemos acabado ahora lo que hacemos Es
  811. 40:48cambiar nuestro prefijo a no prefix
  812. 40:51profile no prefix para no tener el
  813. 40:54prefijo de kicks por delante
  814. 40:58y y estar otra vez en la configuración
  815. 41:00de tso normal y corriente que aquí viene
  816. 41:04esto Bueno aquí tenemos entornos de
  817. 41:07prueba que ya están hechos con cobol
  818. 41:09kicks vsam para ello Nos vamos aquí de
  819. 41:12nuevo al
  820. 41:14ispf
  821. 41:18isf y Aquí vamos al 3.4 y nos vamos a la
  822. 41:22parte de
  823. 41:25kicks aquí tenemos todos estos datasets
  824. 41:27y hay que buscar uno que es kicks
  825. 41:31kcks v1 R5 m0
  826. 41:36inl kicks kcks insp aquí Este es nuestro
  827. 41:40dataset Así que entramos aquí con un
  828. 41:43brows Y tenemos tres jcls estos tres
  829. 41:47jcls son una carga de una gestión de
  830. 41:51clientes de un tal murach otra carga de
  831. 41:55otra de una aplicación antigua y otra
  832. 41:58carga de otra aplicación cob que era cob
  833. 42:01six vsam para ver cómo se ejecuta
  834. 42:04perfectamente en el kicks Así que vamos
  835. 42:07por la primera hay que hacer algunas
  836. 42:09ediciones porque los paces hay que
  837. 42:10cambiarlos así que hacemos una e porque
  838. 42:13Claro si no ponemos nada Al final todo
  839. 42:15lo que se vaya a crear aquí se va a
  840. 42:18crear en unos discos Como por ejemplo pu
  841. 42:21002 y Mira vamos a meter todo dentro del
  842. 42:24mismo volumen del kicks
  843. 42:27Así que para ello lo que vamos a hacer
  844. 42:29lo primero la clase C la cambiamos por
  845. 42:32clase
  846. 42:36a mensaje Class a lo cambiamos por la x
  847. 42:40aquí la región está bien pero voy a
  848. 42:43Añadir mi jcl mi línea de jcl preferida
  849. 42:48que es barra barra
  850. 42:53notify igual a s
  851. 42:57para estar enterado de lo que pasa bien
  852. 43:00entonces lo que una vez hecho esto
  853. 43:02Ah también hay que añad
  854. 43:06aquí un
  855. 43:12uno así el número de Counting vamos una
  856. 43:17vez hecho esto ya nos vemos aquí nos
  857. 43:19vamos a la parte
  858. 43:20de eso que borra aquí va a crear aquí
  859. 43:25aquí lo que va a hacer es crear un vsam
  860. 43:28con los datos de los clientes pero vamos
  861. 43:31a ponerlos en el volumen
  862. 43:35kicker Data Index Aquí también vamos a
  863. 43:42poner kck c como
  864. 43:44volumen
  865. 43:46correcto vamos a ver aquí que no se nos
  866. 43:49pase nada Define cluster Kick
  867. 43:540 o hacemos un change Perdón un change
  868. 43:58de puff 002 por kck 0 all me lo tiene
  869. 44:03que cambiar todo veis ya me lo ha
  870. 44:06cambiado
  871. 44:07aquí
  872. 44:11f8 aquí la carga la carga de los de los
  873. 44:14datos
  874. 44:17klo Y aquí Esta es una repro de datos
  875. 44:22que que nos lo meterá en el vsam vale
  876. 44:26aquí y también
  877. 44:30cile Aquí también repro que no se nos
  878. 44:34pase ningún volumen por
  879. 44:36aquí
  880. 44:38no tal aquí hay más datos de V
  881. 44:42sanes es Esos son todos
  882. 44:45repros vale también eso también está
  883. 44:48aquí Def alternate
  884. 44:51Index volumen Kick muy
  885. 44:55bien ha hecho cambio completamente y ya
  886. 44:58está Entonces ahora si hacemos aquí un
  887. 45:00sub lo que va a hacer es cargar los
  888. 45:03datos de trabajo de aplicación de murach
  889. 45:07que yo os enseñaré luego cuál es así que
  890. 45:09sub
  891. 45:12subiti y acaba en cero perfecto pues una
  892. 45:15cosa menos vamos a cargar el siguiente
  893. 45:18hacemos lo mismo aquí añadimos primero
  894. 45:22el
  895. 45:24accounting Class
  896. 45:27qué ha pasado
  897. 45:30aquí
  898. 45:32Ah el s no funciona vale Class a message
  899. 45:37Class x message Level tal y como es
  900. 45:42menester y os lo recomiendo a todos
  901. 45:45añadimos
  902. 45:46barra
  903. 45:49barra
  904. 45:50notify ig a
  905. 45:53ampersan
  906. 45:55sisid por si todo casca y aquí lo mismo
  907. 45:59ya veis que está el pu 002 pues hacemos
  908. 46:01un
  909. 46:02change
  910. 46:04de Pu
  911. 46:06002 a kicks 0
  912. 46:12all ya nos lo ha cambiado
  913. 46:18aquí y en ningún otro sitio más perfecto
  914. 46:22pues sub subm mitido cero muy bien Y por
  915. 46:28último en loag también hacemos
  916. 46:34nuestra 1
  917. 46:37coma Class a m Class x para poder ver
  918. 46:42los textos en nuestro editor del spool y
  919. 46:46hacemos un insertamos nuestra línea
  920. 46:51de notify ig
  921. 46:55ampers ID
  922. 46:57y ya está y aquí lo mismo pu 002 Así que
  923. 47:02hacemos un change de Pu 002 por kicks 0
  924. 47:09all Ahí está ha
  925. 47:14cambiado y hacemos un
  926. 47:16sub subiti y todo acaba en cero Y si
  927. 47:21hacemos aquí un f3 y un f3 y un f3 y ya
  928. 47:24hemos cargado todos los datos si vamos a
  929. 47:25nuestro out list podemos ver aquí los
  930. 47:28diferentes trabajos por ejemplo el de
  931. 47:30murach que ha acabado
  932. 47:32aquí ya veis que alocado lo que tenía
  933. 47:35que alocar aquí tenemos nuestra primera
  934. 47:37paso que ha acabado en cero segundo paso
  935. 47:40que ha acabado en cero último paso que
  936. 47:42ha acabado en cero y cero ya veis que
  937. 47:46está todo
  938. 47:49fetén en con el resto pues tres cuartos
  939. 47:53de lo mismo entramos aquí una s y vemos
  940. 47:54aquí que efectivamente el sistema
  941. 47:56acabado en cero y tenemos aquí el
  942. 47:58resumen de la ejecución
  943. 48:00etcétera la verdad es que da hasta casi
  944. 48:03más datos que el spol que el sdsf de de
  945. 48:07IBM del zos Eh Así que la verdad es que
  946. 48:10la gente ha hecho un trabajo
  947. 48:12encomiable con la edición y la creación
  948. 48:14de estos Editores que que todo esto es
  949. 48:17Open source eh recordad que todo esto es
  950. 48:19Open
  951. 48:19source bien pues una vez que ya hemos
  952. 48:22cargado todos los datasets de trabajo de
  953. 48:26prueba para que funcione el kicks pues
  954. 48:28vamos a lanzar el kicks para ello
  955. 48:31primero vamos a buscar por kicks y hay
  956. 48:33que ir a la tenemos que ir al kicks ksis
  957. 48:37v1 R5 m0c list vamos a est más abajo
  958. 48:41ksis aquí cist y esta es la cist de
  959. 48:45arranque del C Que es kicks así que lo
  960. 48:48que vamos a hacer es editarla porque
  961. 48:51creo que hay que Añadir alguna cosita
  962. 48:52por aquí que antes no
  963. 48:54estaba en la línea 140 para ser más
  964. 48:58exactos según el manual este que tenemos
  965. 49:00aquí en la web dice que hay que alocar
  966. 49:03este
  967. 49:04tipo estos ficheros y hay que cambiar el
  968. 49:09kiki de kiks
  969. 49:12ver.lo este hay que borrarlo así que
  970. 49:16agur benur ya nos quedamos con el tsid
  971. 49:19kcks versión skilo y
  972. 49:23Kid kis
  973. 49:25version lo Haz y ya está y con esto
  974. 49:30salvamos y ahora si ya vamos al tso tal
  975. 49:36cual ready y hacemos un
  976. 49:38exec de qué de la celist kicks punto
  977. 49:45kis
  978. 49:47punto v1
  979. 49:51R5
  980. 49:53m0 cist y
  981. 49:57kicks y cierro
  982. 50:03comillas
  983. 50:05tachan ya tenemos nuestro entorno kicks
  984. 50:08funcional de hecho si vamos al enter
  985. 50:11cambian los para que veáis que el propio
  986. 50:15transaccional ya está cambiando los los
  987. 50:17los colores pues ya tenemos nuestro kiik
  988. 50:19si ahora mismo hacemos
  989. 50:21un Clear que en el personal
  990. 50:23Communications es la tecla pausa
  991. 50:26podemos hacer por ejemplo cualquier cosa
  992. 50:29por ejemplo el programa demo que era Inc
  993. 50:331 creo que se llama que es el programa
  994. 50:35de murach y aquí efectivamente nuestro
  995. 50:37customer number que creo que empezaba
  996. 50:39por el
  997. 50:401000 bueno justo no está no es este 100
  998. 50:44que creo que si metemos el
  999. 50:474000 1 Ahí
  1000. 50:51está por ejemplo si hacemos aquí f12
  1001. 50:54cancel vamos a nuestro menú disay
  1002. 50:57customer information que era lo que
  1003. 50:58estábamos viendo customer number pues
  1004. 51:00era 4 el 40000 que no existe pero 4001
  1005. 51:05sí McDonald k y si vamos a f12 podemos
  1006. 51:08incluso mantener órdenes de trabajo aquí
  1007. 51:12podemos incluso crear un número un
  1008. 51:15usuario nuevo por ejemplo voy a crear el
  1009. 51:16usuario
  1010. 51:18100000 New customer Last name Pues voy a
  1011. 51:21poner de los palotes
  1012. 51:29adr
  1013. 51:30avenida de la paz número 43 City pues
  1014. 51:37vamos a poner
  1015. 51:39Bilbao Por qué Porque Bilbao es la
  1016. 51:41capital del mundo estado Vizcaya cip
  1017. 51:44code
  1018. 51:4548001 y enter y ya hemos añadido un
  1019. 51:49nuevo un nuevo
  1020. 51:51cliente Por otra parte si damos a f12
  1021. 51:55podemos introducir orden de trabajo por
  1022. 51:57ejemplo a nuestro customer que era
  1023. 52:0040,001 podemos poner el código de
  1024. 52:04producto Pues yo que sé por ejemplo el
  1025. 52:06001 cantidad 1 que es
  1026. 52:12Penny y ya hemos creado una orden de de
  1027. 52:16de ejecución ese a ese a ese cliente
  1028. 52:19veis que esto es un zix realmente t tal
  1029. 52:23es el Z que si yo ahora mismo vo aquí
  1030. 52:25enter si salgo aquí y le doy a pausa y
  1031. 52:30hago un kdf que es el famoso cedf para
  1032. 52:33debugar el
  1033. 52:35Z ya está y ahora si hago menú creo que
  1034. 52:39era ahora eso B a lanzar el menú con el
  1035. 52:44mapset mset menu map aquí el comand se
  1036. 52:48complete y aquí sale el área la comara y
  1037. 52:52aquí nos aparece el menú display
  1038. 52:54customer information
  1039. 52:56aquí ahora nos está debug es ves el ex
  1040. 52:59reive map hacemos la recepción del mapa
  1041. 53:03va a lanzar el programa El xtl program c
  1042. 53:06Ink 1 que a su vez tiene la comara con
  1043. 53:09esta con esta eh
  1044. 53:13información metemos los datos por
  1045. 53:16ejemplo pues el mío el el 10.000 enter
  1046. 53:19veis
  1047. 53:21que usa el reive hace el include ya veis
  1048. 53:26la comara está aquí está la comara con
  1049. 53:30los datos lanza el X file va leer el
  1050. 53:35fichero c+ que recordemos que es el
  1051. 53:37fichero vsam que contiene los
  1052. 53:40clientes aquí en la comaria ha metido
  1053. 53:44todos los datos del del cliente más más
  1054. 53:48datos del cliente y hace el s
  1055. 53:51map execution complete
  1056. 53:56y aquí tenemos el mapa ya veis Cómo se
  1057. 53:59debug Gea un kicks que es lo mismo que
  1058. 54:01debuggear el zix así que bueno salimos
  1059. 54:04aquí con f3 aquí con
  1060. 54:06f 3
  1061. 54:09f3 session ended y hacemos un kdf off
  1062. 54:14para salir Cómo Cerramos el kicks Pues
  1063. 54:18kssf que era el cssf lof del cix Pues
  1064. 54:23aquí es kssf por el kicks
  1065. 54:27K Shooting down y
  1066. 54:31ready ya veis que fácil ya hemos
  1067. 54:33instalado un cic un kicks más bien dicho
  1068. 54:36en nuestro entorno tso bien para hacerlo
  1069. 54:40más rápido para no tener que hacer meter
  1070. 54:42esa c list y ese Paz entero lo que vamos
  1071. 54:45a hacer es copiarnos esa c list y nos la
  1072. 54:49vamos a meter en el sis 1.cmd Proc para
  1073. 54:54ello hacemos un spf 3ve copy desde el
  1074. 55:00dataset vamos a
  1075. 55:02copiar desde el dataset que tenía aquí
  1076. 55:06copiado control V de
  1077. 55:09Kick
  1078. 55:12kicks y recordar que hay que poner las
  1079. 55:14comillas porque si no va a poner por
  1080. 55:16defecto er01 y por eso no lo encuentra
  1081. 55:19hacemos aquí un
  1082. 55:21copy A dónde Pues al
  1083. 55:27cmd Proc no es muy ortodoxo porque lo
  1084. 55:32suyo sería concatenar la librería de de
  1085. 55:34kicks en nuestra en nuestra sisp Pero
  1086. 55:40mira va a ser más rápido
  1087. 55:43así ya se ha copiado Entonces ahora
  1088. 55:45mismo ya simplemente con esto si salgo
  1089. 55:48hago un log of y vuelvo a entrar con
  1090. 55:52er01 y password que haya puesto
  1091. 56:00aquí tenemos nuestro esto salimos con f3
  1092. 56:03Y si hacemos un kicks tiene que ir a la
  1093. 56:07primera y ya tenéis el kicks instalado
  1094. 56:10en nuestro sistema MVS
  1095. 56:133.8j Clear vale K
  1096. 56:18ssf Cerramos el
  1097. 56:20kicks hacemos un isf y es una gozada
  1098. 56:24porque aquí eso ese programa que os he
  1099. 56:27enseñado del kcks lo tenéis aquí kcks
  1100. 56:30murach control invoice invoice no sé qué
  1101. 56:33estos son los diferentes ficheros vsam
  1102. 56:36Pero hay aquí están los mapas de los
  1103. 56:39diferentes entornos mira aquí tenéis en
  1104. 56:42kicks map
  1105. 56:45src todos los fuentes de los mapas que
  1106. 56:51habéis visto en la
  1107. 56:53aplicación y aparte de esto Esta es la
  1108. 56:56parte de los mapas Pero y aquí en k.k.
  1109. 56:59v1 R5
  1110. 57:03m.com podemos ir aquí al cus Ink 1 y ver
  1111. 57:08el Fuente del cobol que llama a la
  1112. 57:12aplicación que hemos visto de gestión de
  1113. 57:15clientes ya veis que esto es Exactamente
  1114. 57:17igual esto es cob puro como el cob six
  1115. 57:20de b2 Solo que aquí en lugar de Six
  1116. 57:23Clear es Kick Clear en vez de de
  1117. 57:28exec pues es exec
  1118. 57:32kicks pero mi compañero Luis ha estado
  1119. 57:35haciendo unas pruebas y me ha comentado
  1120. 57:37que si no pones exec kicks y pones exec
  1121. 57:41el sistema te lo traga o sea de debe
  1122. 57:43haber un alias para que los programas
  1123. 57:45que ya estaban escritos en Zig se puedan
  1124. 57:47portar al kicks sin tocar Ni una sola
  1125. 57:51línea de código así que bueno tenemos un
  1126. 57:55sistema transacción con ficheros vesam
  1127. 57:57no de b2 obviamente en un entorno de
  1128. 58:031981 y ya veis qué fácil es
  1129. 58:08lanzarlo así que bueno sin más Este ha
  1130. 58:11sido un vídeo un poquito largo porque ya
  1131. 58:13veis que hemos tenido que hacer muchas
  1132. 58:15pruebas hemos tenido que enviar varias
  1133. 58:17veces el fichero porque ha fallado eh En
  1134. 58:21fin cosillas del directo que tenemos
  1135. 58:23aquí pues bueno a la hora de instalar
  1136. 58:25una aplicación Porque además es una
  1137. 58:27aplicación ciertamente compleja Pero
  1138. 58:29bueno ya habéis visto en como en MVS
  1139. 58:33podemos ver el resultado de los trabajos
  1140. 58:36eh ten o sea es decir que el sdsf está
  1141. 58:39más o menos metido dentro de la de la
  1142. 58:41aplicación del rfe del ispf que tenéis
  1143. 58:45aquí y bueno ya tenemos un un sistema
  1144. 58:48transaccional en el que podemos crear
  1145. 58:50nuestros propios programas cobol que
  1146. 58:52ataquen ficheros de bases de datos vsam
  1147. 58:55que era lo que se hacía toda la vida
  1148. 58:58antes de la llegada del dv2 y se sigue
  1149. 59:01haciendo durante durante muchísimas
  1150. 59:04aplicaciones que todavía trabajan con
  1151. 59:06ficheros vsam y se sigue utilizando a
  1152. 59:10día de hoy como herramienta normal en
  1153. 59:12los sistemas zvc que zvc es un sistema
  1154. 59:16operativo muy pequeñito con un zix muy
  1155. 59:18potente pero que tiene por debajo son
  1156. 59:20ficheros vsam ni siquiera tiene db2
  1157. 59:23porque no lo necesita porque el vsam es
  1158. 59:26tan potente como el
  1159. 59:29db2 salvo salvo las instrucciones sql
  1160. 59:32Que obviamente no tiene Pero vamos
  1161. 59:35siempre ha sido el vsam un entorno
  1162. 59:37indexado muy muy muy potente y que se
  1163. 59:40sigue utilizando hoy en día así que
  1164. 59:43todos aquellos que decís que este vídeo
  1165. 59:45os parece una [ __ ] porque preferiría
  1166. 59:48aprender zos Pues bueno a ver tenéis
  1167. 59:50parte de razón pero por otra parte el
  1168. 59:53tener un entorno que es totalmente libre
  1169. 59:55que no tienes que estar pagando ninguna
  1170. 59:56licencia a IBM y que te sirve para
  1171. 59:59aprender a programar el en cob thix pues
  1172. 1:00:03lo tenéis aquí y toda la sabiduría la
  1173. 1:00:05tenéis a un golpe de un click de acuerdo
  1174. 1:00:07pues eso ha sido todo si os ha gustado
  1175. 1:00:10el vídeo Dad a me gusta o visionar los
  1176. 1:00:12anuncios que aparecen en el vídeo para
  1177. 1:00:13apoyarme económicamente Dad a la
  1178. 1:00:15campanita para que os avise Cuando suba
  1179. 1:00:16nuevos vídeos aunque los que ya me
  1180. 1:00:17conocéis sabéis que lo subo todos los
  1181. 1:00:19viernes en la medida que puedo
  1182. 1:00:20suscribiros Si no lo habéis hecho ya
  1183. 1:00:22porque Cuanto más seamos mucho mejor y
  1184. 1:00:24además me ayuda a mantener el canal Y si
  1185. 1:00:26tenéis alguna duda de la que queráis que
  1186. 1:00:27hable en futuros vídeos Y si está dentro
  1187. 1:00:29de mis conocimientos dejádmelo en los
  1188. 1:00:30comentarios ya veis que os hago caso y
  1189. 1:00:32os los contesto todos y sobre todo
  1190. 1:00:35Muchísimas gracias por ver el vídeo
  1191. 1:00:37hasta el
  1192. 1:00:38final así que dicho esto hasta el
  1193. 1:00:41próximo vídeo de mainframe corner
  1194. 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.