大型机最疯狂/最顽固的事情

瓦桑斯

您在大型机上看到或编码的最疯狂的程序或最有趣的程序是什么。
还是您做过任何恶作剧？

rockish

在我的一个项目中，我看到一个COBOL程序连续在其生产版本的SYSOUT中打印“ F字”……我很震惊地看到这种情况，并试图追溯其起源。当我知道这是开发人员用来在测试时显示错误的DISPLAY语句，以及他在将其投入生产之前只是想删除该错误时，我很认真地知道该如何应对！

恩里科·索里切蒂

在为ATM应用程序测试原型时，一个合法的事件序列将是...

……巨型……
归还卡
发行钱
打印收据

...如果出现打印失败，屏幕将显示如下消息：
无法打印收据，交易仍然成功完成，
检查银行对账单以确认提款

为了不发钱，我们做了一些调整
并在屏幕上显示消息
无法发行资金，交易仍然成功完成，
检查银行对账单以确认提款

在最后的验收测试之前，花了很长时间决定将其拿走

比尔·奥博伊尔

在80年代中期，我们在软件公司实习，负责将更新磁带（3420 REELS）交付给客户。

一天，她放下了一个，后面有一个写环。好吧，它弹出了，我们告诉她，磁带数据现在已损坏，需要重新创建磁带，这是一个漫长的过程。

当她发现我们在对她开玩笑时，男孩对她很生气，但她冷静下来，后来笑了起来。

法案

罗伯特·桑普

当我还是360/30的操作员时，您可以调谐收音机并从处理器中提取静电。该站点的系统程序员拥有一个程序台，可以在广播的静态节目中播放“玛丽有只小羊羔”。

姆巴布

编写了一个程序，该程序将全屏（模拟）TPUT发送给其他同事，以在其TSO屏幕上显示正在跳舞的女孩。啊，大约30年后，我仍然可以听到尖叫声。他们中的大多数是女人，所以要让我回去，女人们第二天都穿了衣服，他们知道这会让我发疯（出于某些原因，几天前在午餐会上讨论了这个话题）。如今，任何一种活动都会使您陷入困境，并因正确性而陷入困境，然后将您烧死在火刑柱上，然后律师会把您的骨灰冲进监狱的厕所。

特里·海因兹

Univac 90/30的控制台操作员可以通过键入“运行xxxxxx”来执行程序。由于CPU从来没有像您想要的那样快，因此我在程序员中经常听到的抱怨是它的运行速度不够快。我编写并安装了一个操作员不知道的名为FASTER的程序，该程序仅显示“我正在尽可能快地运行”。有一天，当我听到一个熟悉的操作员投诉时，我告诉他“加快运行速度”，看看是否有帮助。结果很明显。

rockish

嗨，特里，我想您已经在其他地方发布了这个！我记得已经读过了

特里·海因兹

是的我认为是多年前发布的。

c

回顾360/45的时代，我们与另一个政府部门进行了交流。

他们全天候24x7，而我们全天候24x5。

在我们休息日的周末期间，另一部门的一名操作人员决定换掉我们机器上的启动和停止按钮，这是在您回家之前关闭机器电源的日子。

星期一早上到了，我们的机器无法启动，IBM工程师花了12个小时以上的时间来解决问题。

负责人员休假期间。

没有人拥有它，但是我可以向您保证，管理层绝对是愤怒的。（没有幽默感）

凯尔德 · 发表：2010年2月5日，星期五6:43 pm

我的一位同事曾经尝试将代码生成到我们的PDS源代码库之一中。当时的源库系统非常成熟，并且依赖PDS进行源存储库。

他忘记在要写入的DD语句中编码成员名称，这当然导致他覆盖了PDS的目录空间。

由于所有开发人员都可能会受到这种影响，正在进行中的工作松散，因此他必须向同行报告错误，以恢复库并将信息提供给所有人。

感谢上帝的支持！

外籍人士 · 发表：2010年2月5日，星期五6:52 pm

一旦更改了VTOC，就可以打开同事数据集的“密码保护”指示器。

另一个是带有滚动条和灯光显示屏的旧370/158。我们告诉实习生，如果他们清洁每个灯泡背面的触点，电力将会更快并减少过夜的批量运行。

alexlloyd54

在处理大型主机opsys时，我一直非常小心，因为我曾经将系统视为自己的系统（孩子）

但是我曾经犯了一个巨大的错误，我无法原谅自己

我使用的是RACF实用程序之一，该实用程序将sys1.racf数据集转储到顺序文件中，然后（错误地）将输入设置为空的顺序文件，并将输出设置为sys1.racf

提交工作并按Enter键后，我发现我已经做了愚蠢的事情！

这发生在早上的办公时间内，我们所有的在线制作用户都在忙于为客户提供服务

我当然可以很快解决问题

赛加羚羊

