如何在后台程序中输出消息到前台

我们使用模块可以实现这个功能。

 1 M@SNDMSGFM
 2                                      DSPSIZ(24 80 *DS3)       
 3                                                               
 4          R DUMMY1                    CLRL(*NO) OVERLAY FRCDTA 
 5          R DUMMY2                    ASSUME                   
 6                                  3 20' '                      
 7 
 8          R DRMSG                                              
 9                                      OVERLAY                  
10                                      CLRL(*NO)                
11                                                               
12            D#MSG         70   O 24  2COLOR(PNK)      
13 
14 M@SNDMSGPG
15 
16 FM@SNDMSGFMCF   E             WORKSTN 
17 DM@SNDMSGPG       PR
18 D  P#MSG                        70    CONST
19 DM@SNDMSGPG       PI
20 D  P#MSG                        70    CONST
21 C
22 C                     EVAL     D#MSG=P#MSG
23 C                     EXFMT    DRMSG
24 C                     RETURN

一个是屏幕文件，一个是程序，模块的形式
这个程序可以用于模块发送消息。
甚至可以扩展成模块询问消息，然后判断下一步是否继续。
其实最关键的在于dummy1 dummy2这两个记录