Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.3 4.3bsd-beta 6/6/85; site ucbvax.BERKELEY.EDU
Path: utzoo!decvax!bellcore!ulysses!ucbvax!UWAV4.BITNET!02335
From: 02335@UWAV4.BITNET
Newsgroups: mod.computers.vax
Subject: VMS CLI routine problems
Message-ID: <8605210704.AA19091@ucbvax.Berkeley.EDU>
Date: Wed, 21-May-86 03:05:37 EDT
Article-I.D.: ucbvax.8605210704.AA19091
Posted: Wed May 21 03:05:37 1986
Date-Received: Thu, 22-May-86 01:24:27 EDT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The ARPA Internet
Lines: 61
Approved: info-vax@sri-kl.arpa

Subj:  VMS CLI routine problems

I am unable to give a default list to a qualifier in a CLD.  This is
what I am doing.

      Qualifier DEPARTMENTS
                value(list,default=("ENGR","CIVE","OTHER"))

Now when I SET COMMAND to this it works fine.  VERB, however, shows
it like this:

      qualifier departments
                value(list,default="ENGR,CIVE,OTHER")

Which is not correct, but may be a bug in VERB.  Now I run the image
and do this:

      10 istat = CLI$Get_Value("DEPARTMENTS",dept)
         if (.not.istat)  call exit(istat)
         print*, dept
         goto 10

What I get is:

      ENGR
      %DCL-W....  entity missing

What I should get is:

      ENGR
      CIVE
      OTHER
      %DCL-W...  entity missing

If I do this:

      $ command/department=("ENGR","CIVE","OTHER")

I do indeed get the desired output.  So it looks like the SET COMMAND
is screwing up my default list.

However if I do this:

      $ command/depart="ENGR,CIVE,OTHER"        ! like VERB shows it

I get what you would expect:

      ENGR,CIVE,OTHER
      %DCL-W...   entity missing

Is this a known bug or should I forward it to DEC.  Does anyone have
a work around other than hardcodeing the default list in the program?

Thanks,

Tony Andrea
Engineering Computer Services
University of Washington

BITNET:      02335 at UWAV4
ARPA/CSNET:  02335%uwav4.bitnet@wiscvm.arpa