Changing the DTL source for ISPISMMN

To change the ISPISMMN Dialog Tag Language source, use the Edit option to update the DTL source file members ISPZMMCH and ISPZMMSO. The member ISPISMMN defines the basic panel. This panel does not have to be modified but it does have to be reconverted with ISPDTLC after the changes to the imbed members ISPZMMCH and ISPZMMSO are complete.

The last <SELFLD tag in DTL source member ISPISMMN (see Figure 1) defines the list of terminal types. Four columns of choices are specified. The number of choices in each column is calculated by the conversion utility. The choice definitions are found in file imbed ISPZMMCH.

Figure 1. DTL source for terminal type selection - SELFLD tag

<selfld type=single name=ztm pmtloc=before listtype=ddlist
        required=yes msg=ispo901 help=ispo901h autotab=no
        entwidth=2 selfmt=end selwidth=60 choicecols=4 choicedepth=*>
        &selfld_3_prompt;

&ispzmmch;        <:-- include CHOICE tags for terminal types -->

</selfld>

This example illustrates adding terminal type XXXX using module ISPOWNTT to panel ISPISMMN. Alternatively, you can replace an existing set of translation tables by typing over the terminal type and the name of the load module that the newly defined set replaces.

The modification to the DTL source member ISPZMMCH adds the terminal type selection to the panel display (see Figure 2) and creates panel logic to determine which selection number will match a certain terminal type.

Figure 2. Example: adding a terminal type to panel ISPISMMN

 Terminal Type   3    1. 3277       2. 3277A      3. 3278       4. 3278A
                      5. 3290A      6. 3278T      7. 3278CF     8. 3277KN
                      9. 3278KN    10. 3278AR    11. 3278CY    12. 3278HN
                     13. 3278HO    14. 3278IS    15. 3278L2    16. BE163
                     17. BE190     18. 3278TH    19. 3278CU    20. DEU78
                     21. DEU78A    22. DEU78T    23. DEU90A    24. SW116
                     25. SW131     26. SW500     27. 3278GR    28. 3278L1
                     29. OTHER     30. XXXX

Modified DTL source for the English-language section of the member ISPZMMCH follows:

Figure 3. DTL source for terminal type selection - CHOICE tags

  ⋮
  <condexec lang=english>
    <choice selchar=1  checkvar=ztermp match=3277>3277       <:-- 01 -->
    <choice selchar=5  checkvar=ztermp match=3290A>3290A     <:-- 02 -->
    <choice selchar=9  checkvar=ztermp match=3278KN>3278KN   <:-- 03 -->
    <choice selchar=13 checkvar=ztermp match=3278HO>3278HO   <:-- 04 -->
    <choice selchar=17 checkvar=ztermp match=BE190>BE190     <:-- 05 -->
    <choice selchar=21 checkvar=ztermp match=DEU78A>DEU78A   <:-- 06 -->
    <choice selchar=25 checkvar=ztermp match=SW131>SW131     <:-- 07 -->
    <choice selchar=2  checkvar=ztermp match=3277A>3277A     <:-- 08 -->
    <choice selchar=6  checkvar=ztermp match=3278T>3278T     <:-- 09 -->
    <choice selchar=10 checkvar=ztermp match=3278AR>3278AR   <:-- 10 -->
    <choice selchar=14 checkvar=ztermp match=3278IS>3278IS   <:-- 11 -->
    <choice selchar=18 checkvar=ztermp match=3278TH>3278TH   <:-- 12 -->
    <choice selchar=22 checkvar=ztermp match=DEU78T>DEU78T   <:-- 13 -->
    <choice selchar=26 checkvar=ztermp match=SW500>SW500     <:-- 14 -->
    <choice selchar=3  checkvar=ztermp match=3278>3278       <:-- 15 -->
    <choice selchar=7  checkvar=ztermp match=3278CF>3278CF   <:-- 16 -->
    <choice selchar=11 checkvar=ztermp match=3278CY>3278CY   <:-- 17 -->
    <choice selchar=15 checkvar=ztermp match=3278L2>3278L2   <:-- 18 -->
    <choice selchar=19 checkvar=ztermp match=3278CU>3278CU   <:-- 19 -->
    <choice selchar=23 checkvar=ztermp match=DEU90A>DEU90A   <:-- 20 -->
    <choice selchar=27 checkvar=ztermp match=3278GR>3278GR   <:-- 21 -->
    <choice selchar=4  checkvar=ztermp match=3278A>3278A     <:-- 22 -->
    <choice selchar=8  checkvar=ztermp match=3277KN>3277KN   <:-- 23 -->
    <choice selchar=12 checkvar=ztermp match=3278HN>3278HN   <:-- 24 -->
    <choice selchar=16 checkvar=ztermp match=BE163>BE163     <:-- 25 -->
    <choice selchar=20 checkvar=ztermp match=DEU78>DEU78     <:-- 26 -->
    <choice selchar=24 checkvar=ztermp match=SW116>SW116     <:-- 27 -->
    <choice selchar=28 checkvar=ztermp 3278L1>3278L1         <:-- 28 -->
    <choice selchar=30 checkvar=ztermp match=XXXX>XXXX       <:-- 29 -->
  </condexec>
  ⋮

