灰姑娘歌曲下载:CICS-PHYSICAL MAP

1. map DEFINITION
DFHMSDTYPE=&SYSPARM,MODE=INOUT,TERM=ALL,X
LANG=COBOL,TIOAPFX=YES,CTRL=FREEKB,BASE=MAPS,X
DSATTS=COLOR,MAPATTS=COLOR
WBMENUBDFHMDISIZE=(24,80),LINE=1,COLUMN=1
DFHMDFPOS=(3,29),LENGTH=22,INITIAL='WORLDWIDE BOOKS ONLINE',X
ATTRB=ASKIP,COLOR=BLUE
DFHMDFPOS=(5,15),LENGTH=17,INITIAL='SELECT AN OPTION:',X
ATTRB=ASKIP,COLOR=NEURTAL
OPTIONDFHMDFPOS=(5,33),LENGTH=1,ATTRB=(UNPROT,IC)
DFHMDFPOS=(5,35),LENGTH=1,ATTRB=ASKIP
DFHMDFPOS=(7,15),LENGTH=20,INITIAL='1. Create a Customer',X
ATTRB=ASKIP
DFHMDFPOS=(8,15),LENGTH=19,INITIAL='2. Query a Customer',X
ATTRB=ASKIP
DFHMDFPOS=(9,22),LENGTH=25,X
INITIAL='CUSTOMER NUMBER REQUIRED:',ATTRB=ASKIP
CUSTNUMDFHMDFPOS=(9,48),LENGTH=5,ATTRB=UNPROT
DFHMDFPOS=(9,54),LENGTH=1,ATTRB=ASKIP
DFHMDFPOS=(10,15),LENGTH=20,INITIAL='3. Search for a Book',x
ATTRB=ASKIP
DFHMDFPOS=(11,15),LENGTH=15,INITIAL='4. Order a Book',X
ATTRB=ASKIP
DFHMDFPOS=(12,15),LENGTH=7,INITIAL='5. Exit',X
ATTRB=ASKIP
MLINEDFHMDFPOS=(22,15),LENGTH=64,ATTRB=ASKIP,COLOR=RED
DFHMSDTYPE=FINAL
END
DFHMSDTYPE=&SYSPARM,MODE=INOUT,TERM=ALL,LANG=COBOL,X
TIOAPFX=YES,CTRL=FREEKB,BASE=MAPS,X
DSATTS=COLOR,MAPATTS=COLOR
WBCUSTBDFHMDISIZE=(24,80),LINE=1,COLUMN=1
DFHMDFPOS=(3,29),LENGTH=22,X
INITIAL='WORLDWIDE BOOKS ONLINE',X
ATTRB=ASKIP
MESSGEDFHMDFPOS=(5,10),LENGTH=64,ATTRB=ASKIP,COLOR=NEUTRAL
DFHMDFPOS=(7,10),LENGTH=10,INITIAL='LAST NAME:',X
ATTRB=ASKIP,COLOR=TURQUOISE
LNAMEDFHMDFPOS=(7,21),LENGTH=20,ATTRB=(UNPROT,IC)
DFHMDFPOS=(7,42),LENGTH=1,ATTRB=ASKIP
DFHMDFPOS=(8,10),LENGTH=11,INITIAL='FIRST NAME:',X
ATTRB=ASKIP,COLOR=TURQUOISE
FNAMEDFHMDFPOS=(8,22),LENGTH=15,ATTRB=UNPROT
DFHMDFPOS=(8,38),LENGTH=1,ATTRB=ASKIP
DFHMDFPOS=(9,10),LENGTH=8,INITIAL='ADDRESS:',X
ATTRB=ASKIP,COLOR=TURQUOISE
ADDRESSDFHMDFPOS=(9,19),LENGTH=40,ATTRB=(UNPROT)
DFHMDFPOS=(9,60),LENGTH=1,ATTRB=ASKIP
DFHMDFPOS=(10,10),LENGTH=5,INITIAL='CITY:',X
ATTRB=ASKIP,COLOR=TURQUOISE
CITYDFHMDFPOS=(10,16),LENGTH=20,ATTRB=UNPROT
DFHMDFPOS=(10,37),LENGTH=15,INITIAL='STATE/PROVINCE:',X
ATTRB=ASKIP,COLOR=TURQUOISE
STATEDFHMDFPOS=(10,53),LENGTH=8,ATTRB=(UNPROT,NORM)
DFHMDFPOS=(10,62),LENGTH=1,ATTRB=ASKIP
DFHMDFPOS=(11,10),LENGTH=12,INITIAL='POSTAL CODE:',X
ATTRB=ASKIP,COLOR=TURQUOISE
PCODEDFHMDFPOS=(11,23),LENGTH=10,ATTRB=UNPROT
DFHMDFPOS=(11,34),LENGTH=8,INITIAL='COUNTRY:',X
ATTRB=ASKIP,COLOR=TURQUOISE
CTRYDFHMDFPOS=(11,43),LENGTH=15,ATTRB=UNPROT
DFHMDFPOS=(11,59),LENGTH=1,ATTRB=ASKIP
DFHMDFPOS=(12,10),LENGTH=15,INITIAL='E-MAIL ADDRESS:',X
ATTRB=ASKIP,COLOR=TURQUOISE
EMAILDFHMDFPOS=(12,26),LENGTH=50,ATTRB=UNPROT
DFHMDFPOS=(12,77),LENGTH=1,ATTRB=ASKIP
MLINEDFHMDFPOS=(22,10),LENGTH=64,ATTRB=AKSIP,COLOR=RED
PFKEYSDFHMDFPOS=(24,1),LENGTH=79,ATTRB=ASKIP,COLOR=BLUE
DFHMSDTYPE=FINAL
END
WBORDRBDFHMSDTYPE=&SYSPARM,MODE=INOUT,TERM=ALL,LANG=COBOL,X
TIOAPFX=YES,CTRL=FREEKB,BASE=MAPS,X
DSATTS=COLOR,MAPATTS=COLOR
WBORDRBDFHMDISIZE=(24,80),LINE=1,COLUMN=1
DFHMDFPOS=(3,29),LENGTH=22,ATTRB=ASKIP,X
INITIAL='WORLDWIDE BOOKS ONLINE',COLOR=BLUE
DFHMDFPOS=(5,2),LENGTH=53,ATTRB=ASKIP,X
INITIAL='PLEASE KEY AUTHOR AND/OR BOOK TITLE, THEN PRESSX
ENTER',COLOR=NEUTRAL
DFHMDFPOS=(6,2),LENGTH=17,INITIAL='AUTHOR LAST NAME:',X
ATTRB=ASKIP,COLOR=NEUTRAL
AUTHORDFHMDFPOS=(6,20),LENGTH=20,ATTRB=(UNPROT,IC)
DFHMDFPOS=(6,41),LENGTH=1,ATTRB=ASKIP
DFHMDFPOS=(7,2),LENGTH=11,INITIAL='BOOK TITLE:',X
ATTRB=ASKIP,COLOR=NEUTRAL
TITLEDFHMDFPOS=(7,14),LENGTH=50,ATTRB=(UNPROT)
DFHMDFPOS=(7,65),LENGTH=1,ATTRB=ASKIP
TTLNDFHMDFPOS=(10,1),LENGTH=79,ATTRB=ASKIP,COLOR=BLUE
BOOKLNDFHMDFPOS=(11,1),LENGTH=79,OCCURS=6
ORDINFODFHMDFPOS=(19,1),LENGTH=79,ATTRB=(ASKIP,DRK),X
INITIAL='TO PLACE AN ORDER=>ENTER THE LINE NUMBER, YOUR X
CUSTOMER NUMBER, THEN PRESS F5',COLOR=NEUTRAL
LNUMTTLDFHMDFPOS=(20,1),LENGTH=12,ATTRB=(ASKIP,DRK),X
INITIAL='LINE NUMBER:',COLOR=NEUTRAL
LNUMDFHMDFPOS=(20,14),LENGTH=1,ATTRB=(UNPROT),PICIN='9'
CUSTTTLDFHMDFPOS=(20,16),LENGTH=17,ATTRB=(ASKIP,DRK),X
INITIAL=' CUSTOMER NUMBER:',COLOR=NEUTRAL
CUSTNODFHMDFPOS=(20,34),LENGTH=5,ATTRB=(UNPROT)
DFHMDFPOS=(20,40),LENGTH=1,ATTRB=ASKIP
MLINEDFHMDFPOS=(22,1),LENGTH=64,ATTRB=ASKIP,COLOR=RED
PFKEYSDFHMDFPOS=(24,1),LENGTH=79,ATTRB=ASKIP,COLOR=BLUE
DFHMSDTYPE=FINAL
END