需要刪除COBOL pic子句中的前導空格嗎？

Question

我需要能夠從字符串中刪除所有前導空格用Cobol PIC X（80）

代碼：

 UNSTRING ADDRESS DELIMITED BY SPACES INTO 
-    S-SP, ADDRESS    
- END-UNSTRING.           

然後，我應該能夠寫入字符串地址到一個文件中沒有任何領先的空間。

錯誤代碼：

775 IGYPS0088-S的 「UNSTRING」 的聲明是無效的。預計「INTO」，但找到「INTOWS-SPACES」。該聲明被丟棄。

Answer 1

您在來源的第7列中指定了「continuations」，減號/破折號。

繼續是非常，非常，很少需要的。他們只需要繼續文字。從第7欄

的I不認爲你的代碼會做你的想法，但如果你有麻煩的是，請提出一個新的問題 -

刪除「」。

當文字繼續時，封閉報價不包括在繼續。

"ABCDE<and then column 72 arrives 
- "FGHIJ" 

該字面量在使用時將爲「ABCDEFGHIJ」。

如果在一行代碼中使用延續，則文本將被連接起來而沒有任何中介空間，因此會顯示錯誤消息。