From:	MERC::"uunet!CRVAX.SRI.COM!RELAY-INFO-VAX" 27-APR-1992 14:16:38.25
To:	george@IFP.BAUINGENIEURE.UNI-STUTTGART.DBP.DE, INFO-VAX@SRI.COM
CC:	
Subj:	Re: FAB initialization in FORTRAN

> I have a VAX FORTRAN application in which I would like to retrieve some file
> information from a NAM block. The problem is that I can't find out how to
> initialize the FAB and NAM blocks in FORTRAN.
> 
> The C code below runs fine. The C statement "fab = cc$rms_fab" initializes the
> FAB and fills the fab$b_bid and fab$b_bln fields. Is there something equivalent
> for FORTRAN? Without the initialization the fab$b_bid and fab$b_bln fields are
> zero in the FORTRAN program. This causes the sys$parse routine to return
> the rms$_fab condition. The manuals tell something about initializing with the
> $FAB macro. But, how can I call this macro from FORTRAN?

I think you will have to initialize them explicit:

        FABBLK.FAB$_BID=FAB$C_BID
        FABBLK.FAB$_BLN=FAB$C_BLN

(quoting from memory, so if any errors ...)

But that is only TWO lines.

                                                          Arne Vajhxj

Arne Vajhxj                             local DECNET:  KO::ARNE
Computer Department                     PSI:           PSI%238310013040::ARNE
Business School of Southern Denmark     Internet:      ARNE@KO.HHS.DK


