高级汇编程序 - 将记录添加到文件

Question

您好我有一个汇编程序，它打开一个顺序文件（不读取任何记录），但我想在最后添加一条记录。

我使用以下陈述;

`OPEN  (INPUT1,OUTPUT)
         TM    INPUT1+48,X'10
         BO    OPEN001        
         LH    R10,=H'2008'   
         B     ABENDRTN   

         PUT   INPUT1,INREC   

INPUT1  DCB   DDNAME=INPUT1,                                            
               DSORG=PS,                                                
               RECFM=FB,                                               
               MACRF=PM,                                              
               EODAD=INPUT002`                                     

问题是当我想在最后添加记录时，上面的内容会删除文件中已有的记录。有什么想法吗？

谢谢