HDTenEightyP/NetNews huggingface dataset:
From: carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick)
Newsgroups: comp.os.vms
Subject: Re: Tool to edit vmsmail_profile.data?
Date: 26 Jan 1993 06:20:20 GMT
Organization: HST Wide Field/Planetary Camera
Distribution: world
Reply-To: carl@SOL1.GPS.CALTECH.EDU
NNTP-Posting-Host: sol1.gps.caltech.edu

In article <1993Jan26.034859.8095@iscnvx.lmsc.lockheed.com>, marshall@NEBULA.SSD.LMSC.LOCKHEED.COM (Bob Marshall) writes:
>In article <1993Jan25.230519.18247@asuvax.eas.asu.edu>,
>franz@asuvax.eas.asu.edu (Chris Franz) writes:
>>
>>Running VMS 5.5-1 on VAX 6410
>>
>>I need a tool (command procedure) to edit vmsmail_profile.data.
>>Does such an animal exist?
>
>I have a very good procedure to do this. It was written by Alan Zirkle
>many years ago, but it is still up-to-date as of VMS 5.5-2. I use it all
>the time. It allows you to easily manipulate the VMSMAIL_PROFILE.DATA
>record for any user. If anyone is interested I can mail them a copy.
>I thought about posting it, but it's 578 lines long.

Depending on what he wants to do with the file, he may already have such a
program.  It's called SYS$SYSTEM:MAIL.EXE.  This program will allow you do
modify the forwarding address for any user (or even for aliases).  It allows
you to set the personal name field for any user.  Combined with the SUBMIT/USER
command, it allows you to set the mail directory for any user, or to zero that
user's new mail count (though iusing if tor the latter is discouraged, as it
requires that you move all of his real new mail to a different folder).

So, my question to Chris is, "What the hell is it you really want to do?"
--------------------------------------------------------------------------------
Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL

Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
understanding of astronomy is purely at the amateur level (or below).  So
unless what I'm saying is directly related to VAX/VMS, don't hold me or my
organization responsible for it.  If it IS related to VAX/VMS, you can try to
hold me responsible for it, but my organization had nothing to do with it.
From: carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick)
Newsgroups: comp.os.vms
Subject: Re: SENDing an entire MAIL FOLDER ?
Date: 26 Jan 1993 06:12:33 GMT
Organization: HST Wide Field/Planetary Camera
Distribution: world
Reply-To: carl@SOL1.GPS.CALTECH.EDU
NNTP-Posting-Host: sol1.gps.caltech.edu

In article <01GTXLEOVOIQ9GVN23@SNYBUFVA.BITNET>, TARKA10@SNYBUFVA.BITNET (Mark Tarka) writes:
>I CHECKED:
>On-line help
>On-line documentation
>Local comp center staff
>
>Can I send all 30 messages in a single mail folder to a user at
>another node, and if so, how?
>
>Extracting each individually, and appending them into a single file
>would work, but I'd lose the directory information from that mail folder
>(#, From, Date, Subject).

Another vague question.  What's wrong with:
	MAIL> SELECT FOLDER
	MAIL> EXTRACT/ALL/MAIL some_file
	MAIL> SEND/SUBJECT=whatever some_file
	To:	some_address

>I could FORWARD each message individually.  But would the message
>arriving at the new node contain my address in the "From" field, and the
>date of forwarding in the "Date" field?

Yes, it would.  There's no way, short of forging mail, to include anything
*BUT* your own address in the "From:	" field.  Have you taken even 2 seconds
to *THINK* about what it is you're asking?  If so, have you considered
checking yourself into a home for the terminally stupid?

>As a user, I can't offer much in the way of technical help, but if
>anyone has a problem with their newmail count, I have a friend with a
>program which will correct the difficulty.

I see.  You want to multiply your own stupidity.  There's already a supported
program to do just that.  It's called MAIL.  You simply:
	1)  Read all your new mail messages; then
	2)  MAIL> READ/NEW
