HDTenEightyP/NetNews huggingface dataset:
From: gezelter@rlgsc.com
Newsgroups: comp.os.vms
Subject: Re: Anybody have time arithmetic routines?
Date: 21 Jan 93 09:46:22 EST
Organization: Robert Gezelter Software Consultant, Flushing, NY

In article <1993Jan21.020035.18787@slcs.slb.com>, brydon@asl.slb.com (Harvey Brydon (918)250-4312) writes:
> I have to do some reporting on some timing tests and have a need to calculate
> elapsed times for a number of values.  Is there a way to calculate this in a
> simple fashion (DCL preferred, Fortran otherwise)?  I'll be parsing the
> timestamps from an RMS file with DCL.  Before I get a league of answers about
> calculating delta time from 'now', let me make it clear I need to calculate
> this from two arbitrary timestamps.  eg:
> 
> $ t1 = "20-JAN-1993 08:07:09.03"
> $ t2 = "20-JAN-1993 10:22:13.44"
> $! (magic dcl here)
> $ show sym diff  ==> "0 02:15:04.41"
> 
> (if my time math is correct).  I would also like to be able to add some of
> these delta times to totals:
> 
> $ dt1 = "0 00:00:10"
> $ dt2 = "0 00:01:15"
> $ (more magic...)
> $ show sym sum_dt   ==> "0 00:01:25"
> 
> Anybody have any tricks for this or is it just a matter of brute force
> parsing, adding and carrying?
> _______________________________________________________________
> Harvey Brydon         | Internet:   brydon@dsn.SINet.slb.com
> Dowell Schlumberger   | P.O.T.S.:   (918)250-4312
>    Pity the meek, for they shall inherit the earth.
-- 
Harvey,
 
In DCL it might be a bit of a pain (I don't recall a facility 
for subtracting Quadwords).
 
In FORTRAN, it is simple. Simply do the following:
 
      Convert start date to internal format using LIB$CONVERT_DATE_STRING
      Convert end date to internal format using LIB$CONVERT_DATE_STRING
      Use LIB$SUB_TIMES to determine the difference
      Convert difference to ASCII string using LIB$FORMAT_DATE_TIME
        (alternatively, this step can use the $FAO system service)
 
The above is fairly simple. 
 
I hope that the above is helpful. If I have been unclear, or if 
I can be of further assistance, please feel free to contact me 
via Email or phone.
 
- Bob
+--------------------------------------------------------------------------+
| Robert "Bob" Gezelter                       E-Mail:  gezelter@rlgsc.com  |
| Robert Gezelter Software Consultant         Voice:   +1 718 463 1079     |
| 35-20 167th Street, Suite 215               Fax:       (on Request)      |
| Flushing, New York  11358-1731                                           |
| United States of America                                                 |
+--------------------------------------------------------------------------+
Newsgroups: comp.os.vms
From: rkoehler@author.gsfc.nasa.gov (Bob Koehler)
Subject: Re: SCSI disks on MVII
News-Software: VAX/VMS VNEWS 1.4-b1  
Organization: CSC System Sciences Division
Date: Fri, 22 Jan 1993 13:30:00 GMT

In article <1993Jan20.232349.1@cc.curtin.edu.au>, zrepachol@cc.curtin.edu.au writes...
> 
>I have been told that emulex are quiting the disk controller market. Anyone
>know the truth etc of this?
> 

This has been published in several industry publications.  Emulex, it seems,
suddenly found they could no longer profit in the DEC compatable disk market.
We have some of there drives, and have been told that we cannot but more (I
have an empty slots in a chassis where I could have used one).

------------------------------------------------------------------------------
Bob Koehler                     |   Any illusion to these opinions being other
rkoehler@author.gsfc.nasa.gov   |   than just mine alone is just that.
From: HANY@JCSVAX1.BITNET
Newsgroups: comp.os.vms
Subject: Can DCL programs execute 'other' commands ?
Date: 23 Jan 93 12:41:00 GMT
Distribution: world
Organization: The Internet

Hi ..
        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

Thanks for any help.
Hany.
[ e-mail: hany@jcsvax1.bitnet
      or: hany%jcsvax1.bitnet@pucc.princeton.edu ]
