如何将长字符串移动到变量cobol

如何将长字符串移动到变量cobol,cobol,Cobol,您好,我正在学习在线cobol(CICS)我想做的是在trans名称后获得5个数字,在前5个数字后获得5个数字,然后我必须添加、sub、mul、div并显示它 这是密码 ******************************************************* DATA DIVISION. WORKING-STORAGE SECTION.

您好,我正在学习在线cobol(CICS)我想做的是在trans名称后获得5个数字,在前5个数字后获得5个数字,然后我必须添加、sub、mul、div并显示它

这是密码

*******************************************************  
DATA DIVISION.                                           
WORKING-STORAGE SECTION.                                 
01 INBOUND-MESSAGE                  PIC X(06).           
01 OUTBOUND-MESSAGE                 PIC X(80).           
01 WS-VARIABLE.                                          
   05 WS-NUM1                       PIC 9(5).            
   05 WS-NUM2                       PIC 9(5).            
   05 WS-ADD                        PIC 9(10).           
   05 WS-SUB                        PIC 9(10).           
   05 WS-MUL                        PIC 9(15).           
   05 WS-DIV                        PIC 9(15).           
*******************************************************  
PROCEDURE DIVISION.                                      
                                                         
****TERIMA DATA DARI LUAR ****                           
    EXEC CICS RECEIVE                                    
        INTO (INBOUND-MESSAGE)                           
    END-EXEC.                                            
      EXEC CICS RECEIVE                                    
          INTO (INBOUND-MESSAGE)                           
      END-EXEC.                                            
                                                           
      MOVE INBOUND-MESSAGE(5:5) TO WS-NUM1.                
      MOVE INBOUND-MESSAGE(10:5) TO WS-NUM2.               
      ADD WS-NUM1   TO WS-NUM2 GIVING WS-ADD.              
      SUBTRACT WS-NUM1   FROM WS-NUM2 GIVING WS-SUB.       
      MULTIPLY WS-NUM1 BY WS-NUM2 GIVING WS-MUL.           
      DIVIDE WS-NUM1 BY WS-NUM2 GIVING WS-DIV.             
      MOVE 'HASIL JUMLAH: ' WS-ADD ' HASIL KURANG: ' WS-SUB
           ' HASIL KALI: ' WS-MUL ' HASIL BAGI: ' WS-DIV   
      TO OUTBOUND-MESSAGE.                                 
      EXEC CICS SEND                                       
          FROM (OUTBOUND-MESSAGE)                          
          ERASE                                            
      END-EXEC.                                            
                                                           
      EXEC CICS RETURN                                     
      END-EXEC.                                            
问题是我想做的是展示

Hasil jumlah : ....
Hasil kurang : ....
Hasil kali   : ....
hasil bagi   : ....
我犯了个错误

“MOVE”语句无效。应为“TO”,但找到“WS-ADD”。该声明被放弃

我该怎么修?谢谢

只有一个来源,可能有多个目标。
您可能需要查找语句。

好的,我已经完成了,我可以问一下如何添加新行吗?因为现在我被卡住了,因为所有的单词都变成了一行,我希望是四行。如果这个答案对你有效,请接受它作为答案。当您想要有多行时,您可以通过在字符串中添加一个换行符
'\n'
来解决这个问题,但更可能的情况是您想要一个不同的
EXEC CICS
,(实际上这不是一个COBOL问题),并且如果您没有可用文档的答案,可以创建一个新问题。