Atributos do CICS 
Autor: Maurício Alves Cardeal | Publicado: 2015-06-08T22:08:00-03:00



&nbsp; &nbsp;&nbsp;&nbsp; &nbsp; &nbsp; &nbsp; *----------------------------------------------------------------*

&nbsp; &nbsp;
&nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;ATRIBUTOS DO BMS &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp;&nbsp; &nbsp;
&nbsp; &nbsp; &nbsp;*

&nbsp; &nbsp;
&nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;MNEUMONICOS
APORTUGUESADOS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;*

&nbsp; &nbsp;
&nbsp; *----------------------------------------------------------------*

&nbsp; &nbsp;
&nbsp; * &nbsp; CODIGOS: D = DESPROTEGIDO (UNPROTECTED) &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;*

&nbsp; &nbsp;
&nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;P = PROTEGIDO &nbsp;
&nbsp;(PROTECTED) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp;*

&nbsp; &nbsp;
&nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;N = NUMERICO &nbsp; &nbsp; (NUMERIC)
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp;*

&nbsp; &nbsp;
&nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;A = ALFANUMERICO
(ALPHANUMERIC) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; *

&nbsp; &nbsp; &nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;M = MDT
LIGADO &nbsp; (MDT ON) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; *

&nbsp; &nbsp; &nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;E =
ESCONDIDO &nbsp; &nbsp;(DARK) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; *

&nbsp; &nbsp;
&nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;B = BRILHANTE &nbsp;
&nbsp;(BRIGHT) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; *

&nbsp; &nbsp;
&nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;S = SALTADO &nbsp; &nbsp;
&nbsp;(AUTOSKIP) &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; *

&nbsp; &nbsp;
&nbsp; *----------------------------------------------------------------*

&nbsp; &nbsp; &nbsp; &nbsp;01 &nbsp;BMSATRIB.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp;PIC X(01) VALUE ' '.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-M &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE 'A'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-B &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE 'H'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-B-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE 'I'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-E &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '&lt;'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-E-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '('.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-N &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '&amp;'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-N-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE 'J'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-N-B &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE 'Q'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-N-B-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;PIC
X(01) VALUE 'R'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-N-E &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '*'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-D-N-E-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;PIC
X(01) VALUE ')'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp;PIC X(01) VALUE '-'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-M &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE 'V'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-B &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE 'Y'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-B-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE 'Z'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-E &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '%'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-E-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '_'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-S &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '0'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-S-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '1'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-S-B &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '8'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-S-B-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;PIC
X(01) VALUE '9'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-S-E &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp;PIC X(01) VALUE '@'.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;05 &nbsp;BAT-P-S-E-M &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;PIC
X(01) VALUE QUOTE.

&nbsp; &nbsp; &nbsp; *----------------------------------------------------------------*

&nbsp; &nbsp;
&nbsp; * &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;FIM DO
BOOK DE ATRIBUTOS DO BMS &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; *
&nbsp;
&nbsp; &nbsp;
*----------------------------------------------------------------*