Everhart, Glenn
From:	Ruslan R. Laishev [Laishev@SMTP.DeltaTel.RU]
Sent:	Wednesday, February 10, 1999 7:37 AM
To:	Info-VAX@Mvb.Saic.Com
Subject:	Re: DCL REQUEST equivalent
#include        <stdio.h>
#include        <stdlib.h>
#include        <string.h>
#include        <starlet.h>
#include        <descrip.h>
#include        <ssdef.h>
#include        <stsdef.h>
#include        <lib$routines.h>
#include        <str$routines.h>
#include        <stdarg.h>
#include        <cmbdef.h>
#include        <agndef.h>
#include        <iodef.h>

#include        <brkdef.h>
#include        <opcdef.h>
void    main    (status)
{
int     status;
struct  dsc$descriptor  msg_dsc,to_dsc,opr_dsc;
char    msg_buf [] = "Hello World !!";
char    to_buf [] = "LAISHEV";
struct  msgbuf  {
                char    type;
                char    target[3];
                int     rqstid;
                char    msg[2000];
                } msgbuf = {OPC$_RQ_RQST,"TST",0,"Hello World !!"};


        INIT_SDESC(msg_dsc,sizeof(msg_buf)-1,msg_buf);
        INIT_SDESC(to_dsc,sizeof(to_buf)-1,to_buf);
        INIT_SDESC(opr_dsc,sizeof(msgbuf)-1,&msgbuf);

        status = sys$brkthru (0,&msg_dsc,&to_dsc,
                        BRK$C_USERNAME,0,0,
                        BRK$M_CLUSTER,
                        BRK$C_QUEUE,
                        300,0,0);

        if (!$VMS_STATUS_SUCCESS(status))
                lib$signal(status);

        status = sys$sndopr (&opr_dsc,0);
        if (!$VMS_STATUS_SUCCESS(status))
                lib$signal(status);
}

Oleksii Krykun wrote:
> 
> Hi all!
> 
> I would like from my C-program put some messages to the operator's terminal
> (like DCL REQUEST command). What is the easiest way to do this (any system
> services or RTL LIB$ functions or composition of above)?
> I considered that using of LIB$SPAWN is easiest but last time I used this
> function some years ago and forgot it's syntax. But I don't think this
> approach is appropriate.
> 
> Many thanks,
> Oleksii

-- 
Be well, right now.
+OpenVMS [Sys|Net] HardWorker........................................+
 Russia,Delta Telecom JSC,                    Cel:  +7 (901) 971-3222
 191119,St.Petersburg,Transportny per. 3                     116-3222
                                              Fax:  +7 (812) 115-1035
+http://www.levitte.org/~rlaishev/ .......... SysMan rides HailStorm +