Passing data between COBOL and Fortran
Table 1 lists the data types that can be passed between COBOL and Fortran by reference.
| COBOL | Fortran |
|---|---|
| PIC S9(4) USAGE IS COMPUTATIONAL
or PIC S9(4) USAGE IS BINARY |
INTEGER*2 |
| PIC S9(9) USAGE IS COMPUTATIONAL
or PIC S9(9) USAGE IS BINARY |
INTEGER*4 |
| PIC S9(18) USAGE IS COMPUTATIONAL
or PIC S9(18) USAGE IS BINARY |
INTEGER*8 |
| USAGE IS COMPUTATIONAL-1 | REAL*4 |
| USAGE IS COMPUTATIONAL -2 | REAL*8 |
| PIC X(n) USAGE IS DISPLAY | CHARACTER*n |
| USAGE IS POINTER | POINTER |