07-第十课-COBOL编程入门.ppt

* * * * * * 算术语句 加法语句 ADD ADD A TO B ? B = A + B 减法语句 SUBTRACT SUBTRACT A FROM B ? B = B - A 乘法语句 MULTIPLY MULTIPLY A BY B ? B = A * B 除法语句 DIVIDE DIVIDE A INTO B ? B = B / A 综合运算语句 COMPUTE COMPUTE A = B * C / (D + E) 数据语句 传送语句 MOVE MOVE A TO B 接收语句 ACCEPT ACCEPT A FROM B 显示语句 DISPLAY DISPLAY A 初始值语句 INITIALIZE INITIALIZE A 字符串连接语句 STRING STRING ‘a，’，‘b，’，‘c，’ DELIMITED BY SIZE INTO A 字符串分解语句 UNSTRING UNSTRING ‘a，b，c’ DELIMITED BY ‘，’ INTO A，B，C 输入输出语句 打开语句 OPEN 关闭语句 CLOSE 读语句 READ 写语句 WRITE 回写语句 REWRITE 逻辑与控制语句 执行语句 PERFORM 条件语句 IF 多分支选择语句 EVALUATE 调用语句 CALL 语句占位符 CONTINUE 执行语句 PERFORM PERFORM 过程段1 PERFORM 过程段1 UNTIL 条件1 PERFORM 过程段2 THROUGH 条件2 条件语句 IF IF 条件成立 THEN 语句1 ELSE 语句2 END-IF. 多分支选择语句 EVALUATE EVALUATE 数据项 WHEN 值1 处理1 WHEN 值2 处理2 …… WHEN OTHER 处理n END-EVALUATE 其他逻辑控制语句 调用语句 CALL 占位符 CONTINUE 停止语句 STOP RUN 转移语句 GOTO 主机COBOL程序的编译、链接及执行 （1）编译：把源程序语句（源模块）转换成目标模块； （2）链接编辑：把目标模块同子程序库中的其他程序链接起来得到可执行模块； （3）执行：运行可执行模块得到结果。 编译过程 SOURCE PRECOMPILE 分配 TOKEN ID 分配 TOKEN ID HOST LANGUAGE SOURCE DBRM（SQL CODE） COMPILE BIND OBJECT MODULE PRELINK LINK PACKEG LOAD （LMOD） PLAN COBOL程序在主机中的运行 通过作业（JOB）来控制调度和流程；使用JCL启动和管理。 在程序运行作业流中，主要有以下内容 指定程序LOAD的搜索链 指定需要运行的程序名 指定外部文件及相关辅助处理（如创建、清理、排序、合并等） 设定数据库参数 设定输入参数 练习 编写cobol，打印“HELLO，COBOL” 要求： 建立个人的一套PDS； 编写程序； 使用编译JCL正确编译程序； 编写执行JCL并打印出“HELLO， COBOL”。 结束语 谢谢 * * * * * * * * * * * * * * * * * * * 北京德派克公司 北京德派克公司 COBOL编程入门 批量程序概要 对大批量的数据做统一的处理； 一个完整的应用功能常是由一连串的批量程序共同完成，程序的划分以处理的独立性为原则 同一应用功能的多个程序，通常被定义在同一个运行作业中，指定各程序运行的先后顺序及关联。 Job flow 批量程序开发环境 操作系统：Z/OS 数据库：DB2、IMS 开发语言：COBOL 编译和运行：JCL JOB 与主