IBM MAINFRAMES
CICS Training Class-02
Macros used in BMS Mapset
PRINT NOGEN Coded once at the beginning of the mapset; tells the assembler not to print the statements generated as a result of expanding the BMS macros. END Must be the last statement in the input stream; tells the assembler that there are no more source statements.
DFHMSD Macro DFHMSD : To define the mapset and supplies values that
apply to the entire mapset.
N M! "#$MS" T%&!'()S%S& *M + "S!CT + M &,. N/'(C0B0. + SM + &.1 ,M0"!'(1N + 02T + 1N02T,T!*M'terminal3typeCT*.'4option- option...5ST0* /!' 2T0M & TTS'4C0.0*-$1.1/$T5"S TTS'4C0.0*-$1.1/$T5T10 '(%!S + N0,
"#$MS" T%&!'#1N .
MAPSET Parameter E planation
NAME : 2sed to refer the mapset in an application program. TYPE : Specifies 7hether a physical map 4M &5- Symbolic map 4"S!CT5- or both 4)S%S& *M5 7ill be generated. T%&!'#1N . mar8s the end of a mapset. LANG Specifies the programming language: C0B0.- SM &.91. MODE Specifies 7hether the mapset is used for input 41N5output 402T5- or both 41N02T5.
MAPSET Parameter E planation
CTRL Specifies a list of control options in effect for each map in the mapset. Common options are:
#*!!:B #ree the 8eyboard after each output operation. . *M Sound the audio alarm . #*S!T : To reset all the map filed values.
STORAGE 1f ST0* /!' 2T0 is coded- the symbolic maps for the maps in the mapset 7ill occupy separate storage locations. 0ther7ise- they;ll occupy the same storage location.
MAPSET Parameter E planation
TIOAPFX : %!S generates a <=3byte #1..!* item at the beginning of the symbolic map that the system uses to maintain control information. %!S should al7ays be specified for C0B0. maps 4N0 is the default5. MAPATTS / DSATTS Specifies 7hich extended attributes should be supported by the symbolic map. C0.0* and $1.1/$T are the most common and are usually coded together. TERM Specifies the type of terminal that 7ill be supported by the physical map generated by this mapset. Common values are: .. or >=?@ Support for any terminal.
DFHMDI Macro
DFHMDI Coded once for each map 7ithin the mapset; supplies values that apply to a single map. N M! B "#$M"1 S1A!'4lines- columns5.1N!'line3numberC0.2MN'column3numberCT*.'4option- option...5
MAP Parameter E planation
NAME : The one3 to seven3character name of the map. !ach map 7ithin a mapset must have a uniCue name. SIZE : Specifies the siDe of the map in lines and columns. 2sually coded S1A!'4=E-F@5 LINE Specifies the line number on the screen 7here the map starts. 2sually coded .1N!'<. COLUMN Specifies the column number on the screen 7here the map starts. 2sually coded C0.2MN'<. CTRL Specifies a list of control options in effect for the map. Common options are: #*!!:B . . *M ) #*S!T
DFHMDF Macro
DFHMDF Coded once for each field 4or attribute byte5 7ithin the map; specifies the position- length- and attributes of a screen field. N M! "#$M"# &0S'4.1N!-C0.2MN5 .!N/T$'#1!." .!N/T$ TT*B'4&*0T-N2M-1C-#S!T-B*T5 C0.0*'C0.0*$1.1/$T'$1/$.1/$T1N1T1 .'GliteralH&1C1N'G&1CT2*!IST*1N/H&1C02T'G&1C2T*!IST*1N/H
Map Field Parameter E planation
NAME The <3 to =J3character name for the field. 1f omitted- the field is not included in the symbolic map. POS Specifies the line and column position of the attribute byte. LENGTH Specifies the length of the field- not including the attribute byte. COLOR Specifies the field;s color. %ou may specify "!# 2.T for the terminal;s default color- or you may specify B.2!- *!"&1N:- /*!!N- T2*K201S!- %!..0L- or N!2T* .. 1f omitted- "!# 2.T is assumed. HILIGHT Specifies the field;s extended highlighting. Malid highlighting options are B.1N:- *!M!*S!- 2N"!*.1N!- and 0##. 1f omitted- the default is 0##.
Map Field Parameter E planation
INITIAL Specifies the starting value of the field. 1f omitted- the default is hexadecimal Deros 4.o73Malue5. PICIN Specifies a C0B0. picture string that defines the format of the data on input- li8e PICIN';JJJMJJ;. PICOUT Specifies a C0B0. picture string that defines the format of the data on output- li8e &1C02T';AAA-AAJ.JJ;.
Map Field Parameter E planation
ATTRB : Specifies one or more attribute byte settings for the field. 1f omitted- the default is N0*M- S:1&. 1f one or more options are specified- the default becomes N0*M- 2N&*0T. B*T "*: The field is displayed 7ith high intensity. The field is not displayed on the screen. N0*M The field is displayed 7ith regular intensity. &*0T The field is protected; data may not be 8eyed into it. S:1& The field is protected- and the cursor 7ill automatically s8ip over it. 2N&*0T The field is unprotected; data may be 8eyed into it.
Map Field Parameter E planation
NUM Turns on the numeric loc8 feature so only numeric characters can be entered; the field is right Nustified and Dero filled. 1f omitted- the field is assumed to be alphanumeric and is left Nustified and space filled. IC Specifies that the cursor should be located at the start of the field. FSET Specifies that the M"T bit in the attribute byte should be turned on before the map is sent to the terminal.
An Attri!ute B"te
!ach field on a screen is preceded by an attribute byte that controls the appearance and operation of the field. The attributes byte determine a field;s characteristics. The protection attribute determines 7hether or not the user can 8ey data into the field. 4&*0T-2N&*0T- S:1&5 The shift attribute determines 7hether the 8eyboard is in alphanumeric shift 4N2M5 The intensity attribute controls ho7 the data in the field is displayed. 4N0*M-B*T ) "*:5.
T#e contents o$ an attri!ute !"te
Bit positio s @I< =I> F! ctio s &rotection and Shift 1ntensity Bit s"tti #s "epends on the contents of bits =3? @@ ' 2nprotected alphanumeric @< ' 2nprotected numeric <@ ' &rotected << ' &rotected s8ip @@ ' Normal @< ' Normal <@ ' Bright << ' "ar8 4No3display5 Must be @ @ ' #ield has not been modified < ' #ield has been modified
EIO
P ?
M"T
M%T Modi$ied %ata Tag
Modified "ata Tag is the last bit of an attribute byte that says 7hether a field has been modified or not. Terminal sends a field data only if the M"T is on. 0ther7ise- the field value is not transmitted. M"T;s can be turned on by
Specifying #S!T as part of the attribute of the BMS map Moving a standard attribute- 7hich contains #S!T to the
Symbolic map;s attribute.
!ntering data into a field 7ill turns its M"T 0n.
S$ipp"r % Stopp"r T"c& i'!"
BMS does not automatically generate attribute byte to mar8 the end of an unprotected field. The user have to do it himself using s8ipper 9 stopper field. So after every unprotected field an unlabeled s$ipp"r/stopp"r field must be defined 7ith attribute parameter as S:1&9 &*0T S8ipper filed : 1tHs a < byte filed 7ith S:1& 4a!tos$ip5 attribute used to s8ip the cursor to the next unprotected filed. "#$M"# &0S'4.n-Cn5- TT*B' S:1&-.!N/T$'< Stopper filed : 1tHs a < byte filed 7ith &*0T 4prot"ct5 attribute used to stop the cursor in order to prevent filed overflo7. "#$M"# &0S'4.n-Cn5- TT*B'&*0T-.!N/T$'<
MAPSET PR&'RAM
MAPSET PR&'RAM
T#an( )ou
