390开发实用技术: 主机开发者入门之CICS MAP

CICS+DB2+COBOL+MAPS是一种具有代表性的主机联机开发模式.所谓'联机',是相对于'批量'而言.联机程序一般能提供交互式画面给用户输入数据,查询,执行等等.是应聘主机开发工作的必备技能之一.本文介绍开发的第一步:创建屏幕画面MAP



STEP1:编写MAP MICRO程序.请注意,三要素:DFHMSD, DFHMDI, DFHMDF. 分别代表MAPSET, MAP和里面的FIELD.



STEP2:编译MAP MICRO.事实上会生成2个咚咚:一个叫做PHYSICAL MAP,一个叫做SYMBOLIC MAP. 请注意:PHYSICAL MAP是二进制文件,给CICS调用;而SYMBOLIC MAP是COPYBOOK,给COBOL程序引用里面的变量.



STEP3:生成的physical map,二进制文件



STEP4:生成的symbolic map,是cobol copybook



STEP5:下面进入CICS环境去定义刚才生成的MAP



STEP5.5:这里要插播一下,CICS存在一个库列问题.怎样能让CICS知道您的MAP是在那个库下呢?我刚才编译的PHYSICAL MAP在JIA.MAP.LOAD下,必须要去启动CICS的系统进程去加入这个库列.(这步很关键,本人尝试了一个下午才发现).今后大家要建立自己的程序,请把PHYSICAL MAP定义到ALLUSER.MAP.LOAD



STEP6:用CEDA DEF MAPSET(TSTMAPM) GROUP(TEST)去定义这个MAP.为啥要这样定义呢?因为CICS是高层应用,它需要知道调用的MAP是指向外面的哪个程序.



STEP7:定义完了以后要安装,用CEDA INS MAPSET(TSTMAPM) GROUP(TEST)



STEP8:可以很高兴的看看MAP了....用SEND MAP(TSTMP2M) MAPSET(TSTMAPM)....慢着,怎么刚才的改动没生效?还是原来的map?



STEP9:这时候必须要刷新MAP,才能使刚改动过的MAP生效,用CECI SET PROG(TSTMAPM) NEW



STEP10:现在看到的才是您改动过MAP,编译,定义,安装后的结果...呵呵,长时间的辛苦终于有回报了.