Well, not EXTOUT', but INEXT'. And it converts to an ASCII string, not comp
fields.

Also, the compiler library has routines such as DFIX'.

Also, you can easily write a VERY brief Fortran subroutine to do the
conversion. Of course, it only calls the compiler library routines.

I have not called the compiler routines directly, it was easier to just write
a couple line fortran general subprogram. You may have parameter passing
issues for calling routines like DFIX' as you can't pass a value of type real
or long.


Oscar Santiesteban Jr. wrote:
>
> I was wondering if anyone in this newsgroup can tell something about
> real numbers and how to use them in COBOL.
>
> I know the PAUSE Intrinsic uses a real number in order to pause (wait)
> your program so many seconds.  I now how to do this via the EXTIN'
> intrinsic.  This will create a real number so that you can use it in
> your COBOL program.
>
> Questions:
>
> Is there a EXTOUT' to convert a real to an S9(9) COMP?
>
> How can this be accomplished?
>
> Thanks to anyone that can respond....Please e-mail...
>
> Oscar. . . .