Subject: | |
From: | |
Reply To: | |
Date: | Tue, 4 Nov 1997 21:35:01 -0600 |
Content-Type: | multipart/mixed |
Parts/Attachments: |
|
|
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. . . .
|
|
|