淺談基于主機(jī)的ＣＯＢＯＬ教學(xué)實(shí)驗(yàn)

文章編號：1672-5913(2008)19-0112-02

摘 要：在主機(jī)上學(xué)習(xí)COBOL語言就是為了應(yīng)用開發(fā)，COBOL語法教學(xué)本身不難，難點(diǎn)在于如何消除學(xué)生對主機(jī)平臺的陌生感，接受COBOL語言的編程風(fēng)格和體會(huì)COBOL在商業(yè)應(yīng)用開發(fā)方面的優(yōu)勢。本文分析了基于主機(jī)的COBOL教學(xué)實(shí)驗(yàn)的目標(biāo)，并給出了相應(yīng)的實(shí)驗(yàn)大綱以供參考。

關(guān)鍵詞：COBOL；實(shí)驗(yàn)；大綱

中圖分類號：G642 文獻(xiàn)標(biāo)識碼：B

1 前言

幾年來，我們對本科生推出了基于IBM主機(jī)的系列選修課程，其中之一就是COBOL。多年的教學(xué)經(jīng)歷讓我體會(huì)到，由于COBOL自身具有向自然語言靠近的特點(diǎn)，因此COBOL語法教學(xué)并不難，比較難的環(huán)節(jié)是如何讓學(xué)生學(xué)以致用的實(shí)驗(yàn)環(huán)節(jié)。原因有三：其一，大型主機(jī)是一個(gè)全新的系統(tǒng)環(huán)境，學(xué)生平時(shí)并沒有機(jī)會(huì)接觸；其二，COBOL源程序的編寫格式、程序布局有它歷史遺留的獨(dú)特性，與學(xué)生平時(shí)接觸的C等語言有較大的區(qū)別；其三，COBOL是面向商業(yè)的開發(fā)語言，離開了具體的應(yīng)用就失去了價(jià)值。因此基于主機(jī)的COBOL實(shí)驗(yàn)首先應(yīng)該消除學(xué)生對主機(jī)平臺的陌生感，其次要抓住COBOL語言的語法特點(diǎn)，最后的實(shí)驗(yàn)案例不能以普通的計(jì)算為主設(shè)計(jì)，而應(yīng)該盡量模擬一些商業(yè)案例。

2 實(shí)驗(yàn)?zāi)繕?biāo)

COBOL是一種應(yīng)用型編程語言，基于主機(jī)的COBOL在金融、工業(yè)生產(chǎn)等領(lǐng)域應(yīng)用一直極為廣泛，因此必須強(qiáng)調(diào)學(xué)生的動(dòng)手實(shí)踐能力。在基于主機(jī)的COBOL的實(shí)驗(yàn)環(huán)節(jié)中，我們擬定了下述目標(biāo)：

(1) 掌握大型主機(jī)上的COBOL編程環(huán)境，主要是學(xué)會(huì)在TSO中創(chuàng)建和管理數(shù)據(jù)集(Data Set)，完成COBOL源代碼的編輯以及理解和使用、編譯和運(yùn)行COBOL程序的JCL作業(yè)，掌握從作業(yè)消息中閱讀程序的編譯結(jié)果和運(yùn)行結(jié)果的方法；

(2) 驗(yàn)證和掌握COBOL語法和程序結(jié)構(gòu)，包括基本的COBOL語句，突出COBOL子程序的編寫和調(diào)用；

(3) 提高用COBOL處理商業(yè)信息的算法設(shè)計(jì)能力，掌握用流程圖(Flow Chart)、結(jié)構(gòu)化流程圖(Structured Flow Chart)等基本程序設(shè)計(jì)工具來設(shè)計(jì)比較復(fù)雜的信息處理程序算法的方法；

(4) 體會(huì)COBOL在商業(yè)信息處理方面的優(yōu)越性，一是驗(yàn)證編輯型PIC語句在格式化方面所起的作用；二是要掌握在COBOL中對文件進(jìn)行讀寫和格式化顯示的方法；三是力爭掌握表(Table)和索引表(Indexed Table)的使用。

3 實(shí)驗(yàn)大綱

圍繞上述實(shí)驗(yàn)?zāi)繕?biāo)，我們編寫了一份試驗(yàn)大綱，一共設(shè)計(jì)了5個(gè)必做實(shí)驗(yàn)(實(shí)驗(yàn)1～實(shí)驗(yàn)5)和2個(gè)選做實(shí)驗(yàn)(實(shí)驗(yàn)6～實(shí)驗(yàn)7)，在此提供給讀者，以供參考。

實(shí)驗(yàn)1 大型主機(jī)編程環(huán)境

實(shí)驗(yàn)?zāi)康模赫莆誌BM大型機(jī)編程環(huán)境

基本任務(wù)：(1)無輸入輸出文件的COBOL樣本程序的編輯、提交、調(diào)試和結(jié)果查看

(2) 有輸入輸出文件的COBOL樣本程序的編輯、提交、調(diào)試和結(jié)果查看

本實(shí)驗(yàn)需提供樣本程序給學(xué)生，若學(xué)生無JCL基礎(chǔ)，還需提供相應(yīng)的編譯運(yùn)行COBOL的JCL，從略。

實(shí)驗(yàn)2 客戶信息文件處理

實(shí)驗(yàn)?zāi)康模夯綜OBOL語句的使用，包括OPEN、CLOSE、READ、WRITE、PERFORM、MOVE和STOP RUN。

