PRINT ON,NOGEN
EDMAP3   DFHMSD TYPE=MAP,LANG=COBOL,MODE=INOUT,STORAGE=AUTO,SUFFIX=
EDMAP3   DFHMDI SIZE=(24,80),COLUMN=1,LINE=1,DATA=FIELD,TIOAPFX=YES,   *
               OBFMT=NO,JUSTIFY=FIRST
         DFHMDF POS=(1,60),LENGTH=21,INITIAL='Cobolskolan Sverige',    *
               ATTRB=(PROT,NORM)
         DFHMDF POS=(2,60),LENGTH=6,INITIAL='Page: ',ATTRB=(PROT,NORM)
PAGENO   DFHMDF POS=(2,67),LENGTH=2,ATTRB=(PROT,BRT)
         DFHMDF POS=(2,70),LENGTH=1,INITIAL='(',ATTRB=(PROT,NORM)
PAGEMAX  DFHMDF POS=(2,72),LENGTH=2,ATTRB=(PROT,BRT)
         DFHMDF POS=(2,75),LENGTH=1,INITIAL=')',ATTRB=(PROT,NORM)
*
         DFHMDF POS=(3,05),LENGTH=8,INITIAL='Empno',                   *
               ATTRB=(PROT,NORM)
         DFHMDF POS=(3,15),LENGTH=8,INITIAL='Ssno',                    *
               ATTRB=(PROT,NORM)
         DFHMDF POS=(3,27),LENGTH=20,INITIAL='Fname',                  *
               ATTRB=(PROT,NORM)
         DFHMDF POS=(3,48),LENGTH=20,INITIAL='Lname',                  *
               ATTRB=(PROT,NORM)
         DFHMDF POS=(3,69),LENGTH=10,INITIAL='Dpt',                    *
               ATTRB=(PROT,NORM)
*        DFHMDF POS=(4,05),LENGTH=75,
*              INITIAL='-----------------------------------------------
*              --------------------------',ATTRB=(PROT,NORM)
*
A1       DFHMDF POS=(5,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(5,12),LENGTH=1,ATTRB=PROT
B1       DFHMDF POS=(5,15),LENGTH=8,ATTRB=(PROT,BRT)
C1       DFHMDF POS=(5,27),LENGTH=20,ATTRB=(PROT,BRT)
D1       DFHMDF POS=(5,48),LENGTH=20,ATTRB=(PROT,BRT)
E1       DFHMDF POS=(5,69),LENGTH=10,ATTRB=(PROT,BRT)
*
A2       DFHMDF POS=(7,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(7,12),LENGTH=1,ATTRB=PROT
B2       DFHMDF POS=(7,15),LENGTH=8,ATTRB=(PROT,BRT)
C2       DFHMDF POS=(7,27),LENGTH=20,ATTRB=(PROT,BRT)
D2       DFHMDF POS=(7,48),LENGTH=20,ATTRB=(PROT,BRT)
E2       DFHMDF POS=(7,69),LENGTH=10,ATTRB=(PROT,BRT)
*
A3       DFHMDF POS=(9,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(9,12),LENGTH=1,ATTRB=PROT
B3       DFHMDF POS=(9,15),LENGTH=8,ATTRB=(PROT,BRT)
C3       DFHMDF POS=(9,27),LENGTH=20,ATTRB=(PROT,BRT)
D3       DFHMDF POS=(9,48),LENGTH=20,ATTRB=(PROT,BRT)
E3       DFHMDF POS=(9,69),LENGTH=10,ATTRB=(PROT,BRT)
*
A4       DFHMDF POS=(11,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(11,12),LENGTH=1,ATTRB=PROT
B4       DFHMDF POS=(11,15),LENGTH=8,ATTRB=(PROT,BRT)
C4       DFHMDF POS=(11,27),LENGTH=20,ATTRB=(PROT,BRT)
D4       DFHMDF POS=(11,48),LENGTH=20,ATTRB=(PROT,BRT)
E4       DFHMDF POS=(11,69),LENGTH=10,ATTRB=(PROT,BRT)
*
A5       DFHMDF POS=(13,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(13,12),LENGTH=1,ATTRB=PROT
B5       DFHMDF POS=(13,15),LENGTH=8,ATTRB=(PROT,BRT)
C5       DFHMDF POS=(13,27),LENGTH=20,ATTRB=(PROT,BRT)
D5       DFHMDF POS=(13,48),LENGTH=20,ATTRB=(PROT,BRT)
E5       DFHMDF POS=(13,69),LENGTH=10,ATTRB=(PROT,BRT)
*
A6       DFHMDF POS=(15,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(15,12),LENGTH=1,ATTRB=PROT
B6       DFHMDF POS=(15,15),LENGTH=8,ATTRB=(PROT,BRT)
C6       DFHMDF POS=(15,27),LENGTH=20,ATTRB=(PROT,BRT)
D6       DFHMDF POS=(15,48),LENGTH=20,ATTRB=(PROT,BRT)
E6       DFHMDF POS=(15,69),LENGTH=10,ATTRB=(PROT,BRT)
*
A7       DFHMDF POS=(17,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(17,12),LENGTH=1,ATTRB=PROT
B7       DFHMDF POS=(17,15),LENGTH=8,ATTRB=(PROT,BRT)
C7       DFHMDF POS=(17,27),LENGTH=20,ATTRB=(PROT,BRT)
D7       DFHMDF POS=(17,48),LENGTH=20,ATTRB=(PROT,BRT)
E7       DFHMDF POS=(17,69),LENGTH=10,ATTRB=(PROT,BRT)
*
A8       DFHMDF POS=(19,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(19,12),LENGTH=1,ATTRB=PROT
B8       DFHMDF POS=(19,15),LENGTH=8,ATTRB=(PROT,BRT)
C8       DFHMDF POS=(19,27),LENGTH=20,ATTRB=(PROT,BRT)
D8       DFHMDF POS=(19,48),LENGTH=20,ATTRB=(PROT,BRT)
E8       DFHMDF POS=(19,69),LENGTH=10,ATTRB=(PROT,BRT)
*
A9       DFHMDF POS=(21,05),LENGTH=6,ATTRB=(UNPROT,BRT)
         DFHMDF POS=(21,12),LENGTH=1,ATTRB=PROT
B9       DFHMDF POS=(21,15),LENGTH=8,ATTRB=(PROT,BRT)
C9       DFHMDF POS=(21,27),LENGTH=20,ATTRB=(PROT,BRT)
D9       DFHMDF POS=(21,48),LENGTH=20,ATTRB=(PROT,BRT)
E9       DFHMDF POS=(21,69),LENGTH=10,ATTRB=(PROT,BRT)
*
MSG      DFHMDF POS=(23,05),LENGTH=70,ATTRB=(PROT,NORM)
         DFHMDF POS=(24,05),LENGTH=70,ATTRB=(PROT,NORM),               *
               INITIAL='F3 Clear=Cancel Enter=Continue F7=-1 F8=+1'
         DFHMSD TYPE=FINAL
         END