DLG
SETMSG definition
DLG-SETMSG ... [SHORT 'shortmessagetext'] ... [LONG 'longmessagetext'] ... [ALARM 'YES'|'NO'] [HELP 'helppanelname']
SETMSG definition for execution by Format 3
DLG-SETMSG erroridentifier ... [SHORT 'shortmessagetext'] ... [LONG 'longmessagetext'] ... [ALARM 'YES'|'NO'] ... [HELP 'helppanelname']
SETMSG execution
DLG-SETMSG [erroridentifier|messageID]
|  
                              					 
                               ALARM  |  
                           				  
                            
                              					 
                               Sound alarm when screen displays.  |  
                           				
                        
|  
                              					 
                               error-identifier  |  
                           				  
                            
                              					 
                               Unique name referencing predefined message text and attributes.  |  
                           				
                        
|  
                              					 
                               HELP 'help panelname'  |  
                           				  
                            
                              					 
                               Help panel that displays via PF1.  |  
                           				
                        
|  
                              					 
                               messageID  |  
                           				  
                            
                              					 
                               ISPF MSGID for SETMSG service.  |  
                           				
                        
|  
                              					 
                               LONG 'long messagetext'  |  
                           				  
                            
                              					 
                               Display text in long message field when the end user presses PF1 for the first time. Messagetext must fit on the same line as LONG.  |  
                           				
                        
|  
                              					 
                               SHORT 'short messagetext'  |  
                           				  
                            
                              					 
                               Display text in short message field. Messages longer than 24 characters can cause truncation errors. Messagetext must fit on the same line as SHORT.  |  
                           				
                        
DLG-SETMSG INVALID-OPT ... SHORT 'INVALID OPTION' ... LONG 'ENTER ONE OF THE LISTED OPTIONS' ... ALARM 'YES'
IF  SCRA-OPTION = 'value'
    /* VALID CONDITION
ELSE
    DLG-SETMSG INVALID-OPT