基本任務(wù)：讀取某客戶信息文件，按照一定的格式將客戶記錄輸出。

具體要求：

(1) 對程序進(jìn)行功能分析，并畫出流程圖；

(2) 根據(jù)輸入文件標(biāo)準(zhǔn)定義文件；

(3) 使用相應(yīng)JCL作業(yè)進(jìn)行程序的編譯，修改相應(yīng)參數(shù)的名稱；

(4) 使用相應(yīng)JCL作業(yè)進(jìn)行程序的執(zhí)行；

(5) 驗(yàn)證程序的輸出。

本試驗(yàn)的客戶信息文件數(shù)據(jù)集和輸出文件的樣式由教師提供，從略，下同。

實(shí)驗(yàn)3 學(xué)生成績文件處理

實(shí)驗(yàn)?zāi)康模夯綜OBOL語句的使用，包括OPEN、CLOSE、READ、WRITE、PERFORM、MOVE、STOP RUN、Arithmetic Verbs和COMPUTE。

基本任務(wù)：讀取學(xué)生成績文件，按照要求計(jì)算每位學(xué)生的平均成績和全班的平均成績，并按照一定的格式輸出。

具體要求同實(shí)驗(yàn)2。

實(shí)驗(yàn)4 商店銷售文件處理

實(shí)驗(yàn)?zāi)康模赫莆諗?shù)值編輯型字符的使用，進(jìn)行IF和EVALUATE語句的練習(xí)。

基本任務(wù)：讀取一個(gè)商店的銷售信息文件，按照要求進(jìn)行銷售信息的統(tǒng)計(jì)，完成相關(guān)計(jì)算和指定格式的輸出。

具體要求同實(shí)驗(yàn)2，主要計(jì)算公式由教師給出。

實(shí)驗(yàn)5 員工工資文件處理

實(shí)驗(yàn)?zāi)康模赫莆誌F語句和EVALUATE語句，涵蓋處理日期的練習(xí)、MOVE CORRESPONDING語句，嵌套IF語句的練習(xí)，掌握數(shù)據(jù)匯總的處理方法。

基本任務(wù)：讀取某公司的雇員工資文件，按照要求計(jì)算雇員的年終獎(jiǎng)金并完成指定格式的輸出。年終獎(jiǎng)金的數(shù)額是基于某員工的工作時(shí)間以及過去一年該員工個(gè)人失誤的次數(shù)。

具體要求同實(shí)驗(yàn)2，主要計(jì)算公式由教師指定。另加匯總處理要求如下：

(1) 計(jì)算員工總數(shù)；

(2) 計(jì)算所有員工的失誤次數(shù)總和；

(3) 計(jì)算平均員工失誤次數(shù)；

(4) 計(jì)算獎(jiǎng)金總數(shù)；

(5) 計(jì)算平均獎(jiǎng)金。

具體要求同實(shí)驗(yàn)2，主要計(jì)算公式由教師給出。

實(shí)驗(yàn)6 商店銷售文件處理(下標(biāo)表處理)

實(shí)驗(yàn)?zāi)康模赫莆障聵?biāo)表的應(yīng)用和PERFORM VARYING語句的使用。

基本任務(wù)：利用下標(biāo)表方法，為某音樂商店編寫一個(gè)銷售管理程序，對不同風(fēng)格的音樂和不同價(jià)格范圍的銷售情況進(jìn)行分析。不同的音樂風(fēng)格分為Rock/Pop、Oldies、Country、RB/Soul、Classical、Jazz和Ambient七種；價(jià)格范圍則分為5美元至7美元、7.01美元至11美元、11.01美元至15美元以及15美元以上四種。

具體要求同實(shí)驗(yàn)2，主要計(jì)算公式由教師給出。另加匯總處理要求：

(1) 統(tǒng)計(jì)七種風(fēng)格音樂的銷售總額；

(2) 統(tǒng)計(jì)四種價(jià)格范圍的銷售總額。

實(shí)驗(yàn)7 商店銷售文件處理(索引表處理)

實(shí)驗(yàn)?zāi)康模赫莆誔ERFORM VARYING語句和SET語句的使用，練習(xí)使用索引表。

基本任務(wù)：讀取某音樂商店的銷售文件，按照索引表的要求進(jìn)行處理并完成表查找。

具體要求同實(shí)驗(yàn)6，只是采用索引表，而不是下標(biāo)表。

4 結(jié)束語

本實(shí)驗(yàn)設(shè)計(jì)方案源于多年的基于主機(jī)的COBOL教學(xué)積累，實(shí)際教學(xué)中我們配備了簡明實(shí)驗(yàn)手冊，參與實(shí)驗(yàn)的學(xué)生普遍認(rèn)為這套實(shí)驗(yàn)方案不僅能夠幫助自己理解和驗(yàn)證COBOL語法，而且由于題目偏重模擬商業(yè)信息處理，因此能夠獲得一些實(shí)訓(xùn)效果。而根據(jù)畢業(yè)生所在單位的反饋，證明這套實(shí)驗(yàn)方案確實(shí)有助于學(xué)生學(xué)以致用，在實(shí)際的生產(chǎn)工作中更快地勝任COBOL程序員角色。

參考文獻(xiàn)：

[1] Carol Baroudi著. 邱仲潘譯. COBOL從入門到精通[M]. 北京:電子工業(yè)出版社，2000.