第14章 COBOL幽灵
“十万！COBOL！”
这两个词如同两道裹挟着高压电流的闪电，狠狠劈进陈默混沌濒临熄灭的意识深渊！周倩尖利的声音还在耳边嗡嗡作响，像隔着一层厚重的毛玻璃，但他涣散的目光已经死死钉在了工作台上那张打印纸上——那醒目的“100，000元”和“COBOL”几个字，带着一种近乎蛮横的力量，强行拽住了他正滑向黑暗的灵魂！
眩晕感如同退潮般迅速消散，取而代之的是一种被绝境逼出的、近乎疯狂的清醒！他猛地吸了一口气，冰凉的空气夹杂着机油和焦糊味灌入肺叶，带来针扎般的刺痛，却也奇异地驱散了眼前的黑雾。
“扶……扶我起来！”陈默的声音嘶哑得如同破锣，他挣扎着，伸出一只沾满油污、还在微微颤抖的手。
周倩这才注意到陈默惨白如纸的脸色和瘫软在地的虚弱状态，吓了一跳：“陈哥！你……你怎么了？”她慌忙伸手，用力将陈默从冰冷的水泥地上搀扶起来。陈默的身体沉得厉害，双腿虚软，几乎将全部重量都压在周倩身上，才勉强站稳。
“没事……就是……有点累。”陈默摆摆手，强撑着挺直腰背，但额头上瞬间又沁出一层细密的冷汗。他扶着工作台边缘，目光如同鹰隼般锐利，再次聚焦在那张悬赏通告上，逐字逐句地读着，仿佛要将每一个字母都刻进脑子里。
IBM AS/400小型机。OS/400操作系统。COBOL语言核心。
72小时。十万悬赏。
每一个词，都像一个沉重的砝码，压在他早已不堪重负的肩膀上，却也点燃了他眼中最后一丝搏命般的火焰！这十万块！是林薇的救命药！是维系这个家暂时不散的最后一根绳索！
“周倩……联系！”陈默的声音斩钉截铁，带着不容置疑的决绝，“告诉超市！这活……我接了！现在！立刻！马上过去！”
……
万家福超市巨大的中心仓储中心，此刻却像一个陷入混乱的冰冷心脏。高耸的货架间人影穿梭，却充满了无头苍蝇般的焦躁。叉车喇叭声刺耳地响着，催促着，却又不知该驶向何方。空气里弥漫着一股浓重的、混合着各种生鲜蔬果和冷冻品即将腐败的、令人不安的气息。最深处，那几扇厚重的、冒着森森白气的冷库大门紧闭着，门上的温度显示屏闪烁着刺眼的红色警报：**-5℃（持续上升中）**！距离冷藏品安全温度上限（0℃）仅有五度之遥！一旦突破，价值数百万的冷冻食品将面临报废！
冷库旁边的设备间里，气氛更是降到了冰点。几台一人多高的、布满按钮和指示灯的灰黑色机柜（IBM AS/400小型机）发出沉闷的嗡鸣，机柜侧面一个打开的维修面板里，线路如同纠缠的蛇窝。几个穿着统一IT运维制服、平均年龄不超过三十岁的年轻人围在连接着主机的几台显示器前，个个脸色灰败，额头冒汗。
显示器屏幕上，不是常见的Windows或Linux界面，而是一片令人绝望的、深蓝色的字符海洋。无数行绿色的、由字母和数字组成的、结构极其繁琐复杂的代码行在屏幕上滚动、停滞、报错。那是COBOL语言——一种诞生于上世纪五十年代末、早已被现代开发主流抛弃、只有极少数遗留系统还在苟延残喘的“史前”编程语言！
“妈的！这都什么鬼东西！”一个戴着黑框眼镜的年轻工程师烦躁地抓乱了头发，手指在键盘上噼里啪啦地敲击着，屏幕上的绿色字符却只是冷漠地跳出一行错误提示：**“DATA DIVISION NOT FOUND. FILE STATUS 35.”**
“文件状态35？这他妈什么意思？！手册呢？！谁有这古董的手册？！”旁边一个瘦高个几乎要崩溃。
“老大！冷库温度又升了！-4.5℃了！采购部电话快被打爆了！”一个实习生模样的女孩拿着对讲机，声音带着哭腔。
被称作老大的技术主管，一个三十出头、西装领口都被汗水浸湿的男人，脸色铁青地对着手机咆哮：“总部支援呢？！不是说调派懂COBOL的专家来吗？！人呢？！再不来，大家一起卷铺盖滚蛋！”
就在这时，设备间的门被推开。冷库那边渗过来的寒气混合着设备间沉闷的空气，形成一股诡异的气流。
超市的孙经理（此孙经理非彼物业孙经理，但同样焦头烂额）领着两个人走了进来。前面是一个脸色苍白、脚步还有些虚浮、穿着沾满油污旧工装的男人（陈默）。后面跟着一脸紧张又带着点期待的周倩。
技术主管的目光扫过陈默那身与周围环境格格不入的行头和他明显不佳的状态，眉头瞬间拧成了死结，语气充满了毫不掩饰的怀疑和焦躁：“孙经理！这都什么时候了？！您找来的人呢？！专家呢？！”
孙经理擦了擦额头的汗，有些尴尬地指了指陈默：“王主管，这位……这位就是陈师傅，他说……他能试试看……”
“他？！”王主管像是听到了天大的笑话，上下打量着陈默，声音陡然拔高，充满了荒诞感，“就他？！穿着这身修车铺的行头？！来修我们的核心仓储系统？！孙经理！您没搞错吧？！我们这系统用的是COBOL！COBOL！上世纪六十年代的古董！不是修自行车！不是通下水道！”
其他几个年轻工程师也抬起头，目光齐刷刷地聚焦在陈默身上。那目光里充满了惊愕、质疑，以及一种被轻视和愚弄的愤怒。空气瞬间凝固，只剩下机器沉闷的嗡鸣和冷库温度报警器隐约传来的滴滴声。
陈默的脸色依旧苍白，额角的冷汗在冰冷的空气里显得格外清晰。他没有理会那些刀子般的目光，也没有理会王主管的咆哮。他的视线，如同被磁石吸引，死死地锁定了那几台灰黑色机柜，锁定了那屏幕上翻滚的、深蓝色背景下的绿色字符海洋。
嗡！
那股熟悉的、冰冷的电流感再次席卷大脑！眼前的景象瞬间被幽蓝色的数据流覆盖！
冰冷的蓝色数据流如同瀑布般冲刷着他的意识。屏幕上那翻滚的、令人绝望的绿色COBOL代码，在他特殊的感知中被瞬间解析、重构！不再是杂乱无章的字符堆砌，而是被分解成清晰的逻辑模块：**环境部（ENVIRONMENT DIVISION）**、**数据部（DATA DIVISION）**、**过程部（PROCEDURE DIVISION）**……
核心报错点被高亮标出：**“DATA DIVISION NOT FOUND. FILE STATUS 35.”**冰冷的诊断结论瞬间生成：
**1.关键索引文件（ITEM_INDEX.IDX）物理损坏或丢失。**
**2.主程序调用路径错误，无法定位数据定义库。**
紧接着，记忆深处某个早已落满尘埃的角落被狂暴地撕开！时间仿佛倒流回1989年，大学那间弥漫着臭氧和机器散热气息的、昏暗的机房！
眼前不再是冰冷的液晶显示器。是一台台笨重的、嗡嗡作响的终端机！绿色的字符在模糊的CRT屏幕上闪烁。空气中弥漫着热敏打印纸特有的气味。而他手中拿着的，不是鼠标键盘，而是一叠边缘有些毛糙、带着独特纸浆气息的——淡黄色穿孔卡片！
每一张卡片上，都用黑色墨水笔工整地写着一行行COBOL代码。**IDENTIFICATION DIVISION. PROGRAM-ID. INVENTORY.**（标识部。程序ID。库存管理。）**DATA DIVISION. FILE SECTION. FD ITEM-FILE…**（数据部。文件节。文件描述：商品文件……）**PROCEDURE DIVISION. MAIN-LOGIC. PERFORM READ-ITEM UNTIL EOF…**（过程部。主逻辑。执行读取商品直到文件结束……）
为了完成那个该死的期末大作业，他在机房里熬了整整三个通宵！一遍遍检查卡片顺序，一次次在轰鸣的读卡机上运行，忍受着慢如蜗牛的编译速度，只为解决一个该死的“文件状态35”错误！那个错误，是因为他粗心漏打了一张定义索引文件的卡片！
记忆与现实在数据流中疯狂重叠！当年那张缺失的穿孔卡片，与眼前系统中丢失的索引文件，形成了完美的映射！
一种近乎本能的冲动驱使着陈默。他无视了王主管还在喋喋不休的质疑和周围工程师看怪物般的眼神，一步上前，挤开挡在控制台前的一个年轻工程师。
“你干什么？！”王主管惊怒交加。
陈默充耳不闻。他的目光如同探照灯，扫过连接着AS/400主机的几台终端。最终，他走向角落里一台看起来最旧、积灰最多的终端。屏幕是那种老式的球面CRT，键盘是厚重的、按键行程很长的机械键盘，上面布满了油光。
他伸出右手。那只手，骨节分明，因为常年劳作和接触油污显得有些粗糙，手背上还有一道不知何时划破的新鲜血痕。手指的皮肤干燥，甚至有些开裂。但此刻，当这只手悬停在布满油光的、冰冷的机械键盘上方时，却带着一种奇异的、难以言喻的稳定感。
下一秒！
枯瘦的手指如同被赋予了生命，骤然落下！敲击在厚重的按键上，发出清脆而急促的“哒！哒！哒！哒！”声！速度快得几乎带出了残影！
屏幕上，深蓝色的背景上，绿色的命令行提示符（`>`)疯狂闪烁！一行行命令如同流水般倾泻而出：
`> CALL QSYS/DSPOBJD OBJ(QGPL/ITEM_INDEX) OBJTYPE(*FILE) DETAIL(*BASIC)`
（调用系统命令：显示对象详情-对象：QGPL库下的ITEM_INDEX文件-对象类型：文件-详情：基础信息）
绿色字符滚动，返回结果：**Object ITEM_INDEX in QGPL not found.**（在QGPL库中未找到ITEM_INDEX对象。）
`> CRTPF FILE(QGPL/ITEM_INDEX) RCDLEN(512)`
（创建物理文件-文件：QGPL/ITEM_INDEX -记录长度：512）
`> ADDPFM FILE(QGPL/ITEM_INDEX)`
（为物理文件添加字段描述？系统提示需进入源代码编辑模式…）
陈默的手指没有丝毫停顿！他猛地按下几个组合键，屏幕瞬间切换到一个更加古老的、布满横线的文本编辑界面！光标在绿色的字符行间疯狂跳跃！
他不再依赖任何现代IDE的辅助！记忆深处那些早已被遗忘的COBOL语法规则、文件定义规范、数据描述格式，如同解冻的冰川之水，在数据流的驱动下汹涌而出，精准地注入他敲击键盘的指尖！
`000100 IDENTIFICATION DIVISION.`
`000200 PROGRAM-ID. RECOVER_IDX.`
`000300 ENVIRONMENT DIVISION.`
`000400 INPUT-OUTPUT SECTION.`
`000500 FILE-CONTROL.`
`000600 SELECT ITEM-FILE ASSIGN TO DATABASE-ITEM`
`000700 ORGANIZATION IS INDEXED`
`000800 ACCESS MODE IS DYNAMIC`
`000900 RECORD KEY IS ITEM-CODE.`
`001000 DATA DIVISION.`
`001100 FILE SECTION.`
`001200 FD ITEM-FILE`
`001300 LABEL RECORDS ARE STANDARD`
`001400 DATA RECORD IS ITEM-RECORD.`
`001500 01 ITEM-RECORD.`
`001600 05 ITEM-CODE PIC X(10).`
`001700 05 ITEM-NAME PIC X(30).`
`001800 ...`(后续字段定义如疾风骤雨般录入！)
手指在布满油光的旧键盘上飞舞，敲击声如同密集的战鼓！陈默的背脊挺得笔直，苍白的脸上没有任何表情，只有那双眼睛，死死地盯着屏幕，瞳孔深处仿佛燃烧着幽蓝色的火焰，倒映着飞速滚动的绿色代码！汗水顺着他的鬓角滑落，滴在油腻的工装领口上，洇开一小片深色。
整个设备间里死寂一片！
所有的质疑、嘲讽、窃窃私语都消失了！王主管张着嘴，目瞪口呆地看着那个穿着油污工装的男人，像一尊沉默的雕塑般钉在那台最破旧的终端前，枯瘦的手指却爆发出令人眼花缭乱的敲击速度！屏幕上那如同天书般、让他们束手无策的COBOL代码，正以惊人的速度一行行生成、完善！
时间一分一秒地流逝。窗外的天色彻底黑透。设备间里只剩下机器嗡鸣、键盘敲击声和越来越清晰、越来越急促的冷库温度报警器的“滴滴”声！显示屏上的温度数字触目惊心：**-1.2℃**！红灯疯狂闪烁！
王主管的脸色由铁青转为煞白，嘴唇哆嗦着，死死攥着拳头，指甲几乎嵌进肉里！几个年轻工程师更是大气不敢出，眼睛瞪得溜圆，仿佛在看一场匪夷所思的魔术表演！
终于！
陈默敲下最后一行代码定义，手指重重地落在回车键上！
`> RUN RECOVER_IDX`（运行恢复程序）
屏幕陷入短暂的静默。几秒钟后，绿色的字符再次滚动起来，显示着程序运行的日志：
`INDEX FILE ITEM_INDEX CREATED SUCCESSFULLY.`（索引文件ITEM_INDEX创建成功。）
`REBUILDING INDEX STRUCTURE...`（重建索引结构...）
`...`
`REBUILD COMPLETE. RECORDS PROCESSED: 125，847`（重建完成。已处理记录：125，847条。）
`...`
`MAIN INVENTORY PROGRAM RESTARTING...`（主库存程序重启中...）
`SYSTEM INITIALIZATION COMPLETE.`（系统初始化完成。）
`ALL SERVICES ONLINE.`（所有服务在线。）
几乎是同时！
“滴——！滴——！”
那如同催命符般的冷库温度报警声，戛然而止！
设备间里所有人都下意识地屏住了呼吸，目光齐刷刷地射向连接冷库的温度监控屏幕！
只见那刺眼的红色警报灯瞬间熄灭！闪烁的红色数字停止了跳动！
**-1.2℃→-1.5℃→-2.0℃→-3.0℃……**
温度数值如同被一只无形的手向下拖拽，开始以肉眼可见的速度稳步下降！代表安全的绿色数字重新亮起！几秒钟后，温度稳定在了**-18.5℃**的安全区间！
“降……降下来了！温度降下来了！”拿着对讲机的实习生女孩第一个尖叫起来，声音里充满了难以置信的狂喜！
“系统……系统恢复了！订单进来了！库存数据刷出来了！”一个紧盯着另一台显示库存界面的工程师也激动地大喊！
死寂的设备间瞬间被巨大的惊喜和如释重负的喧哗淹没！
王主管呆呆地看着监控屏幕上那稳定跳动的绿色数字，又猛地转头看向那台破旧终端前的身影。那个穿着油污工装、脸色苍白如纸的男人，此刻正缓缓地从那张沾满灰尘的椅子上站起身。过度消耗带来的巨大疲惫感瞬间反噬，他身体晃了晃，下意识地扶住了冰冷的机柜才勉强站稳。
王主管猛地推开挡在身前的人，几步冲到陈默面前。他脸上的傲慢、质疑、焦躁早已消失得无影无踪，只剩下一种近乎膜拜的震惊和深深的敬畏！他微微佝偻着腰，双手下意识地在裤缝上擦了擦，声音因为激动而有些变调，每一个字都充满了难以置信的震撼：
“陈……陈师傅！神了！真神了！”他用力地咽了口唾沫，目光死死盯着陈默那张疲惫却平静的脸，“您……您怎么会……怎么会懂这种……这种早就该进博物馆的古董技术？！”
陈默没有回答。他只是疲惫地闭了一下眼睛，再睁开时，眼底的幽蓝火焰已经熄灭，只剩下深不见底的疲惫。他缓缓地伸出手，那只刚刚敲出“神迹”的、骨节分明的手，此刻微微颤抖着。
王主管瞬间明白了。他连忙从西装内袋里掏出一张早就准备好的支票，看都没看上面的数字，双手恭恭敬敬地、如同捧着圣物般，塞进了陈默微微颤抖的手中！
支票很薄，纸张光滑。但上面印着的数字，却带着千钧的重量：
**人民币：100，000.00元**
**(预付：伍万元整)**
“陈师傅！这是预付的五万！剩下的五万，等系统稳定运行72小时后，立刻奉上！一分不少！”王主管的声音斩钉截铁，带着劫后余生的感激和一种对绝对实力的敬畏。
陈默的手指紧紧攥住了那张支票。薄薄的纸张边缘硌着他的掌心，带来一种无比真实的触感。五万块。预付的五万块。
他没有看王主管，也没有看周围那些充满敬意的目光。他的目光似乎穿透了冰冷的机柜，穿透了厚重的仓库墙壁，望向了远方那个被阴云笼罩的家。
林薇的药……
暂时……有着落了。