我所做的最糟糕的事情之一就是尝试重命名生产文件。那是我们拥有生产访问权的日子，以前所有的工作都是由我们手动完成的。当我在Fileaid中按'RENAME'时，屏幕卡住，并且需要很长时间才能做出响应。我按下了ATTENTION键，然后重新登录时，想像什么？我在系统中同时发现了旧文件和新文件。

尽管我们稍后对其进行了修复，但它教会了我您在生产中所做的任何事情，但请在BATCH中进行。除非有必要，否则请不要前台，您别无选择。

盖伊

很久以前，我需要打印一个完整的文件（12.000条记录）〜1盒Fanfold纸。

我使用FCB设置行数/英寸来限制#pages，但是忘记了它还使用文件的第一个字符作为ControlCharacter。
90％的记录以1（= Top_of_Form）开头。

第二天早上，我收到了6个盒子，每个页面上都有1条记录，而且接线员打了个愤怒的电话。
纸张飞过打印机的速度比他装纸的速度快，他花了6个盒子才发现有问题并清除了工作。

Sys Edwin

几年前，我在DOS / VSE系统上使用名为Mark的摇摄进行工作。他认为编写一个显示控制台消息的程序真的很有趣，“我对您正在处理的所有重复的废话感到无聊，我需要休息”。后来，“如果您不休息，我将不得不放慢脚步”。这个一般的事情以及一个吸收周期的例程。最终，当机器运行得非常缓慢时，它会显示“我受够了，我警告过你，我要睡觉了”，这时它刻苦等待。

瓦桑斯

一旦我的同事（X）使用SMTP向Z发送电子邮件，就好像Y（女士）已发送电子邮件。通过更改SMTP JCL中的FROM字段。

Z回答Y，这成为滥用问题。X被解雇了！！

yogeshwar_ade

这件事发生在我刚进入Mainframe时。我试图在“测试环境”中运行“批处理周期”，但是由于错误，我忘记了要使报告在SPOOL中而不是在Printer中打印。
提交工作后，我的客户在TEST PRINTER上打印了所有保单，第二天我接到客户的电话，要求其解释和浪费数百万篇论文。

瓦桑斯

ankit.goel

由于某些紧急任务需要由EOD完成，因此我们进入生产通道时发生了这种情况。实际上，我们以表格的形式设置了一些规定，并且在工作时必须遵循规则。我在Production中以一个ppt尝试了很多，但一直被Edit击中，无法前进。我只是先从系统中删除了编辑内容，然后进行了检查，它可以工作，但是编辑未触发需要的地方。
因此，我最终从生产中删除了参与者，后来才知道ppt上的数据集是错误的。
我们也确实在mirror dab上有数据，因此我相应地重新创建了ppt。但这是一次很好的经历，我才知道背后的原因...

Anshuljain26

盖伊，真的是一个好书。

尤夫拉杜塔

M / F Spawner

在前台运行REXX，然后提交一个作业，该作业在BATCH中执行相同的REXX，然后继续。

很快，SPOOL已满。 ..并且，无论您从SPOOL清除了多少工作，到完成PURGE时，都会出现更多的工作。

并警告说SPOOL已满，并且如果您足够恶意以生成随机CLASS等。您将获得胜利者...相信我，如果ADMIN需要登录，即使他不能登录，除非达到了整个SPOOL限制，并且只有活动的作业已终止，并且当然没有其他人可以登录;）

和最好的傻瓜..设法清空了我的个人CICS MAP库

[/码]

普里诺

在1990年代初期，我计算出“ e”到1,000,000个位，这比1994年4月1日罗伯特·内米尔洛夫（Robert Nemiroff）的10,000,000位结果&杰里·邦内尔。当他们发现时，公司不是很高兴-我的工作一次只能运行10分钟，但是如果您快速进行数十次成功运行，就会出现一些问题。

我敢肯定，它花了几周（甚至更长的时间），并花费了大量的CPU时间。可惜我从来没有告诉过任何报纸，它会给我另一个 15分钟成名。如果您想拥有一份 PL / I 程序，解密我的电子邮件地址...

潘多拉魔盒 · 发表：2011年12月26日星期一7:45 pm

在我的工作很简单的阶段，我用一个小错误更改了一个小代码，因为我将钱帐户缩短了两位数，所以几乎触发了至少1500封邮件

幸运的是没有人抱怨心力衰竭

rajesh1183

我们有一个测试&PROD环境。忙碌的一天，我已登录PROD环境并搜索我的测试数据集。和往常一样，我在那边找不到它们。忘记了我在PROD环境中登录的东西，我慌了失措，升级为我的经理，并致电存储管理员来恢复我的测试数据集...

而且，我对同事进行了ping操作，并要求他们检查他们的测试数据集。我还共享了存储管理员，以防丢失测试数据集...

后来发现了我愚蠢的错误，不停地羞怯地笑了起来。