Easytrieve 中的点语句

Question

easytrieve 中的点语句是什么？

例如 POINT DUPIN GE HD-IN-KEY STATUS

这里 DUPIN 是文件名，GE 是关系运算符，HD-IN-KEY 是字段名称

Answer 1

不确定我是否可以恢复旧问题。我只是想在 Easytrieve 中留下一个使用 POINT 语句的示例。它可能对引用此线程的人有用。

在此示例中，我使用的是包含以下内容的输入 VSAM 文件。

123456 SRINIVASAN J V
234567 QWERTY        
345678 SRINI         
456789 BHUTAN    

前 6 个字节是键，我想在键上显示文本字段。让我们选择显示123456的文本字段，即第一条记录。Easytrieve代码如下：

FILE INFILE1 VS (UPDATE)             
ID                1   6    N         
NAME              8   20   A         
* WORK VARIABLES                     
WS-ID             W   6    N         
WS-NAME           W   20   A         
*                                    
JOB INPUT INFILE1                    
POINT INFILE1 EQ '123456' STATUS     
IF INFILE1:FILE-STATUS EQ 00         
    DISPLAY 'READ SUCCESS'            
    MOVE NAME TO WS-NAME              
    DISPLAY 'TEXT:' WS-NAME           
    STOP                              
ELSE                                 
    DISPLAY 'READ ERROR:' FILE-STATUS 
    STOP                              
END-IF    

执行代码后，我们将在 Spool 中获得以下结果。

READ SUCCESS       
TEXT:SRINIVASAN J V     

注意事项：

• Easytrieve 中的 POINT 语句指向键控文件上的记录。

• 请注意带有 STATUS 参数的 POINT 语句。指定状态参数，只要有可能失败完成输入/输出请求。状态检查输入/输出处理以查看是否正确执行。状态导致文件的"文件状态"字段将使用相应的返回代码进行设置。FILE-STATUS是Easytrieve中的只读字段。

• 我们评估文件状态字段以了解读取操作的状态。如果读取成功，则显示文本字段。