--------------------------------------------------------------------------------
Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL

Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
understanding of astronomy is purely at the amateur level (or below).  So
unless what I'm saying is directly related to VAX/VMS, don't hold me or my
organization responsible for it.  If it IS related to VAX/VMS, you can try to
hold me responsible for it, but my organization had nothing to do with it.
Newsgroups: comp.os.vms
From: ORAKEL@rzmain.rz.uni-ulm.de (Framstag)
Subject: Re: DCL: wait <until-absolut-time>?
Organization: University of Ulm, Germany
Date: Wed, 27 Jan 1993 10:59:32 GMT
X-Copyright1: Fuer Veroeffentlichungen AUSSERHALB des Newssystemes gelten MEINE Geschaeftsbedingungen.
X-Copyright2: Nichtbeachtung wird in der Regel zivil- und strafrechtliche Folgen nach sich ziehen.
X-News-Reader: VMS NEWS 1.25beta

In <1993Jan26.172148.22771@wega.rz.uni-ulm.de> ORAKEL@rzmain.rz.uni-ulm.de writes:

> I have a problem with a DCL program:
> I want to wait until an absolute time. The manual tells me WAIT accepts
> only a delta-time parameter.

I've got a respond via mail.
VMS HELP lies about this topic. It IS possible to specify an absolute time
with the WAIT command!

" $ wait 26-jan-1993 20:52 "  is correct!

And I believed HELP and didn't tested it... now it sounds so silly...


\  Ulli 'Framstag' Horlacher       \     psi%(0262)45050260103::orakel  \
 \  Student consultant VAX/VMS and networks   \  orakel@dulruu51.bitnet  \
  \  Rechenzentrum  Universitaet Ulm  Germany  \    orakel@rz.uni-ulm.de  \
   \  "With mainframes you just can do nonsense, with PCs not even that."  \
From: bruce@ais.com (Bruce C. Wright)
Newsgroups: comp.os.vms
Subject: Re: help: huge index file
Date: 27 Jan 93 23:36:11 GMT
Organization: Applied Information Systems, Chapel Hill, NC

In article <26JAN199310483026@vtpwr2.psl.ee.vt.edu>, gharpure@vtpwr2.psl.ee.vt.edu (VASUDEV GHARPURE) writes:
> 
> 	We have a vax cluster, with a VS3100/76 as the boot node, 
> running VMS 5.4-2. The boot node has a 1.0 GB external disk, used for 
> user files.
> 
> 	I used this disk as a temprory storage for a large number of 
> files, which have since been deleted. But I am left with a huge index 
> file (about 31K blocks). The original file was about 5K blocks.
> 
> 	How do I get the index file back to normal? What harm does it do 
> if it stays as it is?

There's no supported way to truncate the index file once it's grown
like that.  The usual approach is to do a backup and restore from tape.

The main harm that the index file does if it stays that big is take
up space.  You _may_ slightly decrease performance if the index file
is fragmented and breaks up the disk so that many user files become
fragmented;  since you're not using the file headers in the `higher'
blocks in the index file, you won't get much of a performance hit from
disk accesses to a fragmented index file.  Few disk defragmenter
programs will deal with a fragmented index file;  again, the most
common cure is to do a backup and restore from tape.

Bruce C. Wright
From: carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick)
Newsgroups: comp.os.vms
Subject: Re: Can DCL programs execute 'other' commands ?
Date: 25 Jan 1993 01:29:27 GMT
Organization: HST Wide Field/Planetary Camera
Distribution: world
Reply-To: carl@SOL1.GPS.CALTECH.EDU
NNTP-Posting-Host: sol1.gps.caltech.edu

In article <01GTUMJYR28G8Y6FL7@JCSVAX1.BITNET>, HANY@JCSVAX1.BITNET writes:
>        I am new to writing DCL programs. I tried to make a program
>execute commands other than those issued at the '$' prompt, but just
>couldn't figure out how to do it. For example .. What would be the code
>for a program that would read 2 mail messages, then return back to the
>'$' ? .. The following did NOT work :
>
>$ mail
>$ read 1
>$ read 2
>$ exit