From: dsc3pzp@nmrdc1.nmrdc.nnmc.navy.mil (Philip Perucci)
Newsgroups: comp.os.vms
Subject: 2 SYS disks vs. Standalone backup
Date: 27 Jan 93 13:16:48 GMT
Organization: Naval Medical Research & Development Command

The patient:
  VAX 6410, 3 x 1Gb hard disks, 1 TK70.

The problem:
  Backups!  Also, no money for 9-track or 8mm...

Issue:
  Backups need to be "idiot" proof, so operations personnel can run them.
The procedures should also be easy and reliable.  Stand-alone backup on
TK70 is difficult/impossible to automate.

Proposal:
  Have 2 separate system disks.  The 2nd system disk would be used ONLY for
backup of *main* system disk.  The 2nd system disk would have a "captive" 
account "backup" for, you guessed it, backup.  The operator would boot the
2nd system disk, logon as "backup", follow prompts for swapping TK70s needed
to backup the *main* system disk, then re-boot the *main* system disk.

Question:
  Is proposal valid?


-- 
===========================================================================
  phil perucci                | "Any opinions expressed are my own views, 
  ssb1pzp@imcvms.med.navy.mil |  not the position of any organization"
===========================================================================
From: rforster@galaxy.gov.bc.ca (Russ Forster)
Newsgroups: comp.os.vms
Subject: Need C program to get default directory
Date: 26 Jan 93 07:39:01 -0800
Organization: BC Systems Corporation
Reply-To: RFORSTER@GALAXY.GOV.BC.CA


	I am looking for a very small VAXC routine to find the default
	directory given a username.  All the GETUAI examples I've seen
	have been ~100 lines.  I'd like something in the 25 line or less
	range.  Since what I want is small can you send it directly to me
	and not to the group.

	Thanks in advance.
-- 
Regards,

Russ Forster (postmaster), Sr. Technical Analyst, MultiVendor Group
BC Systems Corp., 4000 Seymour Place, Victoria, B.C., V8X 4S8
Internet: RForster@Galaxy.Gov.BC.CA       Phone: (604) 389-3186
From: lionel@quark.enet.dec.com (Steve Lionel)
Newsgroups: comp.os.vms
Subject: Re: fortran/nohpo?
Date: 24 Jan 93 17:03:25 GMT
Article-I.D.: dbased.1993Jan24.172352.5424
Organization: Digital Equipment Corporation


In article <8F8C298AB90D201115@NERUS.PFC.MIT.EDU>, MRL@PFC.MIT.EDU 
(Mark London) writes...
>Can anyone tell me what the /nohpo switch for fortran does, and it what cases
>do I need to add it, and is there a way to detect via a logical name if it
>applies the vax I'm using?  Thanks.
> 

Ah, someone's been peeking at CLD files, I see.  Here's the story.  We
currently have two Fortran compilers for OpenVMS VAX; VAX FORTRAN (current
version V5.9) and VAX FORTRAN High-Performance Option (FORTRAN-HPO,
current version V1.3.)  The primary audience for FORTRAN-HPO are those
people with VAX vector processors or multiprocessor systems, as it
has the ability to do automatic vectorization and/or decomposition for
parallel processing, though it has a number of other nice enhancements.

The way we sell FORTRAN-HPO is in the manner of an "option" to VAX FORTRAN,
even though it is a separate compiler.  You are required to be licensed
for VAX FORTRAN and should (but are not required to) have the VAX FORTRAN
product installed on the system where you have FORTRAN-HPO installed.
When installed, the FORTRAN command, by default, gives you the FORTRAN-HPO
compiler.  If you want to use the VAX FORTRAN compiler, you use the
/NOHPO qualifier.

Now it occurred to me that there may be some people who have FORTRAN-HPO
but choose not to use it for certain applications (though I really don't
know of good reasons to do so), and that these people might put
explicit /NOHPO qualifiers in their command procedures.  So then I thought
about what would happen if someone ran these command procedures on
systems which didn't have FORTRAN-HPO installed; the /NOHPO qualifier
would result in a DCL command error since the VAX FORTRAN CLD didn't
define it.  So in VAX FORTRAN V5.9, I added /NOHPO as a legal qualifier
to the FORTRAN CLD, just so that command procedures which use that
qualifier wouldn't break.  The compiler ignores it completely, and
you shouldn't worry about it if you haven't purchased FORTRAN-HPO.

