[Info-vax] Fortran problem with QIO

[jbriggs444]

On Dec 2, 5:19 pm, gerr... at no.spam.mail.com wrote:
>       STRUCTURE /IOSBDEF/  ! Official definition somewhere?
>         INTEGER*2 IOSB_W_STATUS
>         INTEGER*2 IOSB_W_BYTECOUNT
>         INTEGER*4 IOSB_L_BLKCOUNT
>       END STRUCTURE

The IOSB doesn't always have the same layout.  For the terminal driver
it is usually considered to consist of four words rather than two
longwords.  This provides room for the status code, number of
characters read and some information about the terminator and offset
to terminator as I recall.  In most other contexts it is considered as
a pair of longwords.

When using the terminal driver my practice was to declare the IOSB as

      integer *2 iosb(4)

When using other calls such as SYS$GETJPIW I would declare it as

      integer *4 iosb(2)