然光 不学无術 暗于大理

zos JESMSGLG 不显示 job steps return codes

hercules zos console DSN9016I

hercules zos cics 定义 Console

Windows 11 连接 hercules zOS Websphere MQ 配置

在平日银行系统开发，会有一类账号叫资金池账号 cash pooling account，用来方便会计处理这类账号跟平常见的往来账号 或 储蓄账号 差不多例如 资金池账号 A，可以关连 10 个往来账号（叫参与账号），和一个储蓄账号资金池账号一般有三种操作，transfer, reinstate 和 interest触发 transfer，就像统一收款，资金会由参与账号，全转到资金池账号，然后转到储蓄账号。另外，参与账号可以设置保留多少余额reinstate 跟 transfer 资金流.

举行 JOB00001 是周一和周三触发如果设置了 ROLL=B，会触发在 "previous available processing day"例如 20210519 为假期，会在前一日 20210518 触发例如 20210922 为假期，会在前一日 20210921 触发例如 20220201-03 均为假期，会在前两日 20220131 触发...

一般上傳到主機put JC$GEN01 'IBMUSER.ISPF.JCLLIB(JC$GEN01)'要上傳到主機 USS OMVSput JC$GEN01 '/u/IBMUSER/JC$GEN01'

最后是 我 一个人走过 这片海桌面邮件叮的一声，收到了 admin 小姐姐发出的邮件，原来今天是系统操作部门主管最後一天的上班，主管买了好多小零食，大家可以到编号 xxx 柜里自己领取。想一想原来这家银行的员工大多数都是已经工作了二叁十年的，从青葱毕业到退休，时光飞逝。我也是这家银行的员工，不知不觉在这里也差不多工作五年了，我的天呐。呜呜呜，毕业原来已经十多年了。老家褔建，小时候就漂流到香港，从小到大学习成绩还算不错，无奈高考成绩和选科不好，最後只好申请排名最差的一所大学，选的是电脑...

由于 Windows 协议限制，使用 OpenSSH scp 由 Linux 复制大型档案到 Windows复制速度会很慢，例如 7.xMB/s可以使用 Putty 带的 pscp，这样速度可以快上几十倍kazuya@KAZUYA-PC ~$ pscp kazuya@192.168.50.15:/home/kazuya/zos/* .kazuya@192.168.50.15's password:ZADB84 | 1081888 kB | 108188

//APKEN001 JOB ,'DEL DATASET',CLASS=C,MSGCLASS=S,MSGLEVEL=(1,1),// REGION=4096K,TIME=1440,COND=((4,LT)),NOTIFY=&SYSUID// !!! PLS DOUBLE CHECK AND REMARK THIS LINE TO SUBMIT//* DELETE DATASET//STEP0010 EXEC PGM=ADRDSSU//SYSPRINT DD SYS.

先看实例，下面是 JM 大神 RPG 第一讲 的例程再来从实际银行系统角度看，来认识一下实际 RPG 程序差别http://www.jaymoseley.com/hercules/rpgtutor/rpg004.htmVIEW IBMUSER.SOURCE.PROGRAM(RPG00001) - 01.02 Columns 00001 00080 Command ===>

当系统 IPL 开机时提示 IFB081I LOGREC DATA SET IS FULL 代表日志已经满了，要清理一下 *10.00.35 *IFB081I LOGREC DATA SET IS FULL,10.00.35, * DSN=SYS1.LOGREC - 10.02.21 STC00004

RPG 是一种超古老的程序语言，但还有不少大银行主机上仍然有好多 RPG 程序在跑这种程序语言主要用来生成报表，个人觉得功能超牛b，而且当今还没有其他语言可以做到它的效果RPG 现在主要可以分2个版本，一个是 RPG IV 以前的，和 RPG IV 以后到现在的版本RPG IV 主要也是银行在用，但它是在 小型机上运行，不是主机，操作系统是 AIX，语法接近现在这里安装的是老一代的 RPG，这一代的 RPG 特别之处就是它是按数据行来执行程序的例如: 银行白天的交易生成了一个档案，每一行代表一

//APKEN002 JOB ,'COPY DATASET',CLASS=C,MSGCLASS=S,MSGLEVEL=(1,1), // REGION=4096K,TIME=1440,COND=((4,LT)),NOTIFY=&SYSUID // !!! PLS DOUBLE CHECK AND REMARK THIS LINE TO SUBMIT //* COPY.

kazuya@KAZUYA-PC ~$ ssh ibmuser@192.168.200.1Unable to negotiate with 192.168.200.1 port 22: no matching key exchange method found. Their offer: diffie-hellman-group-exchange-sha1,diffie-hellman-group1-sha1可以一次ssh -oKexAlgorithms=+diffie-hellman-..

设备编号 700 主控制台 正常在主机起机前会先打开，然后才 IPL，用来接收主机主控输出但有时候不小心关了或起机前忘了打开可以用下面方式重连可以在 hercules 里面用 以下 EXT 指令.v 700,offline然后，打开新的 tso.v cn(L700),online或用 IBMUSER 登陆 SDSF，再发相同令来重连/v 700,offline然后，打开新的 tso/v cn(L70...

前言背景现在程序员行业挺抢手，Java, Python 等等程序语言各大公司都有很大的需求，当中有一个行业，其实比较容易忽略，就是银行的程序员。银行系统其实有各种程序员需要，无论 Java, Python, 还是 Cobol 都很需要人手的。可是刚毕业的宝宝们大多选 Java，Python 这些，Cobol 却没啥人问津，加上刚毕业学生其实也不知道如何学Cobol。开始之前先简单比较一下：主机程序员 跟 Java 程序员 主机程序员 Java 程序員 流行程度 非常不流行.