IBM Mainframe Forum

Hi,

I have a field named TRANS which is used to receive the transaction no and It is defined as below in BMS

TRANS DFHMDF POS=(1,7),LENGTH=4,JUSTIFY=(LEFT,BLANK),ATTRB=(UNPROT,N*
ORM,IC),PICOUT='X(4)' ,PICIN='X(4)'

And the above field TRANS is declared under a mapset of TYPE=MAP.

Suppose, If i define the same field TRANS under the mapset of TYPE=DSECT, what difference will be there in receiving and sending the value using PICIN and PICOUT of the TRANS field.

Please let me know your comments

Firts: read the manual.
Picin and Picout are only used for the symbolic map (dsect) generation.
Generate the symbolic map, and you will se what has been generated in the COBOL-copy for the input and output-maps in the mapset. Change the values of the Picin and Picout and generate again, and you will understand.

Hi Aashiq,

As Monitor told
we need to use PICIN and/or PICIN, if symbolicmap needs to create for the map (i.e., one of the cases is when it is being created under mapset TYPE=DESECT)

What difference will be there in receiving and sending the value using PICIN and PICOUT of the TRANS field.

Observe the following piece of code, Assuming the MODE=INOUT

TRANS DFHMDF POS=(1,7),LENGTH=6,
PICIN='9999V99',
PICOUT='ZZ9.99'

Symbolic map would have the following fileds corresponds to TRANS
TRANSL COMP PIC S9(4).
TRANSF PIC X.
TRANSI PIC 9999V99.

TRANSA PIC X.
TRANSO PIC ZZ9.99

You can have look on the following link
http://publib.boulder.ibm.com/infocente ... i00160.htm


Cheers!
Chandu