>  2012/08/04 (土) 16:20:38        [qwerty]
> > 10 PRINT "はい ";:GOTO 10
> echo "はいじゃないが"

000100 IDENTIFICATION DIVISION.
000200 PROGRAM-ID.    SHANGHAI.
000300 ENVIRONMENT    DIVISION.
000400 DATA           DIVISION.
000500 01 MSG-DATA.
000600     05 MSG-01  PIC X(26)
000700                VALUE "これは駄目かもわからんね".
000800 PROCEDURE      DIVISION.
000900     DISPLAY    MSG-01  UPON CONSOLE.
001000     GOBACK.

参考:2012/08/04(土)16時16分37秒