Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/silverlight/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
移动无效-COBOL_Cobol_Jcl_Cics - Fatal编程技术网

移动无效-COBOL

移动无效-COBOL,cobol,jcl,cics,Cobol,Jcl,Cics,我试图让01-WS-PRINT REC中的move语句正常工作,但由于某种原因,当我编译它时,它说move无效。扫描在下一个时间继续…有什么想法 01 WS-PRINT-REC 10 M-DESC PIC X(25). 10 FILLER PIC X(02). 10 M-DATA PIC X(25). MOVE 'STOCK SYMBOL' TO M-DESC. MOVE MK-SYMBOL TO M-DATA. PERFORM 700-PRIN

我试图让01-WS-PRINT REC中的move语句正常工作,但由于某种原因,当我编译它时,它说move无效。扫描在下一个时间继续…有什么想法

01  WS-PRINT-REC
   10 M-DESC   PIC X(25).
   10 FILLER   PIC X(02).
   10 M-DATA   PIC X(25).
   MOVE 'STOCK SYMBOL' TO M-DESC.
   MOVE MK-SYMBOL TO M-DATA.
   PERFORM 700-PRINT-LINE.

COBOL程序是结构化的。 数据划分为工作存储部分和本地存储部分。您的数据声明应该在那里完成。 然后有一个过程部分,将代码放在move语句中

不能在数据分区中使用移动。因为您不能在过程分割中声明变量

此外,如前所述,你不应该在每句话的结尾使用句号

例如:

DATA DIVISION.
WORKING-STORAGE DIVISION.
01  WS-PRINT-REC
   10 M-DESC   PIC X(25).
   10 FILLER   PIC X(02).
   10 M-DATA   PIC X(25).

PROCEDURE DIVISION.

MAIN.

   MOVE 'STOCK SYMBOL'   TO M-DESC
   MOVE MK-SYMBOL        TO M-DATA

   PERFORM 700-PRINT-LINE
   .

不能将代码放入“工作存储”部分。过程代码必须位于“过程”部分。数据分区中的数据定义,以及从数据名称的外观来看,该分区中的工作存储部分。如果您显示的代码是连续的,那么您根本不了解COBOL程序的布局,因此注定会出现一个非常简单的印刷错误。如果代码不是连续的,我们需要看到分隔和确切的错误消息,以及消息编号。请把程序代码中的句号/句号去掉。它们自1985年以来就过时了。我试图编译您的代码,如图所示。01结尾处缺少一个句号/句点。这一步确实传达了这一信息,第二步和第二步也一样。你有同事。我建议您要求一个简单的工作CICS程序,并使用它作为您想要的基础。把它和你所拥有的相比较。您可能从未参加过COBOL课程,或者您需要复习。若要修改我之前的评论,请使用“过程”部分中的句号/句号样式,该样式在您的网站上用于新的内容。有些地方仍然停留在20世纪80年代早期,但节目之间的一致性比混乱要好。欢迎加入。你在几分钟内就得到了一张选票,这在StackOverflow的这个角落是不寻常的。比使用本地存储部分更常见的是使用链接部分。对于打印行来说,没有任何值的填充是不好的做法。当你看到简单的打字错误或缺乏基本的语言知识时,请不要回答问题,直到问题得到改进。你会从评论中了解到这一点,从问题的负面分数中也会了解到,尽管在这里,OP比你更幸运,有了更多的选票。