小编P A*_*ger的帖子

picture子句定义DISPLAY命令输出到控制台的格式.有没有办法将格式化的字符串"输出"到变量？像下面的东西,但有效的东西.以下是由图片转换并以货币格式存储在字符串中的数字的任意示例.

IDENTIFICATION DIVISION. 
 PROGRAM-ID.    Demo1234. 
 ENVIRONMENT DIVISION. 
 DATA DIVISION. 
 WORKING-STORAGE SECTION.
 01  Price           Pic     $$$,$$9.99.
 01  Formated-Output Pic     X(10).

 PROCEDURE DIVISION. 

     Move 10.50 to Price.
     Display Price Upon Formated-Output.
     *> Formated-Output would now contain "$10.50    "
     GOBACK.