Path: utzoo!attcan!uunet!dayvb!fac2
From: fac2@dayton.saic.com (Earle Ake)
Newsgroups: comp.lang.fortran
Subject: Re: calling SYS$QIOW from VMS FORTRAN
Message-ID: <1097.266575f8@dayton.saic.com>
Date: 31 May 90 23:52:24 GMT
References: <4932@plains.UUCP>
Organization: Science Applications Intl. Corp., Dayton, Ohio
Lines: 30

In article <4932@plains.UUCP>, grisanti@plains.UUCP (Ames Grisanti) writes:
> Hello,
> 
>   Does anyone have any experience using the QIO system
> services under VMS v4.7? I am trying to use SYS$QIOW to 
> collect data at a serial port. I am calling these routines
> from fortran. Any help with this would be greatly appreciated.

I have used many system services including SYS$QIOW.  You can use them as a
subroutine or as a function.  The form:

	CALL SYS$QIOW(,,,,,)

will call the $QIOW routine.  If you want the status information returned,

	INTEGER SYS$QIOW, STATUS

	STATUS = SYS$QIOW(,,,,,)

Status should now have the return status in case or errors.  A success will
put the number 1 (SS$_NORMAL) into status.  Any questions please direct them
to me via e-mail.

-- 
_____________________________________________________________________________
             ____ ____    ___
Earle Ake   /___ /___/ / /     Science Applications International Corporation
           ____//   / / /__                 Dayton, Ohio
-----------------------------------------------------------------------------
Internet: fac2%dayton.saic.com@uunet.uu.net    uucp: dayvb!fac2