You put $ signs only at the beginnings of DCL commands, not in front of lines
which are data for an image.  In your case, you want:
	$ MAIL
	READ 1
	READ 2
	EXIT
If you need to provide data in which one or more records start with a $, you
need to use the DECK command (see the on-line help for details) just after the
command that invokes the image, and the EOD command (see the on-line help for
details) to terminate the data stream for the program.  For example, if you
have an executable, FUBAR.EXE, and you want to provide the following data to
it:
	$SPAM
	SPAM
	WHATEVER
you'd use:
	$ RUN FUBAR
	$ DECK
	$SPAM
	SPAM
	WHATEVER
	$ EOD
--------------------------------------------------------------------------------
Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL

Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
understanding of astronomy is purely at the amateur level (or below).  So
unless what I'm saying is directly related to VAX/VMS, don't hold me or my
organization responsible for it.  If it IS related to VAX/VMS, you can try to
hold me responsible for it, but my organization had nothing to do with it.
Newsgroups: comp.os.vms
From: fisk@cvdv99.mayo.edu (Tom Fisk | 2D-337 STM | 5-4341)
Subject: Re: End-user on-line Motif tutorial
News-Software: VAX/VMS VNEWS 1.41    
Reply-To: fisk@mayo.edu
Organization: University of Arizona MIS Department - Mosaic Group
Date: 23 Jan 1993 09:33 -0700

>Now, now.  I'll be on your side if Hillary tries to have you thrown into a
>concentration camp for your PiC sexist observations, but what sample size are
>we talking about here?  There are many females in our department who use mice
>-- clerical staff, professors, students, technicians, etc., and I've never
>heard of any of them having any difficulty like this.  I suppose I could have
>just been unobservant, but there are millions of females who use computers
>with mice, and no word of this phenomenon has made its way into any trade
>journal articles I've ever read.
> 
First of all I really didn't want that post to sound sexist but it is
unfortunately the way many women are brought up in our society.  Nuff said...

I realize that there are many women that have no difficulty using mice.  The
ones we see that are having the problem are those who have none or very limited 
computer experience and they use it while they are standing (which I think may
be a big factor also).  The reason why they are having the trouble was 
actually brought up by one of the users...not inferred on our part in anyway.
And she is still running the mouse upside down and it works fine for her...

Just our experience...your mileage may vary.
-------------------------------------------------------------------------------
Thomas B. Fisk          +----------------------------+  Internet: fisk@mayo.edu
Mayo Clinic             |   If you don't know where  |  Voice: (507) 255-4341
200 First Street SW     |  you're going you'll never |  FAX: (507) 255-5484
Mail Stop 2D-337 STM    |         get there.         |
Rochester, MN  55905    +----------------------------+
-------------------------------------------------------------------------------
From: JOE@SPOCK.FHCRC.ORG (Joe Meadows)
Newsgroups: comp.os.vms
Subject: Re: Running LOGINOUT [SYS$CLI]
Date: 27 Jan 93 21:33:00 GMT
Distribution: world
Organization: The Internet

At least one interesting thing that can be done with SYS$CLI and can't be
done with LIB$ routines is the setting of strange symbols. For instance,
you can't do the equivalent of:

    $ 80 == "SET TERMINAL/WIDTH=80"

