HOL2MP DFHMSD TYPE=DSECT,MODE=INOUT,TERM=ALL,STORAGE=AUTO,LANG=COBOL
HOL2MP DFHMDI SIZE=(24,80),LINE=1,COLUMN=1,COLOR=GREEN,HILIGHT=OFF,    +
               MAPATTS=(COLOR,HILIGHT),DSATTS=HILIGHT,CTRL=FREEKB
       DFHMDF POS=(1,72),LENGTH=6,INITIAL='HOL2MP',                    +
               COLOR=BLUE,ATTRB=(ASKIP,NORM)
       DFHMDF POS=(3,10),LENGTH=43,                                    +
               INITIAL='PROGRAMA HOLA PSEUDO-CONVERSACIONAL',          +
               COLOR=RED,ATTRB=(ASKIP,NORM)
       DFHMDF POS=(10,1),LENGTH=7,INITIAL='CAMPO1:',                   +
               COLOR=YELLOW,ATTRB=(ASKIP,NORM)
CAMPO1 DFHMDF POS=(10,10),LENGTH=30,HILIGHT=REVERSE,                   +
               ATTRB=(UNPROT,NORM,IC)
       DFHMDF POS=(10,41),LENGTH=1
       DFHMDF POS=(11,1),LENGTH=7,INITIAL='CAMPO2:',                   +
               COLOR=YELLOW,ATTRB=(ASKIP,NORM)
CAMPO2 DFHMDF POS=(11,10),LENGTH=30,HILIGHT=REVERSE,                   +
               ATTRB=(UNPROT,NORM)
       DFHMDF POS=(11,41),LENGTH=1
MSG    DFHMDF POS=(20,10),LENGTH=60,ATTRB=ASKIP,COLOR=NEUTRAL
       DFHMSD TYPE=FINAL
       END