Gary,
i do it this way:
01  CarriageReturn  pic x(01) value %15.               <octal 15 is decimal
13 = return>
01  LineFeed            pic x(01) value %12.               <octal 12 is
decimal 10 = linefeed>

01  IRSrecord.
     05  <a bunch of stuff>  pic x(418).
     05  IRS-CR                   pic x(01).
     05  IRS-LF                    pic x(01).

move CarriageReturn to IRS-CR
move LineFeed           to IRS-LF

or you could just put the 'value' statements on the IRSrecord variable
directly.


--
eric kundl
[log in to unmask]
GaryJay1 wrote in message <[log in to unmask]>...
>We have been submitting our 1099 data to the IRS using mag tape for several
>years. My boss now wants to start sending a floppy disk. The IRS Mag. Media
>manual says that for diskettes, they need a CR in position 419 and LF in
420.
>We are using an HP 3000 using COBOL 85. Does anyone know how this can be
done?
>
>Thanks!
>
>Gary