CL HELLO WORLD

 FMT **  ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8           
        *************** Beginning of data *********************************************************
0001.00              PGM                                                                     130328
0002.00              DCL        VAR(&MSGTXT) TYPE(*CHAR) LEN(20)                             130328
0003.00              CHGVAR     VAR(&MSGTXT) VALUE('MSG TYPED BY JOE!')                      130328
0004.00              SNDPGMMSG  MSG(&MSGTXT) MSGTYPE(*COMP)                                  130328
0005.00              ENDPGM                                                                  130328
        ****************** End of data ************************************************************

有时候不用进去debug view就能调试, 一个不错的手段

一直以来觉得如果能用一个新语言写出一个hello world才算懂了一点皮毛, 纵然以后的路还很长...