RECORD msgrec USING
01 msgrec.
    05  w_gidlen	USAGE IS WORD.
    05  t_gid		PIC	X(108)
				EDIT_STRING Z(108).

    05  w_midlen	USAGE IS WORD.
    05  t_mid		PIC	X(96).

    05  l_dat	       	USAGE IS LONG.

    05  t_body		PIC  X(32224).
;