All of this will become moot when DEC Fortran V6.0 hits the street, as
it replaces both VAX FORTRAN and VAX FORTRAN-HPO; you will now get the
vector and auto-decomp features of FORTRAN-HPO at no extra cost.  The
/HPO qualifier is still in the CLD, but is ignored.  (As is
the /CONTINUATIONS qualifier.)

Steve Lionel                    lionel@quark.enet.dec.com
SDT Languages Group
Digital Equipment Corporation
110 Spit Brook Road
Nashua, NH 03062
Newsgroups: comp.os.vms,alt.religion.kibology
From: kibo@world.std.com (James "Kibo" Parry)
Subject: Re: moderated vs. unmoderated: a modest proposal
Keywords: Kibo is nifty.
Organization: Two rooms filled with typography, in downtown Boston
Distribution: world,kibo
Date: Wed, 27 Jan 1993 06:26:09 GMT

[comp.os.vms]
In article <1993Jan23.081329.715@duphy4.physics.drexel.edu> lane@duphy4.physics.drexel.edu writes:
>So how do you get the VAX-neophytes to read the FAQ before posting?   How about
>a "filtered" newsgroup, rather than moderated?  The idea is to make the
>"moderator" a simple automaton, that does the following:
>
>  o   It checks posts for a simple keyword, perhaps in the
>      message header, perhaps in the sig. [...]
>  o   If the keyword is present, the message is acknowledged and posted
>      (or "approved" in netnews-speak).
>
>The proposal above is serious, but for fun you could make the keyword
>"Kibo" :-) 

Yes, but then it would pass anything I post, and you'd have
alt.religion.kibology zonies bozing it up over in comp.*, and
so I'll have to predict the Imminent Death of The Net.

							-- K.

Newsgroups: comp.os.vms
From: fisk@cvdv73.mayo.edu (Tom Fisk)
Subject: Tool to reorganize/transform ASCII files
Reply-To: fisk@mayo.edu
Organization: Mayo Clinic, Rochester, MN
Date: Thu, 28 Jan 93 14:28:33 GMT


We are looking for a tool that would allow us to take an ASCII input file, 
and reorganize/transform it to another format.

The task at hand is taking ASCII data dumps from several different
medical centers that have similar but different formats and "normalizing" them
to one common data format that I can import into a database.  I would
essentially have to take apart the ASCII input records, reorganzie the data,
possibly do some transformations on the data (i.e., changing all the diagnosis
codes to a standard list), and write the data out to my common format.  I 
will then take this common format and import it into my database.

The "perfect" tool would allow me to have a configuration file to drive the
entire process (since I have to do this for several different formats).

Does anybody know if such a beast exsits?  Does this sound like something 
that awk/gawk would be capable of handling?

Thanks for your help and suggestions!  Tom.
--
-------------------------------------------------------------------------------
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    +----------------------------+
-------------------------------------------------------------------------------
Newsgroups: comp.os.vms
From: tihor@acf3.NYU.EDU (Stephen Tihor)
Subject: Re: How are the Alpha workstations?
Organization: New York University
Date: Fri, 22 Jan 1993 23:27:00 GMT

So far whiz bang but we are still migrating.  You want to get field test if you
expect to cluster before the next release of OpenVmS for AXP
From: waltoml@wkuvx1.bitnet
Newsgroups: comp.os.vms
Subject: RE: How to repeat "new Mail message"??
Date: 25 Jan 93 12:36:42 CST
Organization: Western Kentucky University, Bowling Green, KY


Hi! 
I understand you need a mailcounter that will show the "you have X new
mail messages" message when you execute it.  This small excerpt from a
command procedure I wrote called BIGRED.COM should do what you have
asked.  Feel free to modify it to suit your own needs. 

Settummanque!

Mike Walton  (WALTOML@WKUVX1.BITNET)
former Assistant Area Coordinator/Information Manager
Greenwood, Kentucky

