The following sample shows a customizing macro definition. The first invocation of DFHMDX sets defaults for the values to be applied to subsequent invocations of DFHMDX by specifying * for the map set name and map name. Later invocations override or add to the parameters for specific maps in the map set. The continuation characters are in column 72, and the continued text is resumed in column 16.
MACRO
DFHMSX
DFHMDX MAPSET=*,MAP=*, *
PF1='Help',PF3='Exit',PF4='Save',PF9='Messages'
DFHMDX MAPSET=DFHWB0,MAP=*, *
TITLE='CICS Web Interface', *
PF3='Messages'
DFHMDX MAPSET=DFHWB0,MAP=DFHWB02, *
TITLE='CICS Web Interface Enable', *
PF3='Save'
MEND
When CICS® creates the templates for each of
your BMS map definitions, it invokes the customizing macro specified on the
SYSPARM parameter in the DFHMAPT procedure. If the SYSPARM parameter does
not specify a customizing macro name, DFHMSX is used.
Each macro is processed
in sequence, and if applicable, the parameter values are stored. Where a duplicate
parameter is specified for a particular map or map set, the new value replaces
the previous value for that map or map set only.
DFHMDX MAPSET=*,MAP=*,PF3='Exit',ENTER='Continue'
the
template will contain buttons for the PF3 and ENTER keys only.Here are further examples showing how you can customize the HTML template generated from a BMS map.
DFHMDX MAP=AD001,PFxx='Resubmit'
DFHMDX MAP=AD001,RESET=NO
The
Web client displays a page that does not contain a Reset button. DFHMDX PF1='Help'
The
Web client displays a button with the legend "Help". If the user clicks this
button, it is presented to the application as PF1. DFHMDX MAP=DFHWB01,TITLE='CICS Web Interface'
The
Web client displays "CICS Web Interface" as the title of the page. DFHMDX MASTHEAD=(/dfhwbimg/masthead.gif,'CWI')
The
Web client uses the specified masthead, or will show "CWI" as the masthead
if it cannot find the graphic file. DFHMDX MAP=AD001,BACKGROUND=/dfhwbimg/texture4.jpeg
The Web client uses the specified file as a background for the page.To change the color of the background, use the BGCOLOR parameter.
DFHMDX MAP=AD001,BLUE=AQUA,YELLOW=#FF8000
The
Web client shows BMS blue text in HTML aqua (the same as BMS turquoise), and
BMS yellow text in bright orange. DFHMDX MAP=AD001,SUPPRESS=((5,2),(6,2),(7,*))
The
displayed page does not contain the field at row 5 column 2, nor the field
at row 6 column 2, nor any of the fields in row 7 of the map. DFHMDX MAP=AD001,ONLOAD='jset(''CWI is wonderful'',''Hello there!'')'
JavaScript function jset() is invoked with the given parameters
when the page is loaded. DFHWBOUT '<script language="JavaScript">'
DFHWBOUT 'function jset(msg,wng)'
DFHWBOUT ' {window.status = msg; alert(wng)}'
DFHWBOUT '</script>'
When the page is loaded the status area at the bottom of the window contains the message "CWI is wonderful", and an alert window opens that contains the message "Hello there!".
DFHWBOUT '<p>This text illustrates the use of the DFHWBOUT macro,'
DFHWBOUT 'which can be used to output text that should only appear'
DFHWBOUT 'in HTML templates, and will never appear in the'
DFHWBOUT 'corresponding BMS map.'
will produce the following
lines in the HTML template: <p>This text illustrates the use of the DFHWBOUT macro,
which can be used to output text that should only appear
in HTML templates, and will never appear in the
corresponding BMS map.
DFHWBOUT '<meta name="author" content="E Phillips Oppenheim">'
DFHWBOUT '<meta name="owner" content="epoppenh@xxxxxxx.yyy.co*
m">'
DFHWBOUT '<meta name="review" content="19980101">'
DFHWBOUT '<meta http-equiv="Last-Modified" content="&WBDATE&W*
BTIME GMT">'
will produce the following lines
in the head section of the HTML template: <meta name="author" content="E Phillips Oppenheim">
<meta name="owner" content="epoppenh@xxxxxxx.yyy.com">
<meta name="review" content="19980101">
<meta http-equiv="Last-Modified" content="23-Dec-1997 12:06:46 GMT">
DFHMSD sets the values of &WBDATE and &WBTIME to the time and date at which the macro is assembled.
DFHMDX OPENSQ=[,CLOSESQ=],OPENBR={,CLOSEBR=},EXCLAM=!
This
specifies the substitutions needed. The characters must be entered on a terminal
where the code page corresponds to the SERVERCP on the DFHCNV call.DFHMDX MAPSET=MAPSETA,MAP=AD001,RALIGN=((3,5),(*,15),(*,3),(6,7),(*,83))
DFHMDF POS=(3,5),LENGTH=4,INITIAL='TEXT',ATTRB=PROT
DFHMDF POS=(5,80),LENGTH=3,INITIAL='123',ATTRB=PROT
DFHMDF POS=(2,10),LENGTH=5,INITIAL=' EXT',ATTRB=ASKIP
DFHMDF POS=(4,8),LENGTH=7,INITIAL='INITEX ',ATTRB=PROT
DFHMDF POS=(1,1),LENGTH=2,XINIT='C1C2',ATTRB=ASKIP
DFHMDF POS=(6,7),LENGTH=4,XINIT='0E44850F',ATTRB=PROT,SOSI=YES
DFHMDF POS=(2,9),LENGTH=6,XINIT='0E448544830F',SOSI=YES,ATTRB=PROT
DFHMDF POS=(2,9),LENGTH=6,XINIT='448544834040',PS=8,ATTRB=PROT
DFHMDX MAPSET=MAPSETA,MAP=AD001,NUMALIGN=YES