Using DCL or the LIB$SET_SYMBOL routine, however you _can_ do it using SYS$CLI.
Oh, and lest anyone get their hopes up, you can't create integer symbols using
it (so far as I can tell, to be honest I haven't checked the sources). I.E. you
can't do the equivalent of "$ number == 6".

In fact, here's a bit of C code to do the former:

#include <clidef>
#include <cliservdef>
#include <descrip>

typedef struct dsc$descriptor string;

#define SLEN(a)   (a).dsc$w_length
#define STYPE(a)  (a).dsc$b_dtype
#define SCLASS(a) (a).dsc$b_class
#define SADDR(a)  (a).dsc$a_pointer

#define STRING(a,b) {(a).dsc$w_length = strlen(b); (a).dsc$a_pointer = (b);}

int set_symbol(char *symbol_name, char *symbol_value)
{
    static struct
    {
        unsigned char cli$b_rqtype;     /* request type */
        unsigned short cli$w_servcod;   /* service code */
        unsigned char cli$b_rqstat;     /* probably not correct, oh well..  */
        string cli$q_namdesc;           /* symbol name  */
        string cli$q_valdesc;           /* symbol value */
    } blk = {CLI$K_CLISERV, CLI$K_DEFGLOBAL, 0};

    STRING(blk.cli$q_namdesc, symbol_name);
    STRING(blk.cli$q_valdesc, symbol_value);

    return sys$cli(&blk);
}

main(int argc, char *argv[])
{
    int status;

    status = set_symbol("24",  "set term/page=24");
    if (!(status & 1)) lib$signal(status);

    /* etc. */
}


Cheers,
Joe Meadows joe@kirk.fhcrc.org  meadowsj@boeing.com  etc...

Newsgroups: comp.os.vms
From: ercolessi@uimrl3.mrl.uiuc.edu (furio ercolessi)
Subject: Re: cpu time measurement on VMS
Reply-To: ercolessi@uimrl3.mrl.uiuc.edu (furio ercolessi)
Organization: MRL - UIUC
Date: Thu, 21 Jan 1993 04:25:56 GMT

In article <C164Hn.223@dscomsa.desy.de>, tjl@zeus02.desy.de (Tim Llewellyn) writes:
|>In article <1993Jan20.164619.8700@eecs.nwu.edu>, shil@eecs.nwu.edu (Lei Shi) writes:
|>
|>|> I have a FORTRAN program. I compile and link it and use run
|>|>command to run it.  My question is how I can measure the total CPU
|>|>used by the execution of the program. 
|>|> In UNIX, I can easily use time to do it.  
|>|>But how do I do it in VMS?

|>The are various alternatives. The simplest way is ...
|> [...] 
|>Finally, if this is not
|>sufficient you should investigate the run time library timer routine
|>LIB$INIT_TIMER, LIB$SHOW_TIMER, LIB$STAT_TIMER ... 

... as done, for instance, by the following

 
      DOUBLE PRECISION FUNCTION SECOND()
 
******** RETURNS THE ELAPSED CPU TIME, IN SECONDS.
 
*        VAX/VMS VERSION
      IMPLICIT NONE
      INTEGER*4 LIB$INIT_TIMER , LIB$STAT_TIMER
      INTEGER*4 STATUS,TIMER,ITIME(2)
      LOGICAL FIRST
      SAVE FIRST
      DATA FIRST / .TRUE. /
 
      IF (FIRST) THEN
*           FIRST CALL TO SECOND(). INITIALIZE TIMER, RETURN 0 TO USER:
*           NOTE: THE TIMER WILL BE NEVER FREED, BUT WHO CARES.
         STATUS = LIB$INIT_TIMER(TIMER)
         IF (.NOT.STATUS) CALL LIB$SIGNAL(%VAL(STATUS))
         FIRST = .FALSE.
         SECOND = 0.D0
      ELSE
*           NOT FIRST CALL. GET ELAPSED CPU TIME :
         STATUS = LIB$STAT_TIMER(2,ITIME,TIMER)
         IF (.NOT.STATUS) CALL LIB$SIGNAL(%VAL(STATUS))
*           ITIME(2) DISREGARDED HERE, PERHAPS SHOULD BE INCLUDED.
         SECOND = 0.01D0*ITIME(1)
      ENDIF
      RETURN
      END

--
furio ercolessi    <furio@uiuc.edu>*    <furio@sissa.it>+
* materials research lab, uni illinois at urbana-champaign
+ intl school for advanced studies, trieste, italy   

"Change nothing and continue with immaculate consistency"
                                      [ Brian Eno, "Oblique Strategies" ]
From: pawlak@vxdesy.desy.de
Subject: Re: End-user on-line Motif tutorial
Organization: (DESY, Hamburg, Germany)
Date: Thu, 21 Jan 1993 12:49:37 GMT

In article <19JAN199322093522@cvdv99.mayo.edu>, fisk@cvdv99.mayo.edu (Tom Fisk | 2D-337 STM | 5-4341) writes:
> [deleted....]
>
> Oh...here is a situation you are going to really like.  We have some female
> employees that just can not get the hand/eye co-ordination going with the 
> mouse.  They always want to move their hand/mouse the _opposite_ direction they
> want to move the pointer.  We tried to figure out why this was.  Turns out that
> when the look at the terminal, they have some mental connection that says 
> they are in front of a mirror (where I am told some females spend some time)
> and they do exactly everything _backward_ with the motor functions.  The
> only way we have been able to get them to move the pointer in the right 
> direction on the screen is to turn the mouse _upside down_.  Yes...another
> amazing but true story from the journals of learned behavior.
>              
Hmmm... It can't be true. Workstation is a mirror! Stand side to side
with the screen and move the mouse to see what I mean. Also don't they 
have 'up-down' problems with the turned mouse???

Sorry, this post has nothing to do with VMS, I know....

Michal  (pawlak@vxdesy.desy.de)
Newsgroups: comp.os.vms
From: rempel@hg.uleth.ca (Curtis Rempel)
Subject: Re: Ctrl-C disabling with VMS sessions]
Reply-To: rempel@hg.uleth.ca (Curtis Rempel)
Organization: University of Lethbridge
Date: Thu, 21 Jan 1993 15:41:19 GMT