---------------------------cut here please------------------------------
$MAILCOUNT:
$!This simple thing only counts the number of mail messages you've received
$!since logging on. It won't (or at least in this version, anyways) let you
$!see who you received mail from:
$del3   :== delete
$Set term/nobroadcast
$define sys$output mailmsg.tmp
$!This creates a temporary file to read mail from:
$Mail
  Spawn Show Time  
  Exit
$deassign sys$output
$close/nolog sys$output
$!This closes the temporary file
$set term/broadcast
$define/nolog sys$output tt:
$!We are now going to read what we "recorded"
$Say Bold
$type mailmsg.tmp
$!now to clean everything up:
$del3 mailmsg.tmp;*
$Say restore, co
$return
$EXIT
From: tanner@cerritos.edu
Newsgroups: comp.os.vms
Subject: Re: decwindows to motif converter
Date: 21 Jan 93 19:37:52 PST
Organization: Cerritos College, Norwalk CA

In article <1993Jan20.214306.16560@funlwb.enet.dec.com>, cameron@aussie.enet.dec.com writes:
> I think Spike means a program that would convert C code or UIL code from the
> older DECwindows Toolkit style to the Motif Toolkit style.  When Motif accepted
> Digital's Toolkit definitions, they changed the naming from DwtRoutine to
> XmRoutine.  I haven't seen a program that will do this yet, but I sure wish I
> had - I needed it recently for a bit of my own coding.

There is a suite of tools in DECW$EXAMPLES:, DECW$DXM_PORT_*.EXE which are
called by DECW$DXM_PORT.COM.

The first thing I did when I decided to convert DWProfile to
DECwindows/Motif was to run the C and UIL files through this, hoping that
all I'd need to do afterward would be to recompile. :-)

What it does is map the Dwt syntax to the Xm syntax for all functions,
types, etc. that have a straight conversion.  This is much better than
doing it by hand.  It also flags those places that don't have a single
replacement for you to investigate.

You also need to review parts of your application when converting to
DECwindows/Motif because the underlying Xlib went from X11R2 to X11R3
(Motif 1.0) or X11R4 (Motif 1.1) [I think I have that right] and the
functionality may have changed slightly.

There are also functions where the syntax is a simple conversion, but the
semantics have changed.  For example, the DwtSTextSetString() maps straight
to XmTextSetString(), except that when run, the cursor is left at the start
of the string rather than the end.

-Bruce
-- 
Bruce Tanner        (310) 860-2451 x 596    Tanner@Cerritos.EDU
Cerritos College    Norwalk, CA             DoD #0161  NOMAD #007
From: steve@dbaccess.com (Steve Suttles)
Newsgroups: comp.os.vms
Subject: Re: DCL quirk (fwd)
Date: 28 Jan 93 01:16:43 GMT
Organization: Cross Access Corp., Santa Clara, CA
X-Newsreader: Tin 1.1 PL4

