花旗面试

1、JCL中如何运用SORT进行SUM，1-10？
SORT FIELDS=(1,10，CH,A)
SKIPREC=1，STOPAFT=10
SUM FIELDS=(1，10),FORMA T=ZD.
/注sum是以组单位sort有key。

STARTBR 用来开始一个VSAM文件浏览处理，他为浏览确定满足条件的第一条记录的位置，但不读取记录。

2.先定义文件,装载文件，在打开文件，然后浏览文件，最后关闭文件
CEDA DEF FILE(FILE1) G(USER01)
CEDA INS FILE(FILE1) G(USER01)
STARTBR FILE(FILE1) RIDFLD(KEY) KELENGTH(6)
READNEXT FILE(FILE1) RIDFLD(KEY) KEYLENGTH(6)
CEMT S FILE(FILE1) OPEN
CEMT S FILE(FILE1) CLOSE
3.COBOL中如何定义文件？
ENVIRONMENT DIVISION
INPUT-OUTPUT SECTION
FILE-CONTROL
SELECT INVMAST ASSIGN TO SYS021-INVMA T
ORGANIZATION IS INDEXED
ACCESS IS RANDOM
RECORD KEY IS MR-ITEM-NO
FILE STATUS I S INVMAST-ERROR-CODE
DATA DIVISION。

FD IN-FILE LABLE RECORD IS STANDARD。

01 IN-RECORD。

（定义记录区名为IN-RECORD）
MIT,ROLLBACK,SAVEPOINT含义。

COMMIT是提交操作，ROLLBACK是回滚操作，SA VEPOINT是应用处理的结束可以将同一个交易（可恢复单元）内的主要的里程碑标记出来常用于ONLINE。

5.如果一个大型的程序abend了或者出错了，你将采用什么方式调试排错？
在编译时使用OFFSET，系统会为每一条cobol指令生成一个行号，指令位移和动词的对应表。

在报错信息中会提到出错处的指令位移，因此在上表中查找最为接近的指令位移就可以确定错误所涉及的动词和行号。

最后，在编译清单中查询行号就可以找到出错的语句。

6.谈谈CICS是做什么用的，联机程序和批量程序有什么不同，什么是伪会话？
CICS是用于实现联机交易的管理系统。

联机程序的运行一般是持续的，它通过MAP接受用户的输入并即时的进行响应，运行过程中用户可以随时对程序涉及的资源进行操作。

联机程序需要CICS和MAP的支持。

批量程序的运行是定时的，换句话说，只在需要时被运行，程序一旦开始运行，用户无法对程序涉及的资源进行干预。

批量程序用JCL来实现运行。

7.内连接，外连接的使用？
INNER JOIN只选出两表按指定条件严格相等的记录（取交集）
SELECT PART,SUPPLIER,PARTS.PROD,PRODUCT
FROM PARTS INNER JOIN PRODUCTS
ON PART.PROD=PRODUCTS.PROD;
FULL OUTER JOIN(完全外连接)：把两个表的记录都列出来，如果在ON的条件上，另一个表没有与之相等的记录，则显示NULL值。

（取并集）
SELECT PART,SUPPLIER,PARTS.PROD,PRODUCT
FROM PARTS FULL OUTER JOIN PRODUCTS
ON PARTS.PROD=PRODUCTS.PROD;
LEFT OUTER JOIN(左连接)：把左面那个表的所有记录都列出来，如果在ON条件上，另一个表没有与之相等的记录，则显示NULL值。

SELECT PART,SUPPLIER,PARTS.PROD,PRODUCT,PRICE
FROM PARTS LEFT OUTER JOIN PRODUCTS
ON PARTS.PROD=PRODUCTS.PROD AND PRODUCTS.PRICE > 10.00;
RIGHT OUTER JOIN(右连接)：把右面那个表的所有记录都列出来，如果在ON条件上，另一个表没有与之相等的记录，则显示NULL值。

SELECT PART,SUPPLIER,PRODUCT.PROD,PRODUCT,PRICE
FROM PARTS RIGHT OUTER JOIN PRODUCTS
ON PARTS.PROD=PRODUCTS.PROD AND PRODUCTS.PRICE>10.00;
8.Perform的几种用法？
Perform TI；
Perform T1 N Times；
Perform TI Until N>10；
Perform TI Varying X from 1 by 2 Until X>10;
Perform TI Varying X from 1 by 2 Until X>10 After Y from 1 by 2 Until Y>8; Perfrom 。

End-perform （内嵌式perform）。