>	Oh look, more stupid consultants trying to make a name
>	for themselves, but can't read:

[stuff deleted]

># 
>#- Bob
>#| Robert "Bob" Gezelter                       E-Mail:  gezelter@rlgsc.com  |
>#| Robert Gezelter Software Consultant         Voice:   +1 718 463 1079     |
>
>What a cool name for a company.
>

And the very same stupid consultant that was literally booed off the stage during
the VAX Magic session at the Fall/90 DECUS in Las Vegas.   There's not much else
to say except HAR, HAR, HAR!!
From: vaxmith@rks.se
Newsgroups: comp.os.vms
Subject: How to run on one processor on a 6640?
Date: 23 Jan 93 00:17:14 CET
Organization: RKS Data AB, Vaxjoe, Sweden

Hi

I have a small but maybe a littlebit tricky question.
I want to force some processes in a 6640 to run on only one and always the 
same processor. Is this possible and if so, can someone explain how or 
include an MAR-example of how to do it. I can't relink the images so it has 
to be a utility that can change the PCB when the process is running.

Thanks

-- Michael


________________________________________________________________________
Michael Thurbin                 |    E-mail: vaxmith@rks.se
RKS Data AB                     |    Phone.: +46 470 47060
Box 209                         |    Fax...: +46 470 48976
S-351 05 Vaxjoe, Sweden         |
________________________________|_______________________________________
Newsgroups: comp.os.vms
From: lionel@quark.enet.dec.com (Steve Lionel)
Subject: Re: Recursion in FORTRAN
Reply-To: lionel@quark.enet.dec.com (Steve Lionel)
Organization: Digital Equipment Corporation, Nashua NH
Date: Thu, 21 Jan 1993 19:58:04 GMT


In article <1993Jan21.092628@mccall.com>, tp@mccall.com (Terry Poot) writes:
|>In article <1993Jan20.195642.13310@dbased.nuo.dec.com>,
|>lionel@quark.enet.dec.com (Steve Lionel) writes:
|>>As of DEC Fortran V6.0 on OpenVMS (currently shipping on Alpha AXP systems,
|>>soon to come on VAX), SAVE will NOT be a no-op.  So be sure to use it if you
|>>want the value saved upon exit from the routine.  Note that SAVE does not
|>>necessarily mean "static allocation"; there is a STATIC statement for that.
|>>(In practical terms, SAVE does cause static allocation, but you should say
|>>what you mean and mean what you say.)
|>
|>I want to be real clear about this (I hear the sound of 200,000 lines of legacy
|>fortran code shattering to little bits). As of v6.0, values not explicitly
|>mentioned in a SAVE statement can not be guaranteed to survive from call to
|>call, right? Any qualifiers to preserve the current behavior?
|>

Relax.  The default behavior hasn't changed.   The compiler sort of gives you
a free "SAVE" if it can't determine that you always store a variable before
using it.  But if you use /RECURSIVE, then variables not explicitly SAVEd
won't be.  Also, /RECURSIVE will eliminate guaranteed initialization to zero;
I've heard one customer consider this a feature, so as to ferret out hidden
bugs. 

However, if you haven't SAVEd a variable, and the compiler can tell that you
definitely use it before storing it, it will give you a warning. 

Now what I said about SAVE not meaning "static" is true, though on VAX, at
least, it does force static allocation, even if you use /RECURSIVE.  But the
standard says you should use SAVE if you want the value saved, so put it in
if you mean that - it'll prevent possible surprises in the future and also makes
the intent clearer to someone reading the code.  (I believe that on AXP
systems the same is true, though I know that the optimizer there distinguishes
between "must save before exit" and "static"; this may have no practical
consequence.)

Now what I said about VOLATILE is less relaxing - programs which assume that
references to variables in COMMON or dummy arguments are not optimized (that
is, that the compiler ALWAYS refers to the variable through the COMMON or the
argument list), may indeed break if those variables can change value invisibly
to the compiler and are not declared VOLATILE.  The V6 compiler can choose to
copy COMMON variables and some dummy arguments into registers for calculations;
it will write COMMON variables back to the COMMON around routine calls if
necessary.  So if you have an AST routine that modifies a COMMON variable,
declare the variable, or the whole COMMON, VOLATILE.
--

Steve Lionel                    lionel@quark.enet.dec.com
SDT Languages Group
Digital Equipment Corporation
110 Spit Brook Road
Nashua, NH 03062
From: dragon@NSCVAX.PRINCETON.EDU (Mighty Firebreather)
Newsgroups: comp.os.vms
Subject: RE: Programming
Date: 26 Jan 93 15:44:56 GMT
Distribution: world
Organization: The Internet


	Chris Tanski <CTANSKI%ONONDAGA.bitnet@CUNYVM.CUNY.EDU> writes:
>
>I am going to be taking a programming course next year and I want to know
>which one to take. My options are: BASIC, Pascal, FORTRAN, C, and COBOL. I
>want to be able to write programs on my VMS acct. so whichever programming
>language is best for that is the one I want. Thanks and please reply directly
>to ctanski@onondaga.bitnet.
>

	That's rather a difficult question.  One might as well ask which 
"motor vehicle" is best; a motorcycle, a Chevy, a Masserati, a USAC race
car, or a garbage truck!  If you want to haul garbage, there's nothing like
COBOL^H^H^H^H^H a garbage truck. :-) 

	Seriously, Fortran is good for number crunching and usable, with 
difficulty, for almost everything.  COBOL is well suited to accounting type
things; e.g. money.  C is well suited to system programming, less well 
suited to number crunching and ill suited to accounting applications (no 
decimal string arithmetic).  C also tends to be rather cryptic.  BASIC and
Pascal have their proponents but I'm not sufficiently familiar with VAX
BASIC to be able to say what its strenths are and I don't really know
Pascal. 

	As a general thing, I'd say it's far more important to learn basic
principles than BASIC.  Learn control structures.  Learn data structures.
Learn to document your work.  More code has wound up in the garbage can for
lack of adequate documentation, than for any other reason (it's easier to 
rewrite it than to figure out how to fix or modify it).


*************************************************************************
*                                                                       *
*                        Here, there be dragons!                        *
*                      dragon@nscvax.princeton.edu                      *
*                                                                       *
*                                                Richard B. Gilbert     *
*************************************************************************

Newsgroups: comp.os.vms