dgalb@carina.unm.edu (David Galbraith CIRT) writes:
: 
: I got this from a friend... Can somebody give a good explanation as to
: why it doesn't give an error? 
: 
: Thanks,
: David Galbraith
: dgalb@unm.edu
: 
: -------------------------------------------------------------------------------
: From:   JCSTASKO@bootes.unm.edu "JOHN STASKO"
: To:     dgalb@uranus.unm.edu
: Subj:   DCL quirk
: 
: 
: Dear Dave:
: 
: Why does the following command not give an error?
: 
: $ '''''''''''''''
: 
: (any number of apostrophes will work.)
: 
: =John
: -------------------------------------------------------------------------------

Because an apostrophe says "Any name that follows me should be looked
up as a DCL symbol; if one is found, that value goes in that place.
Otherwise, a null value goes there".  An apostrophe can be used to
terminate the name and get tossed (so 'foo'bar might look like FOObar)
or any non-naming character terminates the name (like a space).  For
that reason, there is no requirement for a terminating apostrophe, and
therefore an even or odd number of apostrophes will have the same
effect.

That effect is to look up the null name (which cannot have a value) and
discover that it has no value, and throw away matching apostrophes as
having been satisfied until there are no more pairs.  If there is an
odd number, the last one will be thrown away singly.  Eventually, DCL
will glue all those nothings together, only to discover that your
freind typed...nothing.  And to DCL, a blank line is not an error.

If you treat DCL like a black box, there are all KINDS of wierd things
you can get it to do.  It's kinda fun to figure out what they do
beforehand; it's rewarding to try it and be right.  It's surprising
when it's figured wrong.  IF YOU CHOOSE TO PLAY THIS GAME, BE CERTAIN
YOU CAN'T HARM ANYTHING (i.e., log in as a peon and assume you'll lose
files).

Neat things off the top of my head:

HELP ME

MAKE LOVE  (results depend on whether TECO is installed)

LOGORYTHM

DEFINE MAIL UPS

HELP YOU

DIR :== DELETE

EDIT == "WRITE SYS$OUTPUT ""neener neener neener""!"

SET MESSAGE /NOF/NOI/NOS/NOT

ASSIGN _NL: SYS$SYSTEM

SET TERMINAL/SPEED=0

ASSIGN SYS$PRINT SYS$BATCH

ASSIGN :== DEFINE

DEFINE := ASSIGN

DEFINE :== DEFINE

SET NOCONTROL=(Y,T)
WAIT 1:0:0

FORMAT SYS$SYSDEVICE	* I WARNED YOU!! *

UNFORMAT SYS$SYSDEVICE

RENAME SYS$SYSDEVICE:[000000]000000.dir; 111111

RENAME SYS$SYSTEM:*.exe *.com

PRINT NASTY.TXT /NONO

SUB MERGE /NONO

... and others...

-- 
Steve Suttles                Internet:  steve@dbaccess.com      Dr. DCL is IN!
CROSS ACCESS Corporation     UUCP: {uunet,sgiblab}!troi!steve  Yo speako TECO!
2900 Gordon Ave, Suite 100   fax: (408) 735-0328              Talk data to me!
Santa Clara, CA 95051-0718   vox: (408) 735-7545   HA! It's under 4 lines NOW!
From: 92anderson@gw.wmich.edu
Newsgroups: comp.os.vms
Subject: Diacriticals???How???
Date: 25 Jan 93 17:49:18 EST
Organization: Western Michigan University


I have a problem....    how does one implement diacriticals (those funny-
	looking foreign marks/letters) on a vax/vms?

Everytime I switch to a foreign keyboard set, and login to the system, it 
	reverts back to usa.

Anyone got any suggestions?  
					J.C. Anderson
From: winalski@adserv.enet.dec.com (Paul S. Winalski)
Newsgroups: comp.os.vms
Subject: Re: Mailbox access
Date: 27 Jan 93 23:43:19 GMT
Reply-To: winalski@adserv.enet.dec.com (Paul S. Winalski)
Organization: Digital Equipment Corporation, Nashua NH


In article <20303.2b5bb282@ul.ie>, 9120092@ul.ie writes:
|>
|>So far I can create mailboxes and pass data
|>to a subprocess of my account but can not do the same to a mailbox in
|>another account. This is primerily caused by VMS which takes a mailboxes
|>name and places the pointer to that device in the PCB. So when a mailbox
|>is created instead of being "My-Mailbox" and being open for group
|>access it is infact "My-PID.My-Mailbox" which tends to throw a spanner
|>in the works for me as I can not get around that protection.
|>I think IO$Write_Attention gets involved some where but I'm not sure.
|>Am I right about the mailbox protection. any suggestions on getting
|>around it?

IO$_WRITEATTN doesn't enter into it at all.

You haven't told us exactly what fails when you try to run your application
from another user account.  Your analysis above is completely wrong.  There
are no pointers to any devices (let alone mailboxes) in the PCB for a
process.

What does happen is that the $CREMBX service creates logical names for
temporary mailboxes in the LNM$TEMPORARY_MAILBOX logical name table.
Normally, LNM$TEMPORARY_MAILBOX is defined to point to LNM$JOB, your process's
job logical name table.  Thus, if you use $CREMBX to create a mailbox and
assign logical name XXX to the mailbox, the XXX logical name is defined in
LNM$JOB, and therefore only visible to your login process and all of its
subprocesses.  If you try to open the mailbox from another process, not in
the same job, using the logical name, it will fail because that process
cannot see the logical name.  One way to get around this is to use the
physical device name for the mailbox rather than the logical name.  You
can find the physical device name by doing a $GETDVI call on the channel that
was returned by $CREMBX, asking for the physical device name.  Then you can
use whatever means you wish to communicate that device name to the other
process (such as defining a group-wide or system-wide logical name, or writing
it to a file that the other process opens and reads, or whatever.

--PSW
Newsgroups: comp.os.vms
From: fairfield@slacvx.slac.stanford.edu
Subject: Re: Mailbox access
Organization: Stanford Linear Accelerator Center
Date: Wed, 27 Jan 1993 19:47:27 GMT

In article <1k628cINN2ei@gap.caltech.edu>,
   carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick) writes:

[in response to the probelm of allowing different processes
   to access mailboxes]

| then you're probably running afoul of the fact that the logical name for the
| mailbox (assuming it's a temporary mailbox;  I'd hate to think that you might
| have PRMMBX priv) is, by default, placed in your job logical name table, which
| is not easily accessible to processes outside of your own job.  If that's the
| problem, then you'll have to find some other way for the process that creates
| the mailbox to communicate the name of the mailbox to the other process.

    A CRUDE solution to this (which  I  DON'T recommend) is to give both
    processes  GRPNAM  privilege and create the logical pointing to  the
    mailbox in the LNM$GROUP.  (Do they need GROUP privilege as well?)

    A better solution, which we've  used successfully for several years,
    is  to  GRANT the users in question some identifier, then  create  a
    special logical name table to hold the mailbox  logical  names,  and
    put  an  ACL  on  the table allowing READ+WRITE to the identifier in
    question.  Here's a real  world  example  (the "unwashed masses" get
    the identifier $_TPC_USE):

$!+
$!  Create OASMBX logical name table and give read/write access
$!  to $_TPC_USE holders.
$!-
$	Create /Name_Table /Executive /Parent=Lnm$System_Directory -
	       /Attributes=Supersede /Protection=(S:RWED,O:RWED,G:R,W:R) -
	LNM$OASMBX
$!
$	Set Acl /Object_Type=Logical_Name_Table /Acl=( -
	  (IDENTIFIER=$_TPC_USE, ACCESS=READ+WRITE) )-
	LNM$OASMBX
$!

    BTW, we use this  for  mailbox communication between the interactive
    user and his/her batch job...

    		-Ken
-- 
 Dr. Kenneth H. Fairfield    |  Internet: Fairfield@Slac.Stanford.Edu
 SLAC, P.O.Box 4349, MS 98   |  DECnet:   45537::FAIRFIELD (45537=SLACVX)
 Stanford, CA   94309        |  BITNET    Fairfield@Slacvx
 ----------------------------------------------------------------------------
 These opinions are mine, not SLAC's, Stanford's, nor the DOE's...
Newsgroups: comp.os.vms
Subject: Re: Ehud
From: don@zl2tnm.gen.nz (Don Stokes)
Date: 27 Jan 93 09:12:05 GMT
Distribution: world,local
Organization: The Wolery

kaplan@bpavms.bpa.arizona.edu (Steve... friends don't let friends do DOS.) writes:
> Meanwhile, I'm left to sorting out the likes of:
> 
> 	(67GE)        norvaG duhE
> 	 reganaM krowteN tseuqnuS
> 	      moc.tseuqnus@norvag
> 
> by hand?

Do it with EDT:

c;br^M(32767(-cel81i ^Zbl+80cdel^M80(bld+clundc)d-cll-v))brdlex

And whaddaya mean "reganaM krowteN"?  He hasn't become one of *us* has he?

--
(emoh) zn.neg.mnt2lz@nod                       (555SD) MNT2LZ ,sekotS noD
(krow) zn.ca.wuv@nod           ertneC secivreS gnitupmoC ,reganaM krowteN
2505-594-4-46+             dnalaeZ weN ,notgnilleW fo ytisrevinU airotciV