Modifying notify messages

When you use Internet electronic mail addresses with NOTIFY processing, DFSMSrmm uses a different set of messages to create the notification message. This enables you to use a different message format for Internet mail than for non-Internet mail. For example, you can use HTML tags in the Internet mail message to select attributes such as color and font of the messages. You can also select the form of electronic mail used at the individual user level and use the appropriate message format. When you customize messages, ensure that you do not exceed a message length of 80 characters. Your individual messages are merged and flowed subject to the HTML tags once the e-mail message is sent.

See Figure 1 for an example of customizing message numbers 2450-2463 for release notification.

Figure 1. Customizing message numbers 2450-2463 for release notification

SPACE 2
EDGMSGB 2450,TYPE=I,                                          X
      'HELO $$$$$$$$',           host name substituted        X
      MOD=YES,MSGID=NO
SPACE 2
EDGMSGB 2451,TYPE=I,                                          X
      'MAIL FROM:<RMM@YOURMVS'), edit in required id          X
      MOD=YES,MSGID=NO
SPACE 2
EDGMSGB 2452,TYPE=I,                                          X
      ('RCPT TO:<',63C'$','>'), internet email substituted    X
      MOD=YES,MSGID=NO
SPACE 2
EDGMSGB 2453,TYPE=I,                                          X
      'DATA',                                                 X
      MOD=NO,MSGID=NO
SPACE 2
EDGMSGB 2454,TYPE=I,                                          X
      'Subject: &NAM volume expiration',                      X
      MOD=NO,MSGID=NO
SPACE 2
EDGMSGB 2455,TYPE=I,                                          X
      'CONTENT-TYPE: TEXT/HTML',                              X
      MOD=NO,MSGID=NO
SPACE 2
EDGMSGB 2456,TYPE=I,MOD=YES,MSGID=NO,                         X
      ('Volume <FONT COLOR=RED>$$$$$$</FONT> ',               X
      'assigned to owner<b>$$$$$$$$</b> ')
SPACE 2
EDGMSGB 2457,TYPE=I,MOD=YES,MSGID=NO,                         X
      'on $$$$$$$$$$ at $$:$$:$$'
SPACE 2
EDGMSGB 2458,TYPE=I,MOD=NO,MSGID=NO,                          X
      ('is now pending release.<p>',                          X
      'If you wish the volume to be retained, please ')
SPACE 2
EDGMSGB 2459,TYPE=I,MOD=NO,MSGID=NO,                          X
      ('<font size="+2" color=blue><b>take immediate action ',X
      '</font></b>.<br>')
SPACE 2
EDGMSGB 2460,TYPE=I,MOD=NO,MSGID=NO,                          X
      ('You can use the <b>dialog functions</b> ',            X
      'or the <b>RMM CHANGEVOLUME</b>')
SPACE 2
EDGMSGB 2461,TYPE=I,MOD=NO,MSGID=NO,                          X
      ' TSO command.'
SPACE 2
EDGMSGB 2462,TYPE=I,                                          X
      '.',              Period to end the data                X
      MOD=NO,MSGID=NO
SPACE 2
EDGMSGB 2463,TYPE=I,                                          X
      'QUIT',                                                 X
      MOD=NO,MSGID=NO

See Figure 2 for an example of this message.

Figure 2. Example of customizing message numbers 2450-2463 for release notification

From:       <RMM@YOURMVS>
Date/Time:  02/28/2014 09:18AM

To:         Undisclosed-recipients;
cc:
Subject:    DFSMSrmm volume expiration

Volume VOLSER assigned to owner OWNER001 on 2013/333 at 07:14:13 is now pending release.

If you wish the volume to be retained, please take immediate action.
You can use the dialog functions or the RMM CHANGEVOLUME TSO command.

Note: 'VOLSER' would be shown in the color red and 'take immediate action' would be shown in the color blue.

Here is an example of customizing message numbers 2720-2739 for product notification.

SPACE 2
EDGMSGB 2720,TYPE=I,                                          X
      'HELO $$$$$$$$',               host name substituted    X
      MOD=YES,MSGID=NO
SPACE 2
EDGMSGB 2721,TYPE=I,                                          X
      'MAIL FROM:<RMM@YOURMVS>',       edit in required id    X
      MOD=YES,MSGID=NO
SPACE 2
EDGMSGB 2722,TYPE=I,                                          X
      ('RCPT TO:<',63C'$','>'),  internet email substituted   X
      MOD=YES,MSGID=NO
SPACE 2
EDGMSGB 2723,TYPE=I,                                          X
      'DATA',                                                 X
      MOD=NO,MSGID=NO
SPACE 2
EDGMSGB 2724,TYPE=I,                                          X
      'CONTENT-TYPE: TEXT/HTML ',                             X
      MOD=NO,MSGID=NO
SPACE 2
EDGMSGB 2725,TYPE=I,MOD=YES,MSGID=NO,                         X
      ('Subject: Volume $$$$$$ ',                             X
      'has been added for software product $$$$$$$$')
SPACE 2
EDGMSGB 2726,TYPE=I,MOD=YES,MSGID=NO,                         X
      ('<FONT FACE=COURIER>',                                 X
      'A volume has been added on $$$$$$$$$$ at $$:$$:$$ ')
SPACE 2
EDGMSGB 2727,TYPE=I,MOD=YES,MSGID=NO,                         X
      'to a &NAM software product which you own :</FONT> <p>'
SPACE 2
EDGMSGB 2728,TYPE=I,MOD=YES,MSGID=NO,                         X
      ('<table border="0"><tr><td><b>Product Number</b',      X
      '</td><td>$$$$$$$$</td></tr>')
SPACE 2
EDGMSGB 2729,TYPE=I,                                          X
      '<tr><td><b>Level</b></td><td>V$$R$$M$$</td></tr> ',    X
      MOD=YES,MSGID=NO
SPACE 2
EDGMSGB 2730,TYPE=I,MOD=YES,MSGID=NO,                         X
      ('<tr><td><b>Name</b></td>',                            X
      '<td>$$$$$$$$$$$$$$$$$$$$$$$$$$$$$</td></tr> ')
SPACE 2
EDGMSGB 2731,TYPE=I,MOD=YES,MSGID=NO,                         X
      ('<tr><td><b>Description</b></td>',                     X
      '<td>$$$$$$$$$$$$$$$$$$$$$$$$$$$$$</td></tr> ')
SPACE 2
EDGMSGB 2732,TYPE=I,                                          X
      '</table><p>',                                          X
      MOD=NO,MSGID=NO
SPACE 2
EDGMSGB 2733,TYPE=I,                                          X
      ' <table border="1">  ',                                X
      MOD=NO,MSGID=NO                
SPACE 2
EDGMSGB 2734,TYPE=I,MOD=NO,MSGID=NO,                          X
      ('<tr><td><b>Volume</b></td><td><b>Rack</b></td>',      X
      '<td><b>')
SPACE 2
EDGMSGB 2735,TYPE=I,MOD=NO,MSGID=NO,                          X
      ('Feature Code</b></td>',                               X
      '<td><b>Description</b></td></tr>')
SPACE 2
EDGMSGB 2736,TYPE=I,MOD=YES,MSGID=NO,                         X
      ('<tr><td>$$$$$$</td><td>$$$$$$</td>',                  X
      '<td>$$$$</td>')
SPACE 2
EDGMSGB 2737,TYPE=I,MOD=YES,MSGID=NO,                         X
      ('<td>$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$</td></tr>',        X
      '</table>')
SPACE 2
EDGMSGB 2738,TYPE=I,                                          X
      '.',                             Period to end message  X
      MOD=NO,MSGID=NO
SPACE 2
EDGMSGB 2739,TYPE=I,                                          X
      'QUIT',                                                 X
      MOD=NO,MSGID=NO

The results of this customization would look like this:

From:       <RMM@YOURMVS>
Date/Time:  02/28/2014 01:52PM


To:         Undisclosed-recipients;
cc:
Subject:    Volume VOLSER has been added for software product PPPPPPPP


A volume has been added on 2013/321 at 08:22:12 to a DFSMSrmm software product that you own:


Product Number                $$$$$$$$
Level                         V$$R$$M$$
Name                          $$$$$$$$$$$$$$$$
Description                   $$$$$$$$$$$$$$$$