The conversion utility formats CHOICE tags in a top-to-bottom, left-to-right order, placing the first seven CHOICE tags in column 1 (choice numbers 1, 5, 9, 13, 17, 21, and 25), CHOICE tags 8 through 14 in column 2 (selection numbers 2, 6, 10, 14, 18, 22, and 26), and so on. The number of entries in each column is based on 28 total lines of CHOICE and CHDIV tags divided by the specified number of choice columns, in our example, 4 (as defined in Figure 1 by the CHOICECOLS keyword). These tags are arranged so that the choices appear in a left-to-right, top-to-bottom order).

By modifying the DTL source member ISPZMMSO, the new terminal type XXXX will be associated with its load module name ISPOWNTT. Modified DTL source for the English-language section of the member ISPZMMSO follows:

Figure 4. DTL source for valid terminal types and associated load module names

/* set translate load module name based on terminal type */
⋮
&ZCHARLM = TRANS(&ZTERM
                 3277  ,  ISP3277
                 3277A ,  ISP3277A
</source>
<condexec lang=english
<source>
                 3278  ,  ISP3278
                 3278A ,  ISP3278A
                 3290A ,  ISP3278A
                 3278T ,  ISP3278T
</source>
</condexec>
<source>
                 3278CF,  ISP3278C
                 3277KN,  ISP3277K
                 3278KN,  ISP3278K
                 3278AR,  ISPAR78
                 3278CY,  ISPCY78
                 3278HN,  ISPHN78
                 3278HO,  ISPHO78
                 3278IS,  ISPIS78
                 3278L2,  ISPL278
                 BE163,   ISPB678
                 BE190,   ISPB978
                 3278TH,  ISPTH78
                 3278CU,  ISPCU78
                 UE3278,  ISP3278
                 UE3278A, ISP3278A
                 UE3290A, ISP3278A
                 UE3278T, ISP3278T
                 DEU78,   ISPGE78
                 DEU78A,  ISPGE78A
                 DEU90A,  ISPGE78A
                 DEU78T,  ISPGE78T
                 SW116 ,  ISPSW116
                 SW131 ,  ISPSW131
                 SW500 ,  ISPSW500
                 3278L1,  ISPL178
                 3278GR,  ISPGR78
                 OTHER,   ISPOTHR
                 XXXX,    ISPOWNTT)
</source>

In Figure 4, the left entries (for example 3277, 3277A and 3278) are valid terminal types a user can specify. The right entries (for example ISP3277, ISP3277A and ISP3278) are the associated load module names.

The delivered ISPF terminal table names start with the prefix "ISP". ISPF does not require that user-defined terminal table names begin with the prefix "ISP"; however, PDF terminal names require the "ISR" prefix. PDF searches for the load module beginning with the fourth position of the actual table name and prefixes it with "ISR". See Creating PDF translation tables for a discussion